GBASE南大通用数据库分享-例程中的TRACE语句的示例

GBASE南大通用数据库例程中的 TRACE 语句的示例 

以下示例显示了添加到 SPL 例程 items_pct 中的 TRACE 语句。SET DEBUG FILE TO 语 句将跟踪输出定向至路径名所指定的文件。TRACE ON 语句开始跟踪过程中的语句和变 量。

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));