-
Total de ítens
21 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Tudo que Gefferson Ferraz postou
-
Na tela nao vem nada de differente, tens que acompanhar o comprovante, nele mostra que tu ganhou 5% descontos, ou na prox compra tem sobremesa... Coisas assim.
-
[PinPadCompartilhado] Porta=4 [geral] TransacoesAdicionaisHabilitadas=3323 A propriedade ParametrosAdicionais do componente estão vazias. Veja a pag. 79 do manual da dll... GDrive Manual
-
5 posiçõs, pelo proprio demo do acbr, ele cria um form para solicitar o cvv. Quando o form está com lendo o cvv eu altero o max_length do edit para 5. Quando fiz a homologação, no fim do procedimento achamos um cartao HSBC sem chip,..., mas naquele ponto o teste de cvv já havia sido aprovado rs
-
Registro do PAF -CNPJ na tag E2
Gefferson Ferraz replied to Gefferson Ferraz's tópico in ACBrSintegra/ACBrPAF
Creio que não tive o direito de passar por uma analise do código enviado. Como eu disse anteriormente, eu me atentei ao fato de manter a compatibilidade com quem já preenche a tag E1 e P1 para popular nos registros que sofrem a herança. Segue código com minhas alterações e indicativos da compatibilidade aplicada: procedure TPAF_P.WriteRegistroP2; ... for intFor := 0 to FRegistroP2.Count - 1 do begin with FRegistroP2.Items[intFor] do begin if trim(CNPJ) = trim('') then ===> Se o CNPJ não for alimentado na classe do P2, será herdado da P1, assim, mantendo compatibilidade. CNPJ := FRegistroP1.CNPJ; ///Check movido para dentro do with, antes estava acima dele. Check(funChecaCNPJ(CNPJ), '(P2) ESTOQUE: O CNPJ "%s" digitado é inválido!', [CNPJ]); Add( LFill('P2') + LFill(CNPJ, 14) + ... end; procedure TPAF_E.WriteRegistroE2; ... with FRegistroE2.Items[intFor] do begin if trim(CNPJ) = trim('') then ===> Se o CNPJ não for alimentado na classe do E2, será herdado da E1, assim, mantendo compatibilidade. CNPJ := FRegistroE1.CNPJ; ///Check movido para dentro do with, antes estava acima dele. Check(funChecaCNPJ(CNPJ), '(E2) ESTOQUE: O CNPJ "%s" digitado é inválido!', [CNPJ]); Add( LFill('E2') + LFill(CNPJ, 14) + ... end; Aguardo uma nova analise e agradeço pela atenção. Att Gefferson -
Registro do PAF -CNPJ na tag E2
Gefferson Ferraz replied to Gefferson Ferraz's tópico in ACBrSintegra/ACBrPAF
@Juliomar Marchetti fica uma dúvida: qual a necessidade de alimentar a tag E1 / P1 para gerar o Registros do PAF-ECF? -
Pessoal, quando fiz minha homologação do sitef em 11/2017, em conversa com o homologador ele compreendeu que não mais existia cartão sem chip e aceitou que fosse cartão digitado. Expliquei e mostrei que a rotina (tela que solicita CVV) é a mesma em ambas as situações. A equipe do sitef num primeiro momento parece ser bem rígida, mas se for conversado e explicado, eles compreendem o desenvolvedor e aceitam o teste.
-
Registro do PAF -CNPJ na tag E2
Gefferson Ferraz replied to Gefferson Ferraz's tópico in ACBrSintegra/ACBrPAF
Juliomar, para o P2 ocorreu a mesma situação. Segue em anexo units para analise: ACBrPAF.zip -
Registro do PAF -CNPJ na tag E2
Gefferson Ferraz replied to Gefferson Ferraz's tópico in ACBrSintegra/ACBrPAF
Identifiquei que o P2 também acontece o mesmo "erro". Logo mais postarei as units ajustadas. -
Registro do PAF -CNPJ na tag E2
Gefferson Ferraz replied to Gefferson Ferraz's tópico in ACBrSintegra/ACBrPAF
@Juliomar Marchetti, boa tarde. Nós aqui também homologamos o sistema com a e.r. 02.03 em 2016, e o registro E2 já vinha sem o CNPJ. Agora ao homologar a e.r. 02.05 notei o erro. Linha gerada pelo demo do acbr: E20000000000000028233633008827 MQVFQOIEHUOQUGWHCTIDQALSXTBQEXGMOVFKFTLYMWDUAXFLLFED +000134000 Creio que por eu ter tomado a preocupação em 'compatibilizar' com quem possivelmente não alimentará o campo CNPJ no registro E2, não vejo problemas em subir ao Svn. O que voce acha? -
Olá pessoal, bom dia. Apliquei uma alteração do ACBrPAF_E.pas e ACBrPAF_E_Class.pas. Motivo: ao gerar o documento Registros do PAF, através do menu fiscal, o registro E2, campo 2-CNPJ, não era preenchido. Identifiquei que para gerar esta tag, a lógica era herdar o campo CNPJ do registro E1. Problema: para gerar o documento Registros do PAF, não é necessário o preenchimento da tag E1. Solução: adicionei o campo CNPJ na classe do E2, dentro do ACBrPAF_E.pas. Preventivo: como a alteração maior ficou para o WriteRegistroE2, no Class, adicionei um IF para verificar se o campo CNPJ esta preenchido, se nao estiver, herda do E1. Assim, mantendo a compatibilidade. Segue em anexo os .pas, se possível verificar se está correto e subir ao SVN :D Obrigado. ACBrPAF_E.pas ACBrPAF_E_Class.pas
-
Problema ao inicializar impressora - 9A|
Gefferson Ferraz replied to Gefferson Ferraz's tópico in ACBrSerial
@Daniel Simoes mesmo a contragosto acatei com a sua sugestão. Estou no meio de uma homologação do PAF, assim que terminar irei verificar uma melhoria para esse problema Obrigado -
Problema ao inicializar impressora - 9A|
Gefferson Ferraz replied to Gefferson Ferraz's tópico in ACBrSerial
Daniel, boa tarde. Em tempo de execução, como esperado, o erro só acontece no log da impressora. O que eu estranho, é que como o execption só aparece no em debug, ele trava o mouse e teclado, ai só com ctrl+alt+del para desbloquear o mouse e teclado. -
Atualizei o ACBR, após isto quando inicio meu sistema em debug, recebo mensagens de erro da ECF . A impressora é uma EPSON TM900F, dlls em dia. Já tentei identificar o que está acontecendo, mas só notei o momento em que gera o erro: Erro retornado pela Impressora: EPSON Categoria: 2-Erro em parâmetro do comando Motivo: 2-Falta parâmetro no comando Sequencia de rotinas: procedure TACBrECFEscECF.IdentificaOperador(Nome: String); ... if (aOperAtual <> Nome) then begin EscECFComando.CMD := 154; EscECFComando.AddParamString( Nome ); EnviaComando; //Aqui ele entra com o cmd vazio. end; ... function TACBrECFEscECFProtocoloEpsonDLL.EnviaComando_ECF(ACmd: AnsiString ): AnsiString; ... //Aqui ainda está com o ACMD vazio. ACmd := IntToHex(EscECFComando.CMD, 2) + '|'; For I := 0 to EscECFComando.Params.Count-1 do ACmd := ACmd + StringToBinaryString( AnsiString(EscECFComando.Params[I]) ) + '|'; //Depois das 3 linhas acima, o ACmd fica com "9A||". ... O arquivo de log completo da inicialização está em anexo. Desde já agradeço a ajuda. LOG.txt
-
ECF Epson TM-T900F não fazendo quebra de linha
Gefferson Ferraz replied to douglas_k's tópico in ACBrSerial
Douglas, fiz uma alteração na Unit: ACBrECFEscECF, linha 564: ACmd := ReplaceString(ACmd, NUL, '[NULL]'); ACmd := ChangeLineBreak(ACmd, LF); Depois: ACmd := ReplaceString(ACmd, NUL, '[NULL]'); //ACmd := ChangeLineBreak(ACmd, LF); Uma solução paliativa Ficarei acompanhando para ver o que será feito na unit da trunk. -
ECF Epson TM-T900F não fazendo quebra de linha
Gefferson Ferraz replied to douglas_k's tópico in ACBrSerial
Boa tarde senhores. Eu já notei este erro na Epson logo quando atualizei o ACBR. Trata-se de uma TM-900F, EscPos. Em contato do o PEPS (epson), questionei se houve alguma liberação recente de atualização de firmware, mas nada mudou além da dll, a mesma do ACBR (v4.9). Esse change-log citado pelo Douglas foi de fato homologado e aprovado nas ECFs, ou é algum parâmetro novo que deve estar faltando alimentação? -
Bom dia. Estou desenvolvendo uma aplicação para terminais com o ACBrMTer, havendo a opção de usar em conjunto com uma balança. Caso: Balança Prix 3: Balança Prix 3: Protocolo 3 Serial 2400 bps Terminal Bematech Fit Basico Configurações compativeis com a balança. Tanto temrinal como balança são fisicos. (não é emulador/simulador). Problema detectado: Ao fazer o uso de : terminal.EnviarParaSerial('192.168.0.132',ENQ,0), a balança até devolve corretamente o que preciso, basta fazer o tratamento. Porém, não é acionado o evento OnReceberPeso, neste caso, não foi 'tão' útil. Ao fazer o uso de : terminal.SolicitarPeso('192.168.0.132',0), a balança devolve 'S00368' através do OnReceberPeso' ai está o problema: A ACBrBALToleto tenta converter o 'S', e acaba dando except. O 'S' quem envia é o próprio terminal bematech, ele indica Serial+Resposta. Até então, para a balança toledo eu fiz um simples string replace ( print ). Caso exista alguma forma tão simples quanto ou mais elegante, ficarei grato por conhecer ACBrBALToledo.pas
-
Estou com um problema que não consigo resolver. Consigo chegar normalmente até a function TACBrECFClass.TransmiteComando, com o parâmetro Cmd correto, porém, ao passar pelo fpDevice.EnviaString( Cmd ) a impressora já me devolve (impresso) a alíquota errada. Estou cadastrando a alíquota 3.61% e 5.47% de ICMS, mas na impressora ele grava 3.60% e 5.46%. Impressora Bematech MP 4200 TH FII - EscECF. _ Como meu cliente precisava de urgência, tive de usar o Bematool para inserir a alíquota no ECF. Desde já, agradeço a atenção.
-
Alguém tem alguma informação se a prorrogação do CEST também abrange o Cupom fiscal? (SC )
-
Não querendo ressuscitar o tópico, mas, este item já foi incluído no Acbr?
-
Hehe que bom que ajudei! Então, a curto prazo eu irei utilizar a 'tabelona', mas assim que restar um tempo e ou confaz se decidir o que fazer, irei fazer a rotina pra leitura de ncm 'filhos'... Att Gefferson Ferraz
-
Olá, caso queira a tabela completa, esta em anexo =) Ah, não botei nenhum commit work nem nada... Ps. Tabela feita com auxilio da tabela montada pelo Cantu. Att Gefferson Ferraz TABELA - CEST.sql