Control-M/Analyzer rule COMPNET is invoked as a subroutine to calculate the net salary for each employee.
Figure 219 DO RULE Statement Example
LIBRARY : CTB.PROD.RULES RULE : ADMSAL
COMMAND ===> SCROLL===> CRSR
+-----------------------------------------------------------------------------+
OWNER M18B GROUP ADMIN
UPDATED 08/08/00 - 15:30:05 BY M18B
DESC PRODUCE A SUMMARY SALARY REPORT FOR MANAGEMENT
OPTIONS
===========================================================================
EXECUTE INPUT UPON C
ON FILE FILENAME CTB.PROD.EMPREP
MODE PG LINECT 0060 DATASTAMP
WHEN LINE 001 - 060 COL 013 - 014 STOP AND/OR
STRING = |
DO EXTRACT = NAME
LEVEL 0 LINE +000 COL +002 - +013 PROCESS TYP
DO EXTRACT = ID
LEVEL 0 LINE +000 COL +015 - +023 PROCESS TYP
DO EXTRACT = GROSS_SALARY
LEVEL 0 LINE +000 COL +080 - +090 PROCESS TYP
DO RULE = COMPNET ARG ID,GROSS_SALARY,NET_SALARY C
DO PRINT = %%NAME %%GROSS_SALARY %%NET_SALARY F C
DO
WHEN LINE - COL - STOP AND/OR
PLEASE FILL IN RULE DEFINITION. 12.52.47
Parent Topic |