Definir Alfa vMovExp;
Definir Alfa VDOCNFX;


/*Controle de Embarque*/                
               
vMovExp  = "SELECT " +
         "USU_T145EBQ.USU_CODEMP AS CODEMP, USU_T145EBQ.USU_CODFIL AS CODFIL, USU_T145EBQ.USU_NUMEBQ AS NUMEBQ, USU_T145EBQ.USU_CODTRA AS CODTRA, USU_T145EBQ.USU_PLAVEI AS PLAVEI, "+
         "USU_T145EBQ.USU_NOMMOT AS NOMMOT, USU_T145EBQ.USU_DOCMOT AS DOCMOT, USU_T145EBQ.USU_FONEBQ AS FONEBQ, USU_T145EBQ.USU_DSNEBQ AS DSNEBQ, USU_T145EBQ.USU_OBSEBQ AS OBSEBQ, "+
         "USU_T145EBQ.USU_DATSAI AS DATSAI, USU_T145EBQ.USU_HORSAI AS HORSAI, USU_T145EBQ.USU_USUGER AS USUGER, USU_T145EBQ.USU_DATGER AS DATGER, USU_T145EBQ.USU_HORGER AS HORGER, "+
         "USU_T145EBQ.USU_CODMTR AS CODMTR, USU_T145EBQ.USU_SITEBQ AS SITEBQ, USU_T145EBQ.USU_DATFEC AS DATFEC, USU_T145EBQ.USU_HORFEC AS HORFEC, USU_T145EBQ.USU_TIPEBQ AS TIPEBQ, "+
         "USU_T145EBQ.USU_DOCEXP AS DOCEXP, USU_T145EBQ.USU_NUMDEC AS NUMDEC, USU_T145EBQ.USU_DATDEC AS DATDEC, USU_T145EBQ.USU_NATEXP AS NATEXP, USU_T145EBQ.USU_NUMEXP AS NUMEXP, "+
         "USU_T145EBQ.USU_DATEXP AS DATEXP, USU_T145EBQ.USU_CHCEBQ AS CHCEBQ, USU_T145EBQ.USU_DATCHC AS DATCHC, USU_T145EBQ.USU_DATAVB AS DATAVB, USU_T145EBQ.USU_TIPCHC AS TIPCHC, "+
         "USU_T145EBQ.USU_CODPAI AS CODPAI, USU_T145EBQ.USU_INTIMP AS INTIMP, USU_T145EBQ.USU_CODEFE AS CODEFE, USU_T145EBQ.USU_NUMMEM AS NUMMEM, USU_T145EBQ.USU_KMTINI AS KMTINI, "+
         "USU_T145EBQ.USU_KMTFIN AS KMTFIN, USU_T145EBQ.USU_PRCEBQ AS PRCEBQ, USU_T145EBQ.USU_EMPTCP AS EMPTCP, USU_T145EBQ.USU_FILTCP AS FILTCP, USU_T145EBQ.USU_NUMTIT AS NUMTIT, "+
         "USU_T145EBQ.USU_CODTPT AS CODTPT, USU_T145EBQ.USU_EMPOCP AS EMPOCP, USU_T145EBQ.USU_FILOCP AS FILOCP, USU_T145EBQ.USU_NUMOCP AS NUMOCP, USU_T145EBQ.USU_SEQISO AS SEQISO, "+
         "USU_T145EBQ.USU_CODFOR AS CODFOR, USU_T145EBQ.USU_EMPNFV AS EMPNFV, USU_T145EBQ.USU_FILNFV AS FILNFV, USU_T145EBQ.USU_SNFNFV AS SNFNFV, USU_T145EBQ.USU_NUMNFV AS NUMNFV, "+
         "USU_T145EBQ.USU_NUMCFI AS NUMCFI, USU_T145EBQ.USU_CODSMA AS CODSMA, USU_T145EBQ.USU_NUMMAN AS NUMMAN, USU_T145EBQ.USU_CODTNS AS CODTNS, USU_T145EBQ.USU_VLRFRE AS VLRFRE, "+
         "USU_T145EBQ.USU_VLRPRE AS VLRPRE, USU_T145EBQ.USU_VLREST AS VLREST, USU_T145EBQ.USU_VLRDSC AS VLRDSC, USU_T145EBQ.USU_VLRADT AS VLRADT, USU_T145EBQ.USU_VLRABA AS VLRABA, "+
         "USU_T145EBQ.USU_VLRSST AS VLRSST, USU_T145EBQ.USU_VLRIRF AS VLRIRF, USU_T145EBQ.USU_VLRLIQ AS VLRLIQ, USU_T145EBQ.USU_VLRINS AS VLRINS, USU_T145EBQ.USU_VLRPDG AS VLRPDG, "+
         "USU_T145EBQ.USU_VLRBIN AS VLRBIN, USU_T145EBQ.USU_VLRBIR AS VLRBIR, USU_T145EBQ.USU_OBSMAN AS OBSMAN, USU_T145EBQ.USU_SITMAN AS SITMAN, USU_T145EBQ.USU_CODCPG AS CODCPG, "+
         "USU_T145EBQ.USU_DATEMM AS DATEMM, USU_T145EBQ.USU_HOREMM AS HOREMM, USU_T145EBQ.USU_UNIMED AS UNIMED, USU_T145EBQ.USU_PESBRU AS PESBRU, USU_T145EBQ.USU_PESLIQ AS PESLIQ, "+
         "USU_T145EBQ.USU_CODCLI AS CODCLI, USU_T145EBQ.USU_TIPEND AS TIPEND, USU_T145EBQ.USU_SEQEND AS SEQEND "+
         "FROM "+
         "USU_T145EBQ "+
         "WHERE "+
         "USU_T145EBQ.USU_CODEMP = {CODEMP} AND "+
         "USU_T145EBQ.USU_CODFIL = {CODFIL} AND "+
         "USU_T145EBQ.USU_DATAVB >= {DATINI} AND "+
         "USU_T145EBQ.USU_DATAVB <= {DATFIM} AND "+
         "USU_T145EBQ.USU_SITEBQ = '2' AND "+
         "USU_T145EBQ.USU_TIPEBQ = 'E'";                             

