在Informix的存储过程中传递参数为空

尝试使用此存储过程时，我不知道如何传递空值作为参数。我离开了我的存储过程的结构以及我如何尝试使用它。在Informix的存储过程中传递参数为空

CREATE PROCEDURE SAFUP001(Padre INT, Paciente INT, AtenSol SMALLINT,  
PersSol INT, ServSol INT, ActSol INT, 
AtenEje SMALLINT, PersEje INT, ServEje INT, 
ActEje INT, Prog INT, Grup INT, 
Fecha DATETIME YEAR TO SECOND, FP INTEGER) 
RETURNING INT, INT; --Funcion, CtaCte 
DEFINE Func, x7, x8 INT; 

set debug file to "safup001.trc"; 
trace on; 

IF FP IS NULL THEN 
IF Padre IS NOT NULL THEN 
    LET x7,x8 = (SELECT A.PrevPac, A.PrevInst 
    FROM SAFUV001 A 
    WHERE A.Codigo = Padre); 
ELSE 
    LET FP = (SELECT A.FormaPago FROM SAPAV012 A 
    WHERE A.CodPacie = Paciente); 
    LET x7,x8 = (SELECT B.PagoPac, B.PagoPersona 
    FROM SABST031 B 
    WHERE B.Codigo = FP); 
END IF; 
ELSE 
    LET x7,x8 = (SELECT B.PagoPac, B.PagoPersona FROM SABST031 B 
    WHERE B.Codigo = FP); 
END IF; 

IF Fecha IS NULL THEN 
    LET Fecha = CURRENT YEAR TO SECOND; 
END IF; 

IF Grup IS NULL THEN 
    INSERT INTO SAFUT003 (Codigo, Paciente, FechaInicio, Atencion, Tipo) 
    VALUES (0, Paciente, Fecha, AtenEje, 1); 
    LET Grup = (SELECT MAX(A.Codigo) FROM SAFUT003 A 
    WHERE A.Paciente = Paciente); 
ELSE 
    IF EXISTS(SELECT * FROM SAFUT003 A WHERE A.Codigo=Grup AND 
     A.CierrePar IS NOT NULL AND A.CierreFinal IS NULL) THEN 
     UPDATE SAFUT003 SET CierrePar = NULL WHERE Codigo = Grup; 
    END IF; 
END IF; 

INSERT INTO SAFUT001 (Codigo, Paciente, Padre, Fecha, AtencionSol, 
PersonaSol, ServicioSol, ActividadSol, AtencionEje, 
PersonaEje, ServicioEje, ActividadEje, Programa, Grupo, 
PrevPac, PrevInst) 
VALUES (0, Paciente, Padre, Fecha,AtenSol, PersSol, ServSol, ActSol, 
AtenEje, PersEje, ServEje, ActEje, Prog, Grup, x7, x8); 

LET Func= (SELECT Max(A.Codigo) FROM SAFUT001 A WHERE A.Grupo = Grup); 

RETURN Func, Grup; 
END PROCEDURE;

以及执行查询了下：

EXECUTE PROCEDURE SAFUP001 (0,781780,0,707,26,48,1,707,26,59,0,NULL,TO_DATE('2017-04-03 12:00:00','%Y-%m-%d %H:%M:%S'),14)

如果有人对如何空值传递给存储过程的例子，我将不胜感激他们足够的，因为我有问题我的存储过程的字段组，因为我无法输入以在表SAFUT003中创建组字段。

来源

2017-04-05 Cristian Saavedra

我能够直接传递NULL存储过程或使用适当的强制转换，在Mac上使用Informix 12.10.FC5运行MacOS的塞拉利昂10.12.4这样的：

DROP PROCEDURE IF EXISTS for_null_testing; 

CREATE PROCEDURE for_null_testing(i INTEGER, d DATETIME YEAR TO SECOND, f FLOAT, s CHAR(10)) 
    IF i IS NULL THEN RAISE EXCEPTION -746, 0, "null integer"; END IF 
    IF d IS NULL THEN RAISE EXCEPTION -746, 0, "null datetime"; END IF 
    IF f IS NULL THEN RAISE EXCEPTION -746, 0, "null float"; END IF 
    IF s IS NULL THEN RAISE EXCEPTION -746, 0, "null string"; END IF 
END PROCEDURE; 

EXECUTE PROCEDURE for_null_testing(NULL, CURRENT YEAR TO SECOND, 0.0, "empty"); 
EXECUTE PROCEDURE for_null_testing(1, NULL, 0.0, "empty"); 
EXECUTE PROCEDURE for_null_testing(2, CURRENT YEAR TO SECOND, NULL, "empty"); 
EXECUTE PROCEDURE for_null_testing(2, CURRENT YEAR TO SECOND, 3.14159, NULL); 

