Páginas filhas
  • SPDNFDANF - Monitoramento da NF-e

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

Ponto-de-Entrada: SPDNFDANF - Monitoramento da NF-e

Abrangências:Microsiga Protheus 12
Versões:Microsiga Protheus 12
Compatível Países:Brasil
Sistemas Operacionais:Todos
Compatível às Bases de Dados:Todos
Idiomas:Português (Brasil)
Composition Setup
import.css=/download/attachments/327912/newLayout.css

...


Descrição:

Este ponto de entrada foi criado para atender a necessidade de impressão da DANFE automático após realizar monitoramento da Nota Fiscal Eletrônica, tanto pela rotina Nf-e Sefaz (SPEDNFE.PRX) como também pela funcionalidade do AutoNfe através da rotina AutoNfeMon, e atualização das tabelas SF3, SF2 ou SF1 e SFT.

Atualmente, o ponto de entrada é executada somente quando encontra o registro da SF2 ou SF1 e a espécie da nota seja SPED, ou seja, somente para notas autorizadas, pois ao excluir a nota o registro da tabela SF2 ou SF1 é excluído.


Programa fonte:

AutoNfeBusiness.prw


Observação: deverá ter o artefato do printer na pasta do appserver.


Links importantes para download:

RDMAKES Padrões: https://suporte.totvs.com/portal/p/10098/download#detail/950596

Printer:

 Windows 64:

https://suporte.totvs.com/portal/p/10098/download?e=693168

Windows 32:

https://suporte.totvs.com/portal/p/10098/download?e=693163

Linux 64:

https://suporte.totvs.com/portal/p/10098/download?e=711950

https://suporte.totvs.com/portal/p/10098/download?e=693160

Linux 32:

https://suporte.totvs.com/portal/p/10098/download?e=711949

https://suporte.totvs.com/portal/p/10098/download?e=693159

MAC:

https://suporte.totvs.com/portal/p/10098/download?e=693162

Links importantes para consulta:

Classe FWMSPrinter: FWMsPrinter

Documentação do Printer: TOTVS Printer

Função SetMvValue: https://tdn.totvs.com/display/public/PROT/SetMVValue


Sintaxe:

SPDNFDANF - Monitoramento da NF-e ( [ cNota ], [ cSerie ], [ cChave ] ) --> cXML

...

SPEDNFE.PRW

...

Parâmetros:

NomeTipoDescriçãoDefault

...

Observação

...

cNota

...

CaracterNumeração da Nota

...


PARAMIXB[1]

...

PARAMIXB[2] - Filtro padrão que a rotina realiza.

cSerieCaracterSérie da Nota
PARAMIXB[2]
cChaveCaracterChave da Nota
PARAMIXB[3]
cIdEntCaracterEntidade do TSS
PARAMIXB[4]
cClieForCaracterCódigo do Cliente/Fornecedor
PARAMIXB[5]
cLojaCaracterLoja do Cliente/Fornecedor
PARAMIXB[6]


Retorno:

Nulo

...

  • Tipo caractere

O retorno do ponto de entrada irá sobrepor qualquer filtro que o padrão já realiza.

...


Exemplo:

Bloco de código
titleExemplo
linenumberstrue
#include 
"
'protheus.ch
" User Function FILSPEDNFE
'
#include 'RPTDEF.ch'

/*/{Protheus.doc} SPDNFDANF
Ponto foi criado para atender a necessidade de impressão da DANFE automático após monitoramento e caso a NFe esteja autorizada.

@since 26/08/2020
/*/
user function SPDNFDANF()
    local cNota 
cTipoNFE
    
 := 
PARAMIXB
ParamIXB[1]
    local 
cRetorno
cSerie     := 
PARAMIXB
ParamIXB[2]
    local cChaveNfe  := ParamIXB[3]
	local 
cMsg
cIdEnt	 := 
"" cMsg := "Ponto de entrada: FILSPEDNFE " + CHR(13) + CHR(10) cMsg += " - Tipo de NFe
ParamIXB[4]
    local cClieFor   := ParamIXB[5]
    local cLoja		 := ParamIXB[6]

    ConOut(" Nota  			 : " + cNota)
    ConOut(" Serie			 : " + cSerie)
    ConOut(" Chave			 : " + cChaveNfe)
    ConOut(" Entidade do TSS : " + cIdEnt)
    ConOut(" Cliente/Fornec	 : " + 
cTipoNFE
cClieFor)
   
+
 
CHR(13)
ConOut(" Loja			 : " + 
CHR(10
cLoja)
cMsg += " - Filtro padrao: " + cRetorno MsgInfo(cMsg, "FILSPEDNFE") Return cRetorno

	// Carregar os parâmetros do pergunte "NFSIGW" com as informações necessárias da nota (SetMVValue)
	// Instanciar a classe FWMSPrinter
	// Executar a função principal dos RDMAKES padrões, por exemplo: U_PrtNfeSef(cIdEnt,,,oDanfe) funcão do DANFEII e U_DANFE_P1(cIdEnt,,,oDanfe) função do DANFEIII, onde a variavel cIdEnt é a entidade do TSS e o objeto oDanfe é da classe FWMSPrinter.

return nil