Fileset FTP Question

[William Rowley]

Cloverleaf 5.3P Rev2 / AIX 5.2

I am trying to use the Fileset FTP protocol to push a file to an IBM mainframe running MVS. The data is successfully sent and the file created on the mainframe but the data records are truncated at 80 bytes.

If I use the AIX command-line FTP client I can issue “SITE” commands that define the record length and format before issuing the PUT to overcome the truncation.

Can this be done through Cloverleaf? Is there a way to pass the “SITE” commands before the protocol driver starts the STOR?

Any and all clever work-arounds would be greatly appreciated!

Thanks!

Topic

[Joe Halbrook]

William,

Not sure if this is what you’re looking for, but we have a fileset Local protocol that waits for a file to be dropped in, then uses a directory parse tps which calls a shell script to perform the actual FTP of the result file, i.e.

set scriptname [file join $HciSiteDir scripts script.sh]

…

catch {exec $scriptname } result  

…

The shell script does this:

…

ftp -dnv << end_of_ftp        open 123.123.123.123        user ftp-user ftp-pswd        ascii        quote site na 1        quote rcmd CALL PGM(HSRMTCHGC) PARM(‘parm1’ ‘parm2’)        quit end_of_ftp … Joe Halbrook

[William Rowley]

Joe’s suggestion was not quite what I had in mind (I did post an enhancement request that covers what I wanted to do) but still greatly appreciated.

In case it’s helpful to anyone else we did find a work-around – by having the target files “allocated” on the MVS mainframe the FTP server on the mainframe was able to use the record lengths from the catalog instead of defaulting (and truncating) to 80 bytes.

[Author]

Replies