Joined: 14 Dec 2007
I am trying to open a file in my asm program. I am getting S0C4 during runtime for this statement( OPEN (INDCB,(INPUT)) )
Same statement executes well when run with just modlib.
When i try to run the same with just modlib by commenting the external programs the programs sucessfully reads n writes in flat file.
I am not able to find what went wrong during linking to external program?
Pls help me out in this
*ENTRY HOUSE KEEPING
LOOP GET INDCB,INAREA
Commenting the below lines (call to external program)
Commenting end here
EOF CLOSE (INDCB)
*EXIT HOUSE KEEPING
BR 14 RETURN
INDCB DCB DSORG=PS,MACRF=(GM),DDNAME=INFILE,EODAD=EOF,
OUTDCB DCB DSORG=PS,MACRF=(PM),DDNAME=OUTFILE,
*CONSTANTS & VARS
INAREA DC CL80' '
OUTAREA DC CL80' '
PARM1 DS 0CL5 ISSUE DATE FIELDS
MONTHS DS PL3 MONTH YEAR CODE
DAYS DS PL2 DAY
DBLWRD DS D
SAVE DS 18F