Jump to content
Fivewin Brasil

CCE-Rejeicao: A data do evento nao pode ser maior

kapiaba

By kapiaba
in Programação

 Share

Recommended Posts

kapiaba Enthusiast

kapiaba

Posted
  • Author
Posted

Resolvido.

Obrigado Valdir Brando.

Meu computador estava 1 minuto acima do computador da SEFAZ.

Fala ´serio... Porque eles não vão a merda...

Bando de FPD!! Se pelo menos retornassem a hora exata do servidor deles.

João Santos - São Paulo.

kmt_karinha@pop.com.br

joao@pleno.com.br

Fone: (11) 3106-2832 / 8243-5632 - TIM

FWH 2.7 - xHARBOUR WorkShop.Exe

dentinho.jpg?rnd=0.830315402649066

Link to comment
Share on other sites
  • 7 months later...
kapiaba Enthusiast

kapiaba

Posted
  • Author
Posted

http://br.groups.yahoo.com/group/uninfe/message/37585

Gilmer, desconsidere email anterior.

Acho que descobri como evitar o erro 578 - data do evento desta forma:

Veja por favor se eu estou correto.



   wDATA := ALLTRIM(STR(YEAR( DATE()  ) ) ) +"-"+ ;


            ALLTRIM(STR(MONTH( DATE() ) ) ) +"-"+ ;


            ALLTRIM(STR(DAY( DATE()   ) ) ) +"T"+ TIME()+[-02:00]


   IF oNFeUtil:EnviaCCe(cChave,wTEXTO,lAcentuado,nCorrecao,wDATA,@wRECIBO,@wPROTOCOLO)


id=code>id=code>
Link:


http://br.groups.yahoo.com/group/uninfe/message/37585


abs, obg.


João Santos - São Paulo.


joao@pleno.com.br


Fone: (11) 3106-2832 / 5150-7341 - TIM


https://www.facebook.com/kapiaba


FWH 2.7 - xHARBOUR WorkShop.Exe



			
		


		
			

				
					
						

	
	
		

			
				
				

					
				

			
			
			
		

	


					
				
				
			

		

		
			

		
	


	

	





	
Link to comment

	
		
	
	
	

	
	
Share on other sites

	

	


	

	

	




	



					
					
					
				

					

					
					






	

	

	

		

			

				


	
		Marca
	

				
				
					
						
Rookie
					
				
			

		

		

			

				


Marca
			

			

				Posted 
				
			

		

	

	
	

		




	

		

			

				
    
					
					
					
					
					
				

			

			
		


		

			Posted 
			
			
				
				
			
		

	


	

    

	

		
		

			




citação:
http://br.groups.yahoo.com/group/uninfe/message/37585


Gilmer, desconsidere email anterior.


Acho que descobri como evitar o erro 578 - data do evento desta forma:


Veja por favor se eu estou correto.






   wDATA := ALLTRIM(STR(YEAR( DATE()  ) ) ) +"-"+ ;


            ALLTRIM(STR(MONTH( DATE() ) ) ) +"-"+ ;


            ALLTRIM(STR(DAY( DATE()   ) ) ) +"T"+ TIME()+[-02:00]


   IF oNFeUtil:EnviaCCe(cChave,wTEXTO,lAcentuado,nCorrecao,wDATA,@wRECIBO,@wPROTOCOLO)


id=code>id=code>
Link:


http://br.groups.yahoo.com/group/uninfe/message/37585


abs, obg.


João Santos - São Paulo.


joao@pleno.com.br


Fone: (11) 3106-2832 / 5150-7341 - TIM


https://www.facebook.com/kapiaba


FWH 2.7 - xHARBOUR WorkShop.Exe




id=quote>id=quote>
Ola a Todos


Estou com este mesmo problema sendo que


se eu faço a mudança q. vc sugeriu acima digo


wDATA := ALLTRIM(STR(YEAR( DATE()  ) ) ) +"-"+ ;


            ALLTRIM(STR(MONTH( DATE() ) ) ) +"-"+ ;


            ALLTRIM(STR(DAY( DATE()   ) ) ) +"T"+ TIME()+[-02:00]


da erro 579 dizendo


Rejeição   a Data do evento nao pode ser menor que a data de autorização para NFE e nao emitida em contigencia 


Se eu deixo da maneira normal


