|
 
| |
Year End Processing Path
| Process Path |
| |
D.PRHIST.
0 total records read, and 0 total records selected.
0 RA entries placed in output file D.ADR281 in library IBS400F mbr
M080107.
REQUEST SUCCESSFUL 01/07/08 10:37:57.
SYX3726 Options (0)
Pause--NO RECORDS FOUND FOR SELCETION
0 is the response entered for message SYX3726.
// DELETE D.ADR281,F1
DELETE procedure is running
Continue with the End of Year ? (Y / N)
Enter missing parameter
Y
// LOAD PR295
// FILE NAME-XASCTL,LABEL-D.XASCTL,DISP-SHR
// FILE NAME-PRSTAX,LABEL-D.PRSTAX,DISP-SHR,DBLOCK-40
// FILE NAME-PRMAST,LABEL-D.PRMAST,DISP-SHR
// RUN
Do you want to print a copy of the W2's on plain paper? (Y / N)
Enter missing parameter
Y
Are you ready to print the W2 forms? (Y / N)
CAUTION - Be sure you have verified the plain paper copy first !!
Enter missing parameter
Y
// LOAD PRW2
// PRINTER NAME-PRW2,SPOOL-YES,FORMSNO-W2FM,ALIGN-YES
// FILE NAME-PRHIST,LABEL-D.PRHST1,DISP-SHR
// FILE NAME-XASCTL,LABEL-D.XASCTL,DISP-SHR
// FILE NAME-PRMAST,LABEL-D.PRMAST,DISP-SHR
// FILE NAME-PRSTAX,LABEL-D.PRSTAX,DISP-SHR
// FILE NAME-W2REPORT,LABEL-D.W2001,RECORDS-00000409,EXTEND-100
// RUN
// GOTO PASS
// LOCAL OFFSET-50,BLANK-17
Prepare to save YEAR END INFORMATION - use a new Tape for each
Company
SYX3725 Options (0)
Pause--when ready, enter 0 to continue
0 is the response entered for message SYX3725.
CALL PREOY
1000 - RTVJOBA JOB(&WS) CURLIB(&CURLIB)
1200 - INZTAP DEV(TC) NEWVOL(PREOY) CHECK(*NO)
Volume PREOY prepared for operation with owner ID CHADDERDON.
1400 - SAVOBJ OBJ(D.PRMAST) LIB(IBS400F) DEV(TC) ENDOPT(*LEAVE)
Volume PREOY not under media management control.
1 objects saved from library IBS400F.
1600 - SAVOBJ OBJ(D.PRSTAX) LIB(IBS400F) DEV(TC) ENDOPT(*LEAVE)
1 objects saved from library IBS400F.
1800 - SAVOBJ OBJ(D.PRHIST) LIB(IBS400F) DEV(TC) ENDOPT(*LEAVE)
1 objects saved from library IBS400F.
2000 - SAVOBJ OBJ(D.XASCTL) LIB(IBS400F) DEV(TC) ENDOPT(*LEAVE)
Cannot allocate object for file D.XASCTL in IBS400F.
FILE D.XASCTL in IBS400F not saved.
No objects saved or restored for library IBS400F.
Function check. CPF3770 unmonitored by PREOY at statement 2000,
instruction X'0037'.
CPF3770 received by PREOY at 2000. (C D I R)
END OF YEAR MESSAGE
|
Queue . . . . . : QPADEV0005 Program . .
. . : *DSPMSG
Library . . . : QSYS Library . . . :
Severity . . . : 00 Delivery . . . : *NOTIFY
Type reply (if required), press Enter.
From . . . : REX 01/07/08 10:56:54
The Year End Payroll Files have been saved - Do Not Reuse
the TAPE, since
it will enable you to rerun the End of Year Reports.
Remove
the tape and place in a safe place.
DELETE procedure is running
Continue with the End of Year ? (Y / N)
Enter missing parameter
Y
Do you want to print a copy of the W2's on plain paper? (Y /
N)
Enter missing parameter
Y
Are you ready to print the W2 forms? (Y / N)
CAUTION - Be sure you have verified the plain paper copy
first !!
Enter missing parameter
Y
Prepare to save YEAR END INFORMATION - use a new Tape for
each Company
Year to Date Fields will be reset - Do you wish to continue
Options: Y - Yes
Options: N - No
Enter missing parameter
|
Process Path with errors
In this case someone was signed onto payroll. The
proper solution was to sign them off THEN do an 'R' (Retry)
|
D.PRHIST.
0 total records read, and 0 total records selected.
0 RA entries placed in output file D.ADR281 in library
IBS400F mbr
M080107.
REQUEST SUCCESSFUL 01/07/08 10:37:57.
SYX3726 Options (0)
Pause--NO RECORDS FOUND FOR SELCETION
0 is the response entered for message SYX3726.
// DELETE D.ADR281,F1
DELETE procedure is running
Continue with the End of Year ? (Y / N)
Enter missing parameter
Y
// LOAD PR295
// FILE NAME-XASCTL,LABEL-D.XASCTL,DISP-SHR
// FILE NAME-PRSTAX,LABEL-D.PRSTAX,DISP-SHR,DBLOCK-40
// FILE NAME-PRMAST,LABEL-D.PRMAST,DISP-SHR
// RUN
Do you want to print a copy of the W2's on plain paper? (Y /
N)
Enter missing parameter
Y
Are you ready to print the W2 forms? (Y / N)
CAUTION - Be sure you have verified the plain paper copy
first !!
Enter missing parameter
Y
// LOAD PRW2
// PRINTER NAME-PRW2,SPOOL-YES,FORMSNO-W2FM,ALIGN-YES
// FILE NAME-PRHIST,LABEL-D.PRHST1,DISP-SHR
// FILE NAME-XASCTL,LABEL-D.XASCTL,DISP-SHR
// FILE NAME-PRMAST,LABEL-D.PRMAST,DISP-SHR
// FILE NAME-PRSTAX,LABEL-D.PRSTAX,DISP-SHR
// FILE
NAME-W2REPORT,LABEL-D.W2001,RECORDS-00000409,EXTEND-100
// RUN
// GOTO PASS
// LOCAL OFFSET-50,BLANK-17
Prepare to save YEAR END INFORMATION - use a new Tape for
each Company
SYX3725 Options (0)
Pause--when ready, enter 0 to continue
0 is the response entered for message SYX3725.
CALL PREOY
1000 - RTVJOBA JOB(&WS) CURLIB(&CURLIB)
1200 - INZTAP DEV(TC) NEWVOL(PREOY) CHECK(*NO)
Volume PREOY prepared for operation with owner ID CHADDERDON.
1400 - SAVOBJ OBJ(D.PRMAST) LIB(IBS400F) DEV(TC) ENDOPT(*LEAVE)
Volume PREOY not under media management control.
1 objects saved from library IBS400F.
1600 - SAVOBJ OBJ(D.PRSTAX) LIB(IBS400F) DEV(TC) ENDOPT(*LEAVE)
1 objects saved from library IBS400F.
1800 - SAVOBJ OBJ(D.PRHIST) LIB(IBS400F) DEV(TC) ENDOPT(*LEAVE)
1 objects saved from library IBS400F.
2000 - SAVOBJ OBJ(D.XASCTL) LIB(IBS400F) DEV(TC) ENDOPT(*LEAVE)
Cannot allocate object for file D.XASCTL in IBS400F.
FILE D.XASCTL in IBS400F not saved.
No objects saved or restored for library IBS400F.
Function check. CPF3770 unmonitored by PREOY at statement
2000,
instruction X'0037'.
CPF3770 received by PREOY at 2000. (C D I R)
END OF YEAR MESSAGE
Message ID . . . . . . : CPA0701 Severity . . . . . . . : 99
Message type . . . . . : Inquiry
Date sent . . . . . . : 01/07/08 Time sent . . . . . . :
10:40:10
Message . . . . : CPF3770 received by PREOY at 2000. (C D I
R)
Cause . . . . . : Control language (CL) program PREOY in
library IBSPR
detected an error at statement number 2000. Message text for
CPF3770 is: No
objects saved or restored for library IBS400F.
Recovery . . . : This inquiry message can be avoided by
changing the
program. Monitor for the error (MONMSG command) and perform
error recovery
within the program. To continue, choose a reply value.
Possible choices for replying to message . . . . . . . . . .
. . . . . :
C -- Cancel the CL program.
D -- Dump the CL program variables and cancel the CL
program.
I -- Ignore the failing command.
R -- Try the failing command again.
|
Job 018057/REX/QPADEV0005 started on
01/07/08 at 10:33:13 in subsystem QINTE
CPF3770 received by PREOY at 2000. (C D I R) |
Message ID . . . . . . : CPA0701 Severity
. . . . . . . : 99
Message type . . . . . : Inquiry
Date sent . . . . . . : 01/07/08 Time sent . . . . . . :
10:40:10
Message . . . . : CPF3770 received by PREOY at 2000. (C D I
R)
Cause . . . . . : Control language (CL) program PREOY in
library IBSPR
detected an error at statement number 2000. Message text for
CPF3770 is: No
objects saved or restored for library IBS400F.
Recovery . . . : This inquiry message can be avoided by
changing the
program. Monitor for the error (MONMSG command) and perform
error recovery
within the program. To continue, choose a reply value.
Possible choices for replying to message . . . . . . . . . .
. . . . . :
C -- Cancel the CL program.
D -- Dump the CL program variables and cancel the CL
program.
I -- Ignore the failing command.
R -- Try the failing command again. |
Volume PREOY not under media management
control.
1 objects saved from library IBS400F.
1600 - SAVOBJ OBJ(D.PRSTAX) LIB(IBS400F) DEV(TC) ENDOPT(*LEAVE)
1 objects saved from library IBS400F.
1800 - SAVOBJ OBJ(D.PRHIST) LIB(IBS400F) DEV(TC) ENDOPT(*LEAVE)
1 objects saved from library IBS400F.
2000 - SAVOBJ OBJ(D.XASCTL) LIB(IBS400F) DEV(TC) ENDOPT(*LEAVE)
Cannot allocate object for file D.XASCTL in IBS400F.
FILE D.XASCTL in IBS400F not saved.
No objects saved or restored for library IBS400F.
Function check. CPF3770 unmonitored by PREOY at statement
2000,
instruction X'0037'.
CPF3770 received by PREOY at 2000. (C D I R)
CPF3770 received by PREOY at 2000. (C D I R) |
|
| |
| |
|
