UNIX for Beginners Questions & Answers

//NATTOUT1 JOB ACCL,'XXXXYYYY',CLASS=A,MSGCLASS=X,                                 
//  NOTIFY=&SYSUID,REGION=0M,USER=SFTPXXX                                         
// SET PATH='/BBBB/XYX'                                                           
// SET USR='NATTNATT001'                                                           
//*****************************************************************               
//COPYOUT  EXEC PGM=IKJEFT01,DYNAMNBR=300,COND=EVEN                               
//*****************************************************************               
//SYSTSPRT DD SYSOUT=*                                                             
//DSIN     DD DSN=NNNN.FIX.LENGTH.OUTFILE,DISP=SHR                             
//HFSOUT   DD PATH='&PATH/CXCXS',                                                 
// PATHOPTS=(OCREAT,OTRUNC,OWRONLY),PATHMODE=SIRWXU                               
//SYSPRINT DD SYSOUT=*                                                             
//SYSTSIN  DD DATA,DLM='/>'                                                       
OCOPY INDD(DSIN) OUTDD(HFSOUT) BINARY                                             
/>                                                                                 
//CMDS     EXEC PGM=IKJEFT01                                                       
//INMVS    DD *                                                                   
cd /NATTNATT001/NATTNATT003/NAT0007IN                                             
pwd                                                                               
ls                                                                                 
put /BBBB/XYX/CXCXS VTESTX.TXT                                                     
!rm CXCXS                                                                         
!rm sftp.cmds                                                                     
!rm sftp1.sh                                                                       
quit                                                                               
//OUTHFS   DD FILEDATA=TEXT,                                                       
//            PATHOPTS=(OWRONLY,OCREAT,OTRUNC),                                   
//            PATHMODE=SIRWXU,                                                     
//            PATH='&PATH/sftp.cmds'                                               
//SYSTSIN  DD *                                                                   
  OCOPY IND(INMVS) OUTDD(OUTHFS)                                                   
/*                                                                                 
//SYSTSPRT DD SYSOUT=*                                                             
//SYSPRINT DD SYSOUT=*                                                             
//* create sftp shell script                                                       
//SH       EXEC PGM=IKJEFT01                                                       
//INMVS    DD *                                                                   
sftp -b sftp.cmds -oPort=4321 -oStrictHostKeyChecking=no $1@$2                     
//OUTHFS   DD FILEDATA=TEXT,                                                       
//            PATHOPTS=(OWRONLY,OCREAT,OTRUNC),                                   
//            PATHMODE=SIRWXU,                                                     
//            PATH='&PATH/sftp1.sh'                                               
//SYSTSIN  DD *                                                                   
  OCOPY IND(INMVS) OUTDD(OUTHFS)                                                   
//SYSTSPRT DD SYSOUT=*                                                             
//SYSPRINT DD SYSOUT=*                                                             
//*                                                                               
//UPLOADFL EXEC PGM=VCXBATCH,                                                     
//  PARM='sh  cd &PATH;./sftp1.sh &USR 999.999.999.99'                             
//STDOUT   DD  SYSOUT=*                                                           
//STDERR   DD  SYSOUT=*                                                           
//SYSOUT   DD SYSOUT=*

IEF344I NATTOUT1 COPYOUT HFSOUT - ALLOCATION FAILED DUE TO DATA FACILITY SYSTEM ERROR
IGD17501I ATTEMPT TO OPEN A HFS FILE FAILED,                                   
RETURN CODE IS (00000081) REASON CODE IS (0594003D)                           
FILENAME IS (/BBBB/XYX/CXCXS)                                                 
IEF272I NATTOUT1 COPYOUT - STEP WAS NOT EXECUTED.

put /BBBB/XYX/CXCXS VTESTX.TXT  
!rm CXCXS