[Nosso Número Sicredi - Ler Retorno 240]

Olá pessoal....conforme relatado no ano passado, sobre a leitura do nosso número do sicredi com 9 posições no processamento de retorno de 240 posições.

Na época foi ajustado a leitura para quem trabalha com 9 posições do nosso número, mas recentemente no dia 09/03/2020 foi revertido a alteração fixando em ler 8 posições impossibilitando meus clientes de ler os retornos de 240 posições.

É possível ajustar novamente para ler as 9 posições usando a propriedade "TamanhoMaximoNossoNum" ou 20 posições conforme o manual do sicredi.

 

[acbrinstall erro ao compilar ACBr_NFSeDanfseFR]

 

1 minuto atrás, BigWings disse:

Você tem mais de uma versão do Delphi na mesma máquina?

Tenho sim

[acbrinstall erro ao compilar ACBr_NFSeDanfseFR]

Bom dia,

Está instalando agora, mas ao abrir o delphi está gerando a exceção:

Registration procedure, Acbrnfsedanfsefrreg.Register in package D:\Componentes\DXE5\Acbr\Lib\Delphi\LibD19\Win32\DCLACBr_NFSeDanfseFR.bpl raised exception class EAccessViolation: Access violation at address 1BD88841 in module 'rtl260.bpl'. Read of address 00000010.
Do you want to attempt to load this package the next time a project is loaded?

[acbrinstall erro ao compilar ACBr_NFSeDanfseFR]

 

9 minutos atrás, Juliomar Marchetti disse:

se tu faz manual o Delphi faz isso pois deixamos um único pacote para diferentes versões do Delphi e Fast Report.

se olhar ele deve ter deixado o arquivo diferente do SVN

o instalador se dá bem com os pacotes agora o delphi faz bagunça e dai perde qualquer atualização que nós mandamos para o svn. reverte o código. sei que tem gente testando isso

Removi a pasta fonte e pacotes e puxei tudo novamente no SVN. Rodei o instalador e gerou o problema, anexei o arquivo para que possa ser olhado caso necessite.

log_Delphi_XE5_Win32.txt

[acbrinstall erro ao compilar ACBr_NFSeDanfseFR]

Consegui compilar o ACBr_NFSeDanfseFR.dpk adicionando no require do componente algumas units do FastReport:

Quando vai compilar o DCLACBr_NFSeDanfseFR.dpk continua dando a mensagem abaixo:

[dcc32 Fatal Error] pnfsConversao.pas(18709): E2411 Unit ACBrNFSeDANFSeFR in package ACBr_NFSeDanfseFR refers to unit pnfsConversao which is not found in any package.  Packaged units must refer only to packaged units

[acbrinstall erro ao compilar ACBr_NFSeDanfseFR]

1 hora atrás, Daniel Simoes disse:

Você marcou para instalar o ACBrNFSe ?

Marquei sim.

Testando aqui no Delphi 10.3 que uso para teste a instalação ocorre sem problemas. Pegando a mesma pasta e colocando para instalar no XE5 onde está dando o problema gera o erro ali acima.

Agora coloquei para instalar também o NFe no XE5 e os componentes de impressão dele e não gerou nenhum problema. Está ocorrendo apenas no NFSe, vou tentar compilar manual agora.

[acbrinstall erro ao compilar ACBr_NFSeDanfseFR]

Bom dia,

Estou com o mesmo problema para instalar apenas o pacote do FastReport da NFSe. Já rodei o .bat para limpar os arquivos, baixei todo o fonte novamente e ainda não sei o que ficou de errado que não instala. Tentando abrir manualmente os pacotes e compilar também não deu certo comigo.

 

Log do instalador:

Pacote "ACBr_NFSeDanfseFR.dpk" compilado com sucesso.
Cleaning package cache for DCLACBr_NFSeDanfseFR.bpl
Cleaning ok
Compiling package D:\Componentes\DXE5\Acbr\Pacotes\Delphi\ACBrDFe\ACBrNFSe\DANFSE\Fast\DCLACBr_NFSeDanfseFR.dpk
"C:\Program Files (x86)\Embarcadero\RAD Studio\12.0\bin\dcc32.exe" "D:\Componentes\DXE5\Acbr\Pacotes\Delphi\ACBrDFe\ACBrNFSe\DANFSE\Fast\DCLACBr_NFSeDanfseFR.dpk"
Embarcadero Delphi for Win32 compiler version 26.0
Copyright (c) 1983,2013 Embarcadero Technologies, Inc.
D:\Componentes\DXE5\Acbr\Fontes\ACBrDFe\ACBrNFSe\PCNNFSe\pnfsConversao.pas(18708) Fatal: E2411 Unit ACBrNFSeDANFSeFR in package ACBr_NFSeDanfseFR refers to unit pnfsConversao which is not found in any package.  Packaged units must refer only to packaged units
Compilation failure
Erro ao compilar o pacote "DCLACBr_NFSeDanfseFR.dpk".
Abortando... Ocorreram erros na compilação dos pacotes.

[Impressão de Carta Correção]

obrigado

[Impressão de Carta Correção]

Bom dia,

Obrigado pelo ajuste.

Tem como verificar para mim a função "TACBrNFe.EnviarEmailEvento"?

Ela chama a função GravarStream(StreamNFe); que gera novamente o xml do evento e grava no strem e envia ele:

Citar

EnviarEmail(sPara, sAssunto, sMensagem, sCC, AnexosEmail, StreamNFe, '', sReplyTo);

o problema é que no email não está chegando com a extenção .xml

Obrigado

[Impressão de Carta Correção]

Boa tarde,

Estava tentando imprimir uma CCe porém não estava lendo o ID do xml que compõe o nome do arquivo. Eu alterei no aquivo .pas na função "ImprimirEVENTOPDF" para pegar o "DANFEClassOwner.NomeDocumento" se estiver preenchido.

Obrigado

Att., Haroldo

ACBrNFeDANFEFRDM.pas 51200302219637000107550010000184611430029186-7-cce.xml

[Atualização XML envio Centi]

Anexado

pnfsNFSeW_ABRASFv2.pas

[NFSe Dados do Tomador na Impressão]

Boa tarde,

Isso mesmo, os dados do prestador são retornados parcialmente e acaba que o cliente quer que saia todas as informações do Prestador.

Obrigado

[Atualização XML envio Centi]

Ainda estou aguardando o retorno deles sobre o que vai ser feito.

Atualizei o componente e fui enviar uma NFSe da Centi e deu erro na validação do esquemas. Antes disso eu tinha atualizado o schemas que foi atualizado no fonte.

Anexado a alteração feita pra validar o esquemas e enviar a nfse.

pnfsNFSeW_ABRASFv2.pas.patch

[NFSe Dados do Tomador na Impressão]

Tem alguns provedores que não retorna os dados do tomador e gerando a impressão em branco de alguns dados. Anteriormente eu tinha feito algo específico para eu resolver esse problema devido que ao procurar no componente tem muitos dados do tomador em várias partes.

Estou sugerindo colocar os outros dados do comandor dentro da classe TEmitenteConfNFSe.

Anexei os arquivos para que possam ser verificados.

 

Obrigado

Att., Haroldo

ACBrNFSeConfiguracoes.pas ACBrNFSeDANFSeFR.pas DadosEmitente.patch

[Carregar certificado pelo Nome]

Vou utilizar sugestão e fazer por fora, vai ficar até melhor. Obrigado

[Carregar certificado pelo Nome]

Obrigado

[Carregar certificado pelo Nome]

Olá bom dia,

Utilizamos por enquanto outro componente de emissão que está no nosso emissor que utiliza capicom e o certificado é carregado através da string do nome dele.

Estamos emitindo NFSe e fiz a implementação apenas para o capicom.

Gostaria de saber se tem a possibilidade de adicionar ao versionamento.

 

Obrigado

Att., Haroldo

ACBrDFe.patch ACBrDFeCapicom.pas ACBrDFeConfiguracoes.pas ACBrDFeSSL.pas

[Atualização XML envio Centi]

Boa tarde,

Ao enviar umas notas para o provedor Centi o retorno veio faltando o Valor do Iss no retorno.

Após isso solicitei o modelo do xml de envio e o suporte me enviou os dois aquivos anexados.

