Dalvan

Boa tarde! Achei uma tag errada na geração do SPED ECF, Registro X450. ACBrECFBloco_X_Class.pas

Boa Tarde ! Fiz alguns ajustes referente ao layout 5.00 do SPED ECF , para ano calendário 2018 e 2019. Implementado também os novos registro K915 e K935. Arquivo em anexo. Att. Dalvan ACBrSPEDECF_Versao500.zip

Muito obrigado pela resposta, entendido !

Bom dia. Sugiro uma alteração na função "GerarChaveReinf" referente a informação do CNPJ Base na Inscrição do Contribuinte. Segue em anexo a alteração. Att. Dalvan Antunes pcnGeradorReinf.pas

Bom dia. Implementei o novo Registro 0021 no SPED ECF. Passo em anexo as alterações. Att. Dalvan Antunes ACBrSPEDECF_Novo_0021.zip

Bom dia. Implementei os ajustes no Registro J800 para layout 5, e novo Registro J801 para layout 5. Passo em anexo as alterações. Att. Dalvan Antunes Acbr_SpedContabil_J800_J801.zip

Faz um teste usando a função uses Registry procedure DefineIEVersao(Versao:Integer=11000); const REG_KEY = 'Software\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_BROWSER_EMULATION'; var Reg: TRegistry; AppName: String; begin AppName := ExtractFileName(Application.ExeName); //Versao := 11000; Reg:=nil; try Reg := TRegistry.Create(); Reg.RootKey := HKEY_CURRENT_USER; if Reg.OpenKey(REG_KEY, True) then begin if Versao = 0 then Reg.DeleteValue(AppName) else Reg.WriteInteger(AppName, Versao); Reg.CloseKey; end; except; end; if( Assigned( Reg )) then FreeAndNil(Reg); end; anter de chamar a pagina pelo TWebBrowser DefineIEVersao(8000);

Boa tarde. Baixei e fiz os testes, funcionou perfeitamente. Obrigado.

Bom dia, é que na função ProvedorToVersaoNFSe, para provedor Infisc está retornando fixo versao 1.10, e para Infisc 1.00 nas cidade como exemplo Farroupilha não entra no testa na unit ACBrNFSeWebServices, que testa versão 1.00. Att Dalvan

Boa tarde, estou fazendo os testes do provedor Infisc na cidade de Farroupilha / RS, mas não funcionou da forma esperada devido a identificação do layout do XML ( 1.00 ou 1.10 ) pela função ProvedorToVersaoNFSe. Envio as alterações necessárias para funcionamento no provedor Infisc para cidade que estão na versão 1.00. Att. Dalvan Alteracao_Infisc_Versao_XML.zip

Boa dia. Estou alterando minha aplicação para utilizar a Trunk2, mas no cancelamento da NFS-e provedor SystemPro, ocorre erro na função AssinarXML. XML Exemplo: <CancelarNfseEnvio xmlns="http://www.abrasf.org.br/nfse.xsd"> <Pedido> <InfPedidoCancelamento Id="pedidoCancelamento_908687870001096038232"> <IdentificacaoNfse> <Numero>232</Numero> <CpfCnpj> <Cnpj>90868787000109</Cnpj> </CpfCnpj> <InscricaoMunicipal>6038</InscricaoMunicipal> <CodigoMunicipio>4307005</CodigoMunicipio> </IdentificacaoNfse> <CodigoCancelamento>2</CodigoCancelamento> </InfPedidoCancelamento> </Pedido> </CancelarNfseEnvio> docElemento: Pedido></CancelarNfseEnvio Erro ocorrido: Falha ao Assinar - Cancelar NFS-e: '#$D#$A'Erro -1: Falha ao assinar o Documento Acho que o problema pode ser nos parâmetros da função AssinarXML ?

Boa tarde, desculpe por reenviar o post, cliquei em citar indevidamente. No caso da sped contábil, temos clientes com grande movimentação, que geram arquivos enormes, a função atual faz uma leitura caracter por caracter usando o TFileStream , para gerar nosso maior cliente, levou cerca de 10 minutos, somente nesse trecho, para totalizar as linhas. Fiz um teste e estou usando essa função modificada usando o TextFile que faz a leitura linha a linha. Att Dalvan

Boa Tarde, Fiz uma alteração no SPED Contábil no Registro J150: Demonstração do Resultado do Exercício, existem campos novos somente para lay-out 4.00 a partir de 2015, em anos anteriores, não deve existir os campos. Também tem uma otimização na Totalização dos Termos referente a quantidade de linhas do arquivo. Anexo alterações. acbr_SpedContabil_J150.zip

Bom dia, Vou enviar um arquivo .zip com a correção da geração do Registro0035. Att. Dalvan Antunes ACBRSPEDECF_Ajustes.zip