*   wDATA     := STR(YEAR(DATE()),4) + "-" + STR(MONTH(DATE()),2) + "-" + STR(DAY(DATE()),2) + "T" + wTime


Da o erro 


578 - Rejeicao: A data do evento nao pode ser maior que a data do processamento.


Nao sei como resolver


Marcelo Ferro


Petrópolis - Rj


Fwh9.01/xHarbour 1.1.0 Simplex /SqlLib /xMate/WS e Pelles


marca.jpg



			
		


		
			

				
					
						

	
	
		

			
				
				

					
				

			
			
			
		

	


					
				
				
			

		

		
			

		
	


	

	





	
Link to comment

	
		
	
	
	

	
	
Share on other sites

	

	


	

	

	




	



					
					
					
				

					

					
					






	

	

	

		

			

				


	
		kapiaba
	

				
				
					
						
Enthusiast
					
				
			

		

		

			

				


kapiaba
			

			

				Posted 
				
			

		

	

	
	

		




	

		

			

				
    
					
						
  • Author
    • 
					
					
					
					
					
				

			

			
		


		

			Posted 
			
			
				
				
			
		

	


	

    

	

		
		

			

Olá,


578 -> É a Hora do Evento.


579 -> É a Data do Evento, o Usuário tem que esperar pelo menos 24 horas para fazer a carta de Correção, se entendi a lógica.


João Santos - São Paulo.


joao@pleno.com.br


Fone: (11) 3106-2832 / 5150-7341 - TIM


https://www.facebook.com/kapiaba


FWH 2.7 - xHARBOUR WorkShop.Exe



			
		


		
			

				
					
						

	
	
		

			
				
				

					
				

			
			
			
		

	


					
				
				
			

		

		
			

		
	


	

	





	
Link to comment

	
		
	
	
	

	
	
Share on other sites

	

	


	

	

	




	



					
					
					
				

					

					
					






	

	

	

		

			

				


	
		kapiaba
	

				
				
					
						
Enthusiast
					
				
			

		

		

			

				


kapiaba
			

			

				Posted 
				
			

		

	

	
	

		




	

		

			

				
    
					
						
  • Author
    • 
					
					
					
					
					
				

			

			
		


		

			Posted 
			
			
				
				
			
		

	


	

    

	

		
		

			

// MODIFIQUEI O METODO DA CLASSE PARA BARRAR O USUARIO ASSIM:






Method EnviaCCe(cChaveNfe,cTextoCorrecao,lAcentuado,nCorrecao,cDataHoraCorrecao) Class TVoNfeUtil2G


   PUBLIC lHoraCCeInvalida := .F.


   PUBLIC lDataCCeInvalida := .F.


			If ::lMensagem


				#IFDEF __DOS__


            				Alert( hb_ansitooem( cMsgResultado+"-"+Procname() ),,,3 )


         			#ELSE


                                    MsgStop( cMsgResultado+CRLF+ProcName() ,CAPTION_MSG)


                                    // ERROS 578 / 579


                                    nRet := Alltrim(Str(nStat))


                                    IF nRet = [578] // Hora Invalida


                                       lHoraCCeInvalida := .T.


                                    ENDIF


                                    IF nRet = [579]  // Data Invalida


                                       lDataCCeInvalida := .T.


                                    ENDIF


         			#ENDIF


// ALTERE CARTA.PRG


