Pular para o conteúdo principal

LET029 — Layout LET029

Visão Geral​

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

Descrição​

Consulta baseada em ITEM, com junção em ITEMTABPRECO, PARMFATUR, filtrada por CD_ITEM, CD_EMPRESA.

Chamada​

ExecLayout(Connection, [
  // 0 - Nome do Layout
  // 1 - Cod Empresa
  // 2 - Cod Usuario
  // 3 - Nr Relatório
  // 4 - Path Servidor
  // 5 - Visualiza -> V  ou  Imprime -> I
]);

SQL Base​

Etiqueta #1​

SELECT CD_SUBGRUPO, CD_FORNECEDOR2, CD_CODIGOBARRA, DS_ESPECIFICACAO, CD_FORNECEDOR1, VL_PRECO
FROM item i
INNER JOIN itemtabpreco t on (t.cd_item = i.cd_item)
INNER JOIN parmfatur p on (p.cd_tabpreco = t.cd_tabpreco)
WHERE (t.cd_item = i.cd_item)
  AND (p.cd_empresa =: cd_empresa)

Etiqueta #2​

{Resultado}

Consulta​

SELECT DS_CONSULTA
FROM RELATORIO
WHERE CD_EMPRESA = {iParametros[1]}
  AND CD_USUARIO = {Nulo(iParametros[2],}S{)}
  AND NR_RELATORIO = {iParametros[3]}

Tabelas Utilizadas​

TabelaUso
ITEMreferenciada nas queries do layout
ITEMTABPRECOreferenciada nas queries do layout
PARMFATURreferenciada nas queries do layout
RELATORIOreferenciada nas queries do layout

Shared Units​

  • jCommon
  • jPesquisa

Fonte​

  • Unit: source/LET029/ULET029.pas
  • DFM: source/LET029/ULET029.dfm
  • Package: source/LET029/LET029.dpk