" BROWSE    BKP.JCL.CNTL(BKPDABD1) - 01.99            Line 00000000 Col 001
080

********************************* Top of Data ******************************
****

D18610<D18611<VOL=SER<


******************************** Bottom of Data
********************************

can we automate this process by creating a rexx which will run on daily basis 
and update above pds member with  current date and later on running JCL having 
new dates."

-----Original Message-----
From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of 
Seymour J Metz
Sent: Monday, June 11, 2018 3:45 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: REXX to change Date in PDS member

[External Email]

Does the OP want to change a record containing the date, or does he want to the 
date in the ISPF statistics?


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3

________________________________________
From: IBM Mainframe Discussion List <IBM-MAIN@listserv.ua.edu> on behalf of 
PINION, RICHARD W. <rpin...@firsttennessee.com>
Sent: Monday, June 11, 2018 3:27 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: REXX to change Date in PDS member

Why re-invent the wheel, use IPOUPDTE.

//UPDATE1  EXEC  PGM=IPOUPDTE,PARM=UPDATE
//*************************************************************
//*                                                           *
//* PARM=UPDATE    CAUSES IPOUPDTE TO CHANGE PDS MEMBERS      *
//*                                                           *
//*                                                           *
//*************************************************************
//SYSPRINT DD  SYSOUT=*
//SYSUDUMP DD  SYSOUT=*
//@LIB     DD  DSN=xxxxx.my.CNTL,DISP=SHR
//* FROM  *   TO                          *
//SYSIN    DD  DATA,DLM='@@'
xxxxxx<yyyyy<

-----Original Message-----
From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of 
Seymour J Metz
Sent: Monday, June 11, 2018 3:24 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: REXX to change Date in PDS member

[External Email]

You can write an ISPF script to edit the member.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3

________________________________________
From: IBM Mainframe Discussion List <IBM-MAIN@listserv.ua.edu> on behalf of 
saurabh khandelwal <sourabhkhandelwal...@gmail.com>
Sent: Monday, June 11, 2018 3:11 PM
To: IBM-MAIN@listserv.ua.edu
Subject: REXX to change Date in PDS member

Hello Group,


I am new to rexx and our new requirement to edit one PDS member with previous 
day day date today's date on regular basis .


We are doing this  to edit our full set of JCL on daily basis according to this 
new date by over writing  previous datr date and putting new date.


currently we do this manually by editing below member every day with new date ( 
current date. ) .


BROWSE    BKP.JCL.CNTL(BKPDABD1) - 01.99            Line 00000000 Col 001
080

********************************* Top of Data ******************************
****

D18610<D18611<VOL=SER<


******************************** Bottom of Data
********************************

can we automate this process by creating a rexx which will run on daily basis 
and update above pds member with  current date and later on running JCL having 
new dates.

Can you please help.







--
Thanks & Regards
Saurabh Khandelwal

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN FIRST TENNESSEE

Confidentiality notice:
This e-mail message, including any attachments, may contain legally privileged 
and/or confidential information. If you are not the intended recipient(s), or 
the employee or agent responsible for delivery of this message to the intended 
recipient(s), you are hereby notified that any dissemination, distribution, or 
copying of this e-mail message is strictly prohibited. If you have received 
this message in error, please immediately notify the sender and delete this 
e-mail message from your computer.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to