Dangelo2010

Bom dia! Alquem esta conseguindo validar nota em modo de homologação, pois não estou, e o engraçado e que em outra maquina com o mesmo win 7 eu consigo e somente em uma maquina não consigo...

Acho que seria melhor criar um string onde cada um pudesse passar o valor que quiser sem ficar amarrado em ter que ficar atualizando versões, ai cada um cria em seu sistema a ultima versão utilizada e assim e so fazer as mudancas no sistema. Abraço

Está Funcionando..... Agora só falta a consulta que não funciona....

Está Funcionando..... Agora só falta a consulta que não funciona....

Bom dia Italo, Eu tambem não entendi não, mais se não comentar a linha da erro E160 - Arquivo em desacordo com o schema XML Se comenta funciona normalmente, achei estranho isso acontecer, mais toda vez que atualizo temos que ir nessa linha e comentar ela.

Constantemente tenho esse problema ao atualizar os meus fontes, quase toda vez tenho que vim e comentar essa linha, na verdade não sei porque ainda não foi retirado esse teste, já que não e necessário para prefeitura de Goiânia e também a unit e única e exclusiva para a prefeitura de Goiânia.

Bom dia! Estou com esse mesmo erro "Arquivo em desacordo com o schema XML" so que quando vou fazer uma consulta por rps alquem tem esse mesmo problema e pode mim ajudar?

Tambem estou com o mesmo problema

Aproveitando estou com o sequinte erro na hora de instalar o pacote ACBr_BoletoFC_Fortes

Opa! Mim desculpe Obrigado!

Já fiz isso 2 vezes hoje

Boa Tarde! Estou com um erro ao Imprimir Pelo Fortes Report a NFSe conforme imagem. Já Exclui Todos os Arquivos necessários referente ao ACBr e também baixei tudo novamente e mesmo assim continua o erro.

Mim desculpe Italo, mais antes de você responder no outro topico eu ja tinha criado esse, no entanto foi aconselhado a criar esse topico

Uso Capicom

Estou testando a versao 3.1 porem no proprio demo do acbr esta mim dando um erro Versão Layout : 3.10 Ambiente : 2 Versão Aplicativo : GO3.0 Status Código : 999 Status Descrição : Rejeição: Erro não catalogado UF : GO Recibo : Recebimento : 04/03/2015 09:38:22 Tempo Médio : 0

OK

Obrigado! Tiago Ravache Estou testando a versao 3.1 porem no proprio demo do acbr esta mim dando um erro Versão Layout : 3.10 Ambiente : 2 Versão Aplicativo : GO3.0 Status Código : 999 Status Descrição : Rejeição: Erro não catalogado UF : GO Recibo : Recebimento : 04/03/2015 09:38:22 Tempo Médio : 0

Mim Desculpe mais qual a diferença da VersaoDF --> ve300 e ve310?

Obrigado Amigo Consequi Resolver No Final do Código antes de gerar o Txt eu coloquei with ACBrSPEDContabil1 do begin DT_INI := StrToDate('01/12/2013'); DT_FIN := StrToDate('31/12/2013'); end;

tudo e antes de gerar o txt

Não tem como passar para depois de gerar o txt, pois e tudo por parâmetros, estou passando dessa forma Begin // REGISTRO J TSISPEDContabil.Bloco_J.LimpaRegistros; vACBR := TACBrSPED.create; vACBR.DT_INI := EDataInicial.Date; vACBR.DT_FIN := EDataFinal.Date; lblTexto.Caption := 'Registro J'; lblTexto.Refresh; With TSISPEDContabil.Bloco_J Do Begin lblTexto.Caption := 'Registro J001'; lblTexto.Refresh; With RegistroJ001 Do Begin IND_DAD := 0; lblTexto.Caption := 'Registro J005'; lblTexto.Refresh; With RegistroJ005.New Do Begin // 2 DT_INI := EDataInicial.Date; DT_FIN := EDataFinal.Date; ID_DEM := 1;

Bom dia! Estou com um Problema ao Gerar o txt do Registro J100, o Erro e por causa do novo layout, que exige alguns campos a mais no arquivo, que pelo o que vi isso acontece apartir da data 01/01/2013, porem o registro 0000 esta correto pois a data esta sendo passada corretamente porem o J100 esta sendo passado para uma outra data que esta na unit ACBrSped e ja ate tentei passar por parâmetro essa data porem sempre vem em branco o registro 0000 e passado pelo proprio registro TRegistro0000 = class private fDT_INI: TDateTime; /// Data inicial das informações contidas no arquivo fDT_FIN: TDateTime; /// Data final das informações contidas no arquivo fNOME: String; /// Nome empresarial do empresário ou sociedade empresária. fCNPJ: String; /// Número de inscrição do empresário ou sociedade empresária no CNPJ. porem o J100 não e assim, a DT_INI em vermelho abaixo vem da unit de cor azul, onde ja criei uma passagem de parametros para ela dessa forma em verde mais nao funcionou Var vACBR : TACBrSPED; Begin vACBR := TACBrSPED.create; vACBR.DT_INI := EDataInicial.Date; vACBR.DT_FIN := EDataFinal.Date; TACBrSPED = class(TACBrTXTClass) private FDT_INI: TDateTime; /// Data inicial das informações contidas no arquivo FDT_FIN: TDateTime; /// Data final das informações contidas no arquivo FGravado: Boolean; public property DT_INI : TDateTime read FDT_INI write FDT_INI; property DT_FIN : TDateTime read FDT_FIN write FDT_FIN; property Gravado: Boolean read FGravado write FGravado ; end; /// Layout 2 a partir da escrituração ano calendário 2013 if DT_INI >= EncodeDate(2013,01,01) then begin strRegistroJ100 := strRegistroJ100 + LFill('J100') + LFill(COD_AGL) + LFill(NIVEL_AGL) + LFill(IND_GRP_BAL, 1) + LFill(DESCR_COD_AGL) + LFill(VL_CTA, 19, 2) + LFill(IND_DC_BAL, 1) + LFill(VL_CTA_INI, 19, 2) + LFill(IND_DC_BAL_INI) + Delimitador + #13#10;

