Pular para o conteúdo principal

LET099 — Layout LET099

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 RELATORIO, filtrada por CD_EMPRESA, CD_USUARIO, NR_RELATORIO.

Chamada​

ExecLayout(Connection, [
// 0 - Nome do Layout de Etiqueta
// 1 - Cod Empresa
// 2 - Cod Usuario
// 3 - Nr Relatório
// 4 - Path Servidor
// 5 - Visualiza -> V ou Imprime -> I
// 6 - Mostra preço Sim -> S ou não -> N
]);

SQL Base​

iConsulta #1​

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

iConsulta #2​

UPDATE RELATORIO
SET NM_RELATORIO = {Nulo(nmRelatorio,}S{)}, DS_CONSULTA = {Nulo(iConsulta,}S{)}
WHERE CD_EMPRESA = {iParametros[1]}
AND CD_USUARIO = {Nulo(iParametros[2],}S{)}
AND NR_RELATORIO = {iParametros[3]}

Tabelas Utilizadas​

TabelaUso
RELATORIOreferenciada nas queries do layout

Shared Units​

  • jCommon
  • jPesquisa

Fonte​

  • Unit: source/LET099/ULET099.pas
  • DFM: source/LET099/ULET099.dfm
  • Package: source/LET099/LET099.dpk