LNF221 — Listagem LNF221

Visão Geral

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

Descrição

Consulta baseada em RETORNA_OBSNOTA, com junção em PESSOA, ENDERECOPESSOA, MUNICIPIO, EMPRESA, EMBARQUE, CONDPAGTO (+13), filtrada por CD_EMPRESA, NR_LANCAMENTO, CD_SERIE, TP_NOTA, JO, CD_PESSOA (+21).

Chamada

ExecLayout(Connection, [
  // 0 - Nome do Layout da Nota Fiscal
  // 1 - Cod Empresa
  // 2 - Nr Lancamento
  // 3 - Tp Nota
  // 4 - Cod Serie
  // 5 - Path Servidor
  // 6 - Visualiza -> V ou Imprime -> I
  // 7 - Impressora do Parametro
]);

SQL Base

`Nota`

SELECT N.CD_EMPRESA, N.NR_LANCAMENTO, N.TP_NOTA, N.CD_SERIE, N.NR_NOTAFISCAL, N.DT_EMISSAO, N.CD_PESSOA, COALESCE(PE.CD_PESSOA||' - '||PE.NM_PESSOA, PE.NM_PESSOA) NM_PESSOAEMP, PE.NR_CNPJCPF NR_CNPJCPFEMP, EPE.NR_CEP NR_CEPEMP, EPE.DS_ENDERECO||TRIM(COALESCE(', '||EPE.NR_ENDERECO, '')) DS_ENDERECOEMP, COALESCE(EPE.DS_BAIRRO, EPE.DS_COMPLEMENTO) DS_BAIRROEMP, MPE.DS_MUNICIPIO DS_MUNICIPIOEMP, MPE.SG_ESTADO SG_ESTADOEMP, EPE.NR_INSCEST NR_INSCESTEMP, COALESCE(EPE.NR_FONE, EPE.NR_FAX) NR_FONEEMP, COALESCE(P.CD_PESSOA||' - '||P.NM_PESSOA, P.NM_PESSOA) NM_PESSOA, P.NR_CNPJCPF, EP.NR_CEP, EP.DS_ENDERECO||TRIM(COALESCE(', '||EP.NR_ENDERECO, '')) DS_ENDERECO, COALESCE(EP.DS_BAIRRO, EP.DS_COMPLEMENTO) DS_BAIRRO, MP.DS_MUNICIPIO, MP.SG_ESTADO, EP.NR_INSCEST, COALESCE(EP.NR_FONE, EP.NR_FAX) NR_FONE, N.TP_PAGTOFRETE, N.QT_VOLUME, N.PS_BRUTO, N.VL_CONTABIL, N.PS_LIQUIDO, N.VL_FRETE, N.VL_DESPESA, N.VL_NOTAFISCAL, N.VL_DESCONTO VL_DESCONTO_1 , COALESCE(T.NM_PESSOA, E.NM_MOTORISTA) NM_TRANSP, COALESCE(T.NR_CNPJCPF, E.NR_CGCCPF) NR_CPFTRANSP, E.NR_PLACA, ET.DS_ENDERECO||TRIM(COALESCE(', '||ET.NR_ENDERECO, '')) DS_ENDTRANSP, COALESCE(MT.DS_MUNICIPIO, E.DS_MUNICIPIO) DS_MUNTRANSP, COALESCE(MT.SG_ESTADO, E.SG_ESTADO) SG_ESTTRANSP, ET.NR_INSCEST NR_INSCTRANSP, NULL DS_ESPECIE, CASE CONDPAGTO.ST_CONDPAGTO WHEN 'V' THEN 'A VISTA' END DS_CONDICAO, CONDPAGTO.DS_CONDPAGTO, V.NM_PESSOA||' - '||N.CD_VENDEDOR DS_CDNMVENDEDOR, N.CD_VENDEDOR, V.NM_PESSOA NM_VENDEDOR, EP.DS_ENDERECO||TRIM(COALESCE(', '||EP.NR_ENDERECO, ''))||COALESCE(' - '||COALESCE(EP.DS_BAIRRO, EP.DS_COMPLEMENTO), '') DS_ENDBAIRRO, MPE.DS_MUNICIPIO||' - '||MPE.SG_ESTADO DS_CIDADEEMP, EPE.DS_ENDERECO||TRIM(COALESCE(', '||EPE.NR_ENDERECO, ''))||COALESCE(' - '||COALESCE(EPE.DS_BAIRRO, EPE.DS_COMPLEMENTO), '') DS_ENDBAIRROEMP, MP.DS_MUNICIPIO||' - '||MP.SG_ESTADO DS_CIDADE, N.DS_OBSERVACAO, EC.DS_ENDERECO||COALESCE(', '||EC.NR_ENDERECO, '')||COALESCE(' '||EC.DS_COMPLEMENTO, '')||COALESCE(' '||EC.DS_BAIRRO, '')||' '||MC.DS_MUNICIPIO||' - '||MC.SG_ESTADO DS_ENDCOBRANCA, (
SELECT V_DS_OBSNOTA
FROM RETORNA_OBSNOTA(N.CD_EMPRESA, N.NR_LANCAMENTO, N.CD_SERIE, N.TP_NOTA, N.DS_OBSERVACAO, N.CD_VENDEDOR, N.CD_USUARIO, '4', 80)) DS_OBSNOTA, (
SELECT SUM(NI.VL_TOTAL - COALESCE(NI.VL_DESCONTO, 0))
FROM ITEMNOTA NI
WHERE NI.CD_EMPRESA = N.CD_EMPRESA
  AND NI.NR_LANCAMENTO = N.NR_LANCAMENTO
  AND NI.CD_SERIE = N.CD_SERIE
  AND NI.TP_NOTA = N.TP_NOTA) VL_LIQUIDO, N.VL_DESCONTO, (
SELECT V_VL_IMPOSTO
FROM VALOR_IMPOSTO(N.CD_EMPRESA, N.NR_LANCAMENTO, N.CD_SERIE, N.TP_NOTA, NULL, 'P', 'N', 'VI')) VL_IPI, (
SELECT V_VL_IMPOSTO
FROM VALOR_IMPOSTO(N.CD_EMPRESA, N.NR_LANCAMENTO, N.CD_SERIE, N.TP_NOTA, NULL, 'I', 'N', 'VI')) VL_ICMS, (
SELECT V_VL_IMPOSTO
FROM VALOR_IMPOSTO(N.CD_EMPRESA, N.NR_LANCAMENTO, N.CD_SERIE, N.TP_NOTA, NULL, 'I', 'N', 'BI')) VL_BASE, (
SELECT V_VL_IMPOSTO
FROM VALOR_IMPOSTO(N.CD_EMPRESA, N.NR_LANCAMENTO, N.CD_SERIE, N.TP_NOTA, NULL, 'I', 'N', 'VS')) VL_SUBST, (
SELECT V_VL_IMPOSTO
FROM VALOR_IMPOSTO(N.CD_EMPRESA, N.NR_LANCAMENTO, N.CD_SERIE, N.TP_NOTA, NULL, 'I', 'N', 'BS')) VL_BASESUB, PARM.DS_LOGOTIPO, (
SELECT SUM(IT.VL_TOTAL)
FROM ITEMNOTA IT
WHERE IT.CD_EMPRESA = N.CD_EMPRESA
  AND IT.NR_LANCAMENTO = N.NR_LANCAMENTO
  AND IT.CD_SERIE = N.CD_SERIE
  AND IT.TP_NOTA = N.TP_NOTA) VL_TOTAL, (
SELECT SUM(IT.PS_ITEMNOTA)
FROM ITEMNOTA IT
WHERE IT.CD_EMPRESA = N.CD_EMPRESA
  AND IT.NR_LANCAMENTO = N.NR_LANCAMENTO
  AND IT.CD_SERIE = N.CD_SERIE
  AND IT.TP_NOTA = N.TP_NOTA) VL_TOT_PSITEM, (
SELECT SUM(IT.QT_ITEMNOTA)
FROM ITEMNOTA IT
WHERE IT.CD_EMPRESA = N.CD_EMPRESA
  AND IT.NR_LANCAMENTO = N.NR_LANCAMENTO
  AND IT.CD_SERIE = N.CD_SERIE
  AND IT.TP_NOTA = N.TP_NOTA) VL_TOT_QTITEM
