MVSFORUMS.com

m_v_ratnam · Posted: Tue Jul 17, 2007 1:08 pm Post subject:

HI All,

I am having a BMS map, When I am sending the map with intial value swith mapt set , I am getting PROG 753, What could be reason for thsi porblem

I just deleted some fileds from am existing map and map set , then the map stopped working. what are the possible reasons. Are there any tooks to Generate BMS MAP Please help me out to come out of thsi porblem
_________________
regards
Venkata Ratnam Mutyala

CICS Guy · Intermediate Joined: 30 Apr 2007 Posts: 292 Topics: 3

Garbage in uninitialized fields?

kolusu · Posted: Tue Jul 17, 2007 1:51 pm Post subject:

m_v_ratnam,

The PROG 753 means that invalid data or command are sent to the terminal. As CICS GUY mentioned most of the time it is due to data not being initialized by the program. If the application program does not explicitly initialize its working storage, you might edn up with such errors

You can also initialize the working storage section using the COBOL runtime options. COBOL II used the WSCLEAR compiler option to clear storage to zeroes, but in new COBOL (LE/370) use the runtime environment options: STORAGE=(00,NONE,NONE,0K) . A job to update the runtime options for COBOL and LE for CICS can be found in library CEE.SCEESAMP. The options source itself is member CEECOPT, and the job to update it is in CEEWCOPT. The STORAGE options default to (NONE,NONE,NONE,0K) and this must be set to (00,NONE,NONE,0K) to clear storage if the program doesn't do this on its own.

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu

CraigG · Posted: Tue Jul 17, 2007 1:57 pm Post subject:

m_v_ratnam · Posted: Tue Jul 17, 2007 11:45 pm Post subject:

HI all
Thank u for ur quick replies Very Happy

,

I have intialized the map set before sending the map.
I do recompiled the porgrams and set new them in CICS.
My porgram contains code to portect some fields and set the cursor to staring of the map
Still I am geting this porblem

I have a very specific question regarding MAPset.y Map set was not gerenated by compiler It was hand coded. I have cross verified with generated map set. It is matching perfectly.

I observered there is filler of X(01) in mapset. after every even length fileds, What the logic for this filler , What was the sinificance of this filller , Does it comes only for even length fields or any other logic is there Question

My map contains two set of fileds , One for complete MAP including input and OUt and constant text files , another contains data only filelds.
I need some clarification regarding stopper filelds, what is correct attriburte for stopper field Question

_________________
regards
Venkata Ratnam Mutyala

CICS Guy · Intermediate Joined: 30 Apr 2007 Posts: 292 Topics: 3

m_v_ratnam · Posted: Wed Jul 18, 2007 5:32 am Post subject:

Hi
I have hand coded MAP SET (cobol copy book) since it was an exiting program. all the variable names in existing mapset were reanamed and used in porgram, so I have changed existing mapset like new map structure.
How ever CICS load module for BMS map is from compiler only.
_________________
regards
Venkata Ratnam Mutyala

CICS Guy · Intermediate Joined: 30 Apr 2007 Posts: 292 Topics: 3

"Exiting program"?
The "CICS load module for BMS map" is the csect, the "cobol copy book" is the dsect.
If the area is properly initialized, then maybe the alignment between your hand-coded dsect and the assembler generated csect is off.
Can you CEDF the send and examine the hex contents of the data being sent?