Foi feito uma mudanca sem pensar nas situações, eu lembro que pensei nisso certinho sobre o codigo fonte abaxo, so que o astrogildo fez mudancas radicais sem pensar que nem todas as prefeitura vem o valor do iss retido, alem do teste se iss retido sim ou não, pesso por gentileza a verificação e a mudanca se possivel. rllValorIssRetido.Caption := DFeUtil.FormatFloat( FNFSe.Servico.Valores.ValorIssRetido );//Astrogildo em 13/12/12 rllValorLiquido.Caption := DFeUtil.FormatFloat( FNFSe.Servico.Valores.ValorLiquidoNfse );//Astrogildo em 13/12/12 { If FNFSe.Servico.Valores.ValorIssRetido > 0 Then Begin rllValorIssRetido.Caption := DFeUtil.FormatFloat(FNFSe.Servico.Valores.ValorIssRetido); rllValorLiquido.Caption := DFeUtil.FormatFloat(FNFSe.Servico.Valores.ValorLiquidoNfse - FNFSe.Servico.Valores.ValorIssRetido); End Else Begin Case FNFSe.Servico.Valores.IssRetido Of stRetencao : Begin rllValorIssRetido.Caption := DFeUtil.FormatFloat(FNFSe.Servico.Valores.ValorIss); rllValorLiquido.Caption := DFeUtil.FormatFloat(FNFSe.Servico.Valores.ValorLiquidoNfse - FNFSe.Servico.Valores.ValorIss); End; stNormal : Begin rllValorIssRetido.Caption := DFeUtil.FormatFloat(0); rllValorLiquido.Caption := DFeUtil.FormatFloat(FNFSe.Servico.Valores.ValorLiquidoNfse); End; stSubstituicao : Begin rllValorIssRetido.Caption := DFeUtil.FormatFloat(0); rllValorLiquido.Caption := DFeUtil.FormatFloat(FNFSe.Servico.Valores.ValorLiquidoNfse); End; end; End; }

Foi feito uma mudanca sem pensar nas situações, eu lembro que pensei nisso certinho sobre o codigo fonte abaxo, so que o astrogildo fez mudancas radicais sem pensar que nem todas as prefeitura vem o valor do iss retido, pesso por gentileza a verificação e a mudanca se possivel. rllValorIssRetido.Caption := DFeUtil.FormatFloat( FNFSe.Servico.Valores.ValorIssRetido );//Astrogildo em 13/12/12 rllValorLiquido.Caption := DFeUtil.FormatFloat( FNFSe.Servico.Valores.ValorLiquidoNfse );//Astrogildo em 13/12/12 { If FNFSe.Servico.Valores.ValorIssRetido > 0 Then Begin rllValorIssRetido.Caption := DFeUtil.FormatFloat(FNFSe.Servico.Valores.ValorIssRetido); rllValorLiquido.Caption := DFeUtil.FormatFloat(FNFSe.Servico.Valores.ValorLiquidoNfse - FNFSe.Servico.Valores.ValorIssRetido); End Else Begin Case FNFSe.Servico.Valores.IssRetido Of stRetencao : Begin rllValorIssRetido.Caption := DFeUtil.FormatFloat(FNFSe.Servico.Valores.ValorIss); rllValorLiquido.Caption := DFeUtil.FormatFloat(FNFSe.Servico.Valores.ValorLiquidoNfse - FNFSe.Servico.Valores.ValorIss); End; stNormal : Begin rllValorIssRetido.Caption := DFeUtil.FormatFloat(0); rllValorLiquido.Caption := DFeUtil.FormatFloat(FNFSe.Servico.Valores.ValorLiquidoNfse); End; stSubstituicao : Begin rllValorIssRetido.Caption := DFeUtil.FormatFloat(0); rllValorLiquido.Caption := DFeUtil.FormatFloat(FNFSe.Servico.Valores.ValorLiquidoNfse); End; end; End;

Estou tento muitos problemas referente a inclusão dos Novos Códigos, então fiz algumas mudanças no meu sistema pegando os dados do município do meu cadastro de município onde lá também se encontra o código do município e também no ACBR, usando passagem de parâmetros. Por Favor se possível subir para o SVN. ACBrNFSeDANFSeClass.pas ACBrNFSeDANFSeRL.pas ACBrNFSeDANFSeRLClass.pas ACBrNFSeDANFSeRLRetrato.pas