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

49
Copybook/DTSICECD.cpy Normal file
View File

@ -0,0 +1,49 @@
00001 ***** 01/23/01
00002 * DTSICECD
00003 * DTSICECD ERROR MESSAGE IDENTIFIERS. LV005
00004 * EMSG-C-* (E05*) REPRESENT "CONSTRUCTABLE" ERROR DTSICECD
00005 * MESSAGES. SEE MACCU805. DTSICECD
00006 * DTSICECD
00007 * REVIEWED AND MODIFIED FROM DC. 08/11/1998 EHH DTSICECD
00008 * DTSICECD
00009 ***** DTSICECD
00010 DTSICECD
00011 10 EMSG-RECORD-EXISTS PIC X(04) VALUE 'E001'.DTSICECD
00012 10 EMSG-NO-RECORD PIC X(04) VALUE 'E002'.DTSICECD
00013 10 EMSG-FIELD-NOT-ALLOWED PIC X(04) VALUE 'E003'.DTSICECD
00014 10 EMSG-BANKRUPT PIC X(04) VALUE 'E004'.DTSICECD
00015 10 EMSG-INVALID-TRANS-ID PIC X(04) VALUE 'E005'.DTSICECD
00016 10 EMSG-SEARCH-CRITERIA PIC X(04) VALUE 'E006'.DTSICECD
00017 10 EMSG-FIELD-NOT-VALID PIC X(04) VALUE 'E011'.DTSICECD
00018 10 EMSG-FIELD-REQUIRED PIC X(04) VALUE 'E012'.DTSICECD
00019 10 EMSG-INVALID-NEGATIVE PIC X(04) VALUE 'E013'.DTSICECD
00020 10 EMSG-EXCEEDS-MIN-MAX PIC X(04) VALUE 'E014'.DTSICECD
00021 10 EMSG-CROSS-EDIT PIC X(04) VALUE 'E015'.DTSICECD
00022 10 EMSG-NO-EMPLOYER PIC X(04) VALUE 'E021'.DTSICECD
00023 10 EMSG-NO-ASSIGNMENT PIC X(04) VALUE 'E022'.DTSICECD
00024 10 EMSG-NO-BATCH PIC X(04) VALUE 'E023'.DTSICECD
00025 10 EMSG-NO-DOC PIC X(04) VALUE 'E024'.DTSICECD
00026 10 EMSG-ADD-PRECEDED PIC X(04) VALUE 'E025'.DTSICECD
00027 10 EMSG-MOD-PRECEDED PIC X(04) VALUE 'E026'.DTSICECD
00028 10 EMSG-DEL-PRECEDED PIC X(04) VALUE 'E027'.DTSICECD
00029 10 EMSG-PRINT-PRECEDED PIC X(04) VALUE 'E028'.DTSICECD
00030 10 EMSG-EMP-LOCKED PIC X(04) VALUE 'E029'.DTSICECD
00031 10 EMSG-EMP-MARKED-FOR-PURGE PIC X(04) VALUE 'E030'.DTSICECD
00032 10 EMSG-NOT-CURRENT-UPDATE PIC X(04) VALUE 'E031'.DTSICECD
00033 10 EMSG-NOT-CURRENT-PRINT PIC X(04) VALUE 'E032'.DTSICECD
00034 10 EMSG-NO-EMP-NO-CHANGE PIC X(04) VALUE 'E033'.DTSICECD
00035 10 EMSG-NO-BATCH-NO-CHANGE PIC X(04) VALUE 'E034'.DTSICECD
00036 10 EMSG-NO-ASSIGN-NO-CHANGE PIC X(04) VALUE 'E035'.DTSICECD
00037 10 EMSG-NO-ITEM-NO-CHANGE PIC X(04) VALUE 'E036'.DTSICECD
00038 10 EMSG-NO-FIELD-CHANGE-UPDATE PIC X(04) VALUE 'E037'.DTSICECD
00039 10 EMSG-NO-FIELD-CHANGE-PRINT PIC X(04) VALUE 'E038'.DTSICECD
00040 10 EMSG-EMP-WRITTEN-OFF PIC X(04) VALUE 'E039'.DTSICECD
00041 *********10 EMSG-DUPLICATE-LEGAL-NAME PIC X(04) VALUE 'E041'.DTSICECD
00042 10 EMSG-DUPLICATE-FEIN PIC X(04) VALUE 'E042'.DTSICECD
00043 10 EMSG-PRINTER-NOT-VALID PIC X(04) VALUE 'E043'.DTSICECD
00044 10 EMSG-NO-ADDRESS PIC X(04) VALUE 'E044'.DTSICECD
00045 10 EMSG-NO-AHDR-RECORD PIC X(04) VALUE 'E045'.DTSICECD
00046 10 EMSG-BATCH-FULL PIC X(04) VALUE 'E046'.DTSICECD
00047 *********10 EMSG-BATCH-RELEASED PIC X(04) VALUE 'E047'.DTSICECD
00048 10 EMSG-OLD-RCVD-DATE PIC X(04) VALUE 'E048'.DTSICECD
00049 10 EMSG-C-VALIDATE PIC X(04) VALUE 'E051'.DTSICECD