is the date format YYMDD ? 
or Julian , yeah WTH ? 


Carmen Vitullo 

----- Original Message -----

From: "Seymour J Metz" <sme...@gmu.edu> 
To: IBM-MAIN@LISTSERV.UA.EDU 
Sent: Monday, June 11, 2018 2:53:03 PM 
Subject: Re: REXX to change Date in PDS member 

WTF? Are D18610 and D18611 supposed to be dates/ If not, what's your point? If 
so, what's with the one digit month? 


-- 
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:47 PM 
To: IBM-MAIN@listserv.ua.edu 
Subject: Re: REXX to change Date in PDS member 

" 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 

---------------------------------------------------------------------- 
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