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

87
Copybook/DTSIMLIN.cpy Normal file
View File

@ -0,0 +1,87 @@
00001 ***** 11/16/00
00002 * DTSIMLIN
00003 * DTSIMLIN MASTER FILE 'LIEN' RECORD DEFINITION. LV009
00004 * DTSIMLIN
00005 * DTSIMLIN
00006 * 08/28/1998 REVIEWED AND MODIFIED FOR DC. EHH DTSIMLIN
00007 * 10/05/2000 MODIFIED PER SPEC027 LIENS. ZL1 DTSIMLIN
00008 * 11/10/2000 INCREASED MAIL NO TO 24 BYTES. ZL1 DTSIMLIN
00009 ***** DTSIMLIN
00010 DTSIMLIN
00011 10 MLIN-KEY-AREA. DTSIMLIN
00012 15 MLIN-EMP-NO PIC S9(07) COMP-3. DTSIMLIN
00013 15 MLIN-REC-TYPE PIC S9(04) COMP. DTSIMLIN
00014 88 MLIN-LIN-88 VALUE +33. DTSIMLIN
00015 15 MLIN-ESTB-ABSTIME PIC S9(15) COMP-3. DTSIMLIN
00016 15 MLIN-KEY-FILLER PIC X(02). DTSIMLIN
00017 DTSIMLIN
00018 DTSIMLIN
00019 10 MLIN-PURGE-DATE PIC S9(09) COMP-3. DTSIMLIN
00020 DTSIMLIN
00021 DTSIMLIN
00022 10 MLIN-DATA-AREA. DTSIMLIN
00023 15 MLIN-STATUS-CD PIC X(01). DTSIMLIN
00024 88 MLIN-STATUS-OPEN-88 VALUE 'O'. DTSIMLIN
00025 88 MLIN-STATUS-CONV-88 VALUE 'C'. DTSIMLIN
00026 88 MLIN-STATUS-MANUAL-88 VALUE 'M'. DTSIMLIN
00027 88 MLIN-STATUS-RELEASED-88 VALUE 'R'. DTSIMLIN
00028 88 MLIN-STATUS-WITHDRAWN-88 VALUE 'W'. DTSIMLIN
00029 DTSIMLIN
00030 88 MLIN-STATUS-OPEN-CONV-88 VALUE 'O' 'C'. DTSIMLIN
00031 88 MLIN-STATUS-ACTIVE-88 VALUE 'O' 'C' DTSIMLIN
00032 'M'. DTSIMLIN
00033 DTSIMLIN
00034 15 MLIN-STATUS-DATE PIC S9(09) COMP-3. DTSIMLIN
00035 DTSIMLIN
00036 15 MLIN-STATUS-OP-ID PIC X(08). DTSIMLIN
00037 DTSIMLIN
00038 15 MLIN-STMT-DATE PIC S9(09) COMP-3. DTSIMLIN
00039 DTSIMLIN
00040 15 MLIN-COMP-DATE PIC S9(09) COMP-3. DTSIMLIN
00041 DTSIMLIN
00042 15 MLIN-ADDRESS. DTSIMLIN
00043 20 MLIN-ADDRESS-LINE-1 PIC X(40). DTSIMLIN
00044 20 MLIN-ADDRESS-LINE-2 PIC X(40). DTSIMLIN
00045 20 MLIN-ADDRESS-LINE-3 PIC X(40). DTSIMLIN
00046 20 MLIN-ADDRESS-LINE-4 PIC X(40). DTSIMLIN
00047 20 MLIN-ADDRESS-LINE-5 PIC X(40). DTSIMLIN
00048 DTSIMLIN
00049 15 MLIN-LICENSE-IND PIC X(01). DTSIMLIN
00050 88 MLIN-LICENSE-YES-88 VALUE 'Y'. DTSIMLIN
00051 88 MLIN-LICENSE-NO-88 VALUE 'N'. DTSIMLIN
00052 DTSIMLIN
00053 15 MLIN-STMT-DUE-AMT PIC S9(09)V9(02) COMP-3. DTSIMLIN
00054 DTSIMLIN
00055 15 MLIN-CERTIFICATE-NO PIC S9(08) COMP-3. DTSIMLIN
00056 DTSIMLIN
00057 15 MLIN-CERTIFICATE-DATE PIC S9(09) COMP-3. DTSIMLIN
00058 DTSIMLIN
00059 DTSIMLIN
00060 15 MLIN-COV-CNT PIC S9(04) COMP. DTSIMLIN
00061 DTSIMLIN
00062 15 MLIN-COVERED-YRQ OCCURS 20 DTSIMLIN
00063 INDEXED BY MLIN-COV-IDX DTSIMLIN
00064 PIC S9(05) COMP-3. DTSIMLIN
00065 DTSIMLIN
00066 DTSIMLIN
00067 15 MLIN-REC-DEEDS-NO PIC X(10). DTSIMLIN
00068 DTSIMLIN
00069 15 MLIN-CERTFD-MAIL-NO PIC X(24). DTSIMLIN
00070 DTSIMLIN
00071 15 MLIN-CERTFD-MAIL-DATE PIC S9(09) COMP-3. DTSIMLIN
00072 DTSIMLIN
00073 15 MLIN-RECEIPT-RETURN-DATE PIC S9(09) COMP-3. DTSIMLIN
00074 DTSIMLIN
00075 15 MLIN-FLD-REP-ID PIC X(02). DTSIMLIN
00076 DTSIMLIN
00077 15 FILLER PIC X(02). DTSIMLIN
00078 DTSIMLIN
00079 DTSIMLIN
00080 15 MLIN-CONVERTED-IND PIC X(01). DTSIMLIN
00081 88 MLIN-CONVERTED-88 VALUE 'Y'. DTSIMLIN
00082 88 MLIN-NOT-CONVERTED-88 VALUE 'N'. DTSIMLIN
00083 DTSIMLIN
00084 DTSIMLIN
00085 15 MLIN-ESTB-DATE PIC S9(09) COMP-3. DTSIMLIN
00086 DTSIMLIN
00087 15 MLIN-CHNG-DATE PIC S9(09) COMP-3. DTSIMLIN