|
So I'm having a strange issue retrieving a directory listing from
the IFS. V7R1
Below is a snippet.
DCLF FILE(DIRLIST)
/* change to fidelity path in IFS */
CD DIR(&PATH)
DLTF FILE(QTEMP/DIRLIST)
MONMSG MSGID(CPF0000)
/* override the output to file dirlist */
OVRDBF FILE(STDOUT) TOFILE(QTEMP/DIRLIST) +
OVRSCOPE(*CALLLVL)
OVRDBF FILE(DIRLIST) TOFILE(QTEMP/DIRLIST)
/* use qshell command to list contents of */
/* Fidelity directory to file dirlist */
QSH CMD('LS -LT *.*')
CPYF FROMFILE(QTEMP/DIRLIST) TOFILE(*PRINT)
FIDELO:
RCVF
MONMSG MSGID(CPF0864) EXEC(GOTO CMDLBL(END))
The above is a from a program that is 2 different versions. The only
difference between the 2 programs is the CPYF after the QSH.
When I use the version that has the CPYF, the program works like it
is supposed to and reads the file.
However when I use the version that does not have the CPYF I get a
CPF0886 is: Record contains a data field that is not valid.
I stuck the CPYF in the program so I could see what was in the QTEMP
file and then it started behaving.
Any ideas?
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 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.