Claudiomir
Membros-
Total de ítens
202 -
Registro em
-
Última visita
-
Days Won
1
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Tudo que Claudiomir postou
-
QR CODE informado na NFCe
Claudiomir replied to gilfgfilho's tópico in NFC-e - Nota Fiscal do Consumidor Eletrônica
Saudações Régis Implantei as correções e ainda enfrento o problema da defasagem da hora. Sou do MT uf 51 e temos uma defasagem de uma hora com relação á Brasilia. Não consigo contato com a Sefaz daqui e o Escritório Contábil não está ciente de mudança nenhuma. Será erro meu?? Alguma idéia?? Claudiomir -
Saudações Mais uma vez, esse grupo vem em meu auxílio com a sugestão correta. | Grato, Sérgio, por sua ajuda. Foi fundamental para que eu resolvesse o problema. Claudiomir
-
Saudações Gero a nfce em tempo de homologação. Tudo lindo e maravilhoso. Mudo para produção e quando vou emitir ele me retorna o seguinte erro: Falha na validação.... Element '....inf.br/nfe} VFCPUFDEST is unexcpeted according to content model of parent element 'http://portalfiscal.inf.br/nfe}IcmsTot'. Excpeting 'http://portalfiscal.inf.br/nfe}vbcst. Dados Relacionados: Csosn : 400 uf 51 - mato grosso bloco do Imposto: with Imposto do begin // lei da transparencia nos impostos vTotTrib := Roundto((vtributo), -2); // strtofloat(fprinci.BuscaTroca(trim(Format('%15.2f', [vtributo])), ',', '.')); // banana if cfgcfgcstcson.AsInteger = 101 then ICMS.CSOSN := csosn101; if cfgcfgcstcson.AsInteger = 102 then ICMS.CSOSN := csosn102; if cfgcfgcstcson.AsInteger = 103 then ICMS.CSOSN := csosn103; if cfgcfgcstcson.AsInteger = 201 then ICMS.CSOSN := csosn201; if cfgcfgcstcson.AsInteger = 202 then ICMS.CSOSN := csosn202; if cfgcfgcstcson.AsInteger = 203 then ICMS.CSOSN := csosn203; if cfgcfgcstcson.AsInteger = 300 then ICMS.CSOSN := csosn300; if cfgcfgcstcson.AsInteger = 400 then ICMS.CSOSN := csosn400; if cfgcfgcstcson.AsInteger = 503 then ICMS.CSOSN := csosn500; if cfgcfgcstcson.AsInteger = 900 then ICMS.CSOSN := csosn900; ICMS.pCredSN := 0; ICMS.vCredICMSSN := 0; with ICMS do begin CST := cst40; end; with PIS do begin CST := pis99; end; with ICMSUFDest do begin vBCUFDest := 0.00; pFCPUFDest := 0.00; pICMSUFDest := 0.00; pICMSInter := 0.00; pICMSInterPart := 0.00; vFCPUFDest := 0.00; vICMSUFDest := 0.00; vICMSUFRemet := 0.00; end; end; total.ICMSTot.vBC := 0; total.ICMSTot.vICMS := 0; total.ICMSTot.vBCST := 0; total.ICMSTot.vST := 0; total.ICMSTot.vProd := Roundto((vtotal), -2);'.')); total.ICMSTot.vFrete := 0; total.ICMSTot.vSeg := 0; total.ICMSTot.vDesc := Roundto((qvndvnddesconto.AsFloat), -2); total.ICMSTot.vII := 0; total.ICMSTot.vIPI := 0; total.ICMSTot.vPIS := 0; total.ICMSTot.vCOFINS := 0; total.ICMSTot.vOutro := 0; total.ICMSTot.vNF := Roundto((vtotal - qvndvnddesconto.AsFloat), -2); // strtofloat total.ICMSTot.vTotTrib := Roundto((vtribaprox), -2); // strtofloat(fprinci.BuscaTroca(trim(Format('%15.2f', [vtribaprox])), ',', '.')); // partilha do icms e fundo de probreza total.ICMSTot.vFCPUFDest := 0.00; total.ICMSTot.vICMSUFDest := 0.00; total.ICMSTot.vICMSUFRemet := 0.00; Qualquer idéia é muito bem vinda. Claudiomir
-
AcbrBoleto Error reading frxPDFExport.DataOnly: Property DataOnly does not exist
um tópico no fórum postou Claudiomir ACBrBoleto
Saudações. Acusa um erro na emissão de boletos. “Error reading frxPDFExport.DataOnly: Property DataOnly does not exist". Segui a orientação que consta aqui no fórum no link: http://www.projetoacbr.com.br/forum/topic/6262-acbrboleto-com-fastreport/?page=2 do usuário haroldogb. Corrigi, reinstalei o pacote, tudo ok. Quando abro meu projeto e compilo o delphi acusa : [DCC Fatal Error] posirelo.dpr(408): F1026 File not found: 'ACBrBoletoFCFR.dcu' No entanto, verificando na pasta C:\componentes2010\Acbr - Trunk2\Fontes\ACBrBoleto\FC\Fast os dois arquivos .dcu estão lá. Criados, com a data de hoje. Eu fiquei sem entender o que estou fazendo errado. Qualquer idéia é muito bem vinda. Claudiomir -
QR CODE informado na NFCe
Claudiomir replied to gilfgfilho's tópico in NFC-e - Nota Fiscal do Consumidor Eletrônica
Saudações a Todos Situação Resolvida. O Escritório Contábil gerou o csc no modo produção e eu estava testando no modo homologação. Gerado novo csc e funcionou de primeira. Grato por vosso auxílio, Claudiomir -
QR CODE informado na NFCe
Claudiomir replied to gilfgfilho's tópico in NFC-e - Nota Fiscal do Consumidor Eletrônica
Saudações Regys Grato pelas respostas. Estou usando a UF 51 - MT. Como faço para descobrir se o servidor de homologação apresenta algum problema? Ou está com o horário errado? Claudiomir Saudações -
QR CODE informado na NFCe
Claudiomir replied to gilfgfilho's tópico in NFC-e - Nota Fiscal do Consumidor Eletrônica
Saudações Atualizei para o trunk2 e estou revendo o código. Encontrei duas situações estranhas. 1a - Nos testes, em homologação, ele só aceita se estiver com o horário de brasília. Sou do MT, uma hora de defasagem. Mudo o horário do computador e ele aceita. Por que?? 2a - Marquei a opção para enviar o qrcode para a sefaz mato grosso e recebi o erro de rejeição 462. Contatei o escritório contábil e pedi a geração de um novo idtoken e token. Copiei exatamente o que o escritório me enviou e confirmei cada caractere com eles antes de testar. O erro persiste. ACBrNFe1.Configuracoes.Geral.Idcsc := cfgcfgidtoken.AsString; //000003 ACBrNFe1.Configuracoes.Geral.csc := cfgcfgtoken.AsString; //73e176951228c70add41a12aec02f6b4 - estes valores foram conferidos e são passados corretamente Gastei o cérebro o dia todo e não encontrei uma solução. O que posso estar errando? Claudiomir -
Saudações JfsCosta No meu caso eu atualizei o componente inteiro do acbr por que fazia tempo que eu não fazia isso. Depois abri o projeto e dei um build al em todo o projeto. abraços
- 4 replies
-
- acbrboleto
- sicredi
- (e 1 mais)
-
Saudações Não. Não guardo. Tabela Retorno é temporária. Basicamente é o carro chefe que me diz qual parcela foi trabalhada (paga ou não) Se foi paga(Com juros, multa, etc) que eu uso para localizar as parcelas no meu banco de dados e sobre elas sim, eu trabalho(baixo no contas a receber, dou entrada na conta banco,etc,etc,etc). A Tabela Retorno simplesmente é uma relação das parcelas que o banco movimentou. Coisa que eu ainda não consegui implementar direito é os motivos que o banco trabalhou. (tipo código 'xx' baixa automática, 'xy' pago fora da agencia, etc). Se alguém tiver e quiser compartilhar... Sempre as ordens, Claudiomir.
-
Saudações Baseado no desenho acima como exemplo, temos o botão buscar Arquivo. procedure Tfretcobranca.blocalizararquivoClick(Sender: TObject); var i: integer; Titulo: TACBrTitulo; begin retorno.Open; retorno.EmptyTable; dire := extractfilepath(application.ExeName) + 'retorno'; pdire.Caption := dire; fprinci.ACBrBoleto1.DirArqRetorno := dire; OpenDialog.InitialDir := dire; if OpenDialog.Execute then begin narq := OpenDialog.FileName; if pos('.zip', narq) > 0 then begin { Zip.BaseDir := dire; Zip.FileName := narq; Zip.OpenArchive; Zip.ExtractFiles('*.*'); Zip.CloseArchive; } narq := extractfilename(narq); narq := dire + '\R' + copy(narq, 1, pos('_', narq) - 1) + '.' + copy(narq, pos('_', narq) + 1, 4); end; Edit1.Text := narq; fprinci.ACBrBoleto1.NomeArqRetorno := extractfilename(narq); fprinci.ACBrBoleto1.LerRetorno; if fileexists(pdire.Caption + '\' + fprinci.ACBrBoleto1.NomeArqRetorno) then begin BitBtn4.Enabled := true; BitBtn5.Enabled := true; fprinci.ACBrBoleto1.NomeArqRetorno := extractfilename(narq); fprinci.ACBrBoleto1.LerRetorno; retorno.Open; ProgressBar1.Visible := true; ProgressBar1.Max := fprinci.ACBrBoleto1.ListadeBoletos.Count; for i := 0 to fprinci.ACBrBoleto1.ListadeBoletos.Count - 1 do begin Titulo := fprinci.ACBrBoleto1.ListadeBoletos.Objects; // precisa verificar qual a quantidade de "nosso numero" dependendo do banco para a pesquisa abaixo. creachadados.Close; creachadados.Params[0].AsString := copy(fprinci.ACBrBoleto1.ListadeBoletos.Objects.NossoNumero, 1, 8); creachadados.Open; if creachadados.RecordCount > 0 then begin retorno.Append; retornoNumeroDoc.AsString := fprinci.ACBrBoleto1.ListadeBoletos.Objects.NossoNumero; retornoCliente.AsString := creachadadosclinome.AsString; retornoCrechave.AsInteger := creachadadoscrechave.AsInteger; retornoData.AsDateTime := fprinci.ACBrBoleto1.ListadeBoletos.Objects.DataOcorrencia; // retornoocorrenciaoriginal.AsString := fprinci.ACBrBoleto1.ListadeBoletos.Objects.OcorrenciaOriginal.Tipo; retornoocorrenciaoriginaldescricao.AsString:=fprinci.ACBrBoleto1.ListadeBoletos.Objects.OcorrenciaOriginal.Descricao; retornoMotivo.AsString := fprinci.ACBrBoleto1.ListadeBoletos.Objects.DescricaoMotivoRejeicaoComando.Text; retornoDataEmitido.AsDateTime := fprinci.ACBrBoleto1.ListadeBoletos.Objects.DataProcessamento; retornoNumBoleto.AsString := creachadadoscrenumero.AsString; retornohisto.AsString := creachadadoscrehistorico.AsString; retornodataemissao.AsDateTime := creachadadoscreemissao.AsDateTime; retornovalor.AsFloat := fprinci.ACBrBoleto1.ListadeBoletos.Objects.ValorDocumento; retornomulta.AsFloat := fprinci.ACBrBoleto1.ListadeBoletos.Objects.ValorOutrasDespesas; retornojuros.AsFloat := fprinci.ACBrBoleto1.ListadeBoletos.Objects.ValorMoraJuros; retornovalorbaixado.AsFloat := fprinci.ACBrBoleto1.ListadeBoletos.Objects.ValorRecebido; retornodatabaixa.AsDateTime := fprinci.ACBrBoleto1.ListadeBoletos.Objects.DataCredito; retornovalortarifa.AsFloat := fprinci.ACBrBoleto1.ListadeBoletos.Objects.ValorDespesaCobranca; retorno.Post; end; ProgressBar1.Position := ProgressBar1.Position + 1; ProgressBar1.Refresh; end; end; end; end;
-
Obrigado Juliana. Acho que consegui agora. Valeu! Claudiomir
-
Saudações Retorno do Sicredi ( e talvez demais bancos) Observem a imagem abaixo Caso eu não esteja totalmente maluco, sempre que o eu busco o arquivo de retorno ele me traz no campo Motivo um código que vem antes do texto. Na linha marcada como "1" ele me traz: "B3-Tarifa de registro de entrada do titulo". Já na linha marcada como "2" ele me traz: "H5-Recebimento de liquidação fora da rede". Por favor, considerem que sou bem leigo nisso, por isso pergunto: 1 - Todos os arquivos de retorno de todos os bancos vem assim? 2 - Devo gerar um teste em cada motivo recebido para descobrir o que é a operação ou tem outro jeito mais simples? 3 - A codificação "B3" é válida somente para o Sicredi ou é válida para todos os bancos? Assim como a codificação 00? 4 - Se não é válida para outros bancos, como faço para identificar o que está acontecendo com os arquivos de retorno de outros bancos, tipo Sicoob ou mesmo Itaú? 5 - Tendo como base a imagem acima, como faço para identificar corretamente os valores de cada operação? 6 - Existe uma tabela de codificações que está em algum lugar dentro do AcbrBoleto para "cobrir" todos os bancos? Ou se é individual para cada banco, como eu determino seu uso para o banco? De acordo com o número do banco? Desculpem-me, eu estou meio que me repetindo, mas estou bem perdido. Abraços Claudiomir
-
Saudações Denerbuzato Para a data da baixa, funcionou. Ainda fico tentando pegar os motivos do lançamento. Será que cada banco trabalho nisso de forma diferente?? Claudiomir
-
Saudações Desculpe, eu não encontrei nada sobre isso, de modos que aqui vai minha dúvida. Ela se relaciona a dois bancos diferentes. Sicredi--> Quando, usando a seguinte linha de comando --> retornomotivo.asstring:=ACBrBoleto1.ListadeBoletos.Objects.DescricaoMotivoRejeicaoComando.Text; Ele me traz os dados corretos. Quando usando a linha de comando --> retornodatabaixa.AsDateTime := fprinci.ACBrBoleto1.ListadeBoletos.Objects.DataBaixa; Ele me traz 30/12/1899. Mesmo quando confirmado no banco que existe a data da baixa e que ela ocorreu em 05/12/2015. Mudo para o Sicoob--> Mesmas linhas acima e o retorno em ambas é vazio. Configurei tudo corretamente, até onde sei, mas não encontrei o motivo disso. Alguém tem alguma idéia?? Claudiomir
-
Problema Resolvido. Em minha defesa eu alego estresse, excesso de café, falta de pescaria, ou insanidade temporária. Fica a dica para os demais que enfrentarem o mesmo problema. Nunca, jamais, never, enfim... jamais cadastrem o código do cedente com o dígito. Foi só remover o dígito e o problema foi resolvido. Um abraço a todos, Claudiomir
- 1 reply
-
- 1
-
- sicoob
- dígito verificador
-
(e 1 mais)
Tags:
-
Saudações Um dos meus clientes migrou sua conta para o Sicoob. Ao configurar a nova conta e o boleto para o referido banco, recebo mensagem de erro. Pesquisei, mas não encontrei nada sobre o erro. É bem provável que seja um erro meu, mas não encontro a razão. Banco 576 - Sicoob. Nosso número 7. Anexo envio imagem do erro. Não faço ideia de onde vem aquele "-". No aguardo de alguma ideia, Claudiomir Editado: " Sim, eu sei que nosso numero é 7, e em tudo que eu uso e testo ele mostra 7. Só que aqui teima em aparecer 8 dígitos"
- 1 reply
-
- sicoob
- dígito verificador
-
(e 1 mais)
Tags:
-
Saudações Henrique. Acabo de verificar com o financeiro do cliente. As duplicatas desta nota existem. Eles lançam a nota como venda a vista, mas emitem as duplicatas. As duplicatas acompanham as mercadorias. Eu nunca imaginei uma lambança dessas. Claudiomir
-
The page cannot be found Tem outro link?? Não consigo abrir esse.
-
Sim. Anexo. Não encontrei as duplicatas, apesar delas virem junto com a nota (boleto físico) do banco. No aguardo Claudiomir DFE35150904692027001034550050018759501998305074.xml
-
Pois é, Juliomar. Não tem nada lá. Não deveria ser obrigatório enviar no xml?? Claudiomir
-
Saudações Consigo importar a NFE de um fornecedor, mas, apesar das duplicatas, valores e vencimentos constarem no corpo da nota, eu não as encontro no xml. Onde estou errando, ou não vem mesmo no xml?? Abraços
-
Ok Julio. Valeu!! Vou começar a migrar para o trunk2 nos próximos dias. Claudiomir
- 4 replies
-
- acbrnfe1
- carta correção
-
(e 1 mais)
Tags:
-
Saudações Juliomar. Não Trunk2. ( Ainda não cheguei lá!!) Sim, fazia um tempo que eu não atualizava. Talvez 8 meses. Instalei tudo agora. Todas as opções. Compilou normal. Não deu erro em nada na instalação. Abri o delphi. Abri o projeto. F9. Ele abriu esse erro. Por acaso essa opção foi descontinuada??? Ou tem outra maneira de fazer isso? Claudiomir
- 4 replies
-
- acbrnfe1
- carta correção
-
(e 1 mais)
Tags:
-
Saudações Tudo estava rodando certinho. Precisei atualizar o Acbr e agora estou encontrando alguns... erros. Por exemplo: ACBrNFe1.EnviarCartaCorrecao(0); Protocolo := ACBrNFe1.WebServices.CartaCorrecao.CCeRetorno.retEvento.Items[0].RetInfEvento.nProt; motivo := ACBrNFe1.WebServices.CartaCorrecao.CCeRetorno.retEvento.Items[0].RetInfEvento.xMotivo; istat := ACBrNFe1.WebServices.CartaCorrecao.CCeRetorno.retEvento.Items[0].RetInfEvento.cStat; agora, na segunda linha, ele acusa que ACBrNFe1.WebServices.CartaCorrecao não existe. Ele não encontra a opção CartaCorreção. Houve alguma mudança que eu não sei? Ou quando eu reinstalei, eu esqueci de instalar algo com o acbrinstal?? Alguém tem alguma idéia??? Claudiomir
- 4 replies
-
- acbrnfe1
- carta correção
-
(e 1 mais)
Tags: