In my current project I am using the "cpytoimpf" command to copy from an
iSeries DB file to an IFS file.


DCL VAR(&PART1) TYPE(*CHAR) LEN(11) +
VALUE('/home/dir1/')

DCL VAR(&PART2) TYPE(*CHAR) LEN(10)

DCL VAR(&PART3) TYPE(*CHAR) LEN(4) +
VALUE('.prg')

chgvar var(&TOSTMF) value(&part1 |< &out |< &part3)

CPYTOIMPF FROMFILE(QTEMP/&OUT) TOSTMF(&TOSTMF) +
MBROPT(*REPLACE) STMFCODPAG(*PCASCII) +
RCDDLM(*LF) STRDLM(*NONE)

The above code is in a loop where the value of &OUT is changing each
time the loop is executed.

What is output is a TEXT file with the extension of "PRG". Files are fed
into a controller on an automated saw that cuts strips of wood to specific
lengths, etc according to commands inside the PRG file.

How can I use the CPYTOIMPF command to output to a network folder? We want
to avoid the manual step of moving the files from an IFS folder to the
network folder.

I know about mapping IFS folders so they show up on your PC. But not sure
about going the other direction.

This thread ...

Follow-Ups:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2026 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.