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

19
Copybook/DTSIR991.cpy Normal file
View File

@ -0,0 +1,19 @@
00001 ***** 11/06/98
00002 * DTSIR991
00003 * DTSIR991 EXPORT CONTROL REPORT RECORD. LV002
00004 * DTSIR991
00005 ***** DTSIR991
00006 05 R991-EXPORT-CONTROL. CL**2
00007 10 R991-LENGTH PIC S9(04) COMP VALUE +196. DTSIR991
00008 CL**2
00009 10 R991-SORT-AREA. DTSIR991
00010 15 R991-REC-TYPE PIC X(03) VALUE '991'. DTSIR991
00011 CL**2
00012 10 R991-DATA-AREA. DTSIR991
00013 15 R991-MOD PIC X(03). DTSIR991
00014 15 R991-ROUTE1 PIC X(40). DTSIR991
00015 15 R991-ROUTE2 PIC X(40). DTSIR991
00016 15 R991-DATA-TYPE PIC X(60). DTSIR991
00017 15 R991-UNIT-DSCR PIC X(20). DTSIR991
00018 15 R991-UNIT-COUNT PIC S9(07) COMP-3. DTSIR991
00019 15 R991-DATASET-NAME PIC X(44). DTSIR991