Hello.

I have done the same and still giving the error. Pls find the below job i have 
submitted.


//FTPSTEP2 EXEC PGM=SORT,COND=(0,EQ,FTPSTEP1)           
//SORTLIB  DD DSN=SORT.SORTLIB,DISP=SHR                 
//SYSOUT   DD SYSOUT=*                                  
//SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(7,2))              
//SORTWK02 DD UNIT=SYSDA,SPACE=(CYL,(7,2))              
//SORTWK03 DD UNIT=SYSDA,SPACE=(CYL,(7,2))              
//SORTIN   DD DSN=&&TEMPFILE,                           
//            DISP=(OLD,PASS)                           
//SORTOUT  DD DSN=&&STEP2FTP,                           
//            DISP=(NEW,PASS,DELETE),                   
//            SPACE=(TRK,(10,10),RLSE),UNIT=SYSDA,      
//            DCB=(RECFM=FB,LRECL=080,BLKSIZE=8000)     
//SYSIN    DD DSN=USR.PROCLIB.INPUT(FTPSORT),DISP=SHR   
//*                                                     
//FTP111   EXEC PGM=FTP,REGION=4096K                    
//SYSPRINT DD SYSOUT=X        
//SYSPRINT DD SYSOUT=X               
//SYSOUT   DD SYSOUT=X               
//INPUT    DD *                      
 FTP.KAB.KLOUSRI.COM                   
 LMCOE                               
 lmc03                               
 LOCSITE FWF1IENDLY                  
 CD /MAS                             
 PUT //DD:SORTOUT      OUTPUT.FILE   
 QUIT                                
//                                   


The below is the error message that is shown


EZA1460I Command:                                       
EZA1736I  CD /MS8                                       
EZA1701I >>> CWD /MS8                                   
250 OK. Current directory is /MS8                       
EZA1460I Command:                                       
EZA1736I  PUT //DD:SORTOUT      OUTPUT.FILE             
EZA1685W Invalid local file identifier                  
EZA1460I Command:                                       
EZA1736I  QUIT                                          
EZA1701I >>> QUIT                                       
221-Goodbye. You uploaded 0 and downloaded 0 kbytes.    
221 Logout.                                             

Thanks,
Rajeev

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to