FROM NOTA N
INNER JOIN PESSOA P ON (N.CD_PESSOA = P.CD_PESSOA)
INNER JOIN ENDERECOPESSOA EP ON (N.CD_PESSOA = EP.CD_PESSOA
  AND N.CD_ENDERECO = EP.CD_ENDERECO)
INNER JOIN MUNICIPIO MP ON (EP.CD_MUNICIPIO = MP.CD_MUNICIPIO)
INNER JOIN EMPRESA EM ON (EM.CD_EMPRESA = N.CD_EMPRESA)
INNER JOIN PESSOA PE ON (EM.CD_PESSOA = PE.CD_PESSOA)
INNER JOIN ENDERECOPESSOA EPE ON (EM.CD_PESSOA = EPE.CD_PESSOA
  AND EPE.CD_ENDERECO = (
SELECT MIN(CD_ENDERECO)
FROM ENDERECOPESSOA EPEE
WHERE EPEE.CD_PESSOA = EM.CD_PESSOA))
INNER JOIN MUNICIPIO MPE ON (EPE.CD_MUNICIPIO = MPE.CD_MUNICIPIO)
LEFT JOIN EMBARQUE E ON (N.CD_EMPEMB = E.CD_EMPRESA
  AND N.NR_EMBARQUE = E.NR_EMBARQUE)
LEFT JOIN PESSOA T ON (COALESCE(E.CD_TRANSPORTADOR, E.CD_MOTORISTA) = T.CD_PESSOA)
LEFT JOIN ENDERECOPESSOA ET ON (ET.CD_PESSOA = T.CD_PESSOA
  AND ET.CD_ENDERECO = (
SELECT O_CD_ENDERECO
FROM RETORNA_ENDERECO(T.CD_PESSOA, NULL)))
LEFT JOIN MUNICIPIO MT ON (ET.CD_MUNICIPIO = MT.CD_MUNICIPIO)
LEFT JOIN ENDERECOPESSOA EC ON (N.CD_PESSOA = EC.CD_PESSOA
  AND N.CD_ENDCOBRANCA = EC.CD_ENDERECO)
LEFT JOIN MUNICIPIO MC ON (EC.CD_MUNICIPIO = MC.CD_MUNICIPIO)
LEFT JOIN CONDPAGTO ON (CONDPAGTO.CD_CONDPAGTO = N.CD_CONDPAGTO)
LEFT JOIN PESSOA V ON (V.CD_PESSOA = N.CD_VENDEDOR)
INNER JOIN PARMFATUR PARM ON (PARM.CD_EMPRESA = N.CD_EMPRESA)
WHERE N.CD_EMPRESA = :CD_EMPRESA
  AND N.NR_LANCAMENTO = :NR_LANCAMENTO
  AND N.TP_NOTA = :TP_NOTA
  AND N.CD_SERIE = :CD_SERIE CD_EMPRESA NR_LANCAMENTO TP_NOTA CD_SERIE CD_EMPRESA "NOTA"."CD_EMPRESA" NR_LANCAMENTO "NOTA"."NR_LANCAMENTO" TP_NOTA "NOTA"."TP_NOTA" CD_SERIE "NOTA"."CD_SERIE" NR_NOTAFISCAL "NOTA"."NR_NOTAFISCAL" DT_EMISSAO "NOTA"."DT_EMISSAO" CD_PESSOA "NOTA"."CD_PESSOA" NM_PESSOAEMP NR_CNPJCPFEMP "PESSOA"."NR_CNPJCPF" NR_CEPEMP "ENDERECOPESSOA"."NR_CEP" DS_ENDERECOEMP DS_BAIRROEMP DS_MUNICIPIOEMP "MUNICIPIO"."DS_MUNICIPIO" SG_ESTADOEMP "MUNICIPIO"."SG_ESTADO" NR_INSCESTEMP "ENDERECOPESSOA"."NR_INSCEST" NR_FONEEMP NM_PESSOA NR_CNPJCPF "PESSOA"."NR_CNPJCPF" NR_CEP "ENDERECOPESSOA"."NR_CEP" DS_ENDERECO DS_BAIRRO DS_MUNICIPIO "MUNICIPIO"."DS_MUNICIPIO" SG_ESTADO "MUNICIPIO"."SG_ESTADO" NR_INSCEST "ENDERECOPESSOA"."NR_INSCEST" NR_FONE TP_PAGTOFRETE "NOTA"."TP_PAGTOFRETE" QT_VOLUME "NOTA"."QT_VOLUME" PS_BRUTO "NOTA"."PS_BRUTO" VL_CONTABIL "NOTA"."VL_CONTABIL" PS_LIQUIDO "NOTA"."PS_LIQUIDO" VL_FRETE "NOTA"."VL_FRETE" VL_DESPESA "NOTA"."VL_DESPESA" VL_NOTAFISCAL "NOTA"."VL_NOTAFISCAL" VL_DESCONTO "NOTA"."VL_DESCONTO" NM_TRANSP NR_CPFTRANSP NR_PLACA "EMBARQUE"."NR_PLACA" DS_ENDTRANSP DS_MUNTRANSP SG_ESTTRANSP NR_INSCTRANSP "ENDERECOPESSOA"."NR_INSCEST" DS_ESPECIE DS_CONDICAO DS_CONDPAGTO "CONDPAGTO"."DS_CONDPAGTO" NM_VENDEDOR DS_ENDBAIRRO DS_CIDADE DS_OBSERVACAO "NOTA"."DS_OBSERVACAO" DS_ENDCOBRANCA DS_OBSNOTA VL_LIQUIDO VL_IPI VL_ICMS VL_BASE VL_SUBST VL_BASESUB DS_ENDBAIRROEMP DS_CIDADEEMP DS_LOGOTIPO "PARMFATUR"."DS_LOGOTIPO" CD_VENDEDOR "NOTA"."CD_VENDEDOR" DS_CDNMVENDEDOR VL_TOTAL VL_TOT_PSITEM VL_TOT_QTITEM VL_DESCONTO_1 VL_DESCONTO DBSub1 ppDB DS_GRADE DS_GRADE CD_CODIGOBARRA CD_CODIGOBARRA CD_EMPRESA CD_EMPRESA NR_LANCAMENTO NR_LANCAMENTO TP_NOTA TP_NOTA CD_SERIE CD_SERIE CD_ITEM CD_ITEM DS_ITEM DS_ITEM SG_UNIDMED SG_UNIDMED SG_UNIDALT SG_UNIDALT DS_PRODUTO DS_PRODUTO DS_MARCA DS_MARCA TP_UNIDADE TP_UNIDADE PS_ITEMNOTA PS_ITEMNOTA QT_ITEMNOTA QT_ITEMNOTA QTDE QTDE SIGLA SIGLA VL_UNITARIO VL_UNITARIO VL_DESCONTO VL_DESCONTO VL_TOTAL VL_TOTAL VL_TOT_UNIT VL_TOT_UNIT VL_LIQUIDO VL_LIQUIDO CD_CST CD_CST NR_NCM NR_NCM SG_NCM SG_NCM CD_CFO CD_CFO CD_OBSFISCAL CD_OBSFISCAL DS_NATUREZA DS_NATUREZA PC_ICMS PC_ICMS PC_IPI PC_IPI VL_ITEMIPI VL_ITEMIPI CD_MOVIMENTACAO CD_MOVIMENTACAO DS_MOVIMENTACAO DS_MOVIMENTACAO SG_PESO SG_PESO SG_QTDE SG_QTDE SG_UNIDFISCAL SG_UNIDFISCAL CD_EMPRESA;NR_LANCAMENTO;TP_NOTA;CD_SERIE
SELECT LG.DS_LINHA||COALESCE(' - '||CG.DS_COLUNA, '') DS_GRADE, COALESCE(GG.CD_CODIGOBARRA, I.CD_CODIGOBARRA) CD_CODIGOBARRA, N.CD_EMPRESA, N.NR_LANCAMENTO, N.TP_NOTA, N.CD_SERIE, I.CD_ITEM, I.DS_ITEM, I.SG_UNIDMED, I.SG_UNIDALT, COALESCE(U.SG_UNIDFISCAL, 'Sem Unidade Fiscal') SG_UNIDFISCAL, CAST(I.CD_ITEM AS VARCHAR(10))||I.DS_ITEM DS_PRODUTO, MARCA.DS_MARCA, (
SELECT V_TIPO
FROM HABILITA_PESOQTDE(N.CD_ITEM)) TP_UNIDADE, N.PS_ITEMNOTA, HPQ.SG_PESO, N.QT_ITEMNOTA, HPQ.SG_QTDE, CASE WHEN TC.TP_UNIDADE = 'P' THEN COALESCE(IG.QT_GRADE, COALESCE(N.PS_ITEMNOTA, N.QT_ITEMNOTA)) ELSE COALESCE(IG.QT_GRADE, COALESCE(N.QT_ITEMNOTA, N.PS_ITEMNOTA)) END QTDE, COALESCE(I.SG_UNIDMED, I.SG_UNIDALT) SIGLA, N.VL_UNITARIO, N.VL_DESCONTO, N.VL_TOTAL, ((CASE WHEN TC.TP_UNIDADE = 'P' THEN COALESCE(IG.QT_GRADE, COALESCE(N.PS_ITEMNOTA, N.QT_ITEMNOTA)) ELSE COALESCE(IG.QT_GRADE, COALESCE(N.QT_ITEMNOTA, N.PS_ITEMNOTA)) END) * N.VL_UNITARIO) VL_TOT_UNIT, (((CASE WHEN TC.TP_UNIDADE = 'P' THEN COALESCE(IG.QT_GRADE, COALESCE(N.PS_ITEMNOTA, N.QT_ITEMNOTA)) ELSE COALESCE(IG.QT_GRADE, COALESCE(N.QT_ITEMNOTA, N.PS_ITEMNOTA)) END) * N.VL_UNITARIO) - COALESCE(N.VL_DESCONTO,0)) VL_LIQUIDO, N.CD_ORIGEM||LPAD(N.CD_CST, 2, '0') CD_CST, I.NR_NCM, COALESCE(NCM.SG_NCM, 'X') SG_NCM, N.CD_CFO, N.CD_OBSFISCAL, M.DS_NATUREZA, N.PC_ICMS, N.PC_IPI, (
SELECT V_VL_IMPOSTO
FROM VALOR_IMPOSTO(N.CD_EMPRESA, N.NR_LANCAMENTO, N.CD_SERIE, N.TP_NOTA, N.CD_ITEM, 'P', 'N', 'VI')) VL_ITEMIPI, M.CD_MOVIMENTACAO, M.DS_MOVIMENTACAO
FROM ITEMNOTA N
INNER JOIN ITEM I ON (COALESCE(N.CD_ITEMSIMILAR,N.CD_ITEM) = I.CD_ITEM)
INNER JOIN UNIDMED U ON (U.SG_UNIDMED = I.SG_UNIDMED)
INNER JOIN TIPOCALCULO TC ON (TC.CD_TIPOCALCULO = I.CD_TIPOCALCULO)
LEFT JOIN ITEMNOTAGRADE IG ON (IG.CD_EMPRESA = N.CD_EMPRESA
  AND IG.NR_LANCAMENTO = N.NR_LANCAMENTO
  AND IG.CD_SERIE = N.CD_SERIE
  AND IG.TP_NOTA = N.TP_NOTA
  AND IG.CD_ITEM = N.CD_ITEM
  AND IG.CD_GRADE = I.CD_GRADE)
LEFT JOIN GRADE G ON (G.CD_GRADE = IG.CD_GRADE)
LEFT JOIN COLUNAGRADE CG ON (CG.CD_GRADE = IG.CD_GRADE
  AND CG.NR_COLUNA = IG.NR_COLUNA)
LEFT JOIN LINHAGRADE LG ON (LG.CD_GRADE = IG.CD_GRADE
  AND LG.NR_LINHA = IG.NR_LINHA)
LEFT JOIN ITEMGRADE GG ON (GG.CD_ITEM = IG.CD_ITEM
  AND GG.CD_GRADE = IG.CD_GRADE
  AND GG.NR_LINHA = IG.NR_LINHA
  AND GG.NR_COLUNA = IG.NR_COLUNA)
INNER JOIN MOVIMENTACAO M ON (N.CD_MOVIMENTACAO = M.CD_MOVIMENTACAO)
INNER JOIN NCM ON (NCM.NR_NCM = I.NR_NCM)
LEFT JOIN MARCA ON (MARCA.CD_MARCA = I.CD_MARCA)
LEFT JOIN HABILITA_PESOQTDE (I.CD_ITEM) HPQ ON (1 = 1)
WHERE N.CD_EMPRESA = :CD_EMPRESA
  AND N.NR_LANCAMENTO = :NR_LANCAMENTO
  AND N.TP_NOTA = :TP_NOTA
  AND N.CD_SERIE = :CD_SERIE
