CREATE OR REPLACE PROCEDURE GRAVA_RELAT_MOVIEST_K280(
   P_CDFILIAL     IN ITLANCTOEST.CDFILIMOVI%TYPE,
   P_CDPRODUTO    IN ITLANCTOEST.CDPRODUTO%TYPE,
   P_CDARVPROD    IN PRODUTO.CDARVPROD%TYPE,
   P_NRLOTEESTQ   IN ITLANCTOEST.NRLOTEESTQ%TYPE,
   P_NRSUBLOTE    IN ITLANCTOEST.NRSUBLOTE%TYPE,
   P_DTLANCAMEN   IN ITLANCTOEST.DTLANCMOVI%TYPE,
   P_IDTIPOLANC   IN ITLANCTOEST.IDTIPOMOVI%TYPE,
   P_CDFILLANC    IN ITLANCTOEST.CDFILIAL%TYPE,
   P_NRLANCAMEN   IN ITLANCTOEST.NRLANCESTQ%TYPE,
   P_NRSEQULANC   IN ITLANCTOEST.NRSEQUITEM%TYPE,
   P_QTDEESTO     IN ITLANCTOEST.QTLANCTOEST%TYPE,
   P_QTLANCAMEN   IN ITLANCTOEST.QTLANCTOEST%TYPE,
   P_IDALTCMEDMV  IN ITLANCTOEST.IDALTCMEDMV%TYPE,
   P_QTLANCTOEST  IN ITLANCTOEST.QTLANCTOEST%TYPE,
   P_IDORDEMCLC   IN ITLANCTOEST.IDORDEMCLC%TYPE,
   P_NRRELATMOVI  IN RELAT_MOVIEST.NRRELATMOVI%TYPE,
   P_QTTOTALANTE  IN ITLANCTOEST.QTLANCTOEST%TYPE,
   P_CDALMOXARIFE IN ITLANCTOEST.CDALMOXARIFE%TYPE,
   P_CDLOCALESTOQ IN ITLANCTOEST.CDLOCALESTOQ%TYPE,
   P_CDTIPORETIME IN ITLANCTOEST.CDTIPORETI%TYPE,
   P_IDENTRSAIDME IN TIPOOPERAC.IDENTRSAIDOP%TYPE,
   P_CDTIPOOPERME IN TIPOOPERAC.CDTIPOOPER%TYPE)
IS
BEGIN
   INSERT INTO RELAT_MOVIEST_K280
      (CDFILIMOVIEST, CDPRODUTO,     CDPRODMOVIEST, NRLOTEESTQME,  NRSUBLOTEME,
       DTLANCMOVIEST, IDTIPOMOVIEST, CDFILLANCMEST, NRLANCMOVIEST, NRSEQUMOVIEST,
       QTDEMOVIEST,   QTLANCAMENTO,  IDALTCMEDMOV,  QTLANCMOVIEST, IDORDEMCALC,
       NRRELATMOVI,   QTTOTALANT,    CDALMOXARIRM,  CDLOCALESTRM,  CDTIPORETIME,
       IDENTRSAIDME,  CDTIPOOPERME)
   VALUES
      (P_CDFILIAL,     P_CDPRODUTO,    P_CDARVPROD,    P_NRLOTEESTQ,   P_NRSUBLOTE,
       P_DTLANCAMEN,   P_IDTIPOLANC,   P_CDFILLANC,    P_NRLANCAMEN,   P_NRSEQULANC,
       P_QTDEESTO,     P_QTLANCAMEN,   P_IDALTCMEDMV,  P_QTLANCTOEST,  P_IDORDEMCLC,
       P_NRRELATMOVI,  P_QTTOTALANTE,  P_CDALMOXARIFE, P_CDLOCALESTOQ, P_CDTIPORETIME,
       P_IDENTRSAIDME, P_CDTIPOOPERME);
END;