Posted: Wed Feb 22, 2012 7:05 am Post subject: Update PDS in Batch and Print Lost/Damaged Report
1.
XYZ Financial Corporation has several applications to maintain their customer and employee data. They have thousands of Batch jobs and COBOL programs. On a particular audit, they were asked to change a program name from PGM1 to PGMS. On analysis the developer found that the program PGM1 is been used in more than 1000 batch jobs. Please suggest a simple solution for the developer to change the program name in all the impacted jobs
2.
The _________________ Arvind
"You can make a difference with your smile. Have that with you always"
Joined: 26 Nov 2002 Posts: 12375 Topics: 75 Location: San Jose
Posted: Wed Feb 22, 2012 11:57 am Post subject:
arvibala,
1a. The audit never found if there any DB2/IMS programs which require the plan/psb names tied to the program name. What do you with the plan/psb names? Do you bind and generate new plans and PSB's?
1b. What would you do if PGM1 is Dynamic called program from another program? _________________ Kolusu
www.linkedin.com/in/kolusu
Kolusu,
Its only simple COBOL program and PGM1 is not called dynamically. Its used in 1000 Jcls and need to be changed, wats the best and simple solution _________________ Arvind
"You can make a difference with your smile. Have that with you always"
2. If 180 days can be taken as 6 months then the following DFSORT JCL will give the desired results. If you want to strictly implement 6 months rule, then you use SUBMONS function(I will leave it to you)
OUTFIL REMOVECC,
BUILD=(3:1,13,22:42,3,PD,M11,LENGTH=6,
30:14,8,PD,EDIT=(+TTTTTTTTTTTTT.TT),49:22,20,71:45,3,80:X),
HEADER2=(20:'"SKY IS THE LIMIT" PUBLIC LIBRARY LOST/DAMAGED REPORT',
/,/,3:'LIBRARY-CARD-NBR',
22:'#BOOKS ',32:'TOTAL-LOSS',49:'USER',71:'CAN LEND?',/,
3:16C'-',22:6C'-',30:17C'-',49:20C'-',71:9C'-'),
TRAILER1=(/,/,/,'TOTAL NUMBER OF RECORDS : ',COUNT)
Thank You and logic for 2 is awesome ... I have long way to go .... _________________ Arvind
"You can make a difference with your smile. Have that with you always"
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum