Agnaldo Prates

Obrigado pessoal pelo feedback.

Pessoal não sei se corrige, modifiquei as seguintes linhas. Antes: if (EscECFResposta = Registrador) and (StringToFloatDef(EscECFResposta[i+1],0) = Aliq) then begin Result := RoundTo( StrToFloatDef(EscECFResposta[ I+2 ],0)/100, -2); Break; end ; Depois: if (EscECFResposta.Params = Registrador) and (StringToFloatDef(EscECFResposta.Params[i+1],0) = Aliq) then begin Result := RoundTo( StrToFloatDef(EscECFResposta.Params[ I+2 ],0)/100, -2); Break; end ; Abraço pessoal.

Bom dia pessoal. Hoje, atualizei o ACBr, porem ao recomplila-lo o mesmo apresentou o seguinte erro: Build [Hint] ACBrECFEscECF.pas(1239): Value assigned to 'TACBrECFEscECF.GetEstado' never used [Error] ACBrECFEscECF.pas(2236): Class does not have a default property [Error] ACBrECFEscECF.pas(2237): Class does not have a default property [Error] ACBrECFEscECF.pas(2237): Operator not applicable to this operand type Alguem deparou com o mesmo problema? Removi toda a pasta e baixe novamente, mas o erro persiste. Atenciosamente, Prates, Agnaldo.

Eu utilizei por vários anos a cobrança simples do BB, porem a carteira era a 18-19, ou seja: Carteira 18 variação 19. Esta situação em que o dinheiro some é prática do BB, casas lotericas, postos de atendimento etc. Um colega que trabalhou em um posto de atendimento do BDsco, confidenciou-me que, se na hora de transmitir a transação ocorrer algum tido de erro, o sistema autentica o pagamento e o dinheiro não vai para a conta destino, fica sobrando no final do dia no banco, o mesmo acontecendo com os demais. Se você não levar o comprovante ao banco, não receberá seu crédito. Abraço.

É pessoal, a coisa é complexa. A meu ver, o DANFE num futuro próximo deverá ser lido exclusivamente com LUPA, não me surpreenderei se doravante obrigarem a sua impressão para cada item constante na nota. Nem vou falar do CF.

Resolvido. Problema, no form estava o componente, removi e o criei em tempo de execução.

Bom dia pessoal. Neste tópico, eu relatei sobre a importação da NFe do site da receita, pois bem, debugando o código observei um detalhe: Ao chamar o método Notasficais.clear na primeira vez, o código não é aberto, na segunda vez, o método cai justamente no Destroy. destructor NotaFiscal.Destroy; begin FNFe.Free; inherited Destroy; end; Alguém já deparou com este detalhe? Abraço a todos.

Oi Juliomar, sim alguns recebem outros não, então tive que encontrar uma solução. DM.NfeData.NotasFiscais.Clear; Antes de alimentá-lo. A primeira vez, como eu disse no inicio, funciona 100%, porém na segunda, nada. Já procurei em todo código mas até agora não consegui encontrar o que pode ser. Abraço.

Sim, no meu sistema eu importo através da consulta da nota completa. Gero o XML e alimento o componente ACBrNFe.

Olá pessoal, boa tarde. Não sei se alguém já deparou com a seguinte situação. Ao importar o arquivo físico XML da NF-e, importa sem problemas, quantos necessário for. Porém, se a operação ocorrer da importação do site da receita, a primeira vez importa perfeitamente, entretanto se, escolher um arquivo ou mesmo tentar importar via site, ocorre o seguinte erro: List index out of bounds (0). Neste ponto já debuguei todo o meu código mas não consegui encontrar o erro. Eu gostaria de saber se algum dos amigos deparou em algum momento com esta situação. Abraço a todos.

netsolutions, dê uma olhada neste http://www.lefisc.com.br/materias/2008/122008piscofins.asp, possivelmente você vai encontrar alguma resposta para sua dúvida. A princípio a CST seria 06, mas confira se o produto desejado realmente enquadra na lista. Espero que lhe ajude. Abraço.

Valeu isaque. Entendo que não é muito fácil disponibilizar algo tão útil a muitos, entretanto é importante que deste trabalho venha algum reconhecimento. É certo que hoje na comunidade delphi, não há nenhum outro projeto tão importante quanto ao ACBr. Entendo ainda que, já deveríamos, nós usuários, encontrarmos um meio de disponibilizar algum tempo para ajuda. Falo por mim, as vezes tento fazer algo mas como é um projeto em especial de grande abrangência, fico meio inibido de oferecer algum tipo de recurso, tendo em vista que, a claridade do código é indiscutível, e, em muitos casos vejo que meu código ainda precisa ser melhorado em alguns aspectos, visto que, como sou o único desenvolvedor, muitas vezes tenho que criar algum tipo de artifício para que funcione adequadamente atendendo minhas necessidades. Por fim, espero ainda ver este projeto recebendo prêmios, oferecidos principalmente por parte do estado, que, muitas vezes não tem ideia do quanto penamos para adequar nossas aplicações às suas exigências. A todos os idealizadores, meu respeito e reconhecimento, salve!

