Good afternoon, IBM-MAIN

I am trying to dump several areas that are supposedly passed to a subsystem 
open routine.  Basically, following the GPSAM logic:

 DUMP$IT A=SSOB,L=SSOBHSIZ              
         L     R2,SSOBINDV              
        USING  SSOBEXT,R2               
 DUMP$IT A=SSOBEXT,L=SSALSIZE           
         L     R2,SSDADEBP              
        USING  DEBBASIC,R2              
 DUMP$IT A=DEBBASIC,L=DEBBASND-DEBBASIC 
         L     R2,DEBDCBAD              
        USING  IFGACB,R2                
 DUMP$IT A=IFGACB,L=ACBAMAX+4-IFGACB

The weird thing is the first 3 areas dump fine:

          ---> DUMP$IT(009BFFC8,009BFFE3) LENG=00028 AREA=DUMP area
009BFFC0                    E2E2D6C2 001C0010   *        SSOB....* 
009BFFD0  009BFFA4 0000E4E4 009BFFE4 00000000   *...u..UU...U....* 
009BFFE0  00000000                              *....            * 
                                                                   
          ---> DUMP$IT(009BFFE4,009C0057) LENG=00116 AREA=DUMP area
009BFFE0           001C0000 00000000 009C1474   *    ............* 
009BFFF0  009BFF80 00000000 00000000 00000000   *................* 
009C0000  00000000 00000000 00540000 009AABA8   *...............y* 
009C0010  00000000 009BFF80 00084000 00000000   *.......... .....* 
009C0020  00000000 00000000 0057A4DA 0106118F   *..........u.....* 
009C0030  00000000 00000000 00000000 00000000   *................* 
009C0040  00000000 00000000 00000000 00000000   *................* 
009C0050  00000000 00000000                     *........        * 
                                                                   
          ---> DUMP$IT(009BFF80,009BFF9F) LENG=00032 AREA=DUMP area
009BFF80  009E3C48 60000000 80000000 00000100   *....-...........* 
009BFF90  00000000 00000000 8F9C1160 00000000   *...........-....* 
                                                                   
while the last (ACB) produces ABEND=S0C4 U0000 REASON=00000011

In my case the reason of 11 for 0C4 probably means that "a program attemped 
to reference storage that had not been obtained" - does this mean the ACB 
is unavailable?  Am I missing something simple - what an Open routine can 
do without the ACB?

Thanks in advance!
-Victor- 

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to