On Sun, 15 Mar 2009, David Speake wrote:
> I have used dynamic allocation via the environmental variables in COBOL.
> Thanks to Steve Comstock and others for getting me started.
> But I see nothing about SYSOUT and it says a DSN is required.
> My need is for a //X DD SYSOUT=(B,SMTP)
>
>From my looking at the LRM for COBOL, it appears that SYSOUT is not an
option. Looks like you're back to calling BPXWDYN for what you want to do.
01 BPXWDYN-PARM.
05 BPXWDYN-LEN PIC S9(4) BINARY VALUE IS +34.
05 BPXWDYN-DATA PIC X(34)
VALUE IS 'ALLOC FI(X) SYSOUT(B) WRITER(SMTP)'.
...
CALL 'BPXWDYN' USING BPXWDYN-PARM
END-CALL
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/bpxzb680/6.6
--
Q: What do theoretical physicists drink beer from?
A: Ein Stein.
Maranatha!
John McKown
----------------------------------------------------------------------
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
