Copyright © TIBCO Software Inc. All Rights Reserved
Copyright © TIBCO Software Inc. All Rights Reserved


Chapter 3 Tools : CURSOR_FLDCOL

CURSOR_FLDCOL
Returns the relative column number within the field containing the cursor. (F)
Invocation
column = CURSOR_FLDCOL(screen)
 
A character string specifying the name of the screen. Its syntax is C (fixed-length character string) with length 16.
Usage Notes
Example
The following rule fills the example screen with data from the example table, displays it, determines the column where the cursor is positioned, and prints it to the message log:

 
CURSOR_FLDCOL_1;
_ LOCAL COLUMN_NUM;
_ ------------------------------------------------------------------------
_ ------------------------------------------------------------+-----------
_ FORALL EMPLOYEE : | 1
_ EMPLOYEE_DATA.* = EMPLOYEE.*; |
_ INSERT EMPLOYEE_DATA('EMPLOYEE_SCR'); |
_ END; |
_ FCNKEY_SPECS.FCNKEYS = FCNKEY_MSG('EMPLOYEE_SCR'); | 2
_ INSERT FCNKEY_SPECS('EMPLOYEE_SCR'); | 3
_ UNTIL EXIT_DISPLAY DISPLAY EMPLOYEE_SCR: | 4
_ CALL PROCESS_FCNKEY('EMPLOYEE_SCR'); |
_ END; |
_ COLUMN_NUM = CURSOR_FLDCOL('EMPLOYEE_SCR'); | 5
_ CALL MSGLOG( | 6
_ 'THE CURSOR IS POSITIONED ON COLUMN NUMBER ' || |
_ COLUMN_NUM); |
_ ------------------------------------------------------------------------

 

Copyright © TIBCO Software Inc. All Rights Reserved
Copyright © TIBCO Software Inc. All Rights Reserved