View previous topic :: View next topic
|
Author |
Message |
kratos86
Active User
Joined: 17 Mar 2008 Posts: 148 Location: Anna NGR
|
|
|
|
Hello,
I am trying to display a pop up screen in my CICS. My Mapset has two maps where one is used for pop up screen. Below is the CICS command to display my pop up and getting error as sfe, sa or mf order was received with an invalid extended color value. error occurred at location 0x9b in the write.
Not able to figure out what does that mean. Any pointers?
Code: |
EXEC CICS SEND
MAP (Mapname)
MAPSET (Mapset)
FROM (Group)
CURSOR
END-EXEC |
|
|
Back to top |
|
|
kratos86
Active User
Joined: 17 Mar 2008 Posts: 148 Location: Anna NGR
|
|
|
|
Mapset definition used
Code: |
MAPSET DFHMSD TYPE=&SYSPARM,MODE=INOUT,TIOAPFX=YES,STORAGE=AUTO, X
CTRL=FREEKB,LANG=COBOL,EXTATT=YES,HILIGHT=OFF |
|
|
Back to top |
|
|
Garry Carroll
Senior Member
Joined: 08 May 2006 Posts: 1205 Location: Dublin, Ireland
|
|
|
|
Quote: |
MAPSET DFHMSD TYPE=&SYSPARM,MODE=INOUT,TIOAPFX=YES,STORAGE=AUTO, X
CTRL=FREEKB,LANG=COBOL,EXTATT=YES,HILIGHT=OFF |
....and where are the fields for the map defined? The attributes of the fields are where the likes of extended colour values are to be found.
Garry. |
|
Back to top |
|
|
kratos86
Active User
Joined: 17 Mar 2008 Posts: 148 Location: Anna NGR
|
|
|
|
Code: |
GROUP01 DFHMDI SIZE=(08,80),LINE=1,COLUMN=1
ATTR01 DFHMDF POS=(01,13),LENGTH=50,
HILIGHT=UNDERLINE,
COLOR=GREEN,
ATTRB=(NORM,UNPROT,IC,FSET)
DFHMDF POS=(01,64),LENGTH=1,
ATTRB=(ASKIP)
ATTR02 DFHMDF POS=(03,13),LENGTH=50,
HILIGHT=UNDERLINE,
COLOR=GREEN,
ATTRB=(NORM,UNPROT,FSET)
DFHMDF POS=(03,64),LENGTH=1,
ATTRB=(ASKIP)
MSGOUT DFHMDF POS=(05,5),LENGTH=70,
COLOR=RED,
ATTRB=(NORM,PROT,ASKIP)
DFHMDF POS=(05,76),LENGTH=1,
ATTRB=(ASKIP)
|
Looks like the issue is due to the length of the MSGOUT field. When i decreased the size to 50 bytes i am able to skip the issue. But not sure why it does not work with 70 bytes. |
|
Back to top |
|
|
Garry Carroll
Senior Member
Joined: 08 May 2006 Posts: 1205 Location: Dublin, Ireland
|
|
|
|
t looks like the issue is with the field after MSGOUT, not with MSGOUT itself. I reckon this field is overlaying the end of the MSGOUT field, so when you move data into MSGOUT, the attributes of thls last field are corrupted.
Check the copybook generated for the map.
Garry. |
|
Back to top |
|
|
kratos86
Active User
Joined: 17 Mar 2008 Posts: 148 Location: Anna NGR
|
|
|
|
Not able to figure from the copybook. It all looks good to me. With each field not overlapping the other. |
|
Back to top |
|
|
Garry Carroll
Senior Member
Joined: 08 May 2006 Posts: 1205 Location: Dublin, Ireland
|
|
|
|
Were you able to get it working with any MSGPUT length > 50 and less than 70 ? Is the length of data moved to this field determined by the length of MSGOUT?
Garry |
|
Back to top |
|
|
kratos86
Active User
Joined: 17 Mar 2008 Posts: 148 Location: Anna NGR
|
|
|
|
I havent tried with >50, Even with the working code highlight option is not working. It is working for one line and not the other. |
|
Back to top |
|
|
Garry Carroll
Senior Member
Joined: 08 May 2006 Posts: 1205 Location: Dublin, Ireland
|
|
|
|
Are you setting highlight for MSGOUT or is it that highlight is not working for the ATTR01 and ATTR02 fields?
Garry. |
|
Back to top |
|
|
Mickeydusaor
Active User
Joined: 24 May 2006 Posts: 258 Location: Salem, Oregon
|
|
|
|
MAPSET DFHMSD TYPE=&SYSPARM,MODE=INOUT,TIOAPFX=YES,STORAGE=AUTO, X
CTRL=FREEKB,LANG=COBOL,EXTATT=YES,HILIGHT=OFF
try adding this to the above
MAPATTS=(COLOR,HILIGHT),DSATTS=(COLOR,HILIGHT),
CTRL=(FREEKB),TERM=3270-2,CURSLOC=YES |
|
Back to top |
|
|
kratos86
Active User
Joined: 17 Mar 2008 Posts: 148 Location: Anna NGR
|
|
|
|
Resolved the issue by splitting the CICS send into map-only and data-only logic. |
|
Back to top |
|
|
Rohit Umarjikar
Global Moderator
Joined: 21 Sep 2010 Posts: 3076 Location: NYC,USA
|
|
|
|
Good to know and thanks for posting the resolution. |
|
Back to top |
|
|
|