Any bypassed hold causes a 4. Larry Gray
-----Original Message----- From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf Of Klein, Kenneth Sent: Wednesday, June 03, 2009 3:32 PM To: [email protected] Subject: Smpe batch jcl question about a job to apply _all_ service from a cbpdo Does this look right? The check gets a rc 4. I combined the KDSJ1APP job from the tape (line 340002) and the sourceids from the memo to users extension (lines 345102-346202) and the smppunch output from a report errorsysmods (lines 348902-350702). //KQKTEMPS JOB (3356,277),'KLEIN, KEN',MSGLEVEL=(1,1), 00010001 // CLASS=L,MSGCLASS=X,NOTIFY=&SYSUID,REGION=0M 00020001 //* JOBCARD CREATED AT 12:32:42 ON 3 JUN 2009 00030002 //* JES NODE=EREPNODE SYSTEM=TESTT1 LEVEL=JES2 Z/OS 1.9 00040002 //* JCL TO RUN THIS JOB: KQKTEMP.$TSO.WORK(SMPAPPLY) 00050002 /*JOBPARM LINES=999999,CARDS=999999 00060001 //*=+====1====+====2====+====3====+====4====+====5====+====6====+====7== 00070002 //SMP EXEC PGM=GIMSMP, 00080001 // REGION=4096K,PARM='CSI=SVS.IBMOM.GLOBAL.CSI' 00090001 //SYSLIB DD DSN=SYS1.MACLIB,DISP=SHR 00100001 //SMPLOG DD SYSOUT=* 00110002 //SMPLOGA DD SYSOUT=* 00120002 //SMPCNTL DD * 00230001 SET BOUNDARY ( OMTZN ) . 00240002 APPLY SELECT( HKDS621 HKLV621 ) 00340002 SOURCEID( 00345002 HIPER PUT0507 PUT0510 00345102 PUT0601 PUT0604 PUT0606 00345202 PUT0607 PUT0609 PUT0611 00345302 PUT0612 PUT0701 PUT0703 00345402 PUT0704 PUT0706 PUT0710 00345502 PUT0802 PUT0805 PUT0808 00345602 PUT0809 PUT0812 PUT0901 00345702 PUT0902 PUT0904 RSU0508 00345802 RSU0603 RSU0606 RSU0609 00345902 RSU0612 RSU0703 RSU0706 00346002 RSU0709 RSU0803 RSU0809 00346102 RSU0812 RSU0903 00346202 UA45246 /* RESOLVES AA27365 FOR UA43385 FMID(HKC5410) */ 00348902 UK41992 /* RESOLVES AK76361 FOR HKDB410 FMID(HKDB410) */ 00349002 UK43610 /* RESOLVES AK77345 FOR HKDB410 FMID(HKDB410) */ 00349102 UK44062 /* RESOLVES AK77532 FOR HKDB410 FMID(HKDB410) */ 00349202 UK43916 /* RESOLVES AK79736 FOR HKDB410 FMID(HKDB410) */ 00349302 UK43934 /* RESOLVES AK80329 FOR HKDB410 FMID(HKDB410) */ 00349402 UK44097 /* RESOLVES AK80459 FOR HKDB410 FMID(HKDB410) */ 00349502 UK44771 /* RESOLVES AK81520 FOR HKDB410 FMID(HKDB410) */ 00349602 UK44995 /* RESOLVES AK82448 FOR HKDB410 FMID(HKDB410) */ 00349702 UA45957 /* RESOLVES AA27811 FOR HKM2550 FMID(HKM2550) */ 00349802 UA46559 /* RESOLVES AA28367 FOR UA44538 FMID(HKM2550) */ 00350002 UA45277 /* RESOLVES AA26814 FOR HKM5410 FMID(HKM5410) */ 00350102 UA46208 /* RESOLVES AA28056 FOR HKM5410 FMID(HKM5410) */ 00350202 UA45034 /* RESOLVES AA27272 FOR HKOB550 FMID(HKOB550) */ 00350302 UA44056 /* RESOLVES AA26495 FOR HKSB550 FMID(HKSB550) */ 00350402 UA45746 /* RESOLVES AA27060 FOR HKS3410 FMID(HKS3410) */ 00350602 UA45521 /* RESOLVES AA27668 FOR HKS3410 FMID(HKS3410) */ 00350702 ) 00351102 GROUPEXTEND 00351402 REDO 00351502 BYPASS(HOLDSYSTEM(ACTION)) 00351602 CHECK 00351701 . 00352001 /* Ken Klein Sr. Systems Programmer [email protected] 502-495-5000 x7011 NOTICE: All information in and attached to the e-mail(s) below may be proprietary, confidential, privileged and otherwise protected from improper or erroneous disclosure. If you are not the sender's intended recipient, you are not authorized to intercept, read, print, retain, copy, forward, or disseminate this message. If you have erroneously received this communication, please notify the sender immediately by phone (704-758-1000) or by e-mail and destroy all copies of this message (electronic, paper, or otherwise). Thank you. ---------------------------------------------------------------------- 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
