-
Total de ítens
93 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Tudo que joseadolfojr postou
-
Achei este: http://cc.embarcadero.com/item/27633
-
Boa noite, estou tentando achar o Fortes para d2009 e não consegui. Em pesquisa no forum achei o link http://sourceforge.n...esreport/files/ porem não tem a versão para D2009. Mesmo tentando instalar outras versões da erro na instalação do ACBrBoleto. Alguém sabe o caminho?
-
Acbr_Boletofc_Fortes.dpk No Delphi 2009
joseadolfojr replied to Paulo Augusto's tópico in ACBrBoleto
Postei no local errado e movi. -
Estado do Rio assina convênio NFC-e. http://www.fazenda.rj.gov.br/sefaz/faces/menu_structure/servicos?_afrLoop=1040794947285000&datasource=UCMServer%23dDocName%3AWCC226883&_adf.ctrl-state=m7q9okn60_76
-
Pay&go - Comprovante Tef - Via Cliente Em Nro. De Parcelas
joseadolfojr replied to joseadolfojr's tópico in Dúvidas sobre TEF
Algumas informações que obtive: O problema é exclusivo na Pay&Go. Em contato com a SevenPDV eles informaram que já existe outras reclamações que que está em contato com a NTK para solucionar o problema. Observem: Campo 710-000 presente e diferente de zero -> Imprime cupom reduzido (1ª Via) (Campos 711-xxx) Parte do conteúdo do arquivo retorno do TEF da rede AMEX: 710-000 = 4 711-001 = " CIELO AMEX" 711-002 = " 376449-1014-06/15" 711-003 = " POS=42032844 DOC=300877 AUT=628349" 711-004 = "VENDA CREDITO PARC LOJA EM 05 PARCELAS" Parte do conteúdo do arquivo retorno do TEF da rede REDECARD 710-000 = 4 711-001 = "************3061 19:28" 711-002 = "CV:247812364 AUTO:005896 02/10/13" 711-003 = "VENDA PARCELADO ESTAB" 711-004 = "VALOR 153,00" Tenho clientes utilizando Direção e não acontece isto ai. A questão que o cliente que utiliza Pay&Go está querendo uma solução e não está adiantando dizer que o problema é Pay&Go. Algum colega que utiliza Pay&Go não está com o mesmo problema ? Sei que não é legal alterar os fontes para forçar a impressão de determinada via por causa do fluxo de impressão do manual. Mas não estou vendo nenhuma saída.- 3 replies
-
- Pay&Go
- Comprovante
-
(e 1 mais)
Tags:
-
Pay&go - Comprovante Tef - Via Cliente Em Nro. De Parcelas
um tópico no fórum postou joseadolfojr Dúvidas sobre TEF
Bom dia amigos, estou tendo um problema em um cliente que usa Pay&Go. Nas redes Visa e Redecard, no comprovante TEF, na via do cliente não está saindo a informação de número de parcelas quando crédito parcelado. Conforme a especificação técnica da interface com a Automação Comercial, página 11 item 5.3.1.Definição das vias a serem impressas: Campo 710-000 : Presente e diferente de zero -> Imprime cupom reduzido (Campos 711-xxx). Redecard e Visanet no cupom reduzido não estão trazendo o número de parcelas quando crédito parcelado. Já a Amex traz certinho. Algum colega passou por este tipo de situação utilizando Pay&Go ?- 3 replies
-
- Pay&Go
- Comprovante
-
(e 1 mais)
Tags:
-
Após atualiza o componente ao compilar minha aplicação deu erro na rotina de gerar os registros R. Na unit ACBrPAF_R tinha algumas propriedades em comentario. Removi os comentarios e funcionou. Especificamente nas propriedades RegistroR02,RegistroR04 e RegistroR06.
-
Acbrepcblocos - Falta Da Declaração Da Função Strtoindsitesp
um tópico no fórum postou joseadolfojr ACBrSPEDECF
Boa tarde amigos, na luta aqui com o Sped, observei que a função StrToIndSitEsp não está declarada no início da Unit. Com isto não conseguimos usar a função. Adicionei a declaração: function StrToIndSitEsp(AValue: string): TACBrIndSitEsp; na linha 1121. -
Tabela Ibpt Versão 0.0.2 - Adaptação Componente Acbribptax
um tópico no fórum postou joseadolfojr ACBrTCP
Boa tarde amigos, saiu hoje uma nova tabela do IBPT. Nesta tabela foi adicionado o campo Descrição do NCM. Segue exemplo: codigo;ex;tabela;descricao;aliqNac;aliqImp;0.0.2 01012100;;0;--Reprodutores de raça pura;26.75;27.35; 01012900;;0;--Outros;26.75;28.45; 01013000;;0;-Asininos;26.75;29.50; 01019000;;0;-Outros;26.75;29.50; 01022110;;0;Prenhes ou com cria ao pé;14.80;15.40; 01022190;;0;Outros;14.80;15.40; 01022911;;0;Prenhes ou com cria ao pé;14.80;16.50; 01022919;;0;Outros;14.80;16.50; 01022990;;0;Outros;14.80;16.50; 01023110;;0;Prenhes ou com cria ao pé;14.80;15.40; 01023190;;0;Outros;14.80;15.40; 01023911;;0;Prenhes ou com cria ao pé;14.80;16.50; 01023919;;0;Outros;14.80;16.50; 01023990;;0;Outros;14.80;16.50; Já fiz a adaptação do componente, segue em anexo unit ACBrIBPTax.pas para observação dos moderadores. ACBrIBPTax.pas ACBrIBPTax.pas -
Os arquivos em anexo ao tópico estão corrompidos. Estou tentando fazer uma transferência de arquivos via TCP e ocorreu algumas falhas. Na aplicação servidor: ACBrTCPServer Evento RecebeDados: var memoryStream : TMemoryStream; pathEXE : String; begin //Memo1.Lines.Add(Recebido); pathEXE := ExtractFilePath(Application.ExeName); memoryStream := TMemoryStream.Create; memoryStream.Clear; TCPBlockSocket.RecvStream(memoryStream,5000); memoryStream.Seek(0, soBeginning); if memoryStream.Size=0 then begin Memo1.Lines.Add('Stream empty'); exit; end; memoryStream.SaveToFile( pathEXE+'teste.txt'); memoryStream.Free; no cliente utilizando TTCPBlockSocket var sock : TTCPBlockSocket; memoryStrem : TMemoryStream; arquivoEnviar : String; tam : Integer; pathEXe : String; begin pathEXe := ExtractFilePath(Application.ExeName); sock := TTCPBlockSocket.Create; sock.Connect('localhost','10802'); if sock.LastError>0 then begin ShowMessage('Erro ao conectar...'); exit; end; if OpenDialog1.Execute then arquivoEnviar := OpenDialog1.FileName else arquivoEnviar := ''; if Trim(arquivoEnviar)='' then exit; memoryStrem := TMemoryStream.Create; memoryStrem.LoadFromFile(arquivoEnviar); memoryStrem.Seek(0, soBeginning); sock.SendStream(memoryStrem); if sock.LastError>0 then ShowMessage('Erro ao transferir...'); sock.Free; memoryStrem.Free; end; Ocorre que arquivos pequenos não transfere. Um arquivo com 32k está vindo apenas 23k. To quebrando a cabeça e já pesquisei bastante e não consegui resolver... Grato
-
Bom dia amigos, terminei mais uma homologação na ultima sexta. Tive um sério problema nos arquivos do PAF-ECF. Os campos numéricos não estavam sendo gerados com os '0' a esquerda. Pude observar que a função LFILL não estava fazendo isto. Como o tempo conta na homologação não analisei a função LFILL apenas substitui por uma função minha.
-
Altura Do Código De Barras Impresso Pelo Ecf
joseadolfojr replied to joseadolfojr's tópico in ACBrSerial
Consegui. Na daruma utilizei o ConfigBarras.altura := 100. Vou testar agora em outros modelos. -
Boa noite amigos, tentei configurar a altura do código de barras impresso pelo ECF utilizando a opção ConfigBarras.altura := 5. O padrão é 10, porém nos testes na Daruma FS700 não diminuiu a altura. Acontece que o código de barras está saindo com uma altura de +-10cm e tenho certeza que o cliente vai reclamar quando eu for apresentar. Estou configurando no parametro certo ? Estou utilizando EAN 128.
-
Foi emitida por uma empresa do Amazonas em 01/03/2013 a primeira NFC-e do Brasil. E foi também autorizada em 04/03/2013 a primeira NFC-e utilizando a Infraestrutura da SEFAZ Virtual do RS. Começou galera, agora disposição para adaptarmos nossos PAF-ECF´s. É so esperar o ambiente de testes. PAF-ECF versão PAF, PAF-ECF versão NFC-e, PAF-ECF versão SAT, … Link da notícia: http://www.spedbrasil.net/forum/topics/nfc-e-emitida-a-1a-nota-fiscal-eletronica-para-consumidor-final.
-
Cleber, o email que tenho da Sefaz MG é apenas de orientação. Ele diz que devo ir na pagina da sefaz e ler a documentação. O email não cita nada de documentação TEF.
-
Consegui efetuar o cadastro em MG. Não foi preciso apresentar documentação referente ao TEF. Homologuei em 17/12/2012 , laudo publicado no Confaz em 18/01/2013 e cadastro em MG em 31/01/2013.
-
Tempo Gasto Com Homologação
joseadolfojr replied to Cleber Ferreira's tópico in Dúvidas Gerais sobre o ACBr
Na minha primeira homologação em Outubro/2011 levei 12 horas. (Polimig-RJ) Na última (Dezembro/2012) levei também 12 horas porém não fiz Bloco VII. (Polimig-RJ) Tenho outra homologação marcada para Março/2013. Acredito fazer entre 12 e 16 horas. Em todas utilizo, DAV e Pré-venda. -
Amigos no desenvolvimento do Sped Fiscal observei o seguinte: O registro C350 tem como detalhe os registros C370 e C390. Observando o registro C405 observei que ele tem como detalhe apenas o apenas o C405. Para seguirmos a mesma lógica o C405 não teria que ter também o C490 ?
-
Consegui homologar dia 17/12/2012 na Polimig-RJ. Estou esperando a publicação do laudo pelo confaz para fazer o registro em MG. A sefaz-MG me enviou uma 'resposta pronta' com as exigências e tal. E nestas não cita nada de TEF. Assim que eu consegui fazer o cadastro eu posto aqui.
-
Amigos , obrigado pelas respostas. Vou homologar PAF dia 17 e vou deixar o TEF para 2013. Abraços
-
Regys, obrigado pela resposta. Mas não achei citação sobre obrigatoriedade de laudo TEF para cadastrar o software. De qualquer forma enviei um email para MG pergutando, assim que tiver resposta publico aqui. Grato
-
Boa tarde amigos, estou lendo a documentação necessária para cadastrar o PAF-ECF em MG. Observei que não estão mais pedindo o laudo de homogação do TEF. Alguém confirma isto ai ? Att.
-
Recebi da Polimig/RJ um zip com 8 pdf´s do diário oficial com a parte referente ao ato. Postei no blog.
-
Blz Daniel, obrigado. Estarei la na Segunda-feira. A noite já vou postar falando sobre o "dia".
-
Amigos estou indo para SP agora dia 03. Consegui finalizar a parte do Cielo Premia com algumas dúvidas: No teste 26 e 27 do Roteiro Inicial de Certificação, versão 10 ele pede para verificar no display do PinPad se a mensagem ("DI R$ 5,00") foi exibida durante 5 segundos. Esta mensagem é o GP que manda ou o ACBrTef que manda baseando-se em algum campo do arquivo de resposta ? Quanto aos testes 28 e 29 - Função ADM "RESGATE PREMIOS" Cielo Premia, fui informado pela Seven que o testes estão disponíveis somente lá "na hora". Então vai ser no escuro. Alguém já fez ? Outra dúvida: no código procedure TACBrTEFDClass.AdicionarIdentificacao; var TemIdentificacao : Boolean ; Operacoes : String ; begin with TACBrTEFD(Owner) do begin if (Identificacao.NomeAplicacao + Identificacao.VersaoAplicacao <> '') then begin Req.Conteudo.GravaInformacao(701,000, Trim( Identificacao.NomeAplicacao + ' ' + Identificacao.VersaoAplicacao ) ) ; TemIdentificacao := True; end; if (Identificacao.RazaoSocial <> '') then begin Req.Conteudo.GravaInformacao(716,000, Identificacao.RazaoSocial ) ; TemIdentificacao := True; end; Operacoes := '1'; // 1 = Suporta Saque, 2 = Suporta Desconto if Assigned( OnComandaECFSubtotaliza ) and (not AutoEfetuarPagamento) then Operacoes := '3'; // 1 + 2 = Suporta Saque e Desconto if TemIdentificacao then Req.Conteudo.GravaInformacao(706,000, Operacoes ) ; end; end; Não seria melhor a informação que vai no campo 706-000 fique disponível em uma propriedade tendo em vista que a opção Débito+Saque é opcional. Estou com receio de chegar la na hora me questionarem dizendo que já que não estou fazendo Débito+Saque eu não deva passar o valor '3' e sim '1'. Ou com o Cielo Premia a opção Saque torna-se obrigatória ?