Previous Topic

Next Topic

Book Contents

Book Index

Conclusion

This concludes your examination of the rule definition. You will now take a brief look at two user reports that result as output for this rule—one where the rule executed NOTOK, and one where the rule executed OK.

There are two jobs provided in the sample JCL library, related to rule ARWARN04: RUNRULE4 and RUNRUL4A.

Job RUNRULE4

RUNRULE4 uses an input file that contains serious errors. You may submit this job and review the outputs.

Figure 85 SYSUSER Report from RUNRULE4

        INTRAC DAILY DIVISIONAL INVOICE ANALYSIS

                    FOR  000904

-- ------- -------- ------- ------- --------- ---------

DV CUST    CUST#    INV #   DATE    AMOUNT    PROBLEM

-- ------- -------- ------- ------- --------- ---------

01 TERRANO 1TER001 CJ39398 030800   945245.00 AMT

02 SWANSON 2SWA001 MJ24545 040700    10987.55 DATE

02 ALBANAN 2ALB001 MJ24563 040800   110300.00 AMT-WRN

02 TRANKLE 2TRA002 BJ24572 040800      500.00 DATE

04 DURKENS 3DUR001 ZZ10906 040800   275000.00 DIV

  

DIVISION TOTAL CHECK

01 SALES: CALC  978365.250

01 SALES: FILE  978365.25

01  COST: CALC  938455.000

01  COST: FILE  901000.00

  

DIVISION TOTAL CHECK

02 SALES: CALC  679025.520

02 SALES: FILE  679025.52

02  COST: CALC  541873.000

02  COST: FILE  541873.00

  

DIVISION TOTAL CHECK

03 SALES: CALC  293764.810

03 SALES: FILE  293564.81

03  COST: CALC  264202.000

03  COST: FILE  264202.00

  

ERRORS 6.00  TOLERABLE ERRORS 1.000

In this report, because there were serious errors resulting in condition NOTOK, no database update occurred. There were several problems with the input file, including:

One tolerable error produced a warning message on the amount.

When checking divisional totals in the ENDJOB block, two more serious errors were found—calculated total cost for division 01, and total invoice amount for division 03, were not in agreement with the file amounts.

Job RUNRUL4A

RUNRUL4A is almost identical to RUNRULE4 except that it uses a file with no serious error conditions.

6 You may submit this job now and review the output.

Figure 86 SYSUSER Report from RUNRUL4A

        INTRAC DAILY DIVISIONAL INVOICE ANALYSIS

                    FOR  000904

-- ------- -------- ------- ------- --------- ---------

DV CUST    CUST#    INV #   DATE    AMOUNT    PROBLEM

-- ------- -------- ------- ------- --------- ---------

01 TERRANO 1TER001 CJ39398 030800   345245.00 AMT-WRN

02 ALBANAN 2ALB001 MJ24563 040800   110300.00 AMT-WRN

DIVISION TOTAL CHECK

01 SALES: CALC  378365.250

01 SALES: FILE  378365.25

01  COST: CALC  338455.000

01  COST: FILE  338455.00

DIVISION TOTAL CHECK

02 SALES: CALC  679025.520

02 SALES: FILE  679025.52

02  COST: CALC  541873.000

02  COST: FILE  541873.00

DIVISION TOTAL CHECK

03 SALES: CALC  368764.810

03 SALES: FILE  368764.81

03  COST: CALC  319302.000

03  COST: FILE  319302.00

ERRORS 0  TOLERABLE ERRORS 2.000

DIVISIONAL FILES ARE OK. DATA BASE IS UPDATED

This report, from RUNRUL4A, indicates no serious errors, although you did receive two warning messages.

As noted, the file is declared OK and the database has been updated.

7 You can now exit this rule and proceed to the next problem.

Parent Topic

Problem 4: Balance Divisional Accounting Files