How to dynamically change the attribute in map ?

rohanthengal · Posted: Sun Jul 05, 2009 3:57 pm

Hi all,
I am facing a problem while sending an output to the map row by row.
There is one DISPLAY field having length 80 and occuring 5 times.
I am using cursors in my program and sending rows in CURSORS to this DISPLAY field one by one.
e.g.
X1 Y1 VENUE1 TIME1 DATE1 FIELD(E/V)-------DISPLAY(1)
X2 Y2 VENUE2 TIME2 DATE2 FIELD(E/V)-------DISPLAY(2)
X3 Y3 VENUE3 TIME3 DATE3 FIELD(E/V)-------DISPLAY(3)
X4 Y4 VENUE4 TIME4 DATE4 FIELD(E/V)-------DISPLAY(4).
Here the whole row is PROTECTED .....
I want FIELD to be unprotected and rest of the things in that row as a protected.
But i declared DISPLAY field as PROTECTED, and i want subfield in that DISPLAY as unprotected, to get the user input as EDIT(E) or VIEW(V) at that position.
I used following defclaration in map for diaplaying the rows.
DISP1 DFHMDF POS=(15,01), X
INITIAL='-----------------------------------------------X
--------------------------------', X
LENGTH=79, X
ATTRB=(ASKIP,NORM,PROT), X
OCCURS=5

Please help me ASAP to change the attribute dynamically in case of occurs.

dbzTHEdinosauer · Posted: Sun Jul 05, 2009 6:56 pm

attributes deal with fields - as defined by the map.

if you have an 79 byte field that you populate with 5 things, you still only have one map field.

what you have to do is learn bms ASAP, and re-do you map so that each line of your map will contain multiple fields, each with their own attributes which you can dynamically modifiy.

suggest you read about bms and you will learn there is more to it that just redefining the copybook. you need to learn about the actual map, which is populated by CICS during the SEND with the values supplied in your copybook.

ASAP is a command, not a request. As such it is not really appreciated. you would do better to study IBM technical manuals instead of misusing english abbreviations in an attempt to have others carry-the-load for your lack of technical skills.

Earl Haigh · Active User Joined: 25 Jul 2006 Posts: 475

dick scherrer · Posted: Mon Jul 06, 2009 9:14 am

Especially since there is an entire separate forum for students and people with little/no experience. . .

www.ibmmainframeforum.com - "A Help & Support Forum for Mainframe Beginners and Students"

Site admin on this forum has been known to ban students here and point them to the other forum.

d

[/quote]