RE: Using FTP in CL Program

Hello Robert,

Yes indeed you will need two text  (in QDDSSRC say) and the CL program, like 
this

PLNPT_IN       TXT         FTP Production to Test script Effectivities    
PLNPT_OUT   TXT         FTP Production to Test script Effectivities LOG

PLNPT_IN looks like this;

steve  password                           
bin                                    
put lnpfile/PLN001F   lnpfile/PLN001F   
quit              

PLNPT_OUT is a log of the transmission.

the CL looks like this,

             PGM                                                 
             CLRPFM     FILE(LNPTOOLS/QDDSSRC) MBR(PLNPT_OUT)    
             OVRDBF     FILE(INPUT) TOFILE(LNPTOOLS/QDDSSRC) +   
                          MBR(PLNPT_IN)                          
             OVRDBF     FILE(OUTPUT) TOFILE(LNPTOOLS/QDDSSRC) +  
                          MBR(PLNPT_OUT)                         
             FTP        RMTSYS(put the IP address here')                    
             DLTOVR     FILE(INPUT)                              
             DLTOVR     FILE(OUTPUT)                             
 ENDPGM:     ENDPGM                                              
 
Thats it.  Just a simple thing but it works.    :-)

Steve             

-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx 
[mailto:midrange-l-bounces@xxxxxxxxxxxx]On Behalf Of Robert
Sent: Friday, January 07, 2005 8:30 AM
To: Midrange Systems Technical Discussion
Subject: Using FTP in CL Program


Hello everybody
Exist possibility to use FTP commands in CL program ( like batch) ????. 
Robert Łazarz
Solint sp. z o.o.
kom. +48 604435059
tel. +48 32 290 34 60
fax +48 32 263 98 89
-- 
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.