CREATE OR REPLACE PROCEDURE INS_MSGIMPARQXMLNFCE
(
	P_NRIMPARQXMLNFCE NUMBER,
	P_IDTIPOMSG VARCHAR2,
	P_CDFILIAL VARCHAR2,
	P_CDCAIXA VARCHAR2,
	P_NRNOTAFISCALCE VARCHAR2,
	P_NRACESSONFCE VARCHAR2,
	P_CDPRODUTO VARCHAR2,
	P_NMPRODUTO VARCHAR2,
	P_DSERRO VARCHAR2,
	P_DSAJUDA VARCHAR2,
	P_CDTIPORECE VARCHAR2,
   P_NRORG NUMBER,
   P_CDOPERADOR VARCHAR2
)
AS
	PRAGMA AUTONOMOUS_TRANSACTION;
	V_NRMSGIMPARQXMLNFCE NUMBER;
BEGIN
	V_NRMSGIMPARQXMLNFCE := TO_NUMBER(RETORNA_NOVO_CODIGO('MSGIMPARQXMLNFCE',1));
	
	INSERT INTO MSGIMPARQXMLNFCE 
	(
	   NRMSGIMPARQXMLNFCE, NRIMPARQXMLNFCE, IDTIPOMSG, 
	   CDFILIAL, CDCAIXA, NRNOTAFISCALCE, 
	   NRACESSONFCE, CDPRODUTO, NMPRODUTO, 
	   DSERRO, DSAJUDA, CDTIPORECE,
	   NRORG, NRORGINCLUSAO, NRORGULTATU,
	   DTINCLUSAO, DTULTATU,
	   CDOPERINCLUSAO, CDOPERULTATU
	)
	VALUES
	(
		V_NRMSGIMPARQXMLNFCE, P_NRIMPARQXMLNFCE, P_IDTIPOMSG, 
	   P_CDFILIAL, P_CDCAIXA, P_NRNOTAFISCALCE, 
	   P_NRACESSONFCE, P_CDPRODUTO, P_NMPRODUTO, 
	   P_DSERRO, P_DSAJUDA, P_CDTIPORECE,
	   P_NRORG, P_NRORG, P_NRORG,
	   SYSDATE, SYSDATE,
	   P_CDOPERADOR, P_CDOPERADOR   
	);

	COMMIT;

END;
/


loop dos arquivo
try

catch
 rollback
end;