DUTAS re-platformed to Raincode - Initial Source Code
This commit is contained in:
21
Copybook/EWGRECF.cpy
Normal file
21
Copybook/EWGRECF.cpy
Normal file
@ -0,0 +1,21 @@
|
||||
00001 ******************************************************************02/02/05
|
||||
00002 * EWGRECF - STANDARD FORMAT FOR QUARTERLY WAGE *EWGRECF
|
||||
00003 * - REPORTING RECORD * LV001
|
||||
00004 * - FINAL RECORD *EWGRECF
|
||||
00005 * DATE: - 02-28-96 *EWGRECF
|
||||
00006 ******************************************************************EWGRECF
|
||||
00007 01 WAGE-RECORD-F. EWGRECF
|
||||
00008 05 F-RECORD-ID PIC X(1) VALUE 'F'. EWGRECF
|
||||
00009 05 F-TOT-EMPLOYEE PIC 9(10). EWGRECF
|
||||
00010 05 F-TOT-EMPLOYER PIC 9(10). EWGRECF
|
||||
00011 05 F-ENTITY-CODE PIC X(4) VALUE 'UTAX'. EWGRECF
|
||||
00012 05 F-GROSS-WAGE PIC 9(13)V99. EWGRECF
|
||||
00013 05 F-TOTAL-WAGE PIC 9(13)V99. EWGRECF
|
||||
00014 05 F-EXCESS-WAGE PIC 9(13)V99. EWGRECF
|
||||
00015 05 F-TAXABLE-WAGE PIC 9(13)V99. EWGRECF
|
||||
00016 05 F-DIS-TAXABLE-WAGE PIC 9(13)V99. EWGRECF
|
||||
00017 05 F-TIP-WAGE PIC 9(13)V99. EWGRECF
|
||||
00018 05 F-MONTH-1 PIC X(8). EWGRECF
|
||||
00019 05 F-MONTH-2 PIC X(8). EWGRECF
|
||||
00020 05 F-MONTH-3 PIC X(8). EWGRECF
|
||||
00021 05 FILLER PIC X(136). EWGRECF
|
||||
Reference in New Issue
Block a user