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

27
Copybook/DTSIL071.cpy Normal file
View File

@ -0,0 +1,27 @@
00001 ***** 04/24/00
00002 * DTSIL071
00003 * DTSIL071 NAME (O/P/O, CLAIMANT, WORK STATION OPERATOR, LV006
00004 * OR FIELD REP) EDIT/CONVERSION. DTSIL071
00005 * DTSIL071
00006 * L071-FROM-FIRST-NAME-FIRST DISABLED. UNABLE TO DETERMINE DTSIL071
00007 * LOCATION FOR THE SLASH. DTSIL071
00008 * DTSIL071
00009 * DTSIL071
00010 * 09/08/1998 REVIEWED AND MODIFIED FOR DC. EHH DTSIL071
00011 * DTSIL071
00012 ***** DTSIL071
00013 DTSIL071
00014 10 L071-NAME-FORMAT PIC 9(01). DTSIL071
00015 *************88 L071-FROM-FIRST-NAME-FIRST VALUE 1. DTSIL071
00016 88 L071-FROM-LAST-NAME-FIRST VALUE 2. DTSIL071
00017 DTSIL071
00018 10 L071-NAME-RETURN PIC 9(01). DTSIL071
00019 88 L071-NAME-CONVERTED VALUE 0. DTSIL071
00020 88 L071-NAME-INVALID VALUE 8. DTSIL071
00021 DTSIL071
00022 10 L071-NAM PIC X(32). DTSIL071
00023 10 L071-NAME REDEFINES L071-NAM DTSIL071
00024 OCCURS 32 TIMES DTSIL071
00025 PIC X(01). DTSIL071
00026 DTSIL071
00027 10 FILLER PIC X(28). DTSIL071