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

29
Copybook/DTSIX150.cpy Normal file
View File

@ -0,0 +1,29 @@
00001 ***** 10/24/05
00002 * DTSIX150
00003 * DTSIX150 T011 PRINT DEBIT MEMO EXTRACT RECORD LV003
00004 * DTSIX150
00005 * PASSES REQUEST TO PRINT A DEBIT MEMO FROM THE SQL SERVER DTSIX150
00006 * DATABASE TO THE MAINFRAME. DTSIX150
00007 * DTSIX150
00008 * DTSIX150
00009 ***** DTSIX150
00010 DTSIX150
00011 15 X150-REC-TYPE PIC X(03) VALUE '150'. DTSIX150
00012 15 FILLER PIC X(01) VALUE ','. DTSIX150
00013 15 X150-EMP-NO PIC 9(06). DTSIX150
00014 15 FILLER PIC X(01) VALUE ','. DTSIX150
00015 15 X150-OPID PIC X(07). DTSIX150
00016 15 FILLER PIC X(01) VALUE ','. DTSIX150
00017 15 X150-APP PIC X(02). DTSIX150
00018 15 FILLER PIC X(01) VALUE ','. DTSIX150
00019 15 X150-TRAN-CD PIC X(02). DTSIX150
00020 15 FILLER PIC X(01) VALUE ','. DTSIX150
00021 15 X150-START-YRQ PIC X(06). DTSIX150
00022 15 FILLER PIC X(01) VALUE ','. DTSIX150
00023 15 X150-END-YRQ PIC X(06). DTSIX150
00024 15 FILLER PIC X(01) VALUE ','. DTSIX150
00025 15 X150-BATCH PIC 9(05). DTSIX150
00026 15 FILLER PIC X(01) VALUE ','. DTSIX150
00027 15 X150-ITEM PIC 9(03). DTSIX150
00028 15 FILLER PIC X(01) VALUE ','. DTSIX150
00029 15 X150-ENTER-DATE PIC X(10). DTSIX150