Page History
...
****************** データ開始 *************************************CREATE PROCEDURE JSMJDBC/CALLSELECT(IN CODE CHAR (10))LANGUAGE SQLREADS SQL DATARESULT SETS 1 BEGINDECLARE SQLCODE INTEGER DEFAULT 0;DECLARE SQLSTATE CHAR (5) DEFAULT '00000'; DECLARE C1 CURSOR WITH RETURN TO CLIENT FOR SELECT ID,NAME,AGE FROM JSMJDBC/TBLNAME WHERE ID = CODE; OPEN C1; END ****************** データ終了 ************************************* ****************** データ開始 *************************************CREATE PROCEDURE JSMJDBC/CALLUPDATE(IN CODE CHAR (10))LANGUAGE SQLMODIFIES SQL DATA BEGINDECLARE SQLCODE INTEGER DEFAULT 0;DECLARE SQLSTATE CHARCHAR (5) DEFAULT '00000';DECLARE num_records INTEGER; UPDATE JSMJDBC/TBLNAME SET SALARY=12000.43 WHERE ID = CODE; GET DIAGNOSTICS num_records = ROW_COUNT; RETURN num_records; END
****************** データ終了 ************************************* ****************** データ開始 *************************************CREATE PROCEDURE JSMJDBC/CALLEXECUT(IN CODE CHAR (10))LANGUAGE SQLMODIFIES SQL DATA BEGINDECLARE SQLCODE INTEGER DEFAULT 0;DECLARE SQLSTATE CHARCHAR (5) DEFAULT '00000';DECLARE num_flag INTEGER DEFAULT 0; UPDATE JSMJDBC/TBLNAME SET SALARY=16000.26 WHERE ID = CODE; RETURN num_flag; END
...