如何使用VARRAY參數調試存儲過程？

Question

我在TOAD中使用兩個VARRAY參數調試過程時遇到了一些麻煩。 我在數據庫中定義了此VARRAY：

CREATE OR REPLACE TYPE BDD_ACTIVOSEPAREP.TORDEN_CAMPO as VARRAY(7) of VARCHAR2(13);

現在，我想調試一個需要將此varray作為參數的過程，但是當我執行調試時，出現了以下錯誤：

ORA-06550: line 46, column 21: PLS-00316: PL/SQL TABLEs must use a single index
ORA-06550: line 46, column 3: PL/SQL: Statement ignored

ORA-06550: line 47, column 20: PLS-00316: PL/SQL TABLEs must use a single index
ORA-06550: line 47, column 3: PL/SQL: Statement ignored

這是我要執行的代碼：

DECLARE 
  PIVTABLA VARCHAR2(32767);
  PIVIFGD VARCHAR2(32767);
  PIVPERIODO_INICIAL NUMBER;
  PIVPERIODO_FINAL NUMBER;
  PIVPERIODO_EVENTO_INICIAL NUMBER;
  PIVPERIODO_EVENTO_FINAL NUMBER;
  PIVCUENTA VARCHAR2(32767);
  PIVENTIDAD VARCHAR2(32767);
  PIVMACRO VARCHAR2(32767);
  PIVDEPENDENCIA VARCHAR2(32767);
  PIVIDPARTIC VARCHAR2(32767);
  PIVNIFCLIENTE VARCHAR2(32767);
  PIVNOMBCLIENTE VARCHAR2(32767);
  PIVNIFGRUPO VARCHAR2(32767);
  PIVNOMBGRUPO VARCHAR2(32767);
  PIVCODA VARCHAR2(32767);
  PIVDIFERIDA VARCHAR2(32767);
  PIVTI VARCHAR2(32767);
  PIVFILTROANULACION VARCHAR2(32767);
  PIVORDEN_CAMPO BDD_ACTIVOSEPAREP.TORDEN_CAMPO;
  PIVORDEN_TIPO BDD_ACTIVOSEPAREP.TORDEN_CAMPO;
  PINREG_INICIAL NUMBER;
  PINREG_FINAL NUMBER;
  XMLFINAL XMLTYPE;
BEGIN 
  PIVTABLA := 'F01';
  PIVIFGD := NULL;
  PIVPERIODO_INICIAL := 201411;
  PIVPERIODO_FINAL := NULL;
  PIVPERIODO_EVENTO_INICIAL := NULL;
  PIVPERIODO_EVENTO_FINAL := NULL;
  PIVCUENTA := NULL;
  PIVENTIDAD := NULL;
  PIVMACRO := NULL;
  PIVDEPENDENCIA := NULL;
  PIVIDPARTIC := NULL;
  PIVNIFCLIENTE := 'F03191871';
  PIVNOMBCLIENTE := NULL;
  PIVNIFGRUPO := NULL;
  PIVNOMBGRUPO := NULL;
  PIVCODA := NULL;
  PIVDIFERIDA := '0';
  PIVTI := '0';
  PIVFILTROANULACION := 'T';
  PIVORDEN_CAMPO := PIVORDEN_CAMPO('F_REPOR','PREF','MREF','IFGD','ID_MOVIMIENTO','ID_GRUPO','CASO');
  PIVORDEN_TIPO := PIVORDEN_CAMPO('D','D','D','A','D','D','A');
  PINREG_INICIAL := 1001;
  PINREG_FINAL := 2000;
  XMLFINAL := NULL;

  BDD_ACTIVOSEPAREP.PKG_CONSULTA_TRAZABILIDAD.BUSQUEDA ( PIVTABLA, PIVIFGD, PIVPERIODO_INICIAL, PIVPERIODO_FINAL, PIVPERIODO_EVENTO_INICIAL, PIVPERIODO_EVENTO_FINAL, PIVCUENTA, PIVENTIDAD, PIVMACRO, PIVDEPENDENCIA, PIVIDPARTIC, PIVNIFCLIENTE, PIVNOMBCLIENTE, PIVNIFGRUPO, PIVNOMBGRUPO, PIVCODA, PIVDIFERIDA, PIVTI, PIVFILTROANULACION, PIVORDEN_CAMPO, PIVORDEN_TIPO, PINREG_INICIAL, PINREG_FINAL, XMLFINAL );
  COMMIT; 
END;

多謝您的回覆！

PD：ORA錯誤中的第46和47行是

  PIVORDEN_CAMPO := PIVORDEN_CAMPO('F_REPOR','PREF','MREF','IFGD','ID_MOVIMIENTO','ID_GRUPO','CASO');
  PIVORDEN_TIPO := PIVORDEN_CAMPO('D','D','D','A','D','D','A');

Answer 1

您必須對集合使用隱式構造函數，即

PIVORDEN_CAMPO := PIVORDEN_CAMPO('F_REPOR','PREF','MREF','IFGD','ID_MOVIMIENTO','ID_GRUPO','CASO');
PIVORDEN_TIPO := PIVORDEN_CAMPO('D','D','D','A','D','D','A');

你應該寫

PIVORDEN_CAMPO := BDD_ACTIVOSEPAREP.TORDEN_CAMPO('F_REPOR','PREF','MREF','IFGD','ID_MOVIMIENTO','ID_GRUPO','CASO');
PIVORDEN_TIPO := BDD_ACTIVOSEPAREP.TORDEN_CAMPO('D','D','D','A','D','D','A');

因為BDD_ACTIVOSEPAREP.TORDEN_CAMPO()是BDD_ACTIVOSEPAREP.TORDEN_CAMPO -type集合的隱式構造函數。