Pular para o conteúdo principal

LAB003 — Layout LAB003

Visão Geral​

Layout de impressão da família LAB (Outros). Acionado via ExecLayout a partir das telas que imprimem este tipo de documento.

Descrição​

Consulta baseada em PARMLEITE, com junção em ITEM, filtrada por CD_EMPRESA.

Chamada​

ExecLayout(Connection, [
  // parametros nao documentados no .pas
]);

SQL Base​

ExecutaConsulta/ExecUpdate​

SELECT CD_ITEMLEITE, DS_ITEM
FROM PARMLEITE
INNER JOIN ITEM ON (ITEM.CD_ITEM = PARMLEITE.CD_ITEMLEITE)
WHERE CD_EMPRESA = { IntToStr}

Consulta​

INSERT INTO ANALISECAPTACAO (CD_ANALISE, NR_PLACA, CD_LINHACAPTACAO, CD_EMPREMBARQUE, NR_EMBARQUE, VL_APURADO)
VALUES ({dmLAB003.dsAnaliseCaptacaoCD_ANALISE.AsString},{ Nulo(dmLAB003.tabFiltrosNR_PLACA.AsString,}S{)},{ dmLAB003.tabFiltrosCD_LINHACAPTACAO.AsString},{ dmLAB003.tabFiltrosCD_EMPREMBARQUE.AsString},{ dmLAB003.tabFiltrosNR_EMBARQUE.AsString},{ Nulo(setVLAnalise(dmLAB003.dsAnaliseCaptacaoVL_APURADO.AsString, dmLAB003.dsAnaliseCaptacaoTP_DADO.AsString),}S{)})

Tabelas Utilizadas​

TabelaUso
ANALISECAPTACAOreferenciada nas queries do layout
ITEMreferenciada nas queries do layout
PARMLEITEreferenciada nas queries do layout

Shared Units​

  • jCommon
  • jPesquisa

Fonte​

  • Unit: source/LAB003/ULAB003.pas
  • DFM: source/LAB003/ULAB003.dfm
  • Package: source/LAB003/LAB003.dpk