IBM Mainframe Forum

by **VIJAY1** » Wed Dec 05, 2012 3:38 pm

I have a problem with my cics programme.
I have used dynamic cursor in my programme.
I have five fields in the map.
I validate all the fields for two times.
For the first time i validate for spaces and then checks for their existence in db2.
dynamic cursor is working fine for the spaces validation.
but later the cursor is going to the starting position on the screen.
I am not sure what is happening.
Can some one help...
Thank you,...

by **c62ap90** » Wed Dec 05, 2012 6:14 pm

Well, it's very hard to diagnosis your issue since you do not show any code so I'll take a guess. Do you use the Symbolic Cursor Positioning technique?

ATTRB=(UNPROT,NORM,IC,FSET) {Insert Cursor in Map}

Symbolic Cursor Positioning example:

Select all

05 Map-Name-L    Pic S9(04) COMP.
05 Map-Name-A    Pic x(01).
05 Map-Name       Pic x(30).

Receive Map…
Move –1 to Map-Name-L.    {after Send Map, Cursor stops here}
EXEC CICS SEND
MAP ('XXXXXXXX')
MAPSET ('XXXXXXXX')
   FROM (map area)
DATAONLY
      CURSOR
END-EXEC.

by **VIJAY1** » Wed Dec 05, 2012 8:12 pm

thanks for the reply...I moved 1 to one of the fields l value instead of -1 by mistake..and the problem got solved now..

by **c62ap90** » Wed Dec 05, 2012 10:40 pm

Great. Thanks for the follow-up reply.

IBM Mainframe Forum

cics programme

cics programme

Re: cics programme

Re: cics programme

Re: cics programme