IBM Mainframe Forum

Hello there,

I've been trying various z/OS IEB-like utilities and I must say I can't get that properly even though, I know I managed it on another machine, some 15 years ago.

As we are migrating from Natural/DB2 under z/OS to Natural/SQL-Server under Windows, we would like to bulk retrieve all the members of our various PDS.

Can anyone help?

Many thanks in anticipation!

JaySea

Well, I did find the trick after all and here it is:

EDIT EP10.JCLS10.JCL(IEBPTPCH) - 01.01 Columns 00001 00072
Command ===> Scroll ===> CSR
****** ***************************** Top of Data ******************************
000001 //EPBPTBCH JOB 'Merging PDS members to PS',CLASS=A,
000002 // MSGLEVEL=(1,1),MSGCLASS=X
000003 //*
000004 //SQLTOSEQ EXEC PGM=IEBPTPCH
000005 //SYSPRINT DD SYSOUT=*
000006 //SYSUT1 DD DISP=SHR,DSN=EP10.JCB.SQL
000007 //SYSUT2 DD DISP=OLD,DSN=EP10.JCB.SQL.SEQUENTL <-- lrecl=81
000008 //SYSIN DD *
000009 PUNCH TYPORG=PO,DBCS=YES
000010 /*



Seq file is to be defined with LREL=81, as a stupid V will be placed in column 1 of each output line.

Anyway, hope it helps anyone!

Cheers

I've used FTP in the past -- you can get each PDS member into a Windows directory as a separate file. From the Windows side, the FTP commands are:after logging onto the mainframe, of course. Prompt is a toggle that will turn off the confirmation for each member; otherwise, you have to respond to each member to be copied.

Look at the OFFLOAD pgm at cbttape.org file 093.

Create an XMIT file, and use one of the UnXMIT utilities that's around, Dennis Moloney's Xmit is written in Java, and cross-platform (Windoze/Mac/Linux).