LDP023 — Layout LDP023

Visão Geral

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

Descrição

Consulta baseada em VALOR_EXTENSO, com junção em EMPRESA, PESSOA, ENDERECOPESSOA, MUNICIPIO, NOTA, PESSOAFISICA (+5).

Chamada

ExecLayout(Connection, [
  // 0  - Nome do Layout de Duplicata
  // 1  - Empresa
  // 2  - Lancamento (Nota ou Duplicata)
  // 3  - Serie (Nota)
  // 4  - Tipo Nota (E/S)
  // 5  - Path Servidor
  // 6  - Visualiza -> V  ou  Imprime -> I
  // 7  - Impressora do Parametro
  // 8  - Data de lançamento
  // 9  - Data de Emissão de Fatura de
  // 10 - Data de Emissão de Fatura até
  // 11 - Código da Pessoa
  // 12 - Tipo da Duplicata
]);

SQL Base

Contas #1

SELECT DISTINCT N.CD_VENDEDOR||' - '||PV.NM_PESSOA NM_VENDEDOR, PED.NR_ORDEMSERVICO, OS.CD_PLATAFORMAVEICULO||' - '||PLV.DS_PLATAFORMAVEICULO DS_PLATAFORMAVEICULO, OS.CD_MARCAVEICULO||' - '||MV.DS_MARCAVEICULO DS_MARCAVEICULO, os.nr_ordemservico, C.NR_DOCUMENTO NR_DUPLICATA, C.VL_DOCUMENTO, C.DT_VENCIMENTO, C.NR_DOCUMENTO||'-'||C.NR_PARCELA NR_QUEBRA, (
SELECT O_VALOR
FROM VALOR_EXTENSO(C.VL_DOCUMENTO))||'.' DS_DUPLICATA, C.CD_PESSOA, P.NM_PESSOA, EP.DS_ENDERECO||COALESCE(', '||EP.NR_ENDERECO, '')|| COALESCE(' '||EP.DS_COMPLEMENTO, '')||' ' DS_ENDERECO, MUNICIPIO.DS_MUNICIPIO||'-'||MUNICIPIO.SG_ESTADO DS_MUNICIPIO, P.NR_CNPJCPF, COALESCE(EP.NR_FONE,EP.NR_CELULAR) NR_FONE, C.DT_LANCAMENTO DT_EMISSAO, EP.DS_BAIRRO, EP.NR_CEP, E.NM_EMPRESA, PE.NR_CNPJCPF NR_CNPJCPFE, EP.NR_INSCEST, EPE.NR_INSCEST NR_INSCESTE, ME.DS_MUNICIPIO DS_MUNICIPIOE, EPE.DS_BAIRRO DS_BAIRROE, COALESCE(EPE.NR_FONE,EPE.NR_CELULAR) NR_FONEE, EPE.NR_CEP NR_CEPE, EPE.DS_ENDERECO||COALESCE(', '||EPE.NR_ENDERECO, '')|| COALESCE(' '||EPE.DS_COMPLEMENTO, '') DS_ENDERECOE, C.NR_PARCELA, PSF.NR_RG
FROM CONTAS C
INNER JOIN EMPRESA E ON (E.CD_EMPRESA = C.CD_EMPRESA)
INNER JOIN PESSOA PE ON (PE.CD_PESSOA = E.CD_PESSOA)
INNER JOIN ENDERECOPESSOA EPE ON (EPE.CD_PESSOA = PE.CD_PESSOA
  AND EPE.CD_ENDERECO = (
SELECT O_CD_ENDERECO
FROM RETORNA_ENDERECO(PE.CD_PESSOA,NULL)))
INNER JOIN MUNICIPIO ME ON (ME.CD_MUNICIPIO = EPE.CD_MUNICIPIO)
LEFT JOIN NOTA N ON (N.CD_EMPRESA = C.CD_EMPRESA
  AND N.NR_LANCAMENTO = C.NR_LANCTONOTA
  AND N.CD_SERIE = C.CD_SERIE
  AND N.TP_NOTA = C.TP_CONTAS)
LEFT JOIN PESSOA P ON (P.CD_PESSOA = C.CD_PESSOA)
LEFT JOIN ENDERECOPESSOA EP ON (EP.CD_PESSOA = C.CD_PESSOA
  AND EP.CD_ENDERECO = COALESCE(N.CD_ENDERECO,(
SELECT O_CD_ENDERECO
FROM RETORNA_ENDERECO(P.CD_PESSOA,NULL))))
LEFT JOIN MUNICIPIO ON (MUNICIPIO.CD_MUNICIPIO = EP.CD_MUNICIPIO)
LEFT JOIN PESSOA PV ON (PV.CD_PESSOA = N.CD_VENDEDOR)
LEFT JOIN PESSOAFISICA PSF ON (PSF.CD_PESSOA = P.CD_PESSOA)
LEFT JOIN PEDIDONOTA PN ON(PN.CD_EMPRESA = N.CD_EMPRESA
  AND PN.NR_LANCAMENTO = N.NR_LANCAMENTO
  AND PN.CD_SERIE = N.CD_SERIE
  AND PN.TP_NOTA = N.TP_NOTA)
LEFT JOIN PEDIDO PED ON(PED.CD_EMPRESA = PN.CD_EMPRPED
  AND PED.NR_PEDIDO = PN.NR_PEDIDO
  AND PED.TP_PEDIDO = PN.TP_PEDIDO)
LEFT JOIN ORDEMSERVICO OS ON(OS.CD_EMPRESA = PED.CD_EMPRESA
  AND OS.NR_ORDEMSERVICO = PED.NR_ORDEMSERVICO)
LEFT JOIN MARCAVEICULO MV ON(MV.CD_MARCAVEICULO = OS.CD_MARCAVEICULO)
LEFT JOIN PLATAFORMAVEICULO PLV ON(PLV.CD_PLATAFORMAVEICULO = OS.CD_PLATAFORMAVEICULO)

Contas #2

{frmLDP023}

Contas #3

{frmLDP023}

Contas #4

{frmLDP023}

Contas #5

{frmLDP023}

Contas #6

{frmLDP023}

Contas #7

{frmLDP023}

Contas #8

{frmLDP023}

Contas #9

{frmLDP023}

Contas #10

{frmLDP023}

Contas #11

{frmLDP023}

Contas #12

{frmLDP023}

Contas #13

{frmLDP023}

Contas #14

{frmLDP023}

Contas #15

{frmLDP023}

Tabelas Utilizadas

Tabela	Uso
CONTAS	referenciada nas queries do layout
EMPRESA	referenciada nas queries do layout
ENDERECOPESSOA	referenciada nas queries do layout
MARCAVEICULO	referenciada nas queries do layout
MUNICIPIO	referenciada nas queries do layout
NOTA	referenciada nas queries do layout
ORDEMSERVICO	referenciada nas queries do layout
PEDIDO	referenciada nas queries do layout
PEDIDONOTA	referenciada nas queries do layout
PESSOA	referenciada nas queries do layout
PESSOAFISICA	referenciada nas queries do layout
PLATAFORMAVEICULO	referenciada nas queries do layout
RETORNA_ENDERECO	referenciada nas queries do layout
VALOR_EXTENSO	referenciada nas queries do layout

Shared Units

• jCommon
• jPesquisa

Fonte

• Unit: source/LDP023/ULDP023.pas
• DFM: source/LDP023/ULDP023.dfm
• Package: source/LDP023/LDP023.dpk