LNF233 — Listagem LNF233
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 CONTAS, filtrada por CD_EMPRESA, NR_LANCTONOTA, TP_CONTAS, CD_SERIE, ST_CONTAS.
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
tabCondPagto
SELECT N.DT_VENCIMENTO, N.DT_LANCAMENTO, N.NR_PARCELA
FROM CONTAS N
WHERE N.CD_EMPRESA = :CD_EMPRESA
AND N.NR_LANCTONOTA = :NR_LANCAMENTO
AND N.TP_CONTAS = :TP_NOTA
AND N.CD_SERIE = :CD_SERIE
AND N.ST_CONTAS <> 'C'
ORDER BY N.DT_VENCIMENTO CD_EMPRESA NR_LANCAMENTO TP_NOTA CD_SERIE
tabPRINCIPAL
SELECT {#10} CD_EMPRESA, NR_LANCAMENTO, CD_SERIE, TP_NOTA, NR_NOTAFISCAL, NR_NOTAFOR, {#10} VL_NOTAFISCAL, VL_CONTABIL, VL_DESCONTO, VL_FRETE, VL_DESPESA, {#10} CD_CONDPAGTO, DS_CONDPAGTO, DT_EMISSAO, DT_VENCIMENTO, CD_FORMAPAGTO, {#10} DS_FORMAPAGTO, DS_OBSNOTA, DS_OBSFISCAL, NM_VENDEDORCABEC, {#10} CD_NM_VENDEDORCABEC, O_NM_VENDEDORES, DS_LOGOTIPO, DS_MENSAGEM, {#10} E_NM_RAZAOSOCIAL, E_NM_FANTASIA, E_NR_CNPJCPF, E_DS_EMAIL, E_DS_SITE, {#10} E_DS_ENDERECO, E_DS_MUNICIPIO, E_NR_ENDERECO, E_DS_BAIRRO, {#10} E_DS_COMPLEMENTO, E_NR_CEP, E_NR_INSCEST, E_NR_FONE, E_NR_CELULAR, {#10} E_DS_ENDCOMPLETO, E_NR_FAX, C_CD_PESSOA, C_NM_CLIENTE, C_NM_FANTASIA, {#10} C_NR_CNPJCPF, C_DS_EMAIL, C_DS_SITE, C_DS_ENDERECO, C_DS_MUNICIPIO, {#10} C_NR_ENDERECO, C_DS_BAIRRO, C_DS_COMPLEMENTO, C_NR_CEP, C_NR_INSCEST, {#10} C_NR_FONE, C_NR_CELULAR, C_DS_ENDCOMPLETO, C_NR_INSCPRODUTOR, C_NR_FAX, {#10} DH_EMISSAO, O_NR_LINHA, (CAST(VL_NOTAFISCAL AS DOM_NUMERIC15_2) + CAST(VL_DESCONTO AS DOM_NUMERIC15_2)) VL_TOTNOTA, {#10} {SeSenao(stEnviaCampoDB,}DS_CONDPAGTO {, Nulo(dsCondPagto,}S{))}DS_MEMOCONDPAGTO{#10}
FROM RETORNA_CABECNF_RECAP({Nulo(Parametros[1],}I{)}, {Nulo(Parametros[2],}I{)}, { Nulo(Parametros[4],}S{)}, {Nulo(Parametros[3],}S{)}) R {#10}
LEFT JOIN RETORNA_LINHAS(COALESCE(:NR_LINHA, 1)) RL ON (1 = 1)
tabSUB1
SELECT P.IDORDEMPRODUCAORECAP, P.NRSERIE, P.NRDOT, P.NRFOGO, P.DTANOPNEU, P.VLUNITARIO, P.VLDESCONTO, P.DSMODELO, {#10} P.DSMARCA, P.DSMEDIDAPNEU, P.DSGARANTIA, P.DS_SITUACAO, P.QTCONSERTOS, P.QTDESCONTADA, P.QTCONSERTOLIQUIDO, {#10} COALESCE(P.QTPNEU, IIF(P.IDORDEMPRODUCAORECAP IS NULL , R.N_QTDE , 1)) QTDE, {#10} (COALESCE(P.QTPNEU, IIF(P.IDORDEMPRODUCAORECAP IS NULL , R.N_QTDE , 1)) * R.N_VL_UNITARIO) I_VL_TOT_CALC, {#10} (R.N_VL_DESCONTO / COALESCE(COALESCE(NULLIF(R.N_QTDE,0),1) , IIF(P.IDORDEMPRODUCAORECAP IS NULL , COALESCE(NULLIF(R.N_QTDE,0),1) , 1)) ) I_VL_DESC, {#10} R.CD_EMPRESA, R.NR_LANCAMENTO, R.TP_NOTA, R.CD_SERIE, {#10} R.CD_ITEM, R.N_CD_ITEM, R.N_DS_ITEM, R.N_CD_DS_ITEM, R.N_DS_OBSITEM, R.N_SG_UNIDMED, {#10} R.N_SG_UNIDALT, R.N_VL_UNITARIO, R.N_VL_TOTAL, R.N_VL_DESCONTO, R.N_VL_DESPESA, R.N_VL_FRETE, R.N_VL_LIQUIDO, {#10} R.N_QT_ITEMNOTA, R.N_PS_ITEMNOTA, R.N_QT_ITEM, R.N_CD_CFO, R.N_CD_CST, R.N_CD_CSOSN, R.N_NR_NCM, {#10} R.N_CD_FORNECEDOR1, R.N_CD_FORNECEDOR2, R.N_SG_QUANTIDADE, {#10} COALESCE(P.QTPNEU, IIF(P.IDORDEMPRODUCAORECAP IS NULL , R.N_QTDE , 1)) N_QTDE, {#10} N_SG_QUANTIDADE {#10}
FROM RETORNA_ITENSNF_RECAP(:CD_EMPRESA, :NR_LANCAMENTO, :CD_SERIE, :TP_NOTA) R {#10}
LEFT JOIN RETORNA_PNEUSNF_RECAP(R.CD_EMPRESA, R.NR_LANCAMENTO, R.CD_SERIE, R.TP_NOTA, R.CD_ITEM) P ON (1 = 1) {#10}
ORDER BY P.IDORDEMPRODUCAORECAP, P.NRSERIE, P.NRDOT, P.NRFOGO
tabSUB2
SELECT V_NR_LANCAMENTO, V_NR_DOCUMENTO||'/'||V_NR_PARCELA V_NR_DOCUMENTO, V_DS_PAGTO, {#10} V_VL_DOCUMENTO, V_DT_VENCIMENTO, V_NR_PARCELA||'/'||V_NR_TOTPARCELAS V_NR_PARCELAS {#10}
FROM RETORNA_CONTAS (:CD_EMPRESA, :NR_LANCAMENTO, {#10} :CD_SERIE, :TP_NOTA, :C_CD_PESSOA, {#10} 500, 'V')
tabSub3 #1
SELECT {#10} PF.DS_LOGOTIPO, E.NM_EMPRESA RAZAO_SOCIAL_EMP, N.DT_EMISSAO, {#10} COALESCE(N.NR_NOTAFOR, N.NR_NOTAFISCAL) NR_NOTAFISCAL, {#10} PC.CD_PESSOA, PC.NM_PESSOA RAZAO_SOCIAL_PES, PC.NM_FANTASIA, {#10} PC.NM_PESSOA||COALESCE(' - '||PC.NM_FANTASIA, '') NM_PESSOA, {#10} OPR.ID NR_PNEU, MEP.DSMEDIDAPNEU DS_MEDIDA, {#10} PN.NRSERIE NR_MATRICULA, PN.NRFOGO NR_FOGO, {#10} COALESCE(IPP.QTREFORMAS, 0) QT_RECAPES, MOP.DSMOTIVO DS_MOTIVO, {#10} IIF(NF.CD_AUTENTICACAO IS NOT NULL, N.NR_NOTAFISCAL, N.NR_LANCAMENTO) NR_LANCTONOTA, {#10} (
SELECT {#10} COUNT(DISTINCT OPR.ID) {#10}
FROM NOTA N {#10}
INNER JOIN ITEMNOTA ITN ON (ITN.CD_EMPRESA = N.CD_EMPRESA {#10}
AND ITN.NR_LANCAMENTO = N.NR_LANCAMENTO {#10}
AND ITN.TP_NOTA = N.TP_NOTA {#10}
AND ITN.CD_SERIE = N.CD_SERIE) {#10}
INNER JOIN ITEM I ON (I.CD_ITEM = ITN.CD_ITEM) {#10}
INNER JOIN PESSOA PC ON (PC.CD_PESSOA = N.CD_PESSOA) {#10}
INNER JOIN EMPRESA E ON (E.CD_EMPRESA = N.CD_EMPRESA) {#10}
INNER JOIN PESSOA PE ON (PE.CD_PESSOA = E.CD_PESSOA) {#10}
INNER JOIN PARMFATUR PF ON (PF.CD_EMPRESA = E.CD_EMPRESA) {#10}
LEFT JOIN RETORNA_CHAVEPEDIDO(ITN.CD_EMPRESA, ITN.NR_LANCAMENTO, ITN.TP_NOTA, ITN.CD_SERIE) CHP ON (ITN.CD_ITEM = CHP.O_CD_ITEM) {#10}
INNER JOIN PLUGORDRECAPPEDIDO POP ON (POP.CD_EMPRESA = CHP.O_CD_EMPRESA {#10}
AND POP.NR_PEDIDO = CHP.O_NR_PEDIDO {#10}
AND POP.TP_PEDIDO = CHP.O_TP_PEDIDO) {#10}
INNER JOIN ORDEMPRODUCAORECAP OPR ON (OPR.ID = POP.IDORDEMPRODUCAORECAP) {#10}
INNER JOIN ITEMPEDIDOPNEU IPP ON (IPP.ID = OPR.IDITEMPEDIDOPNEU) {#10}
INNER JOIN PNEU PN ON (PN.ID = IPP.IDPNEU) {#10}
INNER JOIN MEDIDAPNEU MEP ON (MEP.ID = PN.IDMEDIDAPNEU) {#10}
INNER JOIN EXAMEINICIAL EI ON (EI.IDORDEMPRODUCAORECAP = OPR.ID) {#10}
LEFT JOIN MOTIVORECUSAEXAME MRE ON (MRE.IDEXAMEINICIAL = EI.ID) {#10}
LEFT JOIN MOTIVOPNEU MOP ON (MOP.ID = MRE.IDMOTIVO) {#10}
WHERE N.CD_EMPRESA = {Nulo(Parametros[1],}I{) + #10}
AND N.NR_LANCAMENTO = {Nulo(Parametros[2],}I{) + #10}
AND N.TP_NOTA = {Nulo(Parametros[3],}S{) + #10}
AND N.CD_SERIE = {Nulo(Parametros[4],}S{) + #10}
AND OPR.STEXAMEFINAL <> 'A' {#10} ) QT_TOTPNEUS {#10}
FROM NOTA N {#10}
INNER JOIN ITEMNOTA ITN ON (ITN.CD_EMPRESA = N.CD_EMPRESA {#10}
AND ITN.NR_LANCAMENTO = N.NR_LANCAMENTO {#10}
AND ITN.TP_NOTA = N.TP_NOTA {#10}
AND ITN.CD_SERIE = N.CD_SERIE) {#10}
INNER JOIN ITEM I ON (I.CD_ITEM = ITN.CD_ITEM) {#10}
INNER JOIN PESSOA PC ON (PC.CD_PESSOA = N.CD_PESSOA) {#10}
INNER JOIN EMPRESA E ON (E.CD_EMPRESA = N.CD_EMPRESA) {#10}
INNER JOIN PESSOA PE ON (PE.CD_PESSOA = E.CD_PESSOA) {#10}
INNER JOIN PARMFATUR PF ON (PF.CD_EMPRESA = E.CD_EMPRESA) {#10}
LEFT JOIN RETORNA_CHAVEPEDIDO(ITN.CD_EMPRESA, ITN.NR_LANCAMENTO, ITN.TP_NOTA, ITN.CD_SERIE) CHP ON (ITN.CD_ITEM = CHP.O_CD_ITEM) {#10}
INNER JOIN PLUGORDRECAPPEDIDO POP ON (POP.CD_EMPRESA = CHP.O_CD_EMPRESA {#10}
AND POP.NR_PEDIDO = CHP.O_NR_PEDIDO {#10}
AND POP.TP_PEDIDO = CHP.O_TP_PEDIDO) {#10}
INNER JOIN ORDEMPRODUCAORECAP OPR ON (OPR.ID = POP.IDORDEMPRODUCAORECAP) {#10}
INNER JOIN ITEMPEDIDOPNEU IPP ON (IPP.ID = OPR.IDITEMPEDIDOPNEU) {#10}
INNER JOIN PNEU PN ON (PN.ID = IPP.IDPNEU) {#10}
INNER JOIN MEDIDAPNEU MEP ON (MEP.ID = PN.IDMEDIDAPNEU) {#10}
INNER JOIN LAUDOTECNICOPNEURECAP LT ON (LT.IDITEMPEDIDOPNEUORIGEM = OPR.IDITEMPEDIDOPNEU) {#10}
INNER JOIN MOTIVOLAUDO MP ON (MP.IDLAUDOTECNICO = LT.ID) {#10}
INNER JOIN MOTIVOPNEU MOP ON (MOP.ID = MP.ID_MOTIVO) {#10}
LEFT JOIN NFSE NF ON (NF.CD_EMPRESA = N.CD_EMPRESA {#10}
AND NF.NR_LANCAMENTO = N.NR_LANCAMENTO {#10}
AND NF.TP_NOTA = N.TP_NOTA {#10}
AND NF.CD_SERIE = N.CD_SERIE) {#10}
WHERE N.CD_EMPRESA = {Nulo(Parametros[1],}I{) + #10}
AND N.NR_LANCAMENTO = {Nulo(Parametros[2],}I{) + #10}
AND N.TP_NOTA = {Nulo(Parametros[3],}S{) + #10}
AND N.CD_SERIE = {Nulo(Parametros[4],}S{) + #10}
AND OPR.STEXAMEFINAL <> 'A'
tabSub4 #1
SELECT {#10} /*CABECALHO DADOS DA EMPRESA EMITENTE*/ {#10} PF.DS_LOGOTIPO, /*NAO TA NO CHAMADO MAS A IMAGEM DO CLIENTE POSSUI LOGO */ {#10} E.NM_EMPRESA RAZAO_SOCIAL_EMP, {#10} PE.NM_PESSOA NM_PESSOANOTA, {#10} PE.NR_CNPJCPF, {#10} EPE.NR_INSCEST, {#10} EPE.DS_ENDERECO, {#10} COALESCE(EPE.NR_FONE,EPE.NR_CELULAR ) TELEFONE_EMP, {#10} N.CD_VENDEDOR, {#10} /*CABECALHO DADOS DO CLIENTE DA NF*/ {#10} PC.NM_PESSOA RAZAO_SOCIAL_PES, PC.NM_FANTASIA, {#10} PC.NR_CNPJCPF, {#10} EPC.NR_INSCEST, {#10} EPC.DS_ENDERECO, {#10} COALESCE(EPC.NR_FONE,EPC.NR_CELULAR ) TELEFONE_CLI, {#10} N.DT_EMISSAO, {#10} COALESCE(N.NR_NOTAFOR, N.NR_NOTAFISCAL) NR_NOTAFISCAL, {#10} /* CORPO DA PAGINA*/ {#10} OPR.ID NR_ORDEMPRODUCAO, {#10} DS.DSDESENHO, {#10} ITV.CD_VENDEDOR, --VERIFICAR {#10} MEP.DSMEDIDAPNEU DS_MEDIDA, {#10} OPR.DTFECHAMENTO, {#10} PN.NRSERIE, PN.NRFOGO NR_FOGO, {#10} MA.DSMARCA, MP.DSMODELO {#10}
FROM NOTA N {#10}
INNER JOIN ITEMNOTA ITN ON (ITN.CD_EMPRESA = N.CD_EMPRESA {#10}
AND ITN.NR_LANCAMENTO = N.NR_LANCAMENTO {#10}
AND ITN.TP_NOTA = N.TP_NOTA {#10}
AND ITN.CD_SERIE = N.CD_SERIE) {#10}
INNER JOIN ITEMNOTAVENDEDOR ITV ON (ITV.CD_EMPRESA = ITN.CD_EMPRESA {#10}
AND ITV.NR_LANCAMENTO = ITN.NR_LANCAMENTO {#10}
AND ITV.TP_NOTA = ITN.TP_NOTA {#10}
AND ITV.CD_SERIE = ITV.CD_SERIE {#10}
AND ITV.CD_ITEM = ITN.CD_ITEM) {#10}
INNER JOIN TIPOVENDEDOR TP ON (TP.CD_TIPO = ITV.CD_TIPO {#10}
AND TP.ST_VENDEDORPRINCIPAL = 'S') {#10}
INNER JOIN ITEM I ON (I.CD_ITEM = ITN.CD_ITEM) {#10}
INNER JOIN PESSOA PC ON (PC.CD_PESSOA = N.CD_PESSOA) {#10}
INNER JOIN ENDERECOPESSOA EPC on (EPC.CD_PESSOA = PC.CD_PESSOA {#10}
AND EPC.CD_ENDERECO = N.CD_ENDERECO) {#10}
INNER JOIN EMPRESA E ON (E.CD_EMPRESA = N.CD_EMPRESA) {#10}
INNER JOIN PESSOA PE ON (PE.CD_PESSOA = E.CD_PESSOA) {#10}
LEFT JOIN RETORNA_DADOSCADASTRAIS(PE.CD_PESSOA,NULL, NULL) EPE ON (1=1) {#10}
INNER JOIN PARMFATUR PF ON (PF.CD_EMPRESA = E.CD_EMPRESA) {#10}
LEFT JOIN RETORNA_CHAVEPEDIDO(ITN.CD_EMPRESA, ITN.NR_LANCAMENTO, ITN.TP_NOTA, ITN.CD_SERIE) CHP ON (ITN.CD_ITEM = CHP.O_CD_ITEM) {#10}
INNER JOIN PLUGORDRECAPPEDIDO POP ON (POP.CD_EMPRESA = CHP.O_CD_EMPRESA {#10}
AND POP.NR_PEDIDO = CHP.O_NR_PEDIDO {#10}
AND POP.TP_PEDIDO = CHP.O_TP_PEDIDO) {#10}
INNER JOIN ORDEMPRODUCAORECAP OPR ON (OPR.ID = POP.IDORDEMPRODUCAORECAP) {#10}
INNER JOIN ITEMPEDIDOPNEU IPP ON (IPP.ID = OPR.IDITEMPEDIDOPNEU) {#10}
INNER JOIN PNEU PN ON (PN.ID = IPP.IDPNEU) {#10}
INNER JOIN MEDIDAPNEU MEP ON (MEP.ID = PN.IDMEDIDAPNEU) {#10}
INNER JOIN MODELOPNEU MP ON (MP.ID = PN.IDMODELOPNEU) {#10}
INNER JOIN MARCAPNEU MA ON (MA.ID = MP.IDMARCAPNEU) {#10}
INNER JOIN DESENHOPNEU DS ON (DS.ID = OPR.ID) {#10}
WHERE N.CD_EMPRESA = {Nulo(Parametros[1],}I{) + #10}
AND N.NR_LANCAMENTO = {Nulo(Parametros[2],}I{) + #10}
AND N.TP_NOTA = {Nulo(Parametros[3],}S{) + #10}
AND N.CD_SERIE = {Nulo(Parametros[4],}S{) + #10}
AND OPR.STEXAMEFINAL <> 'A'
tabSub4 #2
SELECT {#10}/*CABECALHO DADOS DA EMPRESA EMITENTE*/ {#10} PF.DS_LOGOTIPO, /*NAO TA NO CHAMADO MAS A IMAGEM DO CLIENTE POSSUI LOGO */ {#10} E.NM_EMPRESA RAZAO_SOCIAL_EMP, {#10} PE.NM_PESSOA NM_PESSOANOTA, {#10} PE.NR_CNPJCPF, {#10} EPE.NR_INSCEST, {#10} EPE.DS_ENDERECO, {#10} COALESCE(EPE.NR_FONE,EPE.NR_CELULAR ) TELEFONE_EMP, {#10} N.CD_VENDEDOR, {#10}/*CABECALHO DADOS DO CLIENTE DA NF*/ {#10} PC.NM_PESSOA RAZAO_SOCIAL_PES, PC.NM_FANTASIA, {#10} PC.NR_CNPJCPF NR_CNPJCPFPESSOA, {#10} EPC.NR_INSCEST NR_INSCESTPESSOA, {#10} EPC.DS_ENDERECO DS_ENDERECOPESSOA, {#10} COALESCE(EPC.NR_FONE,EPC.NR_CELULAR ) TELEFONE_CLI, {#10} N.DT_EMISSAO, {#10} COALESCE(N.NR_NOTAFOR, N.NR_NOTAFISCAL) NR_NOTAFISCAL, {#10}/* Literal*/ {#10}'Certificado de Garantia' TEXTO_A, {#10}'Certificamos a garantia pelos serviços prestados para os pneus abaixo relacionados:' TEXTO_B, {#10}/* CORPO DA PAGINA*/ {#10} OPR.ID NR_ORDEMPRODUCAO, {#10} DS.DSDESENHO, {#10} ITV.CD_VENDEDOR CD_VENDEDORORDEM, --VERIFICAR {#10} MEP.DSMEDIDAPNEU DS_MEDIDA, {#10} OPR.DTFECHAMENTO, {#10} PN.ID NR_PNEU, {#10} PN.NRSERIE, PN.NRFOGO NR_FOGO, {#10} MA.DSMARCA, MP.DSMODELO {#10}
FROM NOTA N {#10}
INNER JOIN ITEMNOTA ITN ON (ITN.CD_EMPRESA = N.CD_EMPRESA {#10}
AND ITN.NR_LANCAMENTO = N.NR_LANCAMENTO {#10}
AND ITN.TP_NOTA = N.TP_NOTA {#10}
AND ITN.CD_SERIE = N.CD_SERIE) {#10}
LEFT JOIN ITEMNOTAVENDEDOR ITV ON (ITV.CD_EMPRESA = ITN.CD_EMPRESA {#10}
AND ITV.NR_LANCAMENTO = ITN.NR_LANCAMENTO {#10}
AND ITV.TP_NOTA = ITN.TP_NOTA {#10}
AND ITV.CD_SERIE = ITV.CD_SERIE {#10}
AND ITV.CD_ITEM = ITN.CD_ITEM) {#10}
LEFT JOIN TIPOVENDEDOR TP ON (TP.CD_TIPO = ITV.CD_TIPO {#10}
AND TP.ST_VENDEDORPRINCIPAL = 'S') {#10}
INNER JOIN ITEM I ON (I.CD_ITEM = ITN.CD_ITEM) {#10}
LEFT JOIN SERVICOPNEU SP ON (SP.ID = I.CD_ITEM) {#10}
INNER JOIN PESSOA PC ON (PC.CD_PESSOA = N.CD_PESSOA) {#10}
INNER JOIN ENDERECOPESSOA EPC on (EPC.CD_PESSOA = PC.CD_PESSOA {#10}
AND EPC.CD_ENDERECO = N.CD_ENDERECO) {#10}
INNER JOIN EMPRESA E ON (E.CD_EMPRESA = N.CD_EMPRESA) {#10}
INNER JOIN PESSOA PE ON (PE.CD_PESSOA = E.CD_PESSOA) {#10}
LEFT JOIN RETORNA_DADOSCADASTRAIS(PE.CD_PESSOA,NULL, NULL) EPE ON (1=1) {#10}
INNER JOIN PARMFATUR PF ON (PF.CD_EMPRESA = E.CD_EMPRESA) {#10}
LEFT JOIN RETORNA_CHAVEPEDIDO(ITN.CD_EMPRESA, ITN.NR_LANCAMENTO, ITN.TP_NOTA, ITN.CD_SERIE) CHP ON (ITN.CD_ITEM = CHP.O_CD_ITEM) {#10}
INNER JOIN PLUGORDRECAPPEDIDO POP ON (POP.CD_EMPRESA = CHP.O_CD_EMPRESA {#10}
AND POP.NR_PEDIDO = CHP.O_NR_PEDIDO {#10}
AND POP.TP_PEDIDO = CHP.O_TP_PEDIDO) {#10}
INNER JOIN ORDEMPRODUCAORECAP OPR ON (OPR.ID = POP.IDORDEMPRODUCAORECAP) {#10}
INNER JOIN ITEMPEDIDOPNEU IPP ON (IPP.ID = OPR.IDITEMPEDIDOPNEU) {#10}
INNER JOIN PNEU PN ON (PN.ID = IPP.IDPNEU) {#10}
INNER JOIN MEDIDAPNEU MEP ON (MEP.ID = PN.IDMEDIDAPNEU) {#10}
INNER JOIN MODELOPNEU MP ON (MP.ID = PN.IDMODELOPNEU) {#10}
INNER JOIN MARCAPNEU MA ON (MA.ID = MP.IDMARCAPNEU) {#10}
LEFT JOIN DESENHOPNEU DS ON (DS.ID = OPR.ID) {#10}
WHERE N.CD_EMPRESA = {Nulo(Parametros[1],}I{) + #10}
AND N.NR_LANCAMENTO = {Nulo(Parametros[2],}I{) + #10}
AND N.TP_NOTA = {Nulo(Parametros[3],}S{) + #10}
AND N.CD_SERIE = {Nulo(Parametros[4],}S{) + #10}
AND OPR.STEXAMEFINAL = 'A'
tabSub3 #2
SELECT PARM.ST_GERABOLETO
FROM PARMNOTA PARM
WHERE PARM.CD_EMPRESA = {Parametros[1]}
AND PARM.TP_NOTA = {Nulo(Parametros[3],}S{)}
AND PARM.CD_SERIE = {Nulo(Parametros[4],}S{)}
Consulta
SELECT C.NR_NOSSONUMEROAPI {#10}
FROM CONTAS C {#10}
WHERE C.CD_EMPRESA = {nulo(iParametros[1],}I{) +#10}
AND C.NR_LANCTONOTA = {nulo(iParametros[2],}I{) +#10}
AND C.TP_CONTAS = {nulo(iParametros[3],}S{) +#10}
AND C.CD_SERIE ={nulo(iParametros[4],}S{)}
Tabelas Utilizadas
| Tabela | Uso |
|---|---|
CONTAS | referenciada nas queries do layout |
DESENHOPNEU | referenciada nas queries do layout |
EMPRESA | referenciada nas queries do layout |
ENDERECOPESSOA | referenciada nas queries do layout |
EXAMEINICIAL | referenciada nas queries do layout |
ITEM | referenciada nas queries do layout |
ITEMNOTA | referenciada nas queries do layout |
ITEMNOTAVENDEDOR | referenciada nas queries do layout |
ITEMPEDIDOPNEU | referenciada nas queries do layout |
LAUDOTECNICOPNEURECAP | referenciada nas queries do layout |
MARCAPNEU | referenciada nas queries do layout |
MEDIDAPNEU | referenciada nas queries do layout |
MODELOPNEU | referenciada nas queries do layout |
MOTIVOLAUDO | referenciada nas queries do layout |
MOTIVOPNEU | referenciada nas queries do layout |
MOTIVORECUSAEXAME | referenciada nas queries do layout |
NFSE | referenciada nas queries do layout |
NOTA | referenciada nas queries do layout |
ORDEMPRODUCAORECAP | referenciada nas queries do layout |
PARMFATUR | referenciada nas queries do layout |
PARMNOTA | referenciada nas queries do layout |
PESSOA | referenciada nas queries do layout |
PLUGORDRECAPPEDIDO | referenciada nas queries do layout |
PNEU | referenciada nas queries do layout |
RETORNA_CABECNF_RECAP | referenciada nas queries do layout |
RETORNA_CHAVEPEDIDO | referenciada nas queries do layout |
RETORNA_CONTAS | referenciada nas queries do layout |
RETORNA_DADOSCADASTRAIS | referenciada nas queries do layout |
RETORNA_ITENSNF_RECAP | referenciada nas queries do layout |
RETORNA_LINHAS | referenciada nas queries do layout |
RETORNA_PNEUSNF_RECAP | referenciada nas queries do layout |
SERVICOPNEU | referenciada nas queries do layout |
TIPOVENDEDOR | referenciada nas queries do layout |
Shared Units
- jCommon
- jPesquisa
Fonte
- Unit:
source/LNF233/ULNF233.pas - DFM:
source/LNF233/ULNF233.dfm - Package:
source/LNF233/LNF233.dpk