Re: STRPASTHR in batch CL?

[ericadelong@xxxxxxxx]

     Tim,
     DDM is MUCH more useful for transferring PF data between systems. I 
     even use it to pass source code. It's easy to write some simple 
     utilities to facilitate file transfer. Also a lot faster than SNADS.
     
     Example: (CPP)
     
     CRTDDMF FILE(QTEMP/XFRDTA) RMTFILE(&FROM_LIB/&FROM_FILE)               
                RMTLOCNAME(&FROM_SYS)
     CPYF FROMFILE(QTEMP/XFRDATA) TOFILE(&TLIB/&TFILE) FROMMBR(&MEMBER)     
                TOMBR(*FROMMBR) CRTFILE(*YES)                               
     
     This will transfer from a remote system to local. Pretty easy.... 
     
     Happy DDMing! :)
     
     Eric A DeLong
     ericadelong@pmsc.com                         

______________________________ Reply Separator _________________________________

Hi All,
As some of you know I changed jobs and i am now working at a company 
that has many AS400 (production and 1 developement machines) This is 
quite a shock to the system from the 1 AS400 shop from which I sprang.
     
Can I automate this process in a BATCH clp? 
strpasthr (to a production machine)
cpyf (test piece from a prod file) to qtemp. 
sndnetf (to the developement machine).
endpasthr (to stop pass thru on the production machine). 
crtpf (the proper skeleton  file in my test library).
rcvnetf (on my developement machine into the waiting skeleton file in my 
test library).
     
     
If this is possible I can make a real slick screen job that will pass 
parms and permit it to be an on-the-fly type running situation, A BIG 
TIME SAVER.
---
Tim & Dana Truax... and Caleb 4 years old.
     


+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---