Code: Select all
//*
//* Example using Co:Z SFTP in batch to send AMATERSE dataset
//* to IBM for a support case.
//*
//* See:
//* https://coztoolkit.com/docs/sftp/client.html#client-batch_samp
//*
//* This based on IBM ECuRep doc:
//*
//* https://www.ibm.com/support/pages/
//* exchanging-information-ibm-software-support-problem-determination
//*
//* https://www.ibm.com/support/pages/
//* enhanced-customer-data-repository-ecurep-send-data-ftp#sftp
//*
//COZSFTP EXEC PROC=SFTPPROC
//SFTPIN DD *
user=E-ABcd12345E # as you have from IBM
host=testcase.boulder.ibm.com # different for EU, etc
pwdsn="HLQ.MY.PASSWD(P12345E)" # with PW from IBM
lzopts="mode=binary"
rdir="/toibm/mvs"
rfile="<IBM SSR provided name>"
. $script_dir/sftp_connect.sh <<EOB
lzopts $lzopts
cd $rdir
put //DD:MYDATA $rfile
EOB
//MYDATA DD DSN=HLQ.XXXX.TRS,DISP=SHR
//*