Getting s478 error in IBM OS/390

Hi
I have old program which is in assembler.. dynamicalley allocation
files based on the type of allocation. for example if type "D" then it
alloctes file in DASD the this assembler pgm alloctes, opens,
read/write and closes it.  Due to new requirement we have to use "T"
for some files ie ( instead disk it has allcoate Tape file.) when we
use T it allocates and opens the file and writes it sucessfully. But
while closing it gives exception at line no

VCLOSE   CSECT
STM   14,12,12(13)
USING VCLOSE,15
LA    11,SAVECL
ST    11,8(13)
ST    13,SAVECL+4
LR    13,11          .... this line
B     VCLOSE1

with S478 OF CONDITION CODE 8.

In Message-ID:<cafedec9.0409231442.9cc07e1@posting.google.com>,
sankarravi6@gmail.com (sri) wrote:

>Hi
> I have old program which is in assembler.. dynamicalley allocation
>files based on the type of allocation. for example if type "D" then it
>alloctes file in DASD the this assembler pgm alloctes, opens,
>read/write and closes it.  Due to new requirement we have to use "T"
>for some files ie ( instead disk it has allcoate Tape file.) when we
>use T it allocates and opens the file and writes it sucessfully. But
>while closing it gives exception at line no
>
>VCLOSE   CSECT
>         STM   14,12,12(13)
>         USING VCLOSE,15
>         LA    11,SAVECL
>         ST    11,8(13)
>         ST    13,SAVECL+4
>         LR    13,11          .... this line
>         B     VCLOSE1
>
>with S478 OF CONDITION CODE 8.

You might want to double-check that abend address.  S478 is
an error during FREEMAIN, and you're not doing a FREEMAIN, here.
I also notice that you're not doing a GETMAIN, so I hope this is
not linked RENT.

--
Arthur T. - ar23hur "at" speakeasy "dot" net
Looking for a good MVS systems programmer position