Depura = 1;
Depura = 2;

                                 
/* Composição do controle de embarque*/


VDOCNFX =  "SELECT "+
          "USU_T145NFV.USU_CODEMP AS CODEMP, USU_T145NFV.USU_CODFIL AS CODFIL, USU_T145NFV.USU_NUMEBQ AS NUMEBQ, USU_T145NFV.USU_SEQEBQ AS SEQEBQ, USU_T145NFV.USU_FILNFV AS FILNFV, "+
          "USU_T145NFV.USU_SNFNFV AS SNFNFV, USU_T145NFV.USU_NUMCFI AS NUMCFI, USU_T145NFV.USU_NUMNFV AS NUMNFV, USU_T145NFV.USU_SEQIPV AS SEQIPV, USU_T145NFV.USU_CODPRO AS CODPRO, "+
          "USU_T145NFV.USU_CODDER AS CODDER, USU_T145NFV.USU_CODLOT AS CODLOT, USU_T145NFV.USU_QTDFAT AS QTDFAT, USU_T145NFV.USU_TIPDOC AS TIPDOC "+
          "FROM "+
          "USU_T145NFV "+
          "WHERE "+
          "USU_T145NFV.USU_CODEMP = {CODEMP} AND "+
          "USU_T145NFV.USU_CODFIL = {CODFIL} AND "+
          "USU_T145NFV.USU_NUMEBQ = {NUMEBQ} "+
          "ORDER BY USU_T145NFV.USU_SEQEBQ "; 

Depura = 4;
Depura = 5;