single-entry 01 level records are not properly parsed
Simple handling of numerous data file formats, even COBOL EBCDIC.
Brought to you by:
slott56
1.040A 01 CATALOG-SEGMENT-C01.
1.040A 05 C01-SEGMENT-CODE.
1.040A 10 C01-SC-FIRST-POSITION PIC X(01).
1.040A 10 C01-SC-SECOND-POSITION PIC X(01).
1.040A 10 C01-SC-THIRD-POSITION PIC X(01).
1.040A 05 C01-CATALOG-DESC PIC X(40).
1.040A 05 FILLER PIC X(7).
1.036A SKIP2
1.034A 01 AIRLINE-INDX PIC S9(4)V COMP.
1.036A SKIP2
1.041B 01 ORIGINAL-TRAN-INFO-SEGMENT.
252 dde_list, schema_list = stingray.cobol.loader.COBOL_schemata( cobol_copybook, replacing=args.replacestring )
253 for dde in dde_list:
254 print(dde)
01 CATALOG-SEGMENT-C01 .
01 AIRLINE-INDX PIC S9(4)V USAGE COMP.
01 ORIGINAL-TRAN-INFO-SEGMENT.
oops....this isn't a problem, it just looks different from the others because most 01 records don't have picture. Another issue was causing the error perceived to be from this...