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

21
Copybook/DTSIL073.cpy Normal file
View File

@ -0,0 +1,21 @@
00001 ***** 09/08/98
00002 * DTSIL073
00003 * DTSIL073 TELEPHONE NUMBER EDIT MODULE LINKAGE. LV003
00004 * DTSIL073
00005 ***** DTSIL073
00006 CL**3
00007 10 L073-RESULT-IND PIC X(01). DTSIL073
00008 88 L073-VALID VALUE '0'. DTSIL073
00009 88 L073-NOT-VALID VALUE '1'. DTSIL073
00010 CL**3
00011 10 L073-TELEPHONE. DTSIL073
00012 25 L073-AREA-CD PIC X(03). DTSIL073
00013 25 L073-PREFIX PIC X(03). DTSIL073
00014 25 L073-SUFFIX PIC X(04). DTSIL073
00015 25 L073-EXT PIC X(05). CL**2
00016 CL**3
00017 10 L073-ST PIC X(02). DTSIL073
00018 CL**3
00019 10 L073-ZIP PIC X(10). DTSIL073
00020 CL**3
00021 10 FILLER PIC X(03). DTSIL073