MaryAnne, et.al., What I wound up doing is this (code below). This was my test code and I've now incorporated this capability into a routine that cleans out the spool and forwards the files to z/OS for archiving in CA-View (aka SAR)
/* rexx routine to ftp a file to the jes reader on a z/OS system for processing */ file = "esaindex listing a" temp = "temp file a" host = "zos.host.kp.org" id = "userid password" j.1 = "//SYSLBDX JOB 666001,'LIONEL DYCK',NOTIFY=&SYSUID," j.2 = "// MSGLEVEL=(1,1),MSGCLASS=X" j.3 = "//* --------------------------------------------------------- *" j.4 = "//* HOLD ALL OUTPUT *" j.5 = "//* --------------------------------------------------------- *" j.6 = "//HOLD OUTPUT DEFAULT=Y,OUTDISP=(HOLD,HOLD)" j.7 = "//PRINT1 EXEC PGM=IEBGENER" j.8 = "//SYSPRINT DD SYSOUT=*" j.9 = "//SYSUT2 DD SYSOUT=*" j.10 = "//SYSIN DD DUMMY" j.11 = "//SYSUT1 DD DATA" c = 11 "pipe <" file "| stem in. " do i = 1 to in.0 c = c + 1 j.c = in.i end c = c + 1 j.c = "/*" j.0 = c "pipe stem j. | >" temp temp_file = translate(temp,'.',' ') say "temp_file:" temp_file queue id queue "quote site filetype=jes" queue "mode b" queue "type e" queue "quote site jeslrecl=254" queue "put" temp_file queue "dir" queue "quit" "ftp" host "(exit" "erase" temp Lionel B. Dyck, Consultant/Specialist Enterprise Platform Services, Mainframe Engineering KP-IT Enterprise Engineering 925-926-5332 (8-473-5332) | E-Mail: [EMAIL PROTECTED] AIM: lbdyck | Yahoo IM: lbdyck Kaiser Service Credo: "Our cause is health. Our passion is service. We're here to make lives better." I never guess. It is a capital mistake to theorize before one has data. Insensibly one begins to twist facts to suit theories, instead of theories to suit facts. - Sir Arthur Conan Doyle NOTICE TO RECIPIENT: If you are not the intended recipient of this e-mail, you are prohibited from sharing, copying, or otherwise using or disclosing its contents. If you have received this e-mail in error, please notify the sender immediately by reply e-mail and permanently delete this e-mail and any attachments without reading, forwarding or saving them. Thank you.
<<image/gif>>
