I know that this might be an old hat for most of you, but when I had to transfer a load module from one system to another lately I could hardly find a good description of the process - especially for a dummy like me in this case. So I decided to write it down step by step. As an example I will do a round trip of my load module from host to my PC and back.

1. transform your member(s) into a sequential dataset using XMITThe following job will allocate a sequential dataset and retrieve the desired member into it. You could also retrieve complete PDS datasets, therefore just leave the member list empty.

Alternatively use XMIT directly from TSO command:XMIT (NODEID.ARNOLD) DSNAME('ARNOLD.COBOL.LOAD') OUTDSNAME('ARNOLD.COBOL.SEQ') MEMBERS(HELLOW but I recommend to create the target dataset with DSORG=FB,LRECL=80,BLKSIZE=3120 before …

2. Then get this member using FTP binary

Go to your workstation where you want to download the member to and use ftp from a Command Line to retrieve it.

3. Create a sequential dataset on 2nd system to retrieve memberGo to your target system. Create a Sequential Dataset where you want to receive your member into with the following properties: PS/FB/BLKSIZE=3120, LRECL=804. put your member into this new seq dataset Put your member there using ftp in binary mode again:ftp 172.16.36.226Connected to 172.16.36.226.220-FTPD1 IBM FTP CS V1R13 at tmcc-123-25.boeblingen.de.ibm.com, 05:26:45 on 2012-08-17.220 Connection will not timeout.User (172.16.36.226:(none)): arnold331 Send password please.Password:230 ARNOLD is logged on. Working directory is "/u/arnold".ftp> bin200 Representation type is Imageftp> put cobolload 'ARNOLD.COBOL.SEQ1'200 Port request OK.125 Storing data set ARNOLD.COBOL.SEQ1250 Transfer completed successfully.ftp: 7680 bytes sent in 0,42Seconds 18,42Kbytes/sec.ftp>

5. Unpack it using XMITUse the TSO command to receive your member from your sequential dataset into a PDS. I received it back into its original place.