LPD114 — Listagem LPD114

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 ITEMPEDIDO, PESSOA, EMPRESA, ENDERECOPESSOA, MUNICIPIO, CONDPAGTO (+2), 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
  // 8 - Numero Devolucao
  // 9 - Data Devolucao
  // 10 - Caminho e Nome para Gerar o PDF
]);

SQL Base

Pedido

SELECT P.NR_PEDIDO, PE.NM_PESSOA NM_EMPRESA, P.CD_PESSOA||' - '||PP.NM_PESSOA NM_PESSOA, PV.NM_PESSOA NM_VENDEDOR, EP.DS_ENDERECO, EP.NR_ENDERECO, M.DS_MUNICIPIO, M.SG_ESTADO, EP.NR_CEP, PP.NR_CNPJCPF, EP.NR_INSCEST, EP.NR_FONE, EP.NR_FAX, P.DT_ENTREGA, P.CD_CONDPAGTO||' - '||CP.DS_CONDPAGTO DS_CONDPAGTO, PT.NM_PESSOA NM_TRANSPORTADOR, CURRENT_TIMESTAMP DT_IMPRESSAO, PP.NM_PESSOA ||' - '||PP.CD_PESSOA||CASE WHEN PP.DS_EMAIL <> '' THEN ' - ' ELSE '' END||PP.DS_EMAIL NM_COMPRADOR, P.DS_OBSERVACAO, P.DT_ENCAIXE, P.DT_CORTE, P.DT_ANACRITICA, P.DT_EMBLEMA, P.DT_PRODUCAO, P.DT_EXPEDICAO, P.DT_PEDIDO DT_EMISSAO , EP.DS_CONTATO, MAX(V.O_DS_OBSERVACAO) O_DS_OBSERVACAO
FROM PEDIDO P
INNER JOIN ITEMPEDIDO IP ON (IP.CD_EMPRESA = P.CD_EMPRESA
  AND IP.NR_PEDIDO = P.NR_PEDIDO
  AND IP.TP_PEDIDO = P.TP_PEDIDO)
INNER JOIN PESSOA PP ON (PP.CD_PESSOA = P.CD_PESSOA)
INNER JOIN EMPRESA E ON (E.CD_EMPRESA = P.CD_EMPRESA)
INNER JOIN PESSOA PE ON (PE.CD_PESSOA = E.CD_PESSOA)
LEFT JOIN PESSOA PV ON (PV.CD_PESSOA = P.CD_VENDEDOR)
LEFT JOIN PESSOA PT ON (PT.CD_PESSOA = P.CD_TRANSPORTADOR)
INNER JOIN ENDERECOPESSOA EP ON(EP.CD_PESSOA = P.CD_PESSOA
  AND EP.CD_ENDERECO = P.CD_ENDERECO )
INNER JOIN MUNICIPIO M ON(M.CD_MUNICIPIO = EP.CD_MUNICIPIO)
INNER JOIN CONDPAGTO CP ON (CP.CD_CONDPAGTO = P.CD_CONDPAGTO)
LEFT JOIN VIEW_LPD114(P.CD_EMPRESA, P.NR_PEDIDO, P.TP_PEDIDO) V ON (1 = 1)
WHERE P.CD_EMPRESA = :CD_EMPRESA
  AND P.NR_PEDIDO = :NR_PEDIDO
  AND P.TP_PEDIDO = :TP_PEDIDO
GROUP BY P.NR_PEDIDO, PE.NM_PESSOA , P.CD_PESSOA,PP.NM_PESSOA , PV.NM_PESSOA, EP.DS_ENDERECO, EP.NR_ENDERECO, M.DS_MUNICIPIO, M.SG_ESTADO, EP.NR_CEP, PP.NR_CNPJCPF, EP.NR_INSCEST, EP.NR_FONE, EP.NR_FAX, P.DT_ENTREGA, DS_CONDPAGTO, PT.NM_PESSOA ,PP.NM_PESSOA, PP.CD_PESSOA,PP.DS_EMAIL , P.DS_OBSERVACAO, P.DT_ENCAIXE, P.DT_CORTE, P.DT_ANACRITICA, P.DT_EMBLEMA, P.DT_PRODUCAO, P.DT_EXPEDICAO, P.DT_PEDIDO , EP.DS_CONTATO CD_EMPRESA NR_PEDIDO TP_PEDIDO
SELECT V.O_DS_POSICAOITEM, V.O_CD_TIPOTECIDOCOR, V.O_DS_OBSERVACAO, V.O_DS_LINHA1, V.O_DS_LINHA2, V.O_DS_LINHA3, V.O_DS_LINHA4, V.O_DS_LINHA5, V.O_DS_LINHA6, V.O_DS_LINHA7, V.O_DS_LINHA8, V.O_DS_LINHA9, V.O_DS_LINHA10, V.O_DS_LINHA11, V.O_DS_LINHA12, V.O_DS_LINHA13, V.O_DS_LINHA14, V.O_DS_LINHA15, V.O_DS_LINHA16, V.O_DS_LINHA17, V.O_DS_LINHA18, V.O_DS_LINHA19, V.O_DS_LINHA20, V.O_DS_LINHA21, V.O_DS_LINHA22, V.O_DS_LINHA23, V.O_DS_LINHA23, V.O_DS_LINHA24, V.O_DS_LINHA25, V.O_DS_LINHA26, V.O_DS_LINHA27, V.O_DS_LINHA28, V.O_DS_LINHA29, V.O_DS_LINHA30, V.O_CD_ITEM, V.O_VL_UNITARIO, V.O_VL_TOTAL, V.O_QT_ITEMGRADE, V.O_DS_TIPOTECIDOCOR, V.O_VL_DESCONTO
FROM VIEW_LPD114(:CD_EMPRESA, :NR_PEDIDO, :TP_PEDIDO) V CD_EMPRESA NR_PEDIDO TP_PEDIDO
SELECT IT.CD_ITEM, I.DS_ITEM, IT.BI_IMGTECIDO, IT.DS_IMAGTECIDOEXTENSAO, IT.NR_PEDIDO
FROM ITEMPEDIDO IT
INNER JOIN ITEM I ON (I.CD_ITEM = IT.CD_ITEM)
WHERE IT.CD_EMPRESA = :CD_EMPRESA
  AND IT.NR_PEDIDO = :NR_PEDIDO
  AND IT.TP_PEDIDO = :TP_PEDIDO CD_EMPRESA NR_PEDIDO TP_PEDIDO

Tabelas Utilizadas

Tabela	Uso
CONDPAGTO	referenciada nas queries do layout
EMPRESA	referenciada nas queries do layout
ENDERECOPESSOA	referenciada nas queries do layout
ITEM	referenciada nas queries do layout
ITEMPEDIDO	referenciada nas queries do layout
MUNICIPIO	referenciada nas queries do layout
PEDIDO	referenciada nas queries do layout
PESSOA	referenciada nas queries do layout
[[VIEW_LPD114]]	referenciada nas queries do layout

Shared Units

• jCommon
• jPesquisa

Fonte

• Unit: source/LPD114/ULPD114.pas
• DFM: source/LPD114/ULPD114.dfm
• Package: source/LPD114/LPD114.dpk