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

90
Copybook/DTSIJSDL.cpy Normal file
View File

@ -0,0 +1,90 @@
00001 ***** 02/08/00
00002 * DTSIJSDL
00003 * DTSIJSDL RECORD FORMAT FOR 1 TIME JOB SERVICE DOWNLOAD. LV007
00004 * DTSIJSDL
00005 ***** DTSIJSDL
00006 05 JS-DATA. CL**5
00007 10 JS-EMP-ACCT-NO PIC 9(06). CL**7
00008 10 JS-PRIMARY-NAME PIC X(40). CL**5
00009 10 JS-ENTITY-NAME PIC X(40). CL**5
00010 10 JS-FEIN PIC 9(09). CL**7
00011 10 JS-SIC-CD PIC X(04). CL**5
00012 10 JS-NAICS-CD PIC X(06). CL**5
00013 10 JS-REGISTRATION-DT PIC 9(08). CL**7
00014 10 JS-MOST-RECENT-SOL-START-DT PIC 9(08). CL**7
00015 10 JS-INACTIVATION-DT PIC 9(08). CL**7
00016 10 JS-NUMBER-OF-EMPLOYEES PIC 9(07). CL**7
00017 10 JS-ADDRESS-AREA. CL**6
00018 15 JS-MAILING-ADDRESS. CL**6
00019 20 JS-MAILING-ATTN-LINE-1 PIC X(40). CL**6
00020 20 JS-MAILING-DELIV-LINE-1 PIC X(40). CL**6
00021 20 JS-MAILING-DELIV-LINE-2 PIC X(40). CL**6
00022 20 JS-MAILING-CITY PIC X(25). CL**6
00023 20 JS-MAILING-ST PIC X(02). CL**6
00024 20 JS-MAILING-ZIP PIC X(10). CL**6
00025 20 JS-MAILING-ADV-BARCODE PIC X(14). CL**6
00026 15 JS-MAIL-VOICE-1. CL**6
00027 20 JS-MAIL-VOICE-1-AREA-CD PIC X(03). CL**6
00028 20 JS-MAIL-VOICE-1-PREFIX PIC X(03). CL**6
00029 20 JS-MAIL-VOICE-1-SUFFIX PIC X(04). CL**6
00030 20 JS-MAIL-VOICE-1-EXT PIC X(05). CL**6
00031 15 JS-MAIL-VOICE-2. CL**6
00032 20 JS-MAIL-VOICE-2-AREA-CD PIC X(03). CL**6
00033 20 JS-MAIL-VOICE-2-PREFIX PIC X(03). CL**6
00034 20 JS-MAIL-VOICE-2-SUFFIX PIC X(04). CL**6
00035 20 JS-MAIL-VOICE-2-EXT PIC X(05). CL**6
00036 15 JS-MAIL-FAX. CL**6
00037 20 JS-MAIL-FAX-AREA-CD PIC X(03). CL**6
00038 20 JS-MAIL-FAX-PREFIX PIC X(03). CL**6
00039 20 JS-MAIL-FAX-SUFFIX PIC X(04). CL**6
00040 20 JS-MAIL-FAX-EXT PIC X(05). CL**6
00041 15 JS-LOCAL-ADDRESS. CL**6
00042 20 JS-LOCAL-ATTN-LINE-1 PIC X(40). CL**6
00043 20 JS-LOCAL-DELIV-LINE-1 PIC X(40). CL**6
00044 20 JS-LOCAL-DELIV-LINE-2 PIC X(40). CL**6
00045 20 JS-LOCAL-CITY PIC X(25). CL**6
00046 20 JS-LOCAL-ST PIC X(02). CL**6
00047 20 JS-LOCAL-ZIP PIC X(10). CL**6
00048 20 JS-LOCAL-ADV-BARCODE PIC X(14). CL**7
00049 15 JS-LOCAL-VOICE-1. CL**6
00050 20 JS-LOCAL-VOICE-1-AREA-CD PIC X(03). CL**6
00051 20 JS-LOCAL-VOICE-1-PREFIX PIC X(03). CL**6
00052 20 JS-LOCAL-VOICE-1-SUFFIX PIC X(04). CL**6
00053 20 JS-LOCAL-VOICE-1-EXT PIC X(05). CL**6
00054 15 JS-LOCAL-VOICE-2. CL**6
00055 20 JS-LOCAL-VOICE-2-AREA-CD PIC X(03). CL**6
00056 20 JS-LOCAL-VOICE-2-PREFIX PIC X(03). CL**6
00057 20 JS-LOCAL-VOICE-2-SUFFIX PIC X(04). CL**6
00058 20 JS-LOCAL-VOICE-2-EXT PIC X(05). CL**6
00059 15 JS-LOCAL-FAX. CL**6
00060 20 JS-LOCAL-FAX-AREA-CD PIC X(03). CL**6
00061 20 JS-LOCAL-FAX-PREFIX PIC X(03). CL**6
00062 20 JS-LOCAL-FAX-SUFFIX PIC X(04). CL**6
00063 20 JS-LOCAL-FAX-EXT PIC X(05). CL**6
00064 10 JS-MOPO-DATA-AREA. CL**5
00065 15 JS-MOPO-NAME PIC X(32). CL**5
00066 15 JS-MOPO-TITLE PIC X(20). CL**5
00067 15 JS-MOPO-SSN PIC 9(09). CL**7
00068 15 JS-MOPO-ADDRESS. CL**5
00069 20 JS-MOPO-ATTN-LINE-1 PIC X(40). CL**5
00070 20 JS-MOPO-DELIV-LINE-1 PIC X(40). CL**5
00071 20 JS-MOPO-DELIV-LINE-2 PIC X(40). CL**5
00072 20 JS-MOPO-CITY PIC X(25). CL**5
00073 20 JS-MOPO-ST PIC X(02). CL**5
00074 20 JS-MOPO-ZIP PIC X(10). CL**5
00075 20 JS-MOPO-ADV-BARCODE PIC X(14). CL**5
00076 15 JS-MOPO-VOICE-1. CL**5
00077 20 JS-MOPO-VOICE-1-AREA-CD PIC X(03). CL**5
00078 20 JS-MOPO-VOICE-1-PREFIX PIC X(03). CL**5
00079 20 JS-MOPO-VOICE-1-SUFFIX PIC X(04). CL**5
00080 20 JS-MOPO-VOICE-1-EXT PIC X(05). CL**5
00081 15 JS-MOPO-VOICE-2. CL**5
00082 20 JS-MOPO-VOICE-2-AREA-CD PIC X(03). CL**5
00083 20 JS-MOPO-VOICE-2-PREFIX PIC X(03). CL**5
00084 20 JS-MOPO-VOICE-2-SUFFIX PIC X(04). CL**5
00085 20 JS-MOPO-VOICE-2-EXT PIC X(05). CL**5
00086 15 JS-MOPO-FAX. CL**5
00087 20 JS-MOPO-FAX-AREA-CD PIC X(03). CL**5
00088 20 JS-MOPO-FAX-PREFIX PIC X(03). CL**5
00089 20 JS-MOPO-FAX-SUFFIX PIC X(04). CL**5
00090 20 JS-MOPO-FAX-EXT PIC X(05). CL**5