Agnaldo Prates

Atualizado, recompilado e funcionando Isaque.

Estranho, nesta mesma linha aqui está DFill e não VDFill

Bom dia. Não tenha dúvida disso quanto à falha na banlança. Eu costumo dizer que as vezes a máquina quer ganhar da lógica mas, não é possível. Eu tive que fazer exatamente isso, "Ler o peso e guardar" "Ler o peso e guardar" "Ler o peso e comparar" se tudo conferiu, segue, sentão, "... E la vamos nós, ler peso" . Conforme você mesmo disse, com outro componente acontecia o mesmo, então esta é a confirmação que há algo errado com a balança ou mesmo com a serial do micro. Abraço.

Esperimentou debugar a Unit ACBrBancoBradesco.pas para saber o que ela está fazendo? Atenção especial para a linha 154 desta unit. Comparar com o Layout forneceido pelo banco, mas o bom mesmo é pegar um arquivo gerado pelo sistema do banco e comparar ao que você está gerando. Diante das diferenças é só corrigir.

Já deu uma conferida se no Rps estão informados os valores? Parece besteira mas, em alguns casos isso pode ocorrer. Por aqui está 100% e a maioria das empresas que trabalho são do SN. Abraço.

Af! mal acaba um e começa outra. Isaque, pela minha visão os futuros ERPs dispensarão os softwares de contabilidade e curto prazo. Já dispõem de grande parte das obrigações fiscais, agora, só falta mesmo taxar. "Erp agora deverá dispor das exisgencias estatais". Pronto, falta apenas isso para matar o software contábil. É realmente uma pena, mas, as inovações fazem parte de toda evolução. Abraço.

Testa este demo + modificações no ACBrBancoBrasil.pas. ACBrBancoBrasil.pas AcbrtBoletoDemo.rar

Boa noite. Enquanto não houver seriedade nas ações das empresas bancárias teremos todos os problemas inimaginaáveis. Imagine que, justamente no arquivo de retorno, "Registro Detalhe de Arquivo-Retorno" posição 147 a 152 fala justamente do vencimento, entrentanto, este valor está setado como : 000000. É lamentável o que os bancos fazem conosco. Mas isso está disposto para Pos7. Já, o layout cb240 disponível em http://www14.bancobrasil.com.br/office/plugins/clt/Layout/Arquivo_Retorno.htm tambem fala em vencimento, mas não me dei ao trabalho de testar, afinal, não podemos confiar nos layouts. Tive recentemente uma discussão com o pessoal do Bancoob justamente sobre isso. neste topico Os bancos fazem o que querem, afinal, o que resolve tudo neste país é dinheiro fácil. Bancos estão acima da lei em se tratando de respeito, tanto ao cliente quanto aos que dos seus serviços necessitam. Fonte: http://www.bb.com.br/docs/pub/emp/empl/dwn/Doc2628CBR643Pos7.pdf é importante ressaltar que, Pos6 não existe então deverá ser ao invés de LerRetorno400Pos6 usar a LerRetorno400Pos7 e torcer para que funcione. Abraço.

Andando pala net encontrei isso http://www.forumweb.com.br/foruns/topic/78912-sped-fiscal/. Estas pessoas e outras mais que estão mantendo o projeto ACBr são dignas de premios. Cinco anos de trabalho dedicado a ajudar a todos de forma direta e indireta. Se mencionar nomes aqui cometerei certamente alguma injustiça, portanto, meu muito obrigado a todos vocês. Ai está um exemplo de como se constroi um país, são as pessoas capazes como vocês que devem estar na frente de projetos especiais e não um bando de puxa-sacos ligados ao poder plítico somente pelo poder. Se os governantes do Brasil seguissem a metotologia do ACBr com certeza este país seria um paraíso. Abraço pessoal.

Acredito ser pertinente a alteração da quantidade para Double devido a, serviços que utilizem horas, como hora-maquina etc.

Este erro ocorre provavelmente porque você está tentando imprimir um Rps, e, nele ainda não existe o numero da nota. Sugiro aos mantenedores a seguinte alteração na Unit ACBrNFSeDANFSeRLRetrato.pas. if FNFSe.Numero <> '' then rllNumNF0Ent.Caption := FormatFloat('00000000000', StrToFloat(FNFSe.Numero)) Else rllNumNF0Ent.Caption := '00000000000' ; Resolve o problema de quem deseja imprimir o Rps. Abraço.

Realmente Dércio, o prazo é de 24hs conforme estabelece o inciso IV do Ajuste SINIEF Nº 5 DE 21/03/2014. "IV - efetuar geração prévia do documento fiscal eletrônico em contingência e autorização posterior, com prazo máximo de envio de até 24 (vinte e quatro) horas, conforme definições constantes no "Manual de Orientação do Contribuinte"."; As regras existem porem nem mesmo o estado é capaz de cumpri-las. Abraço;