// CARTA.PRG


   IF oNFeUtil:EnviaCCe(cChave,wTEXTO,lAcentuado,nCorrecao,wDATA,@wRECIBO,@wPROTOCOLO)


      SELECT CCE


      CCE->(OrdSetFocus("CHA"))


      CCE->(DBGOBOTTOM())


      CCE->(DBAPPEND())


      REPLACE CCE->CODI       WITH wCCE


      REPLACE CCE->CHAVE      WITH cChave


      REPLACE CCE->PROTOCOLO  WITH wProtocolo


      REPLACE CCE->RECEBIMENT WITH wRecibo


      REPLACE CCE->TEXTO      WITH wTEXTO


      CCE->(DBCOMMIT())


      CCE->(DBUNLOCK())


      CCE->(DBGOTOP())


      oNfeUtil:End()


      lLigaBotao := .F.


      oTransmite:Disable()


      oTransmite:Refresh()


      MsgInfo( OemToAnsi( "Carta de Corre‡Æo N§: " + STRZERO(wCCE)   )+CRLF+ ;


               OemToAnsi( "da NF-e N§.: "          +STRZERO(wNUMERO) )+CRLF+ ;


               OemToAnsi( "Enviada com Sucesso Absoluto!!          " )+CRLF+ ;


               OemToAnsi( "Aten‡Æo: Se Alterou a Hora do Computador" )+CRLF+ ;


               OemToAnsi( "ou do Servidor, NÆo Esque‡a de Acertar. " )+CRLF+ ;


               OemToAnsi( "Se Alterou no Dois, Acerte nos DOIS.    " )+CRLF+ ;


               OemToAnsi( "Vocˆ Somente Poder  Enviar Outra Carta, " )+CRLF+ ;


               OemToAnsi( "Depois de Transcorridos 10 Minutos.     " )+CRLF+ ;


               OemToAnsi( "Tecle  Para Continuar...         " ),      ;


               OemToAnsi( "Carta de Corre‡Æo Enviada com Sucesso!! " ) )


   ELSE


      // Rejeicao:


      // 578 - Rejeicao: A data do evento nao pode ser maior que a data do processamento.


      // Ocorrendo esta Rejeicao, a Hora do computador do Cliente esta Maior que


      // a Hora do Computador da SEFAZ, deve-se acertar o Relogio com a Hora de


      // Brasilia ou Menos 1 minuto, ate aprovacao da SEFAZ. Fala serio.


      nRet := oNfeUtil:ConsultaStatus( .F. )


      IF nRet = 107 .AND. lHoraCCeInvalida //:= .T.  hora errada


         MsgInfo( OemToAnsi( "ATEN€ÇO USUµRIO:                     " )+CRLF+ ;


                  OemToAnsi( "ALTERE A HORA DO SEU COMPUTADO EM:   " )+CRLF+ ;


                  OemToAnsi( "-10 MINUTOS. NÇO FUNCIONANDO, ALTERE " )+CRLF+ ;


                  OemToAnsi( "A HORA DO SERVIDOR EM: -10 MINUTOS.  " )+CRLF+ ;


                  OemToAnsi( "TECLE  PARA CONTINUAR...      " ),      ;


                  OemToAnsi( "Altere a Hora do Seu Computador...   " ) )


         // FUNCAO DE INFORMACAO E HELP PARA O USUARIO


         INFORMACAO()


         lHoraCCeInvalida := .F.


      ELSEIF nRet = 107 .AND. lDataCCeInvalida  // .T. data errada


          MsgStop( OemToAnsi( "ATEN€ÇO USUµRIO:                     " )+CRLF+ ;


                   OemToAnsi( "ESPERE PELO MENOS 1 DIA PARA ENVIAR  " )+CRLF+ ;


                   OemToAnsi( "UMA CARTA DE CORREۂO DESTA NFE.     " ),      ;


                   OemToAnsi( "Espere Pelo Menos 1 Dia P/Usar a CC-e" ) )


      ELSEIF nRet != 107


         MsgInfo( OemToAnsi( "Aten‡Æo UsuÆrio:                     " )+CRLF+ ;


                  OemToAnsi( "Informe o N£mero da Rejei‡Æo Para:   " )+CRLF+ ;


                  OemToAnsi( "Contato Sistemas e Proc. Ltda.       " )+CRLF+ ;


                  OemToAnsi( "Fones: (11) XXXX-XXXX / XXXX-XXXX    " ),      ;


                  OemToAnsi( "Favor Informar o N£mero da Rejei‡Æo. " ) )


      ENDIF


   ENDIF


id=code>id=code>


João Santos - São Paulo.


joao@pleno.com.br


Fone: (11) 3106-2832 / 5150-7341 - TIM


https://www.facebook.com/kapiaba


FWH 2.7 - xHARBOUR WorkShop.Exe



			
		


		
			

				
					
						

	
	
		

			
				
				

					
				

			
			
			
		

	


					
				
				
			

		

		
			

		
	


	

	





	
Link to comment

	
		
	
	
	

	
	
Share on other sites

	

	


	

	

	




	



					
					
					
				

					

					
					






	

	

	

		

			

				


	
		Marca
	

				
				
					
						
Rookie
					
				
			

		

		

			

				


