在 DB2 SQL 存储过程中使用 XML

核心提示： CREATEPROCEDUREex_proc(INinpdocXML)LANGUAGESQLNOEXTERNALACTIONBEGINIFXMLEXISTS('$d/request[@action="add"]'PASSINGinpdocAS"d&q

CREATE　PROCEDURE　ex_proc(IN　inpdoc　XML)　
LANGUAGE　SQL　
NO　EXTERNAL　ACTION　
BEGIN　
　
　IF　XMLEXISTS('$d/request[@action="add"]'　PASSING　inpdoc　AS　"d")　THEN　
　　SIGNAL　SQLSTATE　'75002'　SET　MESSAGE_TEXT　=　'F(x)　add';　
　ELSEIF　XMLEXISTS('$d/request[@action="update"]'　PASSING　inpdoc　AS　"d")　THEN　
　　SIGNAL　SQLSTATE　'75002'　SET　MESSAGE_TEXT　=　'F(x)　update';　
　ELSE　
　　SIGNAL　SQLSTATE　'75002'　SET　MESSAGE_TEXT　=　'F(x)　invalid';　
　END　IF;　
　
END　

清单 17. IF/THEN/ELSE，输入值（1）

<request　action="add">　
　<name>Jean　Luc　Picard</name>　
</request>　
　
Output:　
　SQL0438N　Application　raised　error　with　diagnostic　text:　"F(x)　add".　　
　SQLSTATE=75002　

清单 18. IF/THEN/ELSE，输入值（2）

<request　action="update">　
　<name>Jean　Luc　Picard</name>　
</request>　
　
Output:　
　SQL0438N　Application　raised　error　with　diagnostic　text:　"F(x)　update".　　
　SQLSTATE=75002　

清单 19. IF/THEN/ELSE，输入值（3）

<request　action="delete">　
　<name>Jean　Luc　Picard</name>　
</request>　
　
Output:　
　SQL0438N　Application　raised　error　with　diagnostic　text:　"F(x)　invalid".　　
　SQLSTATE=75002