DUTAS re-platformed to Raincode - Initial Source Code
This commit is contained in:
70
Copybook/DTSIMMAX.cpy
Normal file
70
Copybook/DTSIMMAX.cpy
Normal file
@ -0,0 +1,70 @@
|
||||
00001 ***** 12/09/04
|
||||
00002 * DTSIMMAX
|
||||
00003 * MACIMMAX MASTER FILE MAXIMUM OCCURRENCE COUNTS. LV007
|
||||
00004 * DTSIMMAX
|
||||
00005 * DTSIMMAX
|
||||
00006 * 08/28/1998 REVIEWED AND MODIFIED FOR DC. EHH DTSIMMAX
|
||||
00007 * 04/29/1999 ADDED COUNT FOR LEVY TEXT. ZL1. DTSIMMAX
|
||||
00008 * 10/15/2001 ADDED COUNT FOR FILING SCHED GD1. DTSIMMAX
|
||||
00009 * 04/29/2004 ADDED COUNT FOR MCMP GD1. DTSIMMAX
|
||||
00010 ***** DTSIMMAX
|
||||
00011 DTSIMMAX
|
||||
00012 10 MMAX-APL-LVL-MAX PIC S9(04) COMP VALUE +4. DTSIMMAX
|
||||
00013 DTSIMMAX
|
||||
00014 10 MMAX-APL-COV-MAX PIC S9(04) COMP VALUE +20. DTSIMMAX
|
||||
00015 DTSIMMAX
|
||||
00016 10 MMAX-APL-TEXT-MAX PIC S9(04) COMP VALUE +8. DTSIMMAX
|
||||
00017 DTSIMMAX
|
||||
00018 DTSIMMAX
|
||||
00019 10 MMAX-AUR-ERROR-MAX PIC S9(04) COMP VALUE +5. DTSIMMAX
|
||||
00020 DTSIMMAX
|
||||
00021 DTSIMMAX
|
||||
00022 10 MMAX-AUY-QTR-MAX PIC S9(04) COMP VALUE +4. DTSIMMAX
|
||||
00023 DTSIMMAX
|
||||
00024 DTSIMMAX
|
||||
00025 10 MMAX-COL-TEXT-MAX PIC S9(04) COMP VALUE +8. DTSIMMAX
|
||||
00026 DTSIMMAX
|
||||
00027 10 MMAX-CMP-COV-MAX PIC S9(04) COMP VALUE +20. DTSIMMAX
|
||||
00028 DTSIMMAX
|
||||
00029 DTSIMMAX
|
||||
00030 10 MMAX-DPC-COV-MAX PIC S9(04) COMP VALUE +20. DTSIMMAX
|
||||
00031 DTSIMMAX
|
||||
00032 DTSIMMAX
|
||||
00033 10 MMAX-DST-ACCT-MAX PIC S9(04) COMP VALUE +10. DTSIMMAX
|
||||
00034 DTSIMMAX
|
||||
00035 DTSIMMAX
|
||||
00036 10 MMAX-FAR-TEXT-MAX PIC S9(04) COMP VALUE +16. DTSIMMAX
|
||||
00037 DTSIMMAX
|
||||
00038 DTSIMMAX
|
||||
00039 10 MMAX-FAS-SEL-MAX PIC S9(04) COMP VALUE +5. DTSIMMAX
|
||||
00040 DTSIMMAX
|
||||
00041 10 MMAX-FAS-TEXT-MAX PIC S9(04) COMP VALUE +12. DTSIMMAX
|
||||
00042 DTSIMMAX
|
||||
00043 DTSIMMAX
|
||||
00044 10 MMAX-JRN-ACCT-MAX PIC S9(04) COMP VALUE +100. DTSIMMAX
|
||||
00045 DTSIMMAX
|
||||
00046 DTSIMMAX
|
||||
00047 10 MMAX-LIN-COV-MAX PIC S9(04) COMP VALUE +20. DTSIMMAX
|
||||
00048 DTSIMMAX
|
||||
00049 DTSIMMAX
|
||||
00050 10 MMAX-NTE-TEXT-MAX PIC S9(04) COMP VALUE +16. DTSIMMAX
|
||||
00051 DTSIMMAX
|
||||
00052 DTSIMMAX
|
||||
00053 10 MMAX-QTR-INT-MAX PIC S9(04) COMP VALUE +2. DTSIMMAX
|
||||
00054 DTSIMMAX
|
||||
00055 10 MMAX-QTR-ACCT-MAX PIC S9(04) COMP VALUE +10. DTSIMMAX
|
||||
00056 DTSIMMAX
|
||||
00057 DTSIMMAX
|
||||
00058 10 MMAX-RCT-EXP-MAX PIC S9(04) COMP VALUE +3. DTSIMMAX
|
||||
00059 DTSIMMAX
|
||||
00060 DTSIMMAX
|
||||
00061 10 MMAX-REL-TEXT-MAX PIC S9(04) COMP VALUE +8. DTSIMMAX
|
||||
00062 DTSIMMAX
|
||||
00063 DTSIMMAX
|
||||
00064 10 MMAX-TCK-TEXT-MAX PIC S9(04) COMP VALUE +8. DTSIMMAX
|
||||
00065 DTSIMMAX
|
||||
00066 DTSIMMAX
|
||||
00067 10 MMAX-LEV-TEXT-MAX PIC S9(04) COMP VALUE +8. DTSIMMAX
|
||||
00068 DTSIMMAX
|
||||
00069 DTSIMMAX
|
||||
00070 10 MMAX-FSC-TEXT-MAX PIC S9(04) COMP VALUE +4. DTSIMMAX
|
||||
Reference in New Issue
Block a user