Pular para o conteúdo principal

LCH019 — Layout LCH019

Visão Geral​

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

Descrição​

Consulta baseada em EMPRESA, com junção em ENDERECOPESSOA, MUNICIPIO, filtrada por CD_EMPRESA.

Chamada​

ExecLayout(Connection, [
// 0 - Nome do Layout
// 1 - Cod Empresa
// 2 - Valor do Cheque
// 3 - Nominal
// 4 - Data do Cheque
// 5 - Impressora
]);

SQL Base​

ExecutaConsulta/ExecUpdate #1​

SELECT FIRST 1 M.DS_MUNICIPIO, EP.CD_ENDERECO
FROM EMPRESA
INNER JOIN ENDERECOPESSOA EP ON (EP.CD_PESSOA = EMPRESA.CD_PESSOA)
INNER JOIN MUNICIPIO M ON (M.CD_MUNICIPIO = EP.CD_MUNICIPIO)
WHERE EMPRESA.CD_EMPRESA = {iParametros}

ExecutaConsulta/ExecUpdate #2​

SELECT O_VALOR
FROM VALOR_EXTENSO({Nulo(iParametros[2],}F{)})

ExecutaConsulta/ExecUpdate #3​

SELECT I.DS_PORTADOS, I.CD_IMPRESSORA
FROM IMPRESSORA I
WHERE I.CD_IMPRESSORA = {iParametros}

Tabelas Utilizadas​

TabelaUso
EMPRESAreferenciada nas queries do layout
ENDERECOPESSOAreferenciada nas queries do layout
IMPRESSORAreferenciada nas queries do layout
MUNICIPIOreferenciada nas queries do layout
VALOR_EXTENSOreferenciada nas queries do layout

Shared Units​

  • jCommon
  • jPesquisa

Fonte​

  • Unit: source/LCH019/ULCH019.pas
  • DFM: source/LCH019/ULCH019.dfm
  • Package: source/LCH019/LCH019.dpk