Marca
			

			

				Posted 
				
			

		

	

	
	

		




	

		

			

				
    
					
					
					
					
					
				

			

			
		


		

			Posted 
			
			
				
				
			
		

	


	

    

	

		
		

			

bastou eu alterar em 5 minutos a hora do meu micro q. funcionou perfeitamente


Obrigado a todos


Kapiaba


Nao entendi o pq. do .F. no metodo ConsultaStatus( .F. )


pos la nao tem nada


oq. foi mudado p. isso nele ?


Marcelo Ferro


Petrópolis - Rj


Fwh9.01/xHarbour 1.1.0 Simplex /SqlLib /xMate/WS e Pelles


marca.jpg


Editado por - marca on 10/07/2012  11:57:03



			
		


		
			

				
					
						

	
	
		

			
				
				

					
				

			
			
			
		

	


					
				
				
			

		

		
			

		
	


	

	





	
Link to comment

	
		
	
	
	

	
	
Share on other sites

	

	


	

	

	




	



					
					
					
				

					

					
					






	

	

	

		

			

				


	
		kapiaba
	

				
				
					
						
Enthusiast
					
				
			

		

		

			

				


kapiaba
			

			

				Posted 
				
			

		

	

	
	

		




	

		

			

				
    
					
						
  • Author
    • 
					
					
					
					
					
				

			

			
		


		

			Posted 
			
			
				
				
			
		

	


	

    

	

		
		

			




citação:
bastou eu alterar em 5 minutos a hora do meu micro q. funcionou perfeitamente


Obrigado a todos


Kapiaba


Nao entendi o pq. do .F. no metodo ConsultaStatus( .F. )


pos la nao tem nada


oq. foi mudado p. isso nele ?


Marcelo Ferro


Petrópolis - Rj


Fwh9.01/xHarbour 1.1.0 Simplex /SqlLib /xMate/WS e Pelles


marca.jpg


Editado por - marca on 10/07/2012  11:57:03




id=quote>id=quote>
Desculpe mas não posso comentar sobre isto neste forum.


e não uso o forum da NF-e, senão vaõ enxer meu s...


kkkkkkkkkkkkkkkkkkkkkkkkk


Não quis, senha lá... já basta aqui.... kkkkk


Jesus, que hoje estou maléfico!!!


E mesmo porque, não faz sentido você em 5 minutos depois de ter emitido a nota, a mercadoria ainda está no galpão, você mandar uma carta de co0rreção... fala sério. Minha opinião.


abs.


João Santos - São Paulo.


joao@pleno.com.br


Fone: (11) 3106-2832 / 5150-7341 - TIM


https://www.facebook.com/kapiaba


FWH 2.7 - xHARBOUR WorkShop.Exe


Editado por - kapiaba on 10/07/2012  12:06:41



			
		


		
			

				
					
						

	
	
		

			
				
				

					
				

			
			
			
		

	


					
				
				
			

		

		
			

		
	


	

	





	
Link to comment

	
		
	
	
	

	
	
Share on other sites

	

	


	

	

	




	



					
					
					
				

					

					
					






	

	

	

		

			

				


	
		Marca
	

				
				
					
						
Rookie
					
				
			

		

		

			

				


Marca
			

			

				Posted 
				
			

		

	

	
	

		




	

		

			

				
    
					
					
					
					
					
				

			

			
		


		

			Posted 
			
			
				
				
			
		

	


	

    

	

		
		

			




citação:



citação:
bastou eu alterar em 5 minutos a hora do meu micro q. funcionou perfeitamente


Obrigado a todos


Kapiaba


Nao entendi o pq. do .F. no metodo ConsultaStatus( .F. )


pos la nao tem nada


oq. foi mudado p. isso nele ?


Marcelo Ferro


Petrópolis - Rj


Fwh9.01/xHarbour 1.1.0 Simplex /SqlLib /xMate/WS e Pelles


marca.jpg


Editado por - marca on 10/07/2012  11:57:03




id=quote>id=quote>
Desculpe mas não posso comentar sobre isto neste forum.


e não uso o forum da NF-e, senão vaõ enxer meu s...


kkkkkkkkkkkkkkkkkkkkkkkkk


Não quis, senha lá... já basta aqui.... kkkkk


Jesus, que hoje estou maléfico!!!


