How to get cursor position from system in CICS environment ?
Answers were Sorted based on User's Feedback
Answer / arun singh
There are three approches to cursor positioning.
1)static positioning.
by placing "IC" in the attrib parameter of DFHMDF for a
particuler field.
EX. DFHMDF POS=(3,16)
ATTRIB=(UNPROT,FSET,IC)
LENGTH=8
2)Dynamic symbolic positioning.
by using the symbolic name of the field
MOVE -1 TO THE LENGTH FIELD.
3)USING THE CURSOR IN THE SEND MAP.
EX. EXEC CICS SEND
MAP('............')
MAPSET('.........')
CURSOR(100)
END-EXEC.
the cursor will be placed at the position 100 of the
terminal relative to zero.......
| Is This Answer Correct ? | 23 Yes | 7 No |
Answer / pof
EIBCPOSN ( from EIBBLK) gives a number
int(EIBCPOSN /80) + 1 gives line #
1 + EIBCPOSN - 80 *(int(EIBCPOSN /80)) gives column #
| Is This Answer Correct ? | 18 Yes | 3 No |
Answer / amiya ranjan
You can get ur cursor position from EIBCPOSN.
give
COPY DFHAID in working storage.
from eibcposn you will get your cursor position.
suppose you have 80 columns in your screen and if your cursor is in 2nd row and 3rd column then your eibcposn is 80+3 =83
so by dividing it with 80 you will get 1 and adding 1 you will get your row number. Similarly you can get your column position by calculating with above formula given by Pof.
thanks.
| Is This Answer Correct ? | 13 Yes | 0 No |
Answer / venkat
to get the cursor pos of cics environment by the concept
of 'eibcposn'.by copy this dfhbmsca we can achive this.
| Is This Answer Correct ? | 8 Yes | 2 No |
Answer / harsha
1 Divide EIBCPOSN by 80.
2 Save the Quotient. Add 1 to it to get the ROW.
3 Remainder will be your column number.
| Is This Answer Correct ? | 6 Yes | 2 No |
How to pass values in jcl to cobol?
How do you designate a comment in JCL?
If I update one or more members in a pds in the step 1, how can I reach these new contents to be used in the step 2 of the same job? To start a new job via intrdr is not satisfactory, because I must solve this problem in one job.
How is a GDG base created?
I have 20 steps in a job... step01, 02....step17...step20. For some reason I want to execute step17 only if the return code for all the previous steps are less than or equal to 4. otherwise if return code for any of the previous 16 steps is greater than 4, then step17 should be bypassed. How do I do that ?? how and in which step should i formulate COND parameter
Wrete a JCL to compare two files and mached records move to onc file & un mached rows wants to another file?
13 Answers CGI, DSRC, IBM,
how to identify the file used in the JCL is an VSAM file. Just seeing the JCL code how can we track the file as VSAM file?
How to see the COMP3 value(packd decimal)
How do you run a COBOL batch program from a JCL? How do you run a COBOL/DB2 program?
How many positional parameters are there in job statement?
What are isolation levels? Where do we need to specify them in compiling JCL?
The maximum number of in-stream procedure you can code in any JCL is ?