0
我需要将多行传递给存储过程。我可以使用游标吗?因为我已经试过如下:PL/sql存储过程引用光标作为参数
里面我的包,我有:
TYPE FACT_VND_RECORD
IS
RECORD
(
COD_NOMCPDT P6PCM2_PARMCMS.COD_NOMCPDT%TYPE,
LIB_LIBNOMCPDT P6PCM2_PARMCMS.LIB_LIBNOMCPDT%TYPE,
DHS_MAJ P6PCM2_PARMCMS.DHS_MAJ%TYPE,
LIB_AUTH_MAJ P6PCM2_PARMCMS.LIB_AUTH_MAJ%TYPE);
TYPE FACT_VND_CURSOR
IS
REF
CURSOR
RETURN FACT_VND_RECORD;
和2程序:
PROCEDURE REC_FACT_VND(
P_IN_NUM_VND IN OUT P6PCM2_PARMCMS.NUM_VND%TYPE,
P_OUT_FACT_VND IN OUT FACT_VND_CURSOR,
P_OUT_CODE_RET OUT INTEGER,
P_OUT_MSG_ERR OUT VARCHAR2);
PROCEDURE MAJ_FACT_VND(
P_IN_NUM_VND IN OUT P6PCM2_PARMCMS.NUM_VND%TYPE,
P_IN_FACT_VND IN OUT FACT_VND_CURSOR,
P_OUT_CODE_RET OUT INTEGER,
P_OUT_MSG_ERR OUT VARCHAR2);
临危先前充满光标并执行对数据进行处理。
我使用这两个调用;第一个工作正常,我可以看到引用光标C1中的数据,然后尝试使用它。
C1 PACK_REC_FACT_VND.FACT_VND_CURSOR;
--other definitons
PACK_REC_FACT_VND.REC_FACT_VND(NUM_VND,C1,COD_RET,MSG_ERR);
PACK_REC_FACT_VND.MAJ_FACT_VND(NUM_VND,C1,COD_RET,MSG_ERR);
我不能对数据进行迭代,因为它是不确定的: (代码从第二个过程)
LIGNE_TAUX PACK_REC_FACT_VND.FACT_VND_RECORD;
BEGIN
DELETE FROM P6PCM2_PARMCMS WHERE NUM_VND=P_IN_NUM_VND;
FOR LIGNE_TAUX IN P_IN_FACT_VND
LOOP
INSERT
INTO P6PCM2_PARMCMS VALUES
(
P_IN_NUM_VND,
LIGNE_TAUX.COD_NOMCPDT,
LIGNE_TAUX.LIB_LIBNOMCPDT,
LIGNE_TAUX.DHS_MAJ,
LIGNE_TAUX.LIB_AUTH_MAJ);
END LOOP;
Error(48,21): PLS-00221: 'P_IN_FACT_VND' is not a procedure or is undefined
或者我应该切换到表记录?
记录表是我的第二个想法..我会试一试!并回答一个答案。 – Samson 2012-04-09 15:05:28
我切换到记录表作为输入参数,因为我觉得它更安全的使用:)反正10倍 – Samson 2012-04-10 08:49:53