EXECUTE PROCEDURE for_null_testing(NULL::INTEGER, CURRENT YEAR TO SECOND, 0.0, "empty"); 
EXECUTE PROCEDURE for_null_testing(1, NULL::DATETIME YEAR TO SECOND, 0.0, "empty"); 
EXECUTE PROCEDURE for_null_testing(2, CURRENT YEAR TO SECOND, NULL::FLOAT, "empty"); 
EXECUTE PROCEDURE for_null_testing(2, CURRENT YEAR TO SECOND, 3.14159, NULL::CHAR(10)); 

EXECUTE PROCEDURE for_null_testing(CAST(NULL AS INTEGER), CURRENT YEAR TO SECOND, 0.0, "empty"); 
EXECUTE PROCEDURE for_null_testing(1, CAST(NULL AS DATETIME YEAR TO SECOND), 0.0, "empty"); 
EXECUTE PROCEDURE for_null_testing(2, CURRENT YEAR TO SECOND, CAST(NULL AS FLOAT), "empty"); 
EXECUTE PROCEDURE for_null_testing(2, CURRENT YEAR TO SECOND, 3.14159, CAST(NULL AS CHAR(10)));

运行产生：

$ sqlcmd -c -x -d stores -f null-to-spl.sql 
+ CONNECT TO 'stores' WITH CONCURRENT TRANSACTIONS 
+ DROP PROCEDURE IF EXISTS for_null_testing; 
+ CREATE PROCEDURE for_null_testing(i INTEGER, d DATETIME YEAR TO SECOND, f FLOAT, s CHAR(10)) 
    IF i IS NULL THEN RAISE EXCEPTION -746, 0, "null integer"; 
END IF 
    IF d IS NULL THEN RAISE EXCEPTION -746, 0, "null datetime"; 
END IF 
    IF f IS NULL THEN RAISE EXCEPTION -746, 0, "null float"; 
END IF 
    IF s IS NULL THEN RAISE EXCEPTION -746, 0, "null string"; 
END IF 
END PROCEDURE; 
+ EXECUTE PROCEDURE for_null_testing(NULL, CURRENT YEAR TO SECOND, 0.0, "empty"); 
SQL -746: null integer 
SQLSTATE: IX000 at null-to-spl.sql:11 
+ EXECUTE PROCEDURE for_null_testing(1, NULL, 0.0, "empty"); 
SQL -746: null datetime 
SQLSTATE: IX000 at null-to-spl.sql:12 
+ EXECUTE PROCEDURE for_null_testing(2, CURRENT YEAR TO SECOND, NULL, "empty"); 
SQL -746: null float 
SQLSTATE: IX000 at null-to-spl.sql:13 
+ EXECUTE PROCEDURE for_null_testing(2, CURRENT YEAR TO SECOND, 3.14159, NULL); 
SQL -746: null string 
SQLSTATE: IX000 at null-to-spl.sql:14 
+ EXECUTE PROCEDURE for_null_testing(NULL::INTEGER, CURRENT YEAR TO SECOND, 0.0, "empty"); 
SQL -746: null integer 
SQLSTATE: IX000 at null-to-spl.sql:16 
+ EXECUTE PROCEDURE for_null_testing(1, NULL::DATETIME YEAR TO SECOND, 0.0, "empty"); 
SQL -746: null datetime 
SQLSTATE: IX000 at null-to-spl.sql:17 
+ EXECUTE PROCEDURE for_null_testing(2, CURRENT YEAR TO SECOND, NULL::FLOAT, "empty"); 
SQL -746: null float 
SQLSTATE: IX000 at null-to-spl.sql:18 
+ EXECUTE PROCEDURE for_null_testing(2, CURRENT YEAR TO SECOND, 3.14159, NULL::CHAR(10)); 
SQL -746: null string 
SQLSTATE: IX000 at null-to-spl.sql:19 
+ EXECUTE PROCEDURE for_null_testing(CAST(NULL AS INTEGER), CURRENT YEAR TO SECOND, 0.0, "empty"); 
SQL -746: null integer 
SQLSTATE: IX000 at null-to-spl.sql:21 
+ EXECUTE PROCEDURE for_null_testing(1, CAST(NULL AS DATETIME YEAR TO SECOND), 0.0, "empty"); 
SQL -746: null datetime 
SQLSTATE: IX000 at null-to-spl.sql:22 
+ EXECUTE PROCEDURE for_null_testing(2, CURRENT YEAR TO SECOND, CAST(NULL AS FLOAT), "empty"); 
SQL -746: null float 
SQLSTATE: IX000 at null-to-spl.sql:23 
+ EXECUTE PROCEDURE for_null_testing(2, CURRENT YEAR TO SECOND, 3.14159, CAST(NULL AS CHAR(10))); 
SQL -746: null string 
SQLSTATE: IX000 at null-to-spl.sql:24 
$

在每种情况下，都会产生正确的异常。在过去很久以前，在没有限定符的情况下可能会传递NULL，但其中一个集合应该工作，除非你有一个真正的Informix的古老版本。

来源

2017-04-05 20:19:55

在Informix的存储过程中传递参数为空

回答

相关问题