LPD130 — Listagem LPD130

Visão Geral

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

Descrição

Consulta baseada em PEDIDO, com junção em ROMANEIOPEDIDO, ROMANEIO, PESSOA, ENDERECOPESSOA, MUNICIPIO, EMPRESA (+1), filtrada por CD_EMPRESA, NR_PEDIDO, TP_PEDIDO.

Chamada

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

SQL Base

Pedido

SELECT E.NM_EMPRESA||COALESCE(' - '||EPE.DS_ENDERECO|| COALESCE(' N° '||EPE.NR_ENDERECO, ' S/N'), '')|| COALESCE(' - '||ME.DS_MUNICIPIO, '')|| COALESCE(' - '||ME.SG_ESTADO, '')|| COALESCE(' - '||EPE.NR_CEP, '')|| COALESCE(' Tel: '||EPE.NR_FONE, '') DS_EMPRESA, PARM.DS_LOGOTIPO, P.NR_PEDIDO NR_FICHA, P.DT_PEDIDO DT_FICHA, R.NR_ROMANEIO NR_CONTRATO, R.NR_CONTRATOOBRA NR_COD, R.DS_OBSERVACAO DS_OBRA, PC.NM_PESSOA NM_PESSOA, EPC.DS_ENDERECO||', '||EPC.NR_ENDERECO DS_ENDERECO, EPC.DS_BAIRRO, M.DS_MUNICIPIO||' - '||M.SG_ESTADO DS_MUNICIPIO
FROM PEDIDO P
LEFT JOIN ROMANEIOPEDIDO RP ON (RP.CD_EMPRPEDIDO = P.CD_EMPRESA
  AND RP.NR_PEDIDO = P.NR_PEDIDO
  AND RP.TP_PEDIDO = P.TP_PEDIDO)
LEFT JOIN ROMANEIO R ON (R.CD_EMPRESA = RP.CD_EMPRESA
  AND R.NR_ROMANEIO = RP.NR_ROMANEIO)
INNER JOIN PESSOA PC ON (PC.CD_PESSOA = P.CD_PESSOA)
INNER JOIN ENDERECOPESSOA EPC ON (EPC.CD_PESSOA = PC.CD_PESSOA
  AND EPC.CD_ENDERECO = P.CD_ENDERECO)
INNER JOIN MUNICIPIO M ON (M.CD_MUNICIPIO = EPC.CD_MUNICIPIO)
INNER JOIN EMPRESA E ON (E.CD_EMPRESA = P.CD_EMPRESA)
INNER JOIN ENDERECOPESSOA EPE ON (EPE.CD_PESSOA = E.CD_PESSOA
  AND EPE.CD_ENDERECO = 1)
INNER JOIN MUNICIPIO ME ON (ME.CD_MUNICIPIO = EPE.CD_MUNICIPIO)
INNER JOIN PARMFATUR PARM ON (PARM.CD_EMPRESA = E.CD_EMPRESA)
WHERE P.CD_EMPRESA = :CD_EMPRESA
  AND P.NR_PEDIDO = :NR_PEDIDO
  AND P.TP_PEDIDO = :TP_PEDIDO CD_EMPRESA 1 NR_PEDIDO 1 TP_PEDIDO

Tabelas Utilizadas

Tabela	Uso
EMPRESA	referenciada nas queries do layout
ENDERECOPESSOA	referenciada nas queries do layout
MUNICIPIO	referenciada nas queries do layout
PARMFATUR	referenciada nas queries do layout
PEDIDO	referenciada nas queries do layout
PESSOA	referenciada nas queries do layout
ROMANEIO	referenciada nas queries do layout
ROMANEIOPEDIDO	referenciada nas queries do layout

Shared Units

• jCommon
• jPesquisa

Fonte

• Unit: source/LPD130/ULPD130.pas
• DFM: source/LPD130/ULPD130.dfm
• Package: source/LPD130/LPD130.dpk