home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Shareware BBS: 10 Tools
/
10-Tools.zip
/
viscobv6.zip
/
vac22os2
/
ibmcobol
/
samples
/
pusample
/
dataeg1.xrl
< prev
next >
Wrap
Text File
|
1998-03-11
|
10KB
|
291 lines
<HEADER>
<PROGRAM> dataeg1 <ANALYZED AT> Thu Mar 12 06:25:41 1998
<INPUT-SEED-FILE> M:\cobparts\put\samples\pusample\dataeg1.xsd <SAVED AT> Fri Jan 9 02:43:08 1998
<OUTPUT-OPTIONS>
<NAME> YES
<CALL> YES
<DDNAME> YES
<CICS-FILE-NAME> YES
<CICS-FILE-VAR> YES
<NON-YEAR> YES
</OUTPUT-OPTIONS>
</HEADER>
<PROGRAM> DATAEG1
<PROGRAM-INFO>
<FILE> V:\PUWIN\COBOL\DATAEG1\dataeg1.cbl </FILE>
</PROGRAM-INFO>
<DDNAME> INFILE
<RESULT>
<USED-AS-YEAR>
<INDEX> 5 <LENGTH> 2
<YEAR-REASON> <PATTERN> *YEAR* M:\cobparts\put\samples\pusample\dataeg1.xsd 43.13 </YEAR-REASON>
</USED-AS-YEAR>
</RESULT>
</DDNAME>
<DDNAME> OUTFILE
<RESULT>
<USED-AS-YEAR>
<INDEX> 5 <LENGTH> 2
<YEAR-REASON> <PATTERN> *YEAR* M:\cobparts\put\samples\pusample\dataeg1.xsd 43.13 </YEAR-REASON>
</USED-AS-YEAR>
</RESULT>
</DDNAME>
<NAME> DATESINFILE
<NAME> DATESIN
<NAME> THEYEAR <SIZE> 2
<RESULT>
<USED-AS-YEAR>
<INDEX> 1 <LENGTH> 2
<YEAR-REASON> <PATTERN> *YEAR* M:\cobparts\put\samples\pusample\dataeg1.xsd 43.13 </YEAR-REASON>
</USED-AS-YEAR>
</RESULT>
<FILE> V:\PUWIN\COBOL\DATAEG1\dataeg1.cbl
<DEF-POS> 21.16.21.22 </DEF-POS>
</FILE>
</NAME>
<FILE> V:\PUWIN\COBOL\DATAEG1\dataeg1.cbl
<DEF-POS> 18.12.18.18 </DEF-POS>
<POS> 201.22.201.28r </POS>
</FILE>
</NAME>
<FILE> V:\PUWIN\COBOL\DATAEG1\dataeg1.cbl
<DEF-POS> 17.12.17.22 </DEF-POS>
<POS> 200.22.200.32 </POS>
</FILE>
</NAME>
<NAME> DATESOUTFILE
<NAME> DATESOUT
<NAME> THEYEAR <SIZE> 2
<RESULT>
<USED-AS-YEAR>
<INDEX> 1 <LENGTH> 2
<YEAR-REASON> <PATTERN> *YEAR* M:\cobparts\put\samples\pusample\dataeg1.xsd 43.13 </YEAR-REASON>
</USED-AS-YEAR>
</RESULT>
<FILE> V:\PUWIN\COBOL\DATAEG1\dataeg1.cbl
<DEF-POS> 27.16.27.22 </DEF-POS>
</FILE>
</NAME>
<FILE> V:\PUWIN\COBOL\DATAEG1\dataeg1.cbl
<DEF-POS> 24.12.24.19 </DEF-POS>
<POS> 201.33.201.40m 202.23.202.30er </POS>
</FILE>
</NAME>
<FILE> V:\PUWIN\COBOL\DATAEG1\dataeg1.cbl
<DEF-POS> 23.12.23.23 </DEF-POS>
</FILE>
</NAME>
<NAME> DATE1
<NAME> SPLIT
<NAME> THEDAY <SIZE> 2
<RESULT>
<USED-AS-YEAR>
<INDEX> 1 <LENGTH> 2
<YEAR-REASON> <PATTERN> *DATE* M:\cobparts\put\samples\pusample\dataeg1.xsd 21.13 </YEAR-REASON>
</USED-AS-YEAR>
</RESULT>
<FILE> V:\PUWIN\COBOL\DATAEG1\dataeg1.cbl
<DEF-POS> 33.20.33.25 </DEF-POS>
<POS> 108.23.108.28m 113.17.113.22r 130.23.130.28m </POS>
<POS> 139.15.139.20r </POS>
</FILE>
</NAME>
<NAME> THEMONTH <SIZE> 2
<RESULT>
<USED-AS-YEAR>
<INDEX> 1 <LENGTH> 2
<YEAR-REASON> <PATTERN> *DATE* M:\cobparts\put\samples\pusample\dataeg1.xsd 21.13 </YEAR-REASON>
</USED-AS-YEAR>
</RESULT>
<FILE> V:\PUWIN\COBOL\DATAEG1\dataeg1.cbl
<DEF-POS> 34.20.34.27 </DEF-POS>
<POS> 38.32.38.39 140.25.140.32m 142.25.142.32m </POS>
</FILE>
</NAME>
<NAME> THEYEAR <SIZE> 2
<RESULT>
<USED-AS-YEAR>
<INDEX> 1 <LENGTH> 2
<YEAR-REASON> <PATTERN> *YEAR* M:\cobparts\put\samples\pusample\dataeg1.xsd 43.13 </YEAR-REASON>
</USED-AS-YEAR>
</RESULT>
<FILE> V:\PUWIN\COBOL\DATAEG1\dataeg1.cbl
<DEF-POS> 35.20.35.26 </DEF-POS>
<POS> 38.46.38.52 132.23.132.29m </POS>
</FILE>
</NAME>
<FILE> V:\PUWIN\COBOL\DATAEG1\dataeg1.cbl
<DEF-POS> 32.16.32.20 </DEF-POS>
<POS> 36.36.36.40 </POS>
</FILE>
</NAME>
<NAME> COMPOSITE
<NAME> WHOLEDATE <SIZE> 6
<RESULT>
<USED-AS-YEAR>
<INDEX> 1 <LENGTH> 4
<YEAR-REASON> <PATTERN> *DATE* M:\cobparts\put\samples\pusample\dataeg1.xsd 21.13 </YEAR-REASON>
</USED-AS-YEAR>
<USED-AS-YEAR>
<INDEX> 5 <LENGTH> 2
<YEAR-REASON> <PATTERN> *YEAR* M:\cobparts\put\samples\pusample\dataeg1.xsd 43.13 </YEAR-REASON>
</USED-AS-YEAR>
</RESULT>
<FILE> V:\PUWIN\COBOL\DATAEG1\dataeg1.cbl
<DEF-POS> 37.20.37.28 </DEF-POS>
<POS> 119.27.119.35m </POS>
</FILE>
</NAME>
<FILE> V:\PUWIN\COBOL\DATAEG1\dataeg1.cbl
<DEF-POS> 36.16.36.24 </DEF-POS>
</FILE>
</NAME>
<NAME> DAYLESS <SIZE> 4
<RESULT>
<USED-AS-YEAR>
<INDEX> 1 <LENGTH> 2
<YEAR-REASON> <PATTERN> *DATE* M:\cobparts\put\samples\pusample\dataeg1.xsd 21.13 </YEAR-REASON>
</USED-AS-YEAR>
<USED-AS-YEAR>
<INDEX> 3 <LENGTH> 2
<YEAR-REASON> <PATTERN> *YEAR* M:\cobparts\put\samples\pusample\dataeg1.xsd 43.13 </YEAR-REASON>
</USED-AS-YEAR>
</RESULT>
<FILE> V:\PUWIN\COBOL\DATAEG1\dataeg1.cbl
<DEF-POS> 38.16.38.22 </DEF-POS>
<POS> 123.17.123.23r </POS>
</FILE>
</NAME>
<FILE> V:\PUWIN\COBOL\DATAEG1\dataeg1.cbl
<DEF-POS> 31.12.31.16 </DEF-POS>
</FILE>
</NAME>
<NAME> DATE2
<NAME> SPLIT
<NAME> THEDAY <SIZE> 2
<RESULT>
<USED-AS-YEAR>
<INDEX> 1 <LENGTH> 2
<YEAR-REASON> <PATTERN> *DATE* M:\cobparts\put\samples\pusample\dataeg1.xsd 21.13 </YEAR-REASON>
</USED-AS-YEAR>
</RESULT>
<FILE> V:\PUWIN\COBOL\DATAEG1\dataeg1.cbl
<DEF-POS> 44.20.44.25 </DEF-POS>
<POS> 113.36.113.41m 131.23.131.28m 139.33.139.38r </POS>
</FILE>
</NAME>
<NAME> THEMONTH <SIZE> 2
<RESULT>
<USED-AS-YEAR>
<INDEX> 1 <LENGTH> 2
<YEAR-REASON> <PATTERN> *DATE* M:\cobparts\put\samples\pusample\dataeg1.xsd 21.13 </YEAR-REASON>
</USED-AS-YEAR>
</RESULT>
<FILE> V:\PUWIN\COBOL\DATAEG1\dataeg1.cbl
<DEF-POS> 45.20.45.27 </DEF-POS>
<POS> 49.32.49.39 </POS>
</FILE>
</NAME>
<NAME> THEYEAR <SIZE> 2
<RESULT>
<USED-AS-YEAR>
<INDEX> 1 <LENGTH> 2
<YEAR-REASON> <PATTERN> *YEAR* M:\cobparts\put\samples\pusample\dataeg1.xsd 43.13 </YEAR-REASON>
</USED-AS-YEAR>
</RESULT>
<FILE> V:\PUWIN\COBOL\DATAEG1\dataeg1.cbl
<DEF-POS> 46.20.46.26 </DEF-POS>
<POS> 49.46.49.52 133.23.133.29m </POS>
</FILE>
</NAME>
<FILE> V:\PUWIN\COBOL\DATAEG1\dataeg1.cbl
<DEF-POS> 43.16.43.20 </DEF-POS>
<POS> 47.36.47.40 147.52.147.56m </POS>
</FILE>
</NAME>
<NAME> COMPOSITE
<NAME> WHOLEDATE <SIZE> 6
<RESULT>
<USED-AS-YEAR>
<INDEX> 1 <LENGTH> 4
<YEAR-REASON> <PATTERN> *DATE* M:\cobparts\put\samples\pusample\dataeg1.xsd 21.13 </YEAR-REASON>
</USED-AS-YEAR>
<USED-AS-YEAR>
<INDEX> 5 <LENGTH> 2
<YEAR-REASON> <PATTERN> *YEAR* M:\cobparts\put\samples\pusample\dataeg1.xsd 43.13 </YEAR-REASON>
</USED-AS-YEAR>
</RESULT>
<FILE> V:\PUWIN\COBOL\DATAEG1\dataeg1.cbl
<DEF-POS> 48.20.48.28 </DEF-POS>
</FILE>
</NAME>
<FILE> V:\PUWIN\COBOL\DATAEG1\dataeg1.cbl
<DEF-POS> 47.16.47.24 </DEF-POS>
</FILE>
</NAME>
<NAME> DAYLESS <SIZE> 4
<RESULT>
<USED-AS-YEAR>
<INDEX> 1 <LENGTH> 2
<YEAR-REASON> <PATTERN> *DATE* M:\cobparts\put\samples\pusample\dataeg1.xsd 21.13 </YEAR-REASON>
</USED-AS-YEAR>
<USED-AS-YEAR>
<INDEX> 3 <LENGTH> 2
<YEAR-REASON> <PATTERN> *YEAR* M:\cobparts\put\samples\pusample\dataeg1.xsd 43.13 </YEAR-REASON>
</USED-AS-YEAR>
</RESULT>
<FILE> V:\PUWIN\COBOL\DATAEG1\dataeg1.cbl
<DEF-POS> 49.16.49.22 </DEF-POS>
<POS> 123.37.123.43m </POS>
</FILE>
</NAME>
<FILE> V:\PUWIN\COBOL\DATAEG1\dataeg1.cbl
<DEF-POS> 42.12.42.16 </DEF-POS>
<POS> 154.38.154.42m </POS>
</FILE>
</NAME>
<NAME> DATE3
<NAME> YEARLESS
<NAME> THEDAY <SIZE> 2
<RESULT>
<USED-AS-YEAR>
<INDEX> 1 <LENGTH> 2
<YEAR-REASON> <INFERENCE>SPLIT = YEARLESS</INFERENCE> </YEAR-REASON>
</USED-AS-YEAR>
</RESULT>
<FILE> V:\PUWIN\COBOL\DATAEG1\dataeg1.cbl
<DEF-POS> 53.20.53.25 </DEF-POS>
</FILE>
</NAME>
<NAME> THEMONTH <SIZE> 2
<RESULT>
<USED-AS-YEAR>
<INDEX> 1 <LENGTH> 2
<YEAR-REASON> <INFERENCE>SPLIT = YEARLESS</INFERENCE> </YEAR-REASON>
</USED-AS-YEAR>
</RESULT>
<FILE> V:\PUWIN\COBOL\DATAEG1\dataeg1.cbl
<DEF-POS> 54.20.54.27 </DEF-POS>
</FILE>
</NAME>
<FILE> V:\PUWIN\COBOL\DATAEG1\dataeg1.cbl
<DEF-POS> 52.16.52.23 </DEF-POS>
<POS> 147.31.147.38r 154.17.154.24r </POS>
</FILE>
</NAME>
<FILE> V:\PUWIN\COBOL\DATAEG1\dataeg1.cbl
<DEF-POS> 51.12.51.16 </DEF-POS>
</FILE>
</NAME>
</PROGRAM>