Hello,
I need to extract program source code from a library (in fact a PDS) to ASCII text files (one text file per program). My goal is to transfer the program source code on a Windows workstation.
Could you explain me how to proceed and if you have some examples of JCL doing this, then it could be helpful.
Thanks in advance
Extracting source code from a PDS
Extracting source code from a PDS
by jeroc » Tue Sep 02, 2008 6:43 pm
- jeroc
- Posts: 22
- Joined: Tue Sep 18, 2007 2:11 pm
- Has thanked: 0 time
- Been thanked: 0 time
Re: Extracting source code from a PDS
by dick scherrer » Tue Sep 02, 2008 7:13 pm
Hello,
The easiest way to do this is to sign onto the mainframe ftp using the ftp client on your desktop, set the transmission to ascii, specify the target directory on the pc, highlight the members you want to transfer to your pc, and click the transfer. Each member will be brought to the pc as a separate file and will be stored in the directory you are pointing to.
The easiest way to do this is to sign onto the mainframe ftp using the ftp client on your desktop, set the transmission to ascii, specify the target directory on the pc, highlight the members you want to transfer to your pc, and click the transfer. Each member will be brought to the pc as a separate file and will be stored in the directory you are pointing to.
Hope this helps,
d.sch.
d.sch.
-
dick scherrer - Global moderator
- Posts: 6268
- Joined: Sat Jun 09, 2007 8:58 am
- Has thanked: 3 times
- Been thanked: 93 times
Re: Extracting source code from a PDS
by jeroc » Tue Sep 02, 2008 9:10 pm
Ok, this is interesting. But if I want to extract the members by using a utility, what is the utility to use? IEBCOPY, IEBGENER...?
- jeroc
- Posts: 22
- Joined: Tue Sep 18, 2007 2:11 pm
- Has thanked: 0 time
- Been thanked: 0 time
Re: Extracting source code from a PDS
by dick scherrer » Tue Sep 02, 2008 10:20 pm
Hello,
You can use those or your sort or several other utilities. . . .
If you do, you will have to create an output file for each member (assuming you want individual files on the target system).
If you use the ftp client you already have (which you will have to use anyway once you create the files on the mainframe - you would still need to ftp them), you can merely click on the members you want to download directly and create no intermediate files.
You can use those or your sort or several other utilities. . . .
If you do, you will have to create an output file for each member (assuming you want individual files on the target system).
If you use the ftp client you already have (which you will have to use anyway once you create the files on the mainframe - you would still need to ftp them), you can merely click on the members you want to download directly and create no intermediate files.
Hope this helps,
d.sch.
d.sch.
-
dick scherrer - Global moderator
- Posts: 6268
- Joined: Sat Jun 09, 2007 8:58 am
- Has thanked: 3 times
- Been thanked: 93 times
Re: Extracting source code from a PDS
by jeroc » Tue Sep 02, 2008 10:36 pm
I want to automate the extraction and perform it regularly. This is why I thought to use a JCL. However, I noted your suggestion because it is an interesting way for occasional and manual usages.
Do you have an example of such a JCL?
Thanks
Do you have an example of such a JCL?
Thanks
- jeroc
- Posts: 22
- Joined: Tue Sep 18, 2007 2:11 pm
- Has thanked: 0 time
- Been thanked: 0 time
Re: Extracting source code from a PDS
by MrSpock » Wed Sep 03, 2008 12:03 am
jeroc wrote:Do you have an example of such a JCL?
I'm sorry, but a job that does what exactly?
-
MrSpock - Global moderator
- Posts: 809
- Joined: Wed Jun 06, 2007 9:37 pm
- Location: Raleigh NC USA
- Has thanked: 0 time
- Been thanked: 4 times
Re: Extracting source code from a PDS
by dick scherrer » Wed Sep 03, 2008 12:38 am
Hello,
What i suggested requires no jcl. It is done from the desktop,
If you want to pull a set of members repeatedly, you could write a batch script on the pc that connects to the mainframe ftp and downloads all of the members you want. Again, there would be no jcl.
What i suggested requires no jcl. It is done from the desktop,
If you want to pull a set of members repeatedly, you could write a batch script on the pc that connects to the mainframe ftp and downloads all of the members you want. Again, there would be no jcl.
Hope this helps,
d.sch.
d.sch.
-
dick scherrer - Global moderator
- Posts: 6268
- Joined: Sat Jun 09, 2007 8:58 am
- Has thanked: 3 times
- Been thanked: 93 times
Re: Extracting source code from a PDS
by jeroc » Wed Sep 03, 2008 1:19 pm
Hello MrSpock,
I'm looking for a JCL that extract the members of a PDS into separate files. For instance, in order to create a file per program from a source library.
dick Scherrer suggested me to use FTP but I also want to know if it possible to use a JCL.
Thanks in advance.
Jeroc
I'm looking for a JCL that extract the members of a PDS into separate files. For instance, in order to create a file per program from a source library.
dick Scherrer suggested me to use FTP but I also want to know if it possible to use a JCL.
Thanks in advance.
Jeroc
- jeroc
- Posts: 22
- Joined: Tue Sep 18, 2007 2:11 pm
- Has thanked: 0 time
- Been thanked: 0 time
Re: Extracting source code from a PDS
by jeroc » Wed Sep 03, 2008 1:27 pm
Sorry, my previous question is not exactly what I'm looking for.
I would like to have a JCL that creates a file containing all the members of a PDS in 1 file (in order to download it onto a Windows pc) but each file must be separate by a banner like MEMBER NAME=<member name>.
For example, if the PDS contains the source of 3 programs, the extraction file should be:
MEMBER NAME=program1
source code of prog1
MEMBER NAME=program2
source code of prog2
MEMBER NAME=program3
source code of prog3
I would like to have a JCL that creates a file containing all the members of a PDS in 1 file (in order to download it onto a Windows pc) but each file must be separate by a banner like MEMBER NAME=<member name>.
For example, if the PDS contains the source of 3 programs, the extraction file should be:
MEMBER NAME=program1
source code of prog1
MEMBER NAME=program2
source code of prog2
MEMBER NAME=program3
source code of prog3
- jeroc
- Posts: 22
- Joined: Tue Sep 18, 2007 2:11 pm
- Has thanked: 0 time
- Been thanked: 0 time
Re: Extracting source code from a PDS
by shagnwrx » Fri Sep 05, 2008 2:45 am
jeroc, You may be going about this the long way around.
We have several processes here where we ship complete PDS's to workstations or unix boxes (in ASCII format). The way we tackeld it was to use JCL to invoke FTP. This would require that you setup an FTP server on your windows machine. You would issue the LCD to connect to the PDS on the mainframe, and use CD to identify the directory on your target workstation. Do an MPUT to the target workstation or server from the mainframe. It will place the members as seperate ASCII files in the directory that you identified with the LCD command. One clean step and no having to manipulate a flat file into seperate files on your workstation.
Just for reference, here's what the JCL would look like.... In the PARM field on the EXEC card of the JCL, you put the IP Addr of the workstation you sending to. Also, before you run anything similar to this sample, remove the comments from of the SYSIN statements.
We have several processes here where we ship complete PDS's to workstations or unix boxes (in ASCII format). The way we tackeld it was to use JCL to invoke FTP. This would require that you setup an FTP server on your windows machine. You would issue the LCD to connect to the PDS on the mainframe, and use CD to identify the directory on your target workstation. Do an MPUT to the target workstation or server from the mainframe. It will place the members as seperate ASCII files in the directory that you identified with the LCD command. One clean step and no having to manipulate a flat file into seperate files on your workstation.
Just for reference, here's what the JCL would look like.... In the PARM field on the EXEC card of the JCL, you put the IP Addr of the workstation you sending to. Also, before you run anything similar to this sample, remove the comments from of the SYSIN statements.
//FTPSTP1 EXEC PGM=FTP,REGION=2M,
// PARM='10.0.0.1' <======= CHANGE TO THE IP ADDRESS OF TARGET WORKSTATION
//STEPLIB DD DSN=TCPIP.SEZALOAD,DISP=SHR
//SYSFTPD DD DSN=TCPIP.SEZAINST(FTPSDATA),DISP=SHR
//SYSMDUMP DD SYSOUT=A
//SYSPRINT DD SYSOUT=*
//OUTPUT DD SYSOUT=*
//INPUT DD *
userid password /* Userid and passord you've set up in the FTP software on your workstation */
cd d:\TargetDirectory\ /*connects to the directory on the workstation */
lcd NAME.OF.THE.MAINFRAME.PDS /*connects to the PDS on the mainframe*/
noprompt /* without this, it would be a pain in the butt */
mput * /* this means Multi-put, it will send every member of the PDS to the workstation */
quit
/*
//
// PARM='10.0.0.1' <======= CHANGE TO THE IP ADDRESS OF TARGET WORKSTATION
//STEPLIB DD DSN=TCPIP.SEZALOAD,DISP=SHR
//SYSFTPD DD DSN=TCPIP.SEZAINST(FTPSDATA),DISP=SHR
//SYSMDUMP DD SYSOUT=A
//SYSPRINT DD SYSOUT=*
//OUTPUT DD SYSOUT=*
//INPUT DD *
userid password /* Userid and passord you've set up in the FTP software on your workstation */
cd d:\TargetDirectory\ /*connects to the directory on the workstation */
lcd NAME.OF.THE.MAINFRAME.PDS /*connects to the PDS on the mainframe*/
noprompt /* without this, it would be a pain in the butt */
mput * /* this means Multi-put, it will send every member of the PDS to the workstation */
quit
/*
//
- shagnwrx
- Posts: 3
- Joined: Wed Sep 03, 2008 2:29 am
- Has thanked: 0 time
- Been thanked: 0 time
-
- Related topics
- Replies
- Views
- Last post
-
- Easy way to send PDS of source code to another user via inte
by mamustoe » Wed May 18, 2022 4:34 pm - 4 Replies
- 1362 Views
- Last post by willy jensen
Wed May 18, 2022 10:42 pm
- Easy way to send PDS of source code to another user via inte
-
- Extracting data from SMF 70
by avik1983 » Thu Mar 11, 2010 12:05 pm - 4 Replies
- 3557 Views
- Last post by Robert Sample
Fri Mar 19, 2010 4:20 pm
- Extracting data from SMF 70
-
- SYNCSORT - Extracting the fields from DSN
by Naveen@Uppi » Wed Dec 17, 2008 12:25 pm - 6 Replies
- 3471 Views
- Last post by dick scherrer
Fri Dec 19, 2008 11:42 pm
- SYNCSORT - Extracting the fields from DSN
-
- Extracting Report for SMF Type (60:69)
by Lenny » Wed Oct 28, 2009 12:34 pm - 6 Replies
- 4239 Views
- Last post by Lenny
Fri Oct 30, 2009 7:56 am
- Extracting Report for SMF Type (60:69)
-
- Extracting RMF Report from SMF data in tape
by bgtanlo » Tue Feb 19, 2008 2:07 pm - 1 Replies
- 4447 Views
- Last post by Bill Dennis
Fri May 23, 2008 1:16 am
- Extracting RMF Report from SMF data in tape