ACBrProvedorGinfesV3.pas está na pasta Fontes\ACBrNFSe. Verifique se está no Library Path.

XML e Danfe errados. O desconto que o indivíduo usou foi 17,73 e nçao 17,71, usou a base de cálculo subtaindo o desconto de 17,73 o que deveria ser de 17,71. O pior é que o contador tambem não viu. Agora alem desenvolver a gente tambem deve conferir notas de clientes? Para que serve então o contador? Abraço pessoal.

Pessoal boa noite. Hoje me deparei com a seguinte situação. Um cliente me ligou informando que havia uma diferença de 0,02 centavos em uma nota no SpedFiscal. Peguei o XML e observei que: A base de Cáuculo está menor conforme segue: Produto: Custo = 14,76 Quantidade = 12 Subtotal = 177,12. Desconto = 17,71. Aliquota = 7% A base de cálculo não seria: ( 177,12 - 17,71) = ( (159,41 * 7) / 100 ) = 11,1587. Ocorre que a Base de cálculo está 159,39. Que coisa é essa? Alguem já teve esse problema? Grato.

É importante ter, alem da certeza algo documentado pela SEFAZ para que, em havendo necessidade utiliza-lo. Sabemos como as coisas no Brasil ocorrem. É melhor ter uma resposa deles do que dormir na dúvida. No meu caso eu tenho a resposa gravada no email para sanar futuras dúvidas.

Em conversa com o pessoal da SEFAZ/AM, eles me informaram que, deverá utilizar sim uma série para cada PDV, porem não mensionaram sobre a questão de limites. Acredito que possa ser de 1 a 999. Abraço.

Bom dia. Dê uma olhada se você não está enviando o pagamento duas vezes. - 18:05:03:792 EfetuaPagamento( 1 , 20 , , 0, 0 ) TX -> {21;PagaCupom;CodMeioPagamento=1 Valor=20;41} 18:05:04:132 RX <- {21;0;;6} -- 18:05:04:132 NumCupom TX -> {22;LeInteiro;NomeInteiro="COO";31} 18:05:04:252 RX <- {22;0;ValorInteiro=26317;24} -- 18:05:04:252 EfetuaPagamento( 1 , 20 , , 0, 0 ) Abraço.

Bom dia. Provavelmente você está tentando imprimir um RPS, certo?: Se for, a linha 278 da unit AcBrDANFSeRLRetrato.pas está assim: rllNumNF0.Caption := {FormatDateTime('yyyy', FNFSe.DataEmissao)+} FormatFloat('00000000000', StrToFloat(FNFSe.Numero)); Contudo, o FormatFloat está tentando fazer numerico um dato nulo, então, sugiro aos moderadores coloca uma condição antes da linha informada: if FNFSe.Numero='' then FNFSe.Numero:='0'; rllNumNF0.Caption := {FormatDateTime('yyyy', FNFSe.DataEmissao)+} FormatFloat('00000000000', StrToFloat(FNFSe.Numero)); Abraço.

Bom dia Patrick. Muito obrigado por disponibilizar esta solução. Parabéns!

Unica alternativa que encontrei. Var cDescri:String; . . cDescri:=''; While Not TbItens.eof do begin if cDescri<>'' then cDescri:= cDescri + ', '; cDescri:= cDescri + TbItensDescricao.Value; TbItens.Next; End; ItemServico.Discriminacao := Descri; Esta é uma solução POG.

Baixei todo pacote novamente mas o erro ainda persiste. Vou ter que vericiar com mais tempo.

Sim recompilei todo o pacote, instalei tudo novamente. Ai começou dar erro, achei bastante estranho. Quanto a setar o .fr3, eu fazia isso sempre. Bom, agora removi todos novamente, vou recompilar e testar. Em breve um feedback.

Dê uma olhada neste link, possivelmete vai encontrar algo. http://www.btframework.com/download.htm

Bom dia Juliomar. Correto ví realmente no outro tópico, porem, há alguma coisa estranha pois, antes eu setava o DANFS.fr3 sem problemas, somente depois que atualizei é que começou a ocorrer estes problemas. Lembrando que, estando dentro de um projeto, ao abrir a unit de quaisquer dos geradores , Fast, Qr e Fortes há um erro que congela toda IDE. Isso está ocorrendo frequentemente, vou ter que tentar encontrar o que pode ser. Ex: ACBrNFSeDANFSeRL.pas ACBrNFSeDANFSeRLClass.pas ACBrNFSeDANFSeRLRetrato.pas Abraço.