铜仁市车辆管理所电话:DB2存储过程寄存器简单实例

来源:百度文库 编辑:偶看新闻 时间:2024/05/05 13:44:26

SET SCHEMA = 'DB2ADMIN';

SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","SYSIBMADM","DB2ADMIN";

CREATE PROCEDURE "DB2ADMIN"."TEXT_GET_DATETIME" (
    OUT "CDATE" DATE,
    OUT "CTIME" TIME,
    OUT "CTIMESTAMP" TIMESTAMP,
    OUT "CUSER" VARCHAR(10),
    OUT "CPATH" VARCHAR(10) )
  SPECIFIC "SQL111021140546000"
  LANGUAGE SQL
  NOT DETERMINISTIC
  EXTERNAL ACTION
  MODIFIES SQL DATA
  OLD SAVEPOINT LEVEL
P1: BEGIN
 --捕获寄存器
 VALUES CURRENT DATE INTO cdate;
 VALUES CURRENT TIME INTO ctime;
  VALUES CURRENT TIMESTAMP INTO CTIMESTAMP;
  VALUES CURRENT USER INTO CUSER;
  VALUES CURRENT PATH INTO CPATH;

END P1;