The following are examples of using FTP to transfer a
file to IBM® BatchPipes®.
In this example, the FTP server writes the file USER3.SUBSYS.OUTPUT1
to a BatchPipes reader.
This JCL starts the BatchPipes reader. The file USER3.SUBSYS.OUTPUT1 has the record format FB and
a logical record length of 80. The name of the BatchPipes subsystem is BP01 as specified
by the SUBSYS parameter.
//USER3@2 JOB MSGCLASS=A,CLASS=A
//STEP1 EXEC PGM=IEBGENER
//SYSIN DD DUMMY
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD DSN=USER3.SUBSYS.OUTPUT1,SUBSYS=BP01,
// DCB=(LRECL=80,RECFM=FB)
//SYSUT2 DD DSN=USER3.SUBSYS.OUTPUT2,
// DISP=(NEW,CATLG,DELETE),
// UNIT=SYSDA,
// SPACE=(TRK,(10,10),RLSE),
// DCB=(LRECL=80,RECFM=FB)
Because the BatchPipes reader has the logical record length 80 and a record format FB,
you must configure the FTP server to use those values for the file
transfer:
230 USER1 is logged on. Working directory is "USER1.".
Command:
ftp> bin ====> Setting Binary Transfer
200 Representation type is Image
Command:
site lrecl=80 recfm=fb subsys=bp01 ====> Sets SITE variables for
====> RECFM, LRECL, and SUBSYS.
>>> SITE lrecl=80 recfm=fb subsys=bp01
200-BLOCKSIZE must be a multiple of LRECL for RECFM FB
200-BLOCKSIZE being set to 6160
200 SITE command was accepted
Command:
put 'user3.source.data' 'user3.subsys.output1' ====> Transferring 'user3.source.data'
====> to Reader end of the BatchPipes
====>'user3.subsys.output1'
>>> PORT 9,42,104,22,4,6
200 Port request OK.
>>> STOR 'user3.subsys.output1'
125-Waiting for Batchpipes subsystem BP01 reader end to open.
125 Storing data set USER3.SUBSYS.OUTPUT1
250 Transfer completed successfully.
820 bytes transferred in 0.005 seconds. Transfer rate 164.00 Kbytes/sec.
Command:
//USER3@2 JOB MSGCLASS=A,CLASS=A
//STEP1 EXEC PGM=IEBGENER
//SYSIN DD DUMMY
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD DSN=USER3.SUBSYS.VBOUPT1,SUBSYS=BP01,
// DCB=(LRECL=32756,RECFM=VB)
//SYSUT2 DD DSN=USER3.SUBSYS.VBOUPT2,
// DISP=(NEW,CATLG,DELETE),
// UNIT=SYSDA,
// SPACE=(TRK,(10,10),RLSE),
// DCB=(LRECL=32756,RECFM=VB)
Because the BatchPipes reader has the logical record length 32 756 and the record
format VB, you must configure the FTP server to use those values for
the file transfer. For this example use record structure.
ftp> bin ====> Setting Binary Transfer
200 Representation type is Image
ftp> quote stru r ====> Setting Record Structure
250 Data structure is Record
ftp> quote site lrecl=32756 recfm=vb subsys=bp01 ====> Setting SITE variables for
====> RECFM, LRECL, and SUBSYS.
200-BLOCKSIZE must be at least 4 more than LRECL for RECFM VB
200-BLOCKSIZE being set to 32760
200 SITE command was accepted
ftp> put new.txt 'user3.subsys.vboupt1'
200 Port request OK.
125-Waiting for Batchpipes subsystem BP01 reader end to open.
125 Storing data set USER3.SUBSYS.VBOUPT1
250 Transfer completed successfully.
ftp: 126 bytes sent in 0.00Seconds 126000.00Kbytes/sec .
ftp>
For more information, see the following: