Example of TRACE Statements in an SPL Routine

The following example shows TRACE statements that you add to the SPL routine items_pct. The SET DEBUG FILE TO statement directs the trace output to the file that the pathname specifies. The TRACE ON statement begins tracing the statements and variables within the procedure.

CREATE PROCEDURE items_pct(mac CHAR(3))
DEFINE tp MONEY;   
DEFINE mc_tot MONEY;
DEFINE pct DECIMAL;
SET DEBUG FILE TO 'pathname'; 

TRACE 'begin trace';
TRACE ON;
LET tp = (SELECT SUM(total_price) FROM items);
LET mc_tot = (SELECT SUM(total_price) FROM items
   WHERE manu_code = mac);
LET pct = mc_tot / tp;
IF pct > .10 THEN
   RAISE EXCEPTION -745;
END IF
TRACE OFF;
END PROCEDURE;   

CREATE TRIGGER items_ins
INSERT ON items
REFERENCING NEW AS post_ins
FOR EACH ROW(EXECUTE PROCEDURE items_pct (post_ins.manu_code));