Re: PDS Unload Using IEBUPDTE
Really Jim? You surprise me. BTW, Release 40 of REVIEW should be out in a week or two. :) GP Jim Marshall wrote: Snippage. You can thank Bill Godfrey for getting everyone started in many more utlities besides LISTPDS. Jim Marshall -- 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
Re: PDS unload
IEBUPDTE is what you are looking for. -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Gerry Anstey Sent: Wednesday, April 05, 2006 12:26 PM To: IBM-MAIN@BAMA.UA.EDU Subject: PDS unload Guys, I've scanned the archives, RTFM's etc. I want to unload a RECFM=80, FB PDS into a QSAM(FB,80) , IEBCOPY keeps creating a VS dataset. I have seen the output I want It's where each member is one after the other with a name card for the member its was before it. I've done it before but I just can't seem to remember what I did. Help! Gerry This communication is for informational purposes only. It is not intended as an offer or solicitation for the purchase or sale of any financial instrument or as an official confirmation of any transaction. All market prices, data and other information are not warranted as to completeness or accuracy and are subject to change without notice. Any comments or statements made herein do not necessarily reflect those of JPMorgan Chase Co., its subsidiaries and affiliates. -- 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 -- 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
Re: PDS unload
- Original Message From: Gerry Anstey [EMAIL PROTECTED] I want to unload a RECFM=80, FB PDS into a QSAM(FB,80) , IEBCOPY keeps creating a VS dataset. I have seen the output I want It's where each member is one after the other with a name card for the member its was before it. I've done it before but I just can't seem to remember what I did. Help! Gerry, are you sure you didn't use the TSO XMIT command to unload the PDS file ? XMIT can be used for this purpose, too. Walter Marguccio -- 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
Re: PDS unload
Try something like this: //* //S1 EXEC PGM=IEBPTPCH //SYSINDD * PUNCH TYPORG=PO ,OUTODR=DIR //SYSUT1 DD DSN=C01738.ASM,DISP=SHR //SYSUT2 DD DISP=(NEW,PASS), // UNIT=SYSDA,SPACE=(TRK,(100,100),RLSE), // DCB=(RECFM=FBA,LRECL=81,BLKSIZE=8100) //SYSPRINT DD SYSOUT=* //* //S2 EXEC PGM=IEBGENER //SYSINDD * GENERATE MAXFLDS=20 RECORD FIELD=(80,2,,1) //SYSUT1 DD DSN=*.S1.SYSUT2,DISP=(OLD,DELETE) //SYSUT2 DD DSN=C01738.ASM.PU,DISP=(NEW,CATLG), // UNIT=SYSDA,SPACE=(TRK,(100,100),RLSE), // DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120) //SYSPRINT DD SYSOUT=* On 4/5/2006, Gerry Anstey [EMAIL PROTECTED] wrote: Guys, I've scanned the archives, RTFM's etc. I want to unload a RECFM=80, FB PDS into a QSAM(FB,80) , IEBCOPY keeps creating a VS dataset. I have seen the output I want It's where each member is one after the other with a name card for the member its was before it. I've done it before but I just can't seem to remember what I did. Help! Gerry This communication is for informational purposes only. It is not intended as an offer or solicitation for the purchase or sale of any financial instrument or as an official confirmation of any transaction. All market prices, data and other information are not warranted as to completeness or accuracy and are subject to change without notice. Any comments or statements made herein do not necessarily reflect those of JPMorgan Chase Co., its subsidiaries and affiliates. -- 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 -- 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
Re: PDS unload
That's the one, thanks GA [EMAIL PROTECTED] M.AU To: IBM-MAIN@BAMA.UA.EDU Sent by: IBM cc: MainframeSubject: Re: PDS unload Discussion List [EMAIL PROTECTED] .EDU 05/04/2006 12:26 Please respond to IBM Mainframe Discussion List Try something like this: //* //S1 EXEC PGM=IEBPTPCH //SYSINDD * PUNCH TYPORG=PO ,OUTODR=DIR //SYSUT1 DD DSN=C01738.ASM,DISP=SHR //SYSUT2 DD DISP=(NEW,PASS), // UNIT=SYSDA,SPACE=(TRK,(100,100),RLSE), // DCB=(RECFM=FBA,LRECL=81,BLKSIZE=8100) //SYSPRINT DD SYSOUT=* //* //S2 EXEC PGM=IEBGENER //SYSINDD * GENERATE MAXFLDS=20 RECORD FIELD=(80,2,,1) //SYSUT1 DD DSN=*.S1.SYSUT2,DISP=(OLD,DELETE) //SYSUT2 DD DSN=C01738.ASM.PU,DISP=(NEW,CATLG), // UNIT=SYSDA,SPACE=(TRK,(100,100),RLSE), // DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120) //SYSPRINT DD SYSOUT=* This communication is for informational purposes only. It is not intended as an offer or solicitation for the purchase or sale of any financial instrument or as an official confirmation of any transaction. All market prices, data and other information are not warranted as to completeness or accuracy and are subject to change without notice. Any comments or statements made herein do not necessarily reflect those of JPMorgan Chase Co., its subsidiaries and affiliates. -- 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
Re: PDS unload
Gerry, If you have SAS in shop, then try PROC SOURCE. It will unload a PDS and create IEBUPDTE control cards in the offloaded file. Lizette -- 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
Re: PDS unload
(Sorry if this appears twice. I sent it to the Newsgroup, first, instead of to the list.) On 5 Apr 2006 03:51:01 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (âãé áï àáé) wrote: IEBUPDTE is what you are looking for. If you also want other LRECLs and/or the ability to keep SPF statistics, see file 093 of the CBT tape. -- 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
Re: PDS unload
In [EMAIL PROTECTED], on 04/05/2006 at 01:48 PM, [EMAIL PROTECTED] said: IEBUPDTE is what you are looking for. No. He wants a program to do the unload. -- Shmuel (Seymour J.) Metz, SysProg and JOAT ISO position; see http://patriot.net/~shmuel/resume/brief.html We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- 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
Re: PDS unload
In a recent note, Lizette Koehler said: Date: Wed, 5 Apr 2006 08:01:41 -0700 If you have SAS in shop, then try PROC SOURCE. It will unload a PDS and create IEBUPDTE control cards in the offloaded file. What happens if some of the data records to be unloaded contain apparent IEBUPDTE control card images? How does one escape/ quote/strop input to IEBUPDTE to create records in the target library containing ./ in columns 1-2? -- gil -- StorageTek INFORMATION made POWERFUL -- 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
Re: PDS unload
On 5 Apr 2006 10:09:19 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] wrote: If you have SAS in shop, then try PROC SOURCE. It will unload a PDS and create IEBUPDTE control cards in the offloaded file. What happens if some of the data records to be unloaded contain apparent IEBUPDTE control card images? How does one escape/ quote/strop input to IEBUPDTE to create records in the target library containing ./ in columns 1-2? I don't know if SAS has the capability of properly dealing with ./ in columns 1-2. OFFLOADW PDSLOADW from file 093 of CBT take care of it by changing the ./ to on offload and to ./ on reload. If you have some members with in columns 1-2, these programs would be a bad choice. -- 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
Re: PDS unload
On Apr 5, 2006, at 5:26 AM, Gerry Anstey wrote: Guys, I've scanned the archives, RTFM's etc. I want to unload a RECFM=80, FB PDS into a QSAM(FB,80) , IEBCOPY keeps creating a VS dataset. I have seen the output I want It's where each member is one after the other with a name card for the member its was before it. I've done it before but I just can't seem to remember what I did. Help! Gerry Gerry, The CBTTAPE has one or two utilities that will do this. Ed -- 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
Re: PDS unload
IEBPTPCH is what you remember. Rob Weiss z/SWITA and z/Series I/T Security and Privacy Consultant IBM Software Group Sales IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU wrote on 04/05/2006 06:25:34 PM: On Apr 5, 2006, at 5:26 AM, Gerry Anstey wrote: Guys, I've scanned the archives, RTFM's etc. I want to unload a RECFM=80, FB PDS into a QSAM(FB,80) , IEBCOPY keeps creating a VS dataset. I have seen the output I want It's where each member is one after the other with a name card for the member its was before it. I've done it before but I just can't seem to remember what I did. Help! Gerry Gerry, The CBTTAPE has one or two utilities that will do this. Ed -- 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 -- 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