Author: migusd
Subject: Reply to: INREC PARSING and dictionary items
Posted: Fri Jun 02, 2017 8:43 pm (GMT 5.5)
Hi Arun,
I did that as a test before, but the failing field is moving.
let me tell you that the %03 field is missing most times. So we have two field separators '|' together indicating a missing field. Is that something to be of a concern?
here he the new test...
_________________
shikoulitz
Subject: Reply to: INREC PARSING and dictionary items
Posted: Fri Jun 02, 2017 8:43 pm (GMT 5.5)
Hi Arun,
I did that as a test before, but the failing field is moving.
let me tell you that the %03 field is missing most times. So we have two field separators '|' together indicating a missing field. Is that something to be of a concern?
here he the new test...
| Code: |
SYSIN : INREC PARSE=(TIMR=(ABSPOS=1,FIXLEN=7), LOQD=(ADDPOS=01,FIXLEN=7), REQI=(ADDPOS=01,FIXLEN=6), TDLI=(ADDPOS=01,ENDBEFR=PIP), PRLI=(ADDPOS=01,ENDBEFR=BLK)), BUILD=(1:PRLA,5:LIQD,12:TMAR,19:TDLP,22:REQU) SORT FIELDS=(PRLA,A,LIQD,A,TMAR,A) OMIT COND=(TDLP,EQ,C'OPN') DATA DICTIONARY SYMBOLS SUBSTITUTED : INREC PARSE=(%00=(ABSPOS=1,FIXLEN=7),%01=(ADDPOS=01,FIXLEN=7),%02=(ADDPOS=01,FIX LEN=6),%03=(ADDPOS=01,ENDBEFR=C'|'),%04=(ADDPOS=01,ENDBEFR=C' ')),BUILD=(1:1,4,5 * :5,7,12:12,7,19:19,3,22:22,6) SORT FIELDS=(1,4,CH,A,5,7,CH,A,12,7,ZD,A) OMIT COND=(19,3,CH,EQ,C'OPN') WER813I INSTALLATION OPTIONS IN MFX LOAD LIBRARY WILL BE USED WER268A INREC STATEMENT : SYNTAX ERROR |
| Code: |
TIMR,%00 LOQD,%01 REQI,%02 TDLI,%03 PRLI,%04 PIP,'|' BLK,' ' |
_________________
shikoulitz