Same on both: RESPONSE=S0W1 $HASP842 OUTCLASS(A) $HASP842 OUTCLASS(A) OUTPUT=PRINT,BLNKTRNC=YES,COMPRESS=NO, $HASP842 OUTDISP=(WRITE,WRITE),TRKCELL=YES
-----Original Message----- From: IBM Mainframe Discussion List <[email protected]> On Behalf Of Michael Babcock Sent: Tuesday, September 16, 2025 12:29 PM To: [email protected] Subject: Re: [EXT] Re: JES weirdness And $D OUTCLASS(A) on both systems shows? On 9/16/2025 10:27 AM, Phil Smith III wrote: > Michael Babcock wrote: >> Are there any JES exits in place on either system? Can you show the >> Jobcard and JCL on both systems? > Don't think there are any JES exits but don't know how to check! > > JCL: > > //VSH1 JOB MSGLEVEL=(1,1),MSGCLASS=A,NOTIFY=&SYSUID > //COMPILE EXEC PGM=IGYCRCTL,REGION=0M, > // PARM='LIST,NOSEQ,MDECK' > //STEPLIB DD DISP=SHR,DSN=IGY640.SIGYCOMP //SYSPRINT DD SYSOUT=* > //SYSIN DD DISP=SHR,DSN=PHS.PDS.SOURCE(VSH1) > //SYSMDECK DD UNIT=SYSDA,SPACE=(CYL,(1,1)) > //SYSLIN DD DISP=SHR,DSN=PHS.PDS.OBJ(VSH1) > //SYSLIB DD DISP=SHR,DSN=VSH.BASE840.SAMPLIB > //SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) > //SYSUT2 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) > //SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) > //SYSUT4 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) > //SYSUT5 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) > //SYSUT6 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) > //SYSUT7 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) > //SYSUT8 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) > //SYSUT9 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) > //SYSUT10 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) > //SYSUT11 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) > //SYSUT12 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) > //SYSUT13 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) > //*YSUT14 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) > //*YSUT15 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) > //* > //LKED EXEC PGM=IEWBLINK,COND=(4,LT), > // PARM='LIST,AMODE=31,MAP,LET,RENT' > //SYSPRINT DD SYSOUT=* > //SYSLIB DD DISP=SHR,DSN=CEE.SCEELKED > // DD DISP=SHR,DSN=CSF.SCSFMOD0 > //SIDEFILE DD DISP=SHR,DSN=SYS1.SIEASID //SYSLMOD DD > DISP=SHR,DSN=PHS.PDS.LOAD > //OBJ DD DISP=SHR,DSN=PHS.PDS.OBJ OBJECT > //VSH DD DISP=SHR,DSN=VSH.BASE8401.VSHLOAD > // DD DISP=SHR,DSN=VSH.BASE840.VSHLOAD > //SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(3,1)) > //SYSLIN DD DDNAME=SYSIN > //SYSIN DD * > INCLUDE OBJ(VSH1) > INCLUDE VSH(VSHVOLT) > NAME VSH1(R) > /* > //RUN EXEC PGM=VSH1,REGION=0K,COND=(5,LT) > //STEPLIB DD DISP=SHR,DSN='PHS.PDS.LOAD' > > ---------------------------------------------------------------------- > 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
