one possibility I haven't seen mentioned is are there 2 DCB;s for the same
ddname?
I remember doing this once but other than make sure not to ever do it again
don't remember what the symptoms were

Mike


On 8/30/06, Andy Wood <[EMAIL PROTECTED]> wrote:

On Wed, 30 Aug 2006 08:34:19 -0500, Mark <[EMAIL PROTECTED]> wrote:

. . .
>>
>> Show the expansion of the CLOSE macro.
>> Is R1 getting cleared to indicate MODE=31? If not, it would be trying
to
>> close an ACB at location zero (and something else must be causing the
>> SC03).
>>
>00083C D707 B588 B588 00588 00588  1125          XC
>OPENLIST(OPENLIST_LEN),OPENLIST
>000842 9280 B588      00588        1126          MVI
>OPENLIST,128
>
>                                   1146          CLOSE
>((ACBBAR)),MODE=31,MF=(E,OPENLIST)    CLOSE THE FILE
>00087E 4110 B588            00588  1148+         LA
>1,OPENLIST                        LOAD PARAMETER REG 1   02-IHBIN
>000882 5031 0004            00004  1149+         ST
>ACBBAR,4(1,0)                STORE DCB ADDR IN LIST @L1C 01-CLOSE
>
>000886 1801                        1150+         LR
>0,1                                                 @L1A 01-CLOSE
>000888 1B11                        1151+         SR
>1,1                                                 @L1A 01-CLOSE
>00088A 0A14                        1152+         SVC
>20                                ISSUE CLOSE SVC        01-CLOSE

Well, there goes that theory.

Can you successfully close the ACB immediately after opening it? I'm
guessing that you can and that it is time to call IBM support for
assistance.

----------------------------------------------------------------------
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




--
Mike

----------------------------------------------------------------------
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