The SMPLOG should be allocated to a VB sequential data set with a DISP=MOD
and LRECL=510.  We rarely ask for SMPLOG but it is helpful in some
situations to see the sequence of action when a customer has a question.
SMPLOG in the sysout is only semi-readable since the data and time stamps
are not EBCDIC.

On Thu, Aug 8, 2019 at 10:36 AM CM Poncelet <[email protected]> wrote:

> If you have not already done so, ensurethat all your new CSI's DDDEFs
> point at your new DLIB and TLIB datasets. See e.g. below.
>
> '//GLOBAL EXEC PGM=GIMSMP,REGION=4096K
> '//SMPCSI   DD DISP=SHR,DSN=<whatever>.<whatever sys>.CSI
> '//*MPLOG   DD SYSOUT=*  <-- MUST COMMENT OUT IF CHANGING SMPLOG DDDEF
> '//SMPOUT   DD SYSOUT=*
> '//*MPPTS   DD DUMMY     <-- MUST COMMENT OUT IF CHANGING SMPPTS DDDEF
> '//SMPRPT   DD SYSOUT=*
> '//SMPLIST  DD SYSOUT=*
> '//SYSPRINT DD SYSOUT=*
> '//SMPCNTL  DD *
> ' SET BOUNDARY(GLOBAL)
> ' .
> ' UCLIN
> ' .
> ' REP     DDDEF(SMPPTS)
> '         DA(<whatever>.<whatever sys>.SMPPTS)
> '         SHR
> ' .
> ' DEL     DDDEF(SMPLOG)
> ' .
> ' ADD     DDDEF(SMPLOG)
> '         SYSOUT(*)
> ' .
> ' ENDUCL
> ' .
> '/*
> '//*
> '//DZONE  EXEC PGM=GIMSMP,REGION=4096K
> '//SMPCSI   DD DISP=SHR,DSN=<whatever>.<whatever sys>.CSI
> '//*MPLOG   DD SYSOUT=*  <-- MUST COMMENT OUT IF CHANGING SMPLOG DDDEF
> '//SMPOUT   DD SYSOUT=*
> '//*MPPTS   DD DUMMY     <-- MUST COMMENT OUT IF CHANGING SMPPTS DDDEF
> '//SMPRPT   DD SYSOUT=*
> '//SMPLIST  DD SYSOUT=*
> '//SYSPRINT DD SYSOUT=*
> '//SMPCNTL  DD *
> ' SET BOUNDARY(DZONE)
> ' .
> ' UCLIN
> ' .
> ' REP     DDDEF(ADXRSAMP)
> '         DA(<whatever>.<whatever sys>.SAMPLIB)
> '         SHR
> ' .
> ' REP     DDDEF(DBSOURCE)
> '         DA(<whatever>.<whatever sys>.DBSOURCE)
> '         SHR
> ' .
> ' REP     DDDEF(SMPPTS)
> '         DA(<whatever>.<whatever sys>.SMPPTS)
> '         SHR
> ' .
> ' REP     DDDEF(SMPSTS)
> '         DA(<whatever>.<whatever sys>.SMPSTS)
> '         SHR
> ' .
> ' DEL     DDDEF(SMPLOG)
> ' .
> ' ADD     DDDEF(SMPLOG)
> '         SYSOUT(*)
> ' .
> ' ENDUCL
> ' .
> '/*
> '//*
> '//TZONE  EXEC PGM=GIMSMP,REGION=4096K
> '//SMPCSI   DD DISP=SHR,DSN=<whatever>.<whatever sys>.CSI
> '//*MPLOG   DD SYSOUT=*  <-- MUST COMMENT OUT IF CHANGING SMPLOG DDDEF
> '//SMPOUT   DD SYSOUT=*
> '//*MPPTS   DD DUMMY     <-- MUST COMMENT OUT IF CHANGING SMPPTS DDDEF
> '//SMPRPT   DD SYSOUT=*
> '//SMPLIST  DD SYSOUT=*
> '//SYSPRINT DD SYSOUT=*
> '//SMPCNTL  DD *
> ' SET BOUNDARY(TZONE)
> ' .
> ' UCLIN
> ' .
> ' REP     DDDEF(ADXRSAMP)
> '         DA(<whatever>.<whatever sys>.SAMPLIB)
> '         SHR
> ' .
> ' REP     DDDEF(DBSOURCE)
> '         DA(<whatever>.<whatever sys>.DBSOURCE)
> '         SHR
> ' .
> ' REP     DDDEF(SDXRSAMP)
> '         DA(<whatever>.<whatever sys>.SAMPLIB)
> '         SHR
> ' .
> ' REP     DDDEF(SMPPTS)
> '         DA(<whatever>.<whatever sys>.SMPPTS)
> '         SHR
> ' .
> ' REP     DDDEF(SMPSTS)
> '         DA(<whatever>.<whatever sys>.SMPSTS)
> '         SHR
> ' .
> ' DEL     DDDEF(SMPLOG)
> ' .
> ' ADD     DDDEF(SMPLOG)
> '         SYSOUT(*)
> ' .
> ' ENDUCL
> ' .
> '/*
> '//*
> '//                                                                      '
>
> On 08/08/2019 17:46, Alexander Riedel wrote:
> > No you don't  Do you have done a correct SET BOUNDARY(xxxxxxxx).   to
> > your zone ? global or target depends on your report.
> > Alexander
> >
> > ------ Original Message ------
> > From: "Bill Giannelli" <[email protected]>
> > To: [email protected]
> > Sent: 08.08.2019 16:29:14
> > Subject: SMPE separate CSIs
> >
> >> When I have separate CSIs for GLOBAL, TARGET and DLIB, do I need all
> >> these CSI datasets allocated to a GIMSMP batch smpe report job? I am
> >> getting errors that the TARGET zone can not be found.
> >> thanks
> >> Bill
> >>
> >> ----------------------------------------------------------------------
> >> For IBM-MAIN subscribe / signoff / archive access instructions,
> >> send email to [email protected] with the message: INFO IBM-MAIN
> >
> > ----------------------------------------------------------------------
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to [email protected] with the message: INFO IBM-MAIN
> > .
> >
>
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [email protected] with the message: INFO IBM-MAIN
>

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to