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 |
What happens if both JOBLIB & STEPLIB is specified ?
In a single step if input file is present then only need to copy into output file or else need to through a RC is it possible. Note : i want it in a single step
Explain about LMOPEN -
Brief description of inline procedure of jcl.
Why we will create load module in PDS only, Why nt in PS?
what do you mean By spooling? Expand SPOOL?
What are steplib and joblib?
I am getting the file from Unix to Mainframes for every 15 minutes. The mainframe job get abended with bad records coming from unix. I recovered that by deleting the bad data. I need permenant solution how to fix the issue? The record is getting characters in in first 9 positions which it should not. Please provide me the solution how to skip the records if it finds the charcters in the first 9 positions. K
How many JOB statements a JCL can have ? If there are more than one JOB statements in a JCL, are they submitted in succession or in parallel ?
How do you access a file that had a disposition of KEEP?
List in order the hierarchical levels of jcl?
How to delete generations of gdg without deleting gdg base?