On Thu, 11 Sep 2008 09:37:33 -0500, Tom Marchant wrote:
>
>I've done something like this:
>
>//SMPCNTL  DD  DATA,DLM=&&

Sorry about the mangling of the ampersands by the listserv's web interface.
 This should be slightly better:

//SMPCNTL  DD  DATA,DLM=$$
++USERMOD(HASPUEX)  REWORK(2008159).
++VER (Z038) FMID(HJE7740).
++JCLIN.
//ASSEM01  EXEC PGM=IEV90
//SYSPUNCH DD DSN=&&PUNCH(HASPUEX)
//SYSIN    DD *
$$
//       DD  DISP=SHR,DSN=UMOD.SOURCE(HASPUEX)
//       DD  DATA,DLM=$$
/*
//LINK0002 EXEC PGM=IEWBLINK,PARM=('OPTIONS(GENOPTS)')
//GENOPTS  DD *
                   RENT,REUS,REFR,NCAL
//SYSLMOD  DD DSN=SYS1.SHASLNKE
//SYSLIN   DD *
  INCLUDE AHASMOD(HASPUEX)
  NAME  HASPUEX
++SRC  (HASPUEX) SYSLIB(SHASSRC) DISTLIB(AHASSRC) .
$$
//       DD  DISP=SHR,DSN=UMOD.SOURCE(HASPUEX)

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