01/02/07 12:01:20 THE REPORTER - GENERATION VSN: 03.01     502/502 COPYRIGHT SIGNATURE SYSTEMS 1987 - 2003   REPORT PREPARATION IN PROGRESS - $ACCT-00 ON RPG #FILES IS ON RPG INPUT TIME.SHEET.B ERROR = 43 - ACTUAL INPUT FILE NOT FOUND PRINTER SP1 TITLE P A C I F I C S H I P R E P A I R FATAL ERRORS EXIST. CANNOT PROCESS REPORT: ================================================================================   01/02/07 12:34:41 EDUCATING THE REPORTER VSN: 03.01   502/502 COPYRIGHT SIGNATURE SYSTEMS 1987 - 2003  FILE NAME OR ? : TIME.SHEET.B 1. ACTUAL FILE NAME: DL2 2. DIRECTORY: 3. FILE TYPE (K/S/C): K 4. IMAGE FILE (Y/N): 5. RECORD SIZE: 160 6. KEY SIZE: 7 7. TITLE: TIME SHEET INPUT FILE ENTER OPTION #, D-DELETE OR TAB: =================================================================================   01/02/07 12:35:57 502/502 WHERE IS FILE VSN: 06.04   WHEREIS COPYRIGHT SIGNATURE SYSTEMS 1987 - 2006 C2K6.375  DIR TYPE REC KEY POS CREATE UPDATE TIME SIZE FILE: DL2 DSK KEY 160 7 01-02-07 01-02-07 11:58 2624 BRE KEY 160 7 01-02-07 01-02-07 11:10 1024 2 FILE(S) FOUND. PRESS TAB: ================================================================================= File: $ACCT-00, RPG 502/502 2=Stp 4=Lcm 5=Xcm 6=Del 7=Ins 8=Alt 1 41000 INPUT TIME.SHEET.B 41010 PRINTER SP1 41020 TITLE P A C I F I C S H I P R E P A I R 41100 TITLE DAILY HOURS FOR ITEMS '00' / REGISTER# 756 41200 TITLE FOR TIME POSTED ON 12/30/2006 41500 DEFINE ERR = 0;1.0 41600 DEFINE EARN.HOURS.NUM = NUM(EARN.HOURS,ERR);7.2;HOURS 41700 DEFINE EARN.AMOUNT.NUM = NUM(EARN.AMOUNT,ERR);7.2;EARN^AMOUNT 41800 DEFINE REG.HRS = POS('R ',EARN.CODE) * EARN.HOURS.NUM;5.2;ST^HOURS 41900 DEFINE OT.HRS = POS('O ',EARN.CODE) * EARN.HOURS.NUM;5.2;OT^HOURS 42000 DEFINE DT.HRS = POS('D ',EARN.CODE) * EARN.HOURS.NUM;5.2;DT^HOURS 42100 SELECTING IF LINE.NO. NE '00' AND DL2.CANC.FLAG NE 'X' AND 42200 TASK.ID EQ '00 ' 42300 SORT ON JOB.NUMBER;EMPLOYEE.NO. 42400 REPORT 42500 USING TIME.B.TO.EMP 42600 PRINT JOB.NUMBER;TASK.ID;CRAFT.NUMBER;EMPLOYEE.NO.;EMPLOYEE.NAME; 42700 EARN.HOURS.NUM;EARN.AMOUNT.NUM 42800 TOTAL EARN.HOURS.NUM;EARN.AMOUNT.NUM 42900 BREAK ON JOB.NUMBER 43000 RUN QREPORTS,,'$MFG02'