giteaadmin/DUTAS
4
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

DUTAS re-platformed to Raincode - Initial Source Code

Browse Source
This commit is contained in:
Neeraj Kumar
2025-07-21 07:44:09 -04:00
commit ca3572c5df
2773 changed files with 798221 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
Copybook/DTSIFMAX.cpy Normal file
View File

@ -0,0 +1,14 @@
00001 ***** 08/11/98
00002 * DTSIFMAX
00003 * MACIFMAX REFERENCE FILE MAXIMUM OCCURRENCE COUNTS. LV003
00004 * DTSIFMAX
00005 * REVIEWED AND MODIFIED FOR DC. 08/11/1998 EHH CL**3
00006 * CL**3
00007 ***** DTSIFMAX
00008 CL**2
00009 10 FMAX-OPR-NONUM-GROUP-MAX DTSIFMAX
00010 PIC S9(04) COMP VALUE +24. DTSIFMAX
00011 10 FMAX-SEL-FLD-REP-ID-MAX DTSIFMAX
00012 PIC S9(04) COMP VALUE +10. DTSIFMAX
00013 10 FMAX-UIR-RATE-RATIO-MAX CL**2
00014 PIC S9(04) COMP VALUE +20. CL**2