DUTAS re-platformed to Raincode - Initial Source Code

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

37
Copybook/DTSIL074.cpy Normal file
View File

@ -0,0 +1,37 @@
00001 ***** 11/14/05
00002 * DTSIL074
00003 * DTSIL074 FEIN EDIT MODULE LINKAGE. LV005
00004 * DTSIL074
00005 * DTSIL074
00006 * 09/08/1998 REVIEWED AND MODIFIED FOR DC. EHH DTSIL074
00007 * 06/23/2004 ADDED L074-DUP-STAT-UNK-88 - DTSIL074
00008 * THIS VALUE SET WHEN ACCOUNT WITH DTSIL074
00009 * MATCHING FEIN FOUND AND STATUS IS DTSIL074
00010 * UNKNOWN. A NEW ACTIVE ACCOUNT SHOULDDTSIL074
00011 * NOT BE ADDED IN THIS CASE. GD. DTSIL074
00012 * DTSIL074
00013 ***** DTSIL074
00014 DTSIL074
00015 10 L074-OPTION PIC X(01). DTSIL074
00016 88 L074-ANY-DUP-88 VALUE '1'. DTSIL074
00017 88 L074-ACTIVE-DUP-88 VALUE '2'. DTSIL074
00018 DTSIL074
00019 10 L074-RESULT-IND PIC X(01). DTSIL074
00020 88 L074-NO-DUP-88 VALUE '0'. DTSIL074
00021 88 L074-DUP-BUT-OK-88 VALUE '1'. DTSIL074
00022 88 L074-OK-88 VALUE '0' '1'. DTSIL074
00023 88 L074-DUP-NOT-OK-88 VALUE '2'. DTSIL074
00024 88 L074-DUP-STAT-UNK-88 VALUE '3'. DTSIL074
00025 88 L074-FILE-CLOSED-88 VALUE '9'. DTSIL074
00026 DTSIL074
00027 10 L074-EMP-NO PIC S9(07) COMP-3. DTSIL074
00028 DTSIL074
00029 10 L074-FEIN PIC S9(09) COMP-3. DTSIL074
00030 DTSIL074
00031 10 L074-INACTIVE-EMP-NO PIC S9(07) COMP-3. DTSIL074
00032 DTSIL074
00033 10 L074-MSG-AREA. DTSIL074
00034 15 L074-MSG-ID PIC X(04). DTSIL074
00035 15 L074-MSG-TEXT PIC X(60). DTSIL074
00036 DTSIL074
00037 10 FILLER PIC X(15). DTSIL074