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 is the error/SOC code if dd names are not sysut1 and sysut2 in IEBGENER?
List in order the hierarchical levels of jcl?
A maximum of 100 chars can be passed to Cobol through Parm in JCL, If we want to pass more than 100 Chars how we can do it ?
Max generations in GDG??
Hi, all Suppose i have 10 step in a job (s1,s2,s3,...s10) i want to execute step9 first and then step3 and i used the DPRTY for these steps. so what will happen to other steps? Will the get executed or only these two steps get executed?
Can you execute a PROC from another PROC?
What is the meaning of data definition name (ddname) and dataset name (dsname) in the DD statement?
How to skip first step of a job? Can we use COND on the first step?
Hi, Say I have 10 flat files and I want to copy all these 10 flat files to a GDG versions flat files (I have GDG base: FDWS01.TEST.RESTORE) in one shot. Can we do that in one shot using a JCL. May be by using IEBGENER. It's a bit urgent. So anyone's fast rely would be appreciated.. Thanks in advance.. 10 flat files ----------------------------------- FDWS01.SUB.RESTORE1 FDWS01.SUB.RESTORE2 FDWS01.SUB.RESTORE3 ; ; FDWS01.SUB.RESTORE10 TO GDG versions ----------------------- FDWS01.TEST.RESTORE.G0001V00 FDWS01.TEST.RESTORE.G0002V00 FDWS01.TEST.RESTORE.G0003V00 ; ; FDWS01.TEST.RESTORE.G0010V00
What is the function of the dd dcb keyword?
in catalog procedure i have step1 dd dsn=filea dd dsn=fileb dd dsn=filec ur concatenaning all the files. but i need to override fileb with file 2 ? can anyone give the ans pls for ths
What is DSNDB06 ?