Skip to content

Telas LCM.jpg

Telas LCM2.jpg

SELECT * FROM TT_MDT insert into TT_MDT

(CODFIL, NUMTAN, DATMED, FILLEI, CODLEI, DATLEI, FILREG, CODREG, DATREG, ATU_EM, QTDLTS)

insert into TT_FCP

(CODFIL, SEQUEN, FILMED, TANMED, DATMED, CODBIC, FILLEI, CODLEI, FILREG, CODREG, DATREG, DATFEC, ATU_EM, VLRENC)

Telas LCM3.jpg

insert into TT_AFE (CODFIL, CODBIC ,FILAFE, CODAFE, DATAFE, FILREG, CODREG, DATREG, ATU_EM, ENCINI, ENCFIM)

Telas LCM4.png

Telas LCM5.jpg

select case when ilm.filial is null then 'T'

else 'F' end novo, ilm.filemi, ilm.codemi, ilm.observ,                                      
dat.datope as datemi, 0 as numfor, ilm.codfil, ilm.sequen,                                    
ilm.filusu, ilm.codusu, ilm.apeusu                                                            

from tt_dat dat left join ( select lmc.codfil, lmc.sequen, lmc.filmat, lmc.codmat, lmc.codcor,
lmc.codtam,
ilm.filemi, ilm.codemi, ilm.observ, ilm.datemi,
usu.filusu, usu.codusu, usu.apeusu, ilm.codfil as filial
from tt_lmc lmc inner join tt_ilm ilm on lmc.codfil = ilm.codfil and lmc.sequen = ilm.sequen left join tt_usu usu on ilm.filemi = usu.filusu and ilm.codemi = usu.codusu where lmc.codfil = '003'
and lmc.filmat = '003'
and lmc.codmat = ' 114'
and lmc.codcor = 0
and lmc.codtam = 0
) ilm on dat.datope = ilm.datemi and codfil = '003'
WHERE 1 = 1
AND dat.datope >= TO_DATE('01/03/2005 00:00:00','DD/MM/YYYY HH24:MI:SS')
AND dat.datope <= TO_DATE('05/03/2005 23:59:59','DD/MM/YYYY HH24:MI:SS')
order by dat.datope

Telas LCM6.jpg

SELECT PRO.DESMAT, DES.FILICO, DES.SEQICO, TAN.TANQUE , DES.CODTAN, DES.NUMICO,

  DES.QTDLTS,   USU.APEUSU,   TRUNC(DES.ATU\_EM) AS ATU\_EM,  TO\_NUMBER(*) AS PERCENT*

FROM TT_DES DES INNER JOIN TD_TAN TAN ON TAN.CODTAB = DES.CODTAN INNER JOIN TT_GRA GRA ON GRA.FILMAT = TAN.GRAFIL AND GRA.CODMAT = TAN.GRACOD AND GRA.CODCOR = TAN.GRACOR AND GRA.CODTAM = TAN.GRATAM INNER JOIN TT_PRO PRO ON PRO.FILMAT = GRA.FILMAT AND PRO.CODMAT = GRA.CODMAT INNER JOIN TT_USU USU ON USU.FILUSU = DES.FILUSU AND USU.CODUSU = DES.CODUSU WHERE DES.FILICO = ? AND DES.SEQICO = ?

SELECT TAN.TANQUE, PRO.DESMAT, TAN.CODTAB, TAN.FILTAN, TAN.GRAFIL,

  TAN.GRACOD, TAN.GRACOR, TAN.GRATAM, TAN.TANATV  

FROM TD_TAN TAN INNER JOIN TT_GRA GRA ON GRA.FILMAT = TAN.GRAFIL AND GRA.CODMAT = TAN.GRACOD AND GRA.CODCOR = TAN.GRACOR AND GRA.CODTAM = TAN.GRATAM INNER JOIN TT_PRO PRO ON PRO.FILMAT = GRA.FILMAT AND PRO.CODMAT = GRA.CODMAT

ORDER BY TAN.FILTAN, TAN.TANQUE

Para a impressão:

select sum(case mdt.tanque when 1 then qtdlts end) as tanque1,

  sum(case mdt.tanque when 2 then qtdlts end) as tanque2,
  sum(case mdt.tanque when 3 then qtdlts end) as tanque3,
  sum(case mdt.tanque when 4 then qtdlts end) as tanque4,
  sum(case mdt.tanque when 5 then qtdlts end) as tanque5,
  sum(case mdt.tanque when 6 then qtdlts end) as tanque6,
  sum(qtdlts) as tanques

from TV_LMC_MDT MDT where MDT.DATMED=ADD_DAY(?,-1) and mdt.codfil=?

         SELECT VEN.CODFIL,
  VEN.FILMAT,
  VEN.CODMAT,
  VEN.CODCOR,
  VEN.CODTAM,
  VEN.DATMED AS datope,
  VEN.qtdmov,
  VEN.VLRMOV,
  VEN.TANQUE,
  VEN.CODBIC,
  VEN.BOMBA,
  VEN.BICO,
  VEN.ENCABE,
  VEN.ENCFEC,
  (SELECT SUM(AFE.ENCFIM-AFE.ENCINI)
     FROM TT\_AFE AFE
    WHERE AFE.CODBIC=VEN.CODBIC
      AND AFE.ENCINI>VEN.ENCABE
      AND AFE.ENCFIM<VEN.ENCFEC
   ) AS QTDAFE

from tt_lmc lmc inner join tt_ilm ilm on lmc.codfil = ilm.codfil and lmc.sequen = ilm.sequen

           INNER JOIN tv\_lmc\_ven ven ON ven.codfil=lmc.codfil
                                    and ven.filmat=lmc.filmat
                                    and ven.codmat=lmc.codmat
                                    and ven.codcor=lmc.codcor
                                    and ven.codtam=lmc.codtam
                                    AND ven.datmed=ilm.datemi

where ilm.codfil=? and ilm.sequen=? and ilm.DATEMI=?