ORA-01008: nem todas as variáveis são limitadas

[headtechdev]

Estou tentando executar o script abaixo e não estou conseguindo, preciso de ajuda, sei que está relacionado as variáveis e parâmetros, porém não estou conseguindo encontrar, obrigado.

Selecionar tudo

DECLARE 
      V_CODCID INT(30);
      V_CODUF INT(30); 
      V_NOMECID VARCHAR2 (60);
    BEGIN
      FOR X IN (SELECT DISTINCT * FROM TEMP_PARCEIRO P ORDER BY 1)
      LOOP
           V_NOMECID := P.CODCID;
           BEGIN
             SELECT NVL(MIN(CID.CODCID),0), UFS.CODUF
             INTO   :V_CODCID,  :V_CODUF
             FROM   TSICID CID, TSIUFS UFS
             WHERE  CID.UF = UFS.CODUF
               AND 
               (TRIM(UPPER(translate( CID.DESCRICAOCORREIO,
                    'ÁÇÉÍÓÚÀÈÌÒÙÂÊÎÔÛÃÕËÜáçéíóúàèìòùâêîôûãõëü',
                    'ACEIOUAEIOUAEIOUAOEUaceiouaeiouaeiouaoeu')))||'#'||UPPER(UFS.UF))  = 
                    
                    TRIM(UPPER(translate( CID.CODCID,
                    'ÁÇÉÍÓÚÀÈÌÒÙÂÊÎÔÛÃÕËÜáçéíóúàèìòùâêîôûãõëü',
                    'ACEIOUAEIOUAEIOUAOEUaceiouaeiouaeiouaoeu')))
               
             GROUP BY UFS.CODUF;
           EXCEPTION WHEN NO_DATA_FOUND THEN
              V_CODCID := 0;
              V_CODUF  := 0;
           END;
          
                       
           IF V_CODCID = 0 THEN
              
              SELECT MAX(NVL(TSICID.CODCID,0)) + 1 
                INTO :V_CODCID
                FROM TSICID;
                
              INSERT INTO TSICID ( CODCID, UF, NOMECID, DTALTER )
                          VALUES ( :V_CODCID, :V_CODUF, :V_NOMECID, SYSDATE);
           END IF;
           
           UPDATE TEMP_PARCEIRO PARC SET PARC.CODCID = V_CODCID WHERE PARC.CODPARC = P.CODPARC;
      END LOOP;
    END;
 

[dr_gori]

Você está executando isso no SQL*Plus ?
Se sim, é porque alguma variável BIND não foi setada.

Exemplo:

Selecionar tudo

Connected to Oracle Database 11g Enterprise Edition Release 11.2.0.2.0 
Connected as apps@hadleigh

SQL> begin
  2    select 1 into :saida from dual;
  3  end;
  4  /
begin
  select 1 into :saida from dual;
end;

ORA-01008: not all variables bound

Agora, um exemplo funcionando:

Selecionar tudo

SQL> var saida number
SQL> print
saida
---------

SQL> begin
  2    select 1 into :saida from dual;
  3  end;
  4  /

PL/SQL procedure successfully completed

saida
---------
1

SQL> print
saida
---------
1

SQL>