Pular para o conteúdo principal

LDP002 — Layout LDP002

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 CALCULA_JURO, com junção em PESSOA, ENDERECOPESSOA, MUNICIPIO.

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 CONTAS.NR_DOCUMENTO||'/'||CONTAS.NR_PARCELA NR_DUPLICATA, CONTAS.VL_DOCUMENTO, CONTAS.DT_VENCIMENTO, CONTAS.NR_DOCUMENTO, CONTAS.NR_PARCELA, P.NM_PESSOA, E.DS_ENDERECO||COALESCE(', '||E.NR_ENDERECO, '')|| COALESCE(' '||E.DS_COMPLEMENTO, '') DS_ENDERECO, MUNICIPIO.DS_MUNICIPIO, MUNICIPIO.SG_ESTADO, E.NR_CEP, P.NR_CNPJCPF, E.NR_FONE NR_FONE, E.NR_INSCEST, (
SELECT O_VL_JURO
FROM CALCULA_JURO(CONTAS.CD_EMPRESA, CONTAS.DT_VENCIMENTO + 1, CONTAS.DT_VENCIMENTO, CONTAS.CD_JURO, CONTAS.VL_DOCUMENTO)) VL_JURO, EXTRACT (DAY
FROM CONTAS.DT_LANCAMENTO) DIA, EXTRACT (MONTH
FROM CONTAS.DT_LANCAMENTO) MES, EXTRACT (YEAR
FROM CONTAS.DT_LANCAMENTO) ANO, (
SELECT O_VALOR
FROM VALOR_EXTENSO(CONTAS.VL_DOCUMENTO)) VL_EXTENSO, P.CD_PESSOA ,P.CD_PESSOA||' - '||P.NM_PESSOA DSPESSOA, E.DS_BAIRRO, E.NR_CELULAR, E.NR_FAX
FROM CONTAS
INNER JOIN PESSOA P ON (P.CD_PESSOA = CONTAS.CD_PESSOA)
INNER JOIN ENDERECOPESSOA E ON (E.CD_PESSOA = CONTAS.CD_PESSOA
AND E.CD_ENDERECO = (
SELECT O_CD_ENDERECO
FROM RETORNA_ENDERECO(CONTAS.CD_PESSOA, 'B')))
INNER JOIN MUNICIPIO ON (MUNICIPIO.CD_MUNICIPIO = E.CD_MUNICIPIO)

Contas #2​

{frmLDP002}

Contas #3​

{frmLDP002}

Contas #4​

{frmLDP002}

Contas #5​

{frmLDP002}

Contas #6​

{frmLDP002}

Contas #7​

{frmLDP002}

Contas #8​

{frmLDP002}

Contas #9​

{frmLDP002}

Tabelas Utilizadas​

TabelaUso
CALCULA_JUROreferenciada nas queries do layout
CONTASreferenciada nas queries do layout
ENDERECOPESSOAreferenciada nas queries do layout
MUNICIPIOreferenciada nas queries do layout
PESSOAreferenciada nas queries do layout
RETORNA_ENDERECOreferenciada nas queries do layout
VALOR_EXTENSOreferenciada nas queries do layout

Shared Units​

  • jCommon
  • jPesquisa

Fonte​

  • Unit: source/LDP002/ULDP002.pas
  • DFM: source/LDP002/ULDP002.dfm
  • Package: source/LDP002/LDP002.dpk