Pular para o conteúdo principal

LCH011 — Layout LCH011

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 LPAD(M.DS_MUNICIPIO, 53 - CHAR_LENGTH(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/LCH011/ULCH011.pas
  • DFM: source/LCH011/ULCH011.dfm
  • Package: source/LCH011/LCH011.dpk