Pular para o conteúdo principal

LCA001 — Layout LCA001

Visão Geral​

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

Descrição​

Consulta baseada em PRODUTORROTACAP, com junção em PESSOA, ENDERECOPESSOA, filtrada por NR_PLACA, CD_LINHACAPTACAO, CD_L, CD_PESSOA, CD_ENDERECO.

Chamada​

ExecLayout(Connection, [
  // 0 - Nome do Layout
  // 1 - Cod Produtor
  // 2 - Cod Endereço
  // 3 - Placa
  // 4 - Linha
  // 5 - PathServidor
]);

SQL Base​

tabPRODUTOR​

SELECT P.CD_PESSOA, P.NM_PESSOA, EP.DS_ENDERECO, EP.NR_ENDERECO, EP.DS_COMPLEMENTO, P.CD_PESSOA||'/'||EP.CD_ENDERECO||'/'||PRP.NR_PLACA||'/'||PRP.CD_LINHACAPTACAO DS_QRCODE
FROM PRODUTORROTACAP PRP
INNER JOIN PESSOA P ON(P.CD_PESSOA = PRP.CD_PESSOA)
INNER JOIN ENDERECOPESSOA EP ON(EP.CD_PESSOA = PRP.CD_PESSOA
  AND EP.CD_ENDERECO = PRP.CD_ENDERECO)
WHERE PRP.NR_PLACA = :NR_PLACA
  AND PRP.CD_LINHACAPTACAO = :CD_LINHACAPTACAO
  AND PRP.CD_PESSOA = :CD_PESSOA
  AND PRP.CD_ENDERECO = :CD_ENDERECO NR_PLACA CD_LINHACAPTACAO CD_PESSOA CD_ENDERECO

Tabelas Utilizadas​

TabelaUso
ENDERECOPESSOAreferenciada nas queries do layout
PESSOAreferenciada nas queries do layout
PRODUTORROTACAPreferenciada nas queries do layout

Shared Units​

  • jCommon
  • jPesquisa

Fonte​

  • Unit: source/LCA001/ULCA001.pas
  • DFM: source/LCA001/ULCA001.dfm
  • Package: source/LCA001/LCA001.dpk