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

25
Copybook/DTSIXVAD.cpy Normal file
View File

@ -0,0 +1,25 @@
00001 ***** 11/18/05
00002 * DTSIXVAD
00003 * DTSIXVAD EMPLOYER ADDRESS FILE FOR VOS. LV001
00004 * DTSIXVAD
00005 * DTSIXVAD
00006 * 01/11/2005 INITIAL DEVELOPMENT. GD DTSIXVAD
00007 * DTSIXVAD
00008 ***** DTSIXVAD
00009 DTSIXVAD
00010 10 XVAD-FEIN PIC 9(09). DTSIXVAD
00011 10 FILLER PIC X(01) VALUE ','. DTSIXVAD
00012 10 XVAD-SOURCE PIC X(01). DTSIXVAD
00013 88 XVAD-SOURCE-DOES-88 VALUE '0'. DTSIXVAD
00014 88 XVAD-SOURCE-NEWHIRE-88 VALUE '1'. DTSIXVAD
00015 88 XVAD-SOURCE-OTR-88 VALUE '2'. DTSIXVAD
00016 10 FILLER PIC X(01) VALUE ','. DTSIXVAD
00017 10 XVAD-STREET PIC X(60). DTSIXVAD
00018 10 FILLER PIC X(01) VALUE ','. DTSIXVAD
00019 10 XVAD-CITY PIC X(25). DTSIXVAD
00020 10 FILLER PIC X(01) VALUE ','. DTSIXVAD
00021 10 XVAD-STATE PIC X(02). DTSIXVAD
00022 10 FILLER PIC X(01) VALUE ','. DTSIXVAD
00023 10 XVAD-ZIP PIC X(10). DTSIXVAD
00024 10 FILLER PIC X(01) VALUE ','. DTSIXVAD
00025 10 XVAD-PHONE PIC X(15). DTSIXVAD