Isaque, boa noite. Somente hoje consegui um tempo para testar a função LocalizaRegistro no cadastro de participantes. Posso lhe dizer que ficou show de bola, pois alem do documento oficial, há ainda a sequencia da estrutura daqueles que utilizam o mesmo cadastro para fornecedores e clientes. Parabéns, a função ficou extraordinária. Aproveitando o post, encontrei as funções StrToCodVer e CodVerToStr na unit ACBrEPCBlocos, pela simplicidade e utilidade, eu diria que resolve muitos IF then else etc em nosso código. Iniciativa louvável. Ao compliar o meu projeto SpedFiscal, já senti falta da mesma também neste módulo, uma vez que existe o tipo TACBrVersaoLeiaute = TACBrCodVer. Todavia são módulos diferentes que retornam versões diferentes. Então, já pedindo as devidas autorizações, inseri tambem no módulo ACBrEFDBlocos.pas tais funções, que segue em anexo para vossa avaliação. Se eu estiver fazendo besteira, desconsidere este post. Um forte abraço. ACBrEFDBlocos.pas

Obrigado Isaque. Vou testar e retornarei. Abraço.

Seguem os arquivos. ACBrEFDBloco_0.pas ACBrEPCBloco_0.pas

Isaque, boa tarde. Depois de algum tempo sem participar do fórum, venho antes de tudo agradecer a toda comunidade que participa deste belíssimo projeto, principalmente a você que o idealizou bem como o disponibilizou. Parabéns! Durante meus testes e desenvolvimento, tive a seguinte necessidade. Dentro do registro0150, tabela de participantes, no SPED há a função LocalizaRegistro(pCod_part). Função extremamente útil em meu dia-a-dia. Senti falta da mesma no SPED PIS/COFINS, implementei-a, de maneira que, ao invés do código do participante, a busca é feira pelo CNPJ ou CPF, alterei então a função do SPED Fiscal, para também buscar este documento, no caso pCGCJ_CPF. Esta idéia surgiu quando em alguns testes, observei participantes duplicados no EFD, tendo em vista que uso duas tabelas, clientes e fornecedores, o código obviamente irá repetir. Então, com todo respeito e reverencia ao projeto, o que você acha desta busca ser pelo numero do documento do participante? Segue: function TRegistro0150List.LocalizaRegistro(pCGC_CPF: String): boolean; var intFor: integer; begin Result := false; for intFor := 0 to Self.Count - 1 do begin IF Length(pCGC_CPF)>11 then begin if Self.Items[intFor].CNPJ = pCGC_CPF then begin Result := true; Break; end; End else begin if Self.Items[intFor].CPF = pCGC_CPF then begin Result := true; Break; end; End; end; end; Abraço.

Pessoal bom dia. Já resolvi o problema. Agradeço a todos pela atenção. Não sei bem o que houve, o AcBr estava sim atualizado. Testei no meu sistema que é denominado, SAVE. Ao testar também no ECFTeste ocorreu o mesmo erro. Resolição. Removi a pasta do ACBr e baixei novamente. Recompliei e tudo foi resolvido. Possivelmente havia algum erro na pasta, pois depois de re-instalada funcionou corretamente. Abraço a todos.

Nada em vermelho, amarelo etc. Vou apagar tudo o projeto e baixá-lo novamente. Obrigado antes de tudo.

Parabéns Daniel! Isso mostra que com toda certeza você estava certo ao lançar um projeto de tão relevante importância para todos os desenvolvedores de aplicações comerciais. Agora só falta o governo entender também, que, somos parte também do desenvolvimento do nosso país. A todos meus parabéns, aos idealizadores toda reverencia. Tenho dito!

Conforme solicitado, segue em anexo o acbrlog.txt. acbrlog.txt

Pessoal, bom dia. Atualizei o AcBr, porem agora quando vou abrir um cupom fiscal, ocorre o seguinte erro: Decrição => Access violation at address 0062D99F in module 'SAVE.exe'. Read of address 00000190. Recompilei todo o pacote mas nada. Depurei o componente e, observei que ao enviar o comando #0 ocorre o erro. No ECFTeste ocorre esse erro: Ativar - + - + - + - + - + - + - + - + - + - + - + - Access violation at address 004A2493 in module 'ECFTeste.exe'. Read of address 00000190 #2#1#7#0 - + - + - + - + - + - + - + - + - + - + - + - Alguem ja teve esse problema? Abraço a todos.

Amigão, instalei tambem uma versão do Fortes que deu pau, dai eu tinha a versão 0.6 que funciona legal. Removei a recem instalada e instalei a antiga. Funcionou sem problemas.

Bom dia Pessoal. Estou com a seguinte situação, não sei se vocês já passaram por alguma assim. Tenho um cliente que é uma distribuidora e, esta recebe a mercadoria em quilos, beneficia e vende em fardos, até ai tudo bem, o que está me intrigando é o seguinte. Na hora de gerar o sped devo utilizar o fator de conversão Registro 0200? Se as entradas são em quilos, ex: 2.400kg e as saidas em fardos 200FD de 12 quilos, como proceder nesses casos? Ja tentei encontrar uma saida aqui mas não consegui, por isso venho mais uma vez pedir a ajuda dos amigos de forum. Abraço a todos.

Valeu André, muito obrigado.

Olá pessoal, bom dia. Estou com uma dúvida no seguinte item. Um cliente deseja fazer uma devolução de mercadoria com cst200. Olhei o manual de integração mas não encontrei algo que fizesse referencia a este cst, alguem já deparou com essa situação? Abraço.