Porém ao compilar o Forms6 me traz o seguinte erro nos campos da cláusula INTO: Bad bind variable NRPE.
Já conferi e o campo NRPE existe na tabela T_GERA_DADOS que recebe o insert.
Segue o código:
PROCEDURE ALIMENTA_GERA_DADOS IS
AUX NUMBER(10);
BEGIN
AUX := NULL;
DELETE T_GERA_DADOS;
GO_BLOCK('PEDIDOS');
FIRST_RECORD;
LOOP
SELECT DISTINCT N.CODCLIE, N.NRPE, N.CODIC, TO_DATE(SUBSTR(:W_DATA_FORMATADA,1,10),'DD/MM/YYYY') DT
INTO T_GERA_DADOS (:CODCLIE, :NRPE, :CODIC, :W_DATA_FORMATADA)
FROM NOTAS_DE_SAIDA N
WHERE N.NRPE = :PEDIDO.NRPE;
IF :SYSTEM.LAST_RECORD = 'TRUE' THEN
EXIT;
ELSE
NEXT_RECORD;
END IF;
END LOOP;
:SYSTEM.MESSAGE_LEVEL := 5;
COMMIT;
:SYSTEM.MESSAGE_LEVEL := 0;
GO_BLOCK('PEDIDOS');
SELECT MAX(NRPE)
INTO AUX
FROM T_GERA_DADOS;
IF AUX IS NOT NULL THEN
MESSAGE(' AGUARDE...GERANDO O SEU RELATÓRIO...');
GERADOR_DE_RELATORIO;
END IF;
END;