I am refering to the CEEUOPT module that you would link-edit into each
individual program in the application. I have the "region-specific" CEEROPT
working. I have linked CEEUOPT into my programs, but the one override that
I have in CEEUOPT does seem to work?
The following is my assembly and link of the table and the link for the
application program:
//STEP1 EXEC PGM=ASMA90,PARM='DECK,NOOBJECT'
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
//SYSUT2 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
//SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
//SYSPUNCH DD DSN=&&TEMPOBJ(CEEUOPT),DISP=(,PASS),UNIT=SYSDA,
// SPACE=(TRK,(1,1,1)),DCB=(BLKSIZE=3120,LRECL=80,DSORG=PO)
//SYSLIB DD DSN=CEE.SCEEMAC,DISP=SHR <<<<<<
// DD DSN=SYS1.MACLIB,DISP=SHR ++++++
//SYSIN DD *
CEEUOPT CSECT
CEEUOPT AMODE ANY
CEEUOPT RMODE ANY
CEEXOPT STACK=(4K,4080,ANY,KEEP,4K,4080)
END
/*
//STEP2 EXEC PGM=IEWL,
// PARM='NCAL,RENT,LIST,XREF,LET,MAP,SIZE=(9999K,96K)'
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD UNIT=SYSDA,SPACE=(TRK,(5,5))
//SYSLMOD DD DSNAME=TECH.CA1M.LOAD,DISP=SHR
//SYSLIB DD DSN=&&TEMPOBJ,DISP=(OLD,PASS)
//SYSLIN DD *
INCLUDE SYSLIB(CEEUOPT)
ENTRY CEEUOPT
ORDER CEEUOPT
NAME CEEUOPT(R)
/*
//* ========> END OF JOB CEEWUOPT <========
//
//LKED EXEC PGM=HEWL
//SYSLIB DD DSN=TECH.CA1M.LOAD,DISP=SHR
// DD DSN=CEE.SCEELKED,DISP=SHR
// DD DSN=CICSTS22.CICS.SDFHLOAD.MAINT,DISP=SHR
// DD DSN=FFM.DVLP.LOADLIB,DISP=SHR
//SYSPRINT DD SYSOUT=Q
//SYSLIN DD DSNAME=&&LOADSET,DISP=(OLD,DELETE)
//SYSLMOD DD DSN=FFM.DVLP.LOADLIB(V4AUTOBL),DISP=SHR
//*YSLMOD DD DSN=FFM.DVLP.LOADLIB(V4DCA900),DISP=SHR
//* SPACE=(TRK,(10,10,1)),
//* UNIT=SYSALLDA,DISP=(MOD,PASS)
//SYSUT1 DD UNIT=SYSALLDA,SPACE=(TRK,(10,10))
----------------------------------------------------------------------
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