Estou postando para que possa ser visto posteriormente.

XML_ENVIO.XML XML_RETORNO.XML

[Fuso Horário no Envio de Evento]

Não vou consegui fazer o teste nesse momento usando o -03 para MT. Assim que eu resolver os problemas aqui eu testo e mando a resposta.

Obrigado

[Fuso Horário no Envio de Evento]

Como havia escrito no inicio da postagem, Barra do Garças do Estado do Mato Grosso está seguindo o fuso de -03:00. Só estou falando como é o horário da cidade, sei perfeitamente que o horário de MT normal é -04:00 por isso já informei no inicio da postagem que aqui na cidade o fuso-horário é diferente.

Obrigado pelo retorno, acredito que possa ser fechado a tarefa que postei de forma errada.

[Fuso Horário no Envio de Evento]

Mas o envio está com o fuso certo, acredito que seja algo da sefaz mesmo.

[Fuso Horário no Envio de Evento]

Pode fechar a postagem então, mas o problema que fica é esse que estou tentando explicar.

NFe não valida se o horário está atrazo ou não na hora do envio então o que foi feito:

Envio NFe: <dhEmi>2019-10-18T15:03:38-03:00</dhEmi>

Retorno NFe: <dhRecbto>2019-10-18T15:05:56-04:00</dhRecbto>

CCe Retorno: <dhRegEvento>2019-10-18T15:17:24-04:00</dhRegEvento> <- aqui acredito que tenha na hora do envio ido com -03

Rejeicao: A data do evento nao pode ser menor que a data de autorizacao para NF-e nao emitida em contingencia

 

2019-10-18-15-05-52-51191002219637000107550010000184501758813924-env-sinc-lot.xml 2019-10-18-15-05-59-51191002219637000107550010000184501758813924-env-sinc-ret.xml 2019-10-18-15-17-28-511910022196370001075500100001845017588139241-cce-ret.xml

[Fuso Horário no Envio de Evento]

Descobri o que ocorre mas não sei ainda como resolver.

Ocorre apenas na primeira execução do método. É porque eu preencho o evento e salvo o xml antes de enviar e nesse xml estava com o fuso horário errado, mas agora colocando o break point onde gera o xml e na função do retorno encontrei o problema.

Quando mando gerar o xml pelo comando: ACBrNFe.EventoNFe.GerarXML quando entra na função GetUTC o ModoDeteccao está marcado como tzSistema. Dessa forma eu estava salvando o xml pegando pela propriedade EventoNFe.Gerador.ArquivoFormatoXML;

 

Quando chega no método AcbrNFe.EnviarEvento é gerado novamente o xml, mas agora pega a configuração do fuso que fiz no componente.

 

Mas se ai você mandar novamente enviar o evento e na hora de usar o EventoNFe.GerarXML já pega o fuso configurado manual. Pelo que eu entendi apenas na primeira execução do GetUTC ignora o fuso que está configurado manual.

 

         EventoNFe.Evento.Clear;
         with EventoNFe.Evento.New do
         begin
            infEvento.chNFe := Chave;
            infEvento.CNPJ := FEmpresa.CNPJ;
            infEvento.dhEvento := DataHora;
            infEvento.tpEvento := teCCe;
            infEvento.nSeqEvento := seq;
            infEvento.detEvento.xCorrecao := Correcao;

         end;

         ACBrNFe.EventoNFe.GerarXML;
         FuncACBr.SalvarLog( EventoNFe.Gerador.ArquivoFormatoXML, SUFIXO_XML_CCE);

         EnviarEvento(seq);

        

[Fuso Horário no Envio de Evento]

Vou debugar e analisar aqui melhor.

[Fuso Horário no Envio de Evento]

Boa tade,

Configurei como:

with Configuracoes.WebServices do
 begin
        TimeZoneConf.ModoDeteccao := TTimeZoneModoDeteccao.tzManual;
         TimeZoneConf.TimeZoneStr := '-03:00';

end;

Analisei a função GetUTC ela pega o fuso horário relativo a hora atual do computador. No meu caso eu precisaria que fosse passado a configuração manual no envento assim como é feito na hora de colocar o fuso horário na hora de enviar a nota para a sefaz.