Time for me to jump in in this thread.

Bill Woodger wrote:

>And Abend-Aid shows R4 as zero?

Hmmm, first B somewhere, then MVI     0(R4),X'40' then B same place, then MVI   
  0(R4),X'00'.

What Source Code + what Variable is used for above? Is that about some padding 
with space and then with zero?



To Peter (OP), what is inside that header record which is causing a S0C4? 
Please post it if you can.

I believe you have never posted the full and all related messages and the 
relevant COBOL statements [1] and declarations about that Abend. If I missed 
it, just tell me, I'll search again to see if I can help you.

Please post what I asked if you can. Then we can look again at RMODE and AMODE 
and friends and other suggestions kindly given by others.


Peter, you said: 'Using the shops default compile and link settings'. Are they 
really, really, really the defaults? Could you review them again and perhaps 
post them if they differ from IBM's own defaults?

Trust me, someone changed a default thing and you're then SOL.

Also, 'Program moves from the FD to WORKING-STORAGE before the call to the 
assembler program for all “input” parameters.' Please post the statements and 
all keywords which calls that assembler program.


PS: I am at v2.1, not v2.2 where Peter is working on. 

PS2: I have encountered S0C4 abends in COBOL progs in the past, but that was 
usually related to something 'unexpected'. Trust me. ;-)

Groete / Greetings
Elardus Engelbrecht

[1] - yes, you have posted that 2 lines of bypass statements, but that is not 
helping here.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to