ORDER BY N.CD_EMPRESA, N.NR_LANCAMENTO, N.TP_NOTA, N.CD_SERIE, COALESCE(U.SG_UNIDFISCAL, 'Sem Unidade Fiscal') CD_EMPRESA NR_LANCAMENTO TP_NOTA CD_SERIE DS_GRADE CD_CODIGOBARRA CD_EMPRESA "ITEMNOTA"."CD_EMPRESA" NR_LANCAMENTO "ITEMNOTA"."NR_LANCAMENTO" TP_NOTA "ITEMNOTA"."TP_NOTA" CD_SERIE "ITEMNOTA"."CD_SERIE" CD_ITEM "ITEM"."CD_ITEM" DS_ITEM "ITEM"."DS_ITEM" SG_UNIDMED "ITEM"."SG_UNIDMED" SG_UNIDALT "ITEM"."SG_UNIDALT" DS_PRODUTO DS_MARCA "MARCA"."DS_MARCA" TP_UNIDADE PS_ITEMNOTA "ITEMNOTA"."PS_ITEMNOTA" QT_ITEMNOTA "ITEMNOTA"."QT_ITEMNOTA" QTDE SIGLA VL_UNITARIO "ITEMNOTA"."VL_UNITARIO" VL_DESCONTO "ITEMNOTA"."VL_DESCONTO" VL_TOTAL "ITEMNOTA"."VL_TOTAL" VL_TOT_UNIT VL_LIQUIDO CD_CST NR_NCM "ITEM"."NR_NCM" SG_NCM CD_CFO "ITEMNOTA"."CD_CFO" CD_OBSFISCAL "ITEMNOTA"."CD_OBSFISCAL" DS_NATUREZA "MOVIMENTACAO"."DS_NATUREZA" PC_ICMS "ITEMNOTA"."PC_ICMS" PC_IPI "ITEMNOTA"."PC_IPI" VL_ITEMIPI CD_MOVIMENTACAO "MOVIMENTACAO"."CD_MOVIMENTACAO" DS_MOVIMENTACAO "MOVIMENTACAO"."DS_MOVIMENTACAO" SG_PESO "HABILITA_PESOQTDE"."SG_PESO" SG_QTDE "HABILITA_PESOQTDE"."SG_QTDE" SG_UNIDFISCAL DBSub2 ppDB V_NR_LANCAMENTO V_NR_LANCAMENTO V_NR_DOCUMENTO V_NR_DOCUMENTO V_NR_PARCELA V_NR_PARCELA V_VL_DOCUMENTO V_VL_DOCUMENTO V_DT_VENCIMENTO V_DT_VENCIMENTO NR_DOCTO NR_DOCTO V_DS_PAGTO V_DS_PAGTO CD_EMPRESA;NR_LANCAMENTO;CD_SERIE;TP_NOTA;CD_PESSOA
SELECT V_NR_LANCAMENTO, V_NR_DOCUMENTO, V_NR_PARCELA, V_VL_DOCUMENTO, V_DT_VENCIMENTO, V_NR_DOCUMENTO||'-'||V_NR_PARCELA NR_DOCTO, V_DS_PAGTO
FROM RETORNA_CONTAS(:CD_EMPRESA, :NR_LANCAMENTO, :CD_SERIE, :TP_NOTA, :CD_PESSOA, NULL, 'V') CD_EMPRESA NR_LANCAMENTO CD_SERIE TP_NOTA CD_PESSOA V_NR_LANCAMENTO "RETORNA_CONTAS"."V_NR_LANCAMENTO" V_NR_DOCUMENTO "RETORNA_CONTAS"."V_NR_DOCUMENTO" V_NR_PARCELA "RETORNA_CONTAS"."V_NR_PARCELA" V_VL_DOCUMENTO "RETORNA_CONTAS"."V_VL_DOCUMENTO" V_DT_VENCIMENTO "RETORNA_CONTAS"."V_DT_VENCIMENTO" NR_DOCTO V_DS_PAGTO "RETORNA_CONTAS"."V_DS_PAGTO" Default Impressão de Pedido Carta Default D:\Desenvolvimento\JunsoftERP\dist\Módulos\LNF221.RTM ($MyDocuments)\ReportArchive.raf Printer PDF PDF SMTP http://localhost http://localhost Default ReportBuilder ReportBuilder Arial Report ($MyDocuments)\Report.pdf <Texto a localizar> ReportBuilder ReportBuilder Report Report Report http://localhost http://localhost http://localhost 23.0 ppDB edtNR_NOTA1 NM_PESSOA Roman 12cpi ppDB edtDT_EMISSAO1 DT_EMISSAO dd/mm/yyyy Draft 20cpi ppDB lblDT_PEDIDO1 Data de Emissão.: Draft 20cpi lblNM_PESSOA1 Razao Social.: Draft 20cpi lblDS_ENDERECO1 Endereço.: Draft 20cpi edtDS_ENDERECO1 DS_ENDBAIRRO Draft 20cpi ppDB lblDS_MUNICIPIO1 Cidade.: Draft 20cpi edtDS_MUNICIPIO1 DS_CIDADE Draft 20cpi ppDB lblNR_CEP1 CEP.: Draft 20cpi edtNR_CEP1 NR_CEP Draft 20cpi ppDB lblDS_BAIRRO1 Vendedor.: Draft 20cpi edtNM_VENDEDOR2 NM_VENDEDOR Draft 20cpi ppDB pln1 DBText18 DS_OPERACAO Draft 20cpi ppDB DBImage1 DS_LOGOTIPO AutoDetect ppDB lblDS_ITEM Produto Draft 20cpi lblPS_PEDIDO Quantidade Draft 20cpi lblVL_UNITARIO Vlr Unitário Draft 20cpi lblVL_TOTAL Vlr Total Draft 20cpi pln2 lblSG_UNIDMED Unid. Draft 20cpi lblCD_ITEM Código Draft 20cpi pln3 lblVL_UNITARIO1 Cód Barras Draft 20cpi lblDS_ITEM1 Peso Draft 20cpi lblNR_CNPJCPF1 Cond. Pagto.: Draft 20cpi edtDS_CONDPAGTO1 DS_CONDPAGTO Draft 20cpi ppDB lblSG_UNIDMED1 Unid. Draft 20cpi SubProduto ppDBSub1 Default Impressão de Pedido Carta Default J:\Sistema\Módulos\LNF023_ROM.RTM 23.0 ppDBSub1 edtCD_ITEM CD_ITEM Draft 20cpi ppDBSub1 edtDS_ITEM DS_ITEM Draft 20cpi ppDBSub1 edtPS_PEDIDO QT_ITEMNOTA ##,###,###,##0.00 Draft 20cpi ppDBSub1 edtVL_UNITARIO VL_UNITARIO #,###,###,##0.0000 Draft 20cpi ppDBSub1 edtVL_TOTAL VL_TOT_UNIT ###,###,###,##0.00 Draft 20cpi ppDBSub1 edtSG_UNIDMED SG_QTDE Draft 20cpi ppDBSub1 DBText1 CD_CODIGOBARRA Draft 20cpi ppDBSub1 DBText3 SG_PESO Draft 20cpi ppDBSub1 edtPS_PEDIDO1 PS_ITEMNOTA ##,###,###,##0.00 Draft 20cpi ppDBSub1 SG_UNIDFISCAL Group2 ppDBSub1 edtCD_ITEM1 SG_UNIDFISCAL Draft 20cpi ppDBSub1 lblCD_ITEM1 Unid. Fiscal.: Draft 20cpi Label26 Total Peso Unid. Fiscal.: Draft 20cpi Label27 Total Quantidade Unid. Fiscal.: Draft 20cpi edtVL_TOTTOTAL2 QT_ITEMNOTA ###,###,###,##0.00 Draft 20cpi ppDBSub1 DBCalc3 PS_ITEMNOTA ###,###,###,##0.00 Draft 20cpi ppDBSub1 Foreground SystemVariable1 Draft 20cpi DBText16 CD_SERIE Draft 20cpi ppDB Label13 Série.: Draft 20cpi DBText17 DS_BAIRRO Draft 20cpi ppDB Label16 Bairro.: Draft 20cpi lblNR_FONE1 Telefone.: Draft 20cpi edtNR_FONE1 NR_FONE Draft 20cpi ppDB DBText21 DS_MOVIMENTACAO Draft 20cpi ppDBSub1 Label17 Operação.: Draft 20cpi Label18 Obs.: A operação é por item e não por Nota Draft 20cpi DBText22 NR_NOTAFISCAL Draft 20cpi ppDB DBText23 NR_LANCAMENTO Draft 20cpi ppDB Label19 Nr. Nota Fiscal.: Draft 20cpi Label20 Nr. Lançamento.: Draft 20cpi NR_LANCAMENTO Group1 ppDB edtVL_TOTTOTAL VL_NOTAFISCAL ###,###,###,##0.00 Draft 20cpi ppDB pln4 ReportContas ppDBSub2 Default Impressão de Nota Fiscal Carta Default J:\Sistema\Fontes\LNF023\subcontas.rtm 23.0 ppDBSub2 lblDT_VENCIMENTO1 Vencimento Draft 20cpi Label1 Valor Draft 20cpi pln5 edtVL_DOCTO1 V_VL_DOCUMENTO ###,###,###,###,##0.00 Draft 20cpi ppDBSub2 edtDT_VENCTO1 V_DT_VENCIMENTO dd/mm/yyyy Draft 20cpi ppDBSub2 DBText15 V_DS_PAGTO Draft 20cpi ppDBSub2 Label14 Declaro para todos os fins de direito que recebi as mercadorias constantes desse documento. Draft 20cpi DBText20 V_DT_EMISSAO dd/mm/yyyy Draft 20cpi ppDBSub2 Label15 ASSINATURA: Draft 20cpi pln6 Foreground1 edtNM_VENDEDOR1 DS_CONDICAO Draft 20cpi ppDB lblTOTAIS1 Total Desconto.: Draft 20cpi edtVL_TOTTOTAL1 VL_DESCONTO ###,###,###,##0.00 Draft 20cpi ppDB DBMemo1 DS_OBSERVACAO Draft 20cpi ppDB DBText8 VL_TOTAL #,0.00 Draft 20cpi ppDB lblTOTAIS2 Total Bruto.: Draft 20cpi DBText24 VL_TOT_PSITEM #,0.00 Draft 20cpi ppDB DBText25 VL_TOT_QTITEM #,0.00 Draft 20cpi ppDB lblTOTAIS Total Geral.: Draft 20cpi Label23 Total Peso.: Draft 20cpi Label24 Total Quantidade.: Draft 20cpi Foreground2 DBSub03 CD_EMPRESA;NR_LANCAMENTO;TP_NOTA;CD_SERIE
SELECT FIRST 4 COALESCE(NCM.SG_NCM, 'X')||' - '||NCM.NR_NCM DS_NCM
FROM ITEMNOTA N
INNER JOIN ITEM I ON (COALESCE(N.CD_ITEMSIMILAR, N.CD_ITEM) = I.CD_ITEM)
INNER JOIN NCM ON (NCM.NR_NCM = I.NR_NCM)
WHERE N.CD_EMPRESA = :CD_EMPRESA
  AND N.NR_LANCAMENTO = :NR_LANCAMENTO
  AND N.TP_NOTA = :TP_NOTA
  AND N.CD_SERIE = :CD_SERIE
  AND COALESCE(NCM.SG_NCM, 'X') <> 'A'
