我在创建 IBM db2 过程时收到以下错误消息

Question

以下代码有什么问题？

PROCEDURE DATETYPE DYNAMIC RESULT SETS 1 LANGUAGE SQL
BEGIN
DECLARE @DateType TABLE
    ( LABEL CHAR(30) ,
    Value VARCHAR(1) );

DECLARE C CURSOR WITH RETURN FOR;

INSERT
    INTO
        @DateType
    VALUES ('Paid Dates Only',
    'P') INSERT
        INTO
            @DateType
        VALUES('Incurred Dates with Paid',
        'S') SELECT
            *
        FROM
            @DateType;

OPEN C;
END 

我正在使用 db2 并收到以下错误：

SQL 错误 [42601]：在“”之后发现了意外的标记“( LABEL CHAR(30) , Value VARCHAR(1) )”。预期的标记可能包括：“E @DateType TABLE”.. SQLCODE=-104, SQLSTATE=42601, DRIVER=4.21.29

Answer 1

无论是 DB2（db2-400 还是 db2-luw）DECLARE xx TABLE 都不是 DB2 SQL PL 语法

顺便说一句，如果我理解得很好，您的代码可以替换为视图

CREATE OR REPLACE VIEW DATETYPE (LABEL, VALUE) as (
    VALUES 
    ('Paid Dates Only', 'P'),
    ('Incurred Dates with Paid', 'S')
)

编辑：既然它必须是一个程序，那么你可以使用

   CREATE OR REPLACE PROCEDURE DATETYPE ()
     RESULT SETS 1
     LANGUAGE SQL
   BEGIN
       DECLARE DATAS CURSOR WITH RETURN FOR 
            VALUES 
            ('Paid Dates Only', 'P'),
            ('Incurred Dates with Paid', 'S');
       OPEN DATAS;
   END