E mesmo porque, não faz sentido você em 5 minutos depois de ter emitido a nota, a mercadoria ainda está no galpão, você mandar uma carta de co0rreção... fala sério. Minha opinião.


abs.


João Santos - São Paulo.


joao@pleno.com.br


Fone: (11) 3106-2832 / 5150-7341 - TIM


https://www.facebook.com/kapiaba


FWH 2.7 - xHARBOUR WorkShop.Exe


Editado por - kapiaba on 10/07/2012  12:06:41




id=quote>id=quote>
Kapiaba


Nao sei se vc leu o tópico mas estava funcionando perfeitamente e do nada começou a apresentar problemas neste sentido


e ai emiti uma p. efeito de testes e somente p. isso foi feita a tentativa de envio de carta de correção e tudo isso em modo de homologação q. ao meu ver deveria autorizar!!! mas tranquilo


Ja ajudou bastante


Marcelo Ferro


Petrópolis - Rj


Fwh9.01/xHarbour 1.1.0 Simplex /SqlLib /xMate/WS e Pelles


marca.jpg



			
		


		
			

				
					
						

	
	
		

			
				
				

					
				

			
			
			
		

	


					
				
				
			

		

		
			

		
	


	

	





	
Link to comment

	
		
	
	
	

	
	
Share on other sites

	

	


	

	

	




	



					
						
    
							
							
								
  • 
									3 months later...
								
    • 
							
						

					
					
					
				

					

					
					






	

	

	

		

			

				


	
		kapiaba
	

				
				
					
						
Enthusiast
					
				
			

		

		

			

				


kapiaba
			

			

				Posted 
				
			

		

	

	
	

		




	

		

			

				
    
					
						
  • Author
    • 
					
					
					
					
					
				

			

			
		


		

			Posted 
			
			
				
				
			
		

	


	

    

	

		
		

			

Para Lucas da Fenicia:


fenicia@feniciatapetes.com.br


http://www.fivewin.com.br/forum/topic.asp?TOPIC_ID=21365


Poste sua dúvida direto no post Lucas:


Neste ou em:


http://www.fivewin.com.br/forum/topic.asp?TOPIC_ID=20157


Abs,


João Santos - São Paulo.


joao@pleno.com.br


Fone: (11) 3106-2832 / 5150-7341 - TIM


https://www.facebook.com/kapiaba


FWH 2.7 - xHARBOUR WorkShop.Exe



			
		


		
			

				
					
						

	
	
		

			
				
				

					
				

			
			
			
		

	


					
				
				
			

		

		
			

		
	


	

	





	
Link to comment

	
		
	
	
	

	
	
Share on other sites

	

	


	

	

	




	



					
					
					
				
			
			



		

	


	
	
	
	
	
		
	

			
				
				

	
		

			
Join the conversation

			

	
				
					You can post now and register later.
				
				If you have an account, sign in now to post with your account.
				
			

	
		

	




	
	
		
	
		
	
		
	
	
		
		
	
	

		

		


	
		Guest
	


		

			
				
					
				
					
						
    
							
  • 
								


	
	
	
	

								
							
    • 
						

					
				
					
				
			
			
				
					
						
							
						
						



    

		
		

			
		

		
			
 Reply to this topic...

		
		

			

				
					×
					  Pasted as rich text.   Paste as plain text instead
				
			

		

		

			

				  Only 75 emoji are allowed.
			

		

		

			

				×
				  Your link has been automatically embedded.   Display as a link instead
			

		

		

			

			

		

		

			

				×
				  Your previous content has been restored.   Clear editor
			

		

		

			

				×
				  You cannot paste images directly. Upload or insert images from URL.
			

		

		


	

		

			
			

				Loading...
			

		
		
	



	

	

		

			×
			
		

		

	



						
					
				
					
				
					
				
			
			
    
				
					
						
					
						
					
						
							
  • 
								

    
	

    
								
							
    • 
						
					
				
				
					
  • 

	

    • 
				
			

		

	



			
		

	

	
		

			

				
					


    
          Share
    

    

        
        
            

            
        
    


				
				
                

                




				
			

		

	







	

		
			
				Go to topic listing
			
		
	

	




						


					

					


					

				

			

			
		

		
		


	

		×
		

			
				

					
				

			

			

			

			
		

	






	

		×
		

			
    
				
  • Create New...
    •