GROUP BY COALESCE(NCM.SG_NCM, 'X'), NCM.NR_NCM CD_EMPRESA NR_LANCAMENTO TP_NOTA CD_SERIE DS_NCM

Tabelas Utilizadas

Tabela	Uso
`COLUNAGRADE`	referenciada nas queries do layout
`CONDPAGTO`	referenciada nas queries do layout
`EMBARQUE`	referenciada nas queries do layout
`EMPRESA`	referenciada nas queries do layout
`ENDERECOPESSOA`	referenciada nas queries do layout
`GRADE`	referenciada nas queries do layout
`HABILITA_PESOQTDE`	referenciada nas queries do layout
`ITEM`	referenciada nas queries do layout
`ITEMGRADE`	referenciada nas queries do layout
`ITEMNOTA`	referenciada nas queries do layout
`ITEMNOTAGRADE`	referenciada nas queries do layout
`LINHAGRADE`	referenciada nas queries do layout
`MARCA`	referenciada nas queries do layout
`MOVIMENTACAO`	referenciada nas queries do layout
`MUNICIPIO`	referenciada nas queries do layout
`NCM`	referenciada nas queries do layout
`NOTA`	referenciada nas queries do layout
`PARMFATUR`	referenciada nas queries do layout
`PESSOA`	referenciada nas queries do layout
`RETORNA_CONTAS`	referenciada nas queries do layout
`RETORNA_ENDERECO`	referenciada nas queries do layout
`RETORNA_OBSNOTA`	referenciada nas queries do layout
`TIPOCALCULO`	referenciada nas queries do layout
`UNIDMED`	referenciada nas queries do layout
`VALOR_IMPOSTO`	referenciada nas queries do layout

Shared Units

jCommon
jPesquisa

Fonte

Unit: source/LNF221/ULNF221.pas
DFM: source/LNF221/ULNF221.dfm
Package: source/LNF221/LNF221.dpk

Visão Geral​

Descrição​

Chamada​

SQL Base​

Nota​

Tabelas Utilizadas​

Shared Units​

Fonte​