15 lines
1.1 KiB
COBOL
15 lines
1.1 KiB
COBOL
00001 ***** 09/13/99
|
|
00002 * DTSILSOL
|
|
00003 * DTSILSOL SPANS OF LIABIALITY PARMS LINKAGE. LV015
|
|
00004 * DTSILSOL
|
|
00005 ***** DTSILSOL
|
|
00006 DTSILSOL
|
|
00007 05 LSOL-EMP-NO PIC 9(06). CL*13
|
|
00008 05 FILLER PIC X. CL*13
|
|
00009 05 LSOL-SPANS OCCURS 3 INDEXED BY LSOL-IDX. CL*14
|
|
00010 10 LSOL-PARM-LIAB-DATE PIC 9(08). CL*14
|
|
00011 10 FILLER PIC X. CL*13
|
|
00012 10 LSOL-PARM-INACT-DATE PIC 9(08). CL*14
|
|
00013 10 FILLER PIC XX. CL*15
|
|
00014 05 FILLER PIC X(16). CL*15
|