|
I thought I had made progress using:
CPYTOIMPF FROMFILE(&INFPS) TOSTMF(&OUTFPS) +
MBROPT(*REPLACE) STMFCODPAG(*PCASCII) +
RCDDLM(*CRLF) DTAFMT(*DLM) STRDLM(*NONE)
But this only worked on a physical file with DDS definition.
I am using a single record file of 2000 char, this did not work.
This is a portion of the file.
0,0,0,995,0,0,=(""),=("") ,=(""),=("")
170,0,0,=(""),=("") ,=(""),=("")
0,0,1082,0,0,=(""),=("") ,=(""),=("")
0,0,0,0,1170,0,0,=(""),=("") ,=(""),=("")
0,1082,0,0,=(""),=("") ,=(""),=("")
082,0,0,=(""),=("") ,=(""),=("")
1170,0,0,=(""),=("") ,=(""),=("")
995,0,0,=(""),=("") ,=(""),=("")
0,0,0,0,1170,0,0,=(""),=("") ,=(""),=("")
95,0,0,=(""),=("") ,=(""),=("")
1170,0,0,=(""),=("") ,=(""),=("")
0,0,0,=(""),=("") ,=(""),=("")
1170,0,0,=(""),=("") ,=(""),=("")
0,1170,0,0,=(""),=("") ,=(""),=("")
0,995,0,0,=(""),=("") ,=(""),=("")
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.