Sefazclass

Aqui você poderá oferecer suas Contribuições, Dicas e Tutoriais (Texto ou Vídeo) que sejam de interesse de todos.

Moderador: Moderadores

Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

Sefazclass

Mensagem por JoséQuintas »

Pra quem quiser brincar, ou quem quiser se atualizar....

o test da Sefazclass está esticando..... kkk
sefazclass.png
Acrescentei hoje pra mostrar validade do certificado, apenas no test.exe, porque já existia na sefazclass.

Por esse programa dá pra, dentre outras coisas:

- ver validade do certificado
- enviar XML genérico só pra testar comunicação
- enviar XML de nota para ser autorizado
- gerar danfe
- validar XML - validação básica
- assinar xml genérico ou oficial/teste
- consultar cadastro

ou seja... quem quiser testar, é só executar o programa de teste, nem precisa mexer com programação
depois... é só olhar o fonte do teste e fazer igual no aplicativo.
Segue compilado com Harbour 3.4 e mingw 8.1, mas tá tudo na sefazclass
test.zip
(750.36 KiB) Baixado 288 vezes
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar do usuário
rubens
Colaborador
Colaborador
Mensagens: 1520
Registrado em: 16 Ago 2003 09:05
Localização: Nova Xavantina - MT

Sefazclass

Mensagem por rubens »

Bom dia...
José Quintas,
Baixei do Git ontem a SEFAZCLASS e o DANFE ainda não está imprimindo as notas referenciadas..
Dei um mexidinha e com este código consegui colocar para imprimir..
De repente se quiser aproveitar para inserir e upar.
Rubens

Código: Selecionar todos

METHOD QuadroDadosAdicionais() CLASS hbNFeDaNFe

   LOCAL cMemo, nCont 
	LOCAL nItem, cChave := 'NFe Ref.:'+HB_Eol()  // 08/07/2019 - 07:17:40 Rubens

   IF ::nFolha == 1
   
   	// 08/07/2019 - 07:15:00 Rubens
   	aNFref 	:= MultipleNodeToArray( ::cXml, "refNFe" )
   	For Each nItem in aNFref
   		If nItem:__EnumIndex=Len(aNFref)
	   		cChave += '('+aNFref[nItem:__EnumIndex]+') '+Hb_eol()
   		Else
   			cChave += '('+aNFref[nItem:__EnumIndex]+'), '
  			EndIf
  		Next 
   
      *cMemo := ::aInfAdic[ "infCpl" ]
      cMemo := cChave + HB_Eol() + ::aInfAdic[ "infCpl" ]  // 08/07/2019 - 07:19:22 Rubens
"Eu e minha casa servimos ao Senhor e você ???"
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

Sefazclass

Mensagem por JoséQuintas »

Legal.
Só precisa colocar na parte que carrega o XML.
A partir daí, como é em informações adicionais, já vai entrar na formatação automática e no cálculo de quantidade de folhas.
O ponto e vírgula representa mudança de linha - segui o que fazia o unidanfe - isto é para o caso de onde queremos obrigatoriamente que mude de linha, independente da quebra automática.
Vou alterar e subir daqui a pouco.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

Sefazclass

Mensagem por JoséQuintas »

Basicamente a mesma coisa, no final do método BuscaDadosXml()

https://github.com/JoseQuintas/sefazcla ... 1145011cc1

Valeu.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

Sefazclass

Mensagem por JoséQuintas »

Quem puder testar, precisa de um XML com nota fiscal referenciada
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar do usuário
Jairo Maia
Moderador
Moderador
Mensagens: 2785
Registrado em: 16 Ago 2010 13:46
Localização: Campinas-SP

Sefazclass

Mensagem por Jairo Maia »

Olá Pessoal,

Isso está se referindo a emissão de NF-e para acobertar CF-e-SAT ou NFC-e emitidos num determinado período?

Se for isso não é necessário colocar em informações complementares a(s) chave(s) dos documentos referenciados.

No caso de SP por exemplo, é obrigatório apenas a seguinte expressão: "Emitida nos termos da Portaria CAT nº 106/2015".

PS: Nem mesmo em nota de devolução é necessário colocar a chave em informações complementares, apenas o número da nota, série e data de emissão da nota de entrada dos produtos devolvidos.
Abraços, Jairo
Harbour / Clipper 5.2e - Blinker 7
(Não respondo dúvidas por MP ou E-mail. Por favor, não encaminhe via mensagem privada ou e-mail, dúvidas que podem ser compartilhadas com todos no fórum)
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

Sefazclass

Mensagem por JoséQuintas »

É o caso de nota de devolução, por exemplo, aonde colocamos a nota referenciada no XML, no local próprio.
A alteração é pra que essas chaves apareçam também no impresso.
A lei não obriga isso, mas permite colocar no Danfe qualquer informação que exista no XML.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar do usuário
Jairo Maia
Moderador
Moderador
Mensagens: 2785
Registrado em: 16 Ago 2010 13:46
Localização: Campinas-SP

Sefazclass

Mensagem por Jairo Maia »

JoséQuintas escreveu:A lei não obriga isso, mas permite colocar no Danfe qualquer informação que exista no XML.
Sim. É que no caso de ser emitida uma nota que acoberte NFC-e ou CF-e-SAT com a SefazClass, terá que ser limitado o número de cupons referenciados a quantidade de chaves que couberem em informações adicionais no DANFE.

É muito comum um mesmo cliente ter bem mais documentos a serem referenciados do que é possível colocar no DANFE, isso obrigaria a ter que emitir várias NF-e´s, que por sua vez complica a escrituração.

Embora pode, apenas acho que o DANFE deve ter apenas as informações necessárias, mas é apenas uma opinião.
Abraços, Jairo
Harbour / Clipper 5.2e - Blinker 7
(Não respondo dúvidas por MP ou E-mail. Por favor, não encaminhe via mensagem privada ou e-mail, dúvidas que podem ser compartilhadas com todos no fórum)
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

Sefazclass

Mensagem por JoséQuintas »

Jairo Maia escreveu:É muito comum um mesmo cliente ter bem mais documentos a serem referenciados do que é possível colocar no DANFE, isso obrigaria a ter que emitir várias NF-e´s, que por sua vez complica a escrituração
O limite, no XML, de informações adicionais é de 5.000 caracteres.
Muitos componentes de Danfe não aceitam esse limite.
Só isso já pode estourar o limite de uma página de Danfe.

Mas pode ter razão, não faço idéia de quantas notas referenciadas poderiam existir em um XML.
Poderia gerar uma nota de trocentas páginas, só pra caber a observação... kkkk
O negócio é aguardar aparecer uma dessas "notas livro", pra decidir o que fazer.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

Sefazclass

Mensagem por JoséQuintas »

Aviso importante:

Cometi um erro na atualização anterior, considerei _EnumIsLast como numérico, quando na verdade é lógico (.T./.F.).
Quem atualizou, favor atualizar novamente.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Responder