Ir para conteúdo
  • Cadastre-se

edgarbottini

Membros
  • Total de ítens

    22
  • Registro em

  • Última visita

Tudo que edgarbottini postou

  1. Boa noite, estou com a mesma dúvida Agradeço pela ajuda
  2. Oi Juliomar, então, no windows funciona, no Lazarus do Linux é que não funciona, os componentes instalam no Lazarus de boa, mas apresenta a mensagem da senha incorreta, tô perdido sem saber o que procurar pra resolver
  3. Boa noite Senhores estou recebendo a mesma mensagem "Provavelmente a senha está errada", porém no Lazarus linux (versão mais nova 2.0.10). O mesmo certificado .pfx em Delphi windows funciona (mesma senha claro). Instalei o Lazarus e ACBr no OpenSuse Leap (64bits), achei que tinha feito algo errado na instalação e por isso o erro, aí instalei tudo de novo num OpenSuse Tumbleweed (32bits) e apareceu a mesma mensagem Se alguém tiver ideia do que pode ser, ou se devo usar versões mais antigas de linux e Lazarus, eu agradeço demais
  4. Boa tarde Marcos você conseguiu resolver? Estou com o mesmo problema, não achei nada de futuro no site do fabricante abraço
  5. Ola Cleber, sim eu lí! Mas entendi que ele tinha implementado só não tinha testado, aí testei aki e achei que o feedback poderia ajudar, por isso informei qual meu modelo de daruma. Eu sei que cada modelo é tratado individualmente, inclusive disse que olhei a unit ACBrDaruma que acredito seja a unit que trata individualmente para a Daruma, inclusive tem código meu nessa unit que foi uma pequena correção que fiz a algum tempo atrás, procure meus posts. Inclusive já fiz doações para o projeto por acreditar nele. Então não entendo o motivo de me chamarem atenção por tentar ajudar com feedback.
  6. Ola, tambem estou com problema nessa função PafMF_ArqMFD, tenho uma Daruma FS700H, atualizei o componente hoje pela manhã e instalei pelo ACBrInstall, e o erro retornado é esse: Procedure: ArquivoMFD_DLL não implementada para a Impressora: Daruma Ajude no desenvolvimento do ACBrECF. Acesse nosso Forum em: http://acbr.sf.net/ o que não entendi, porque na unit ACBrECFDaruma tem duas procedures de nome ArquivoMFD_DLL e as duas tem vários parâmetros, como pode não estar implementado? Apenas chamo o metodo ACBrECF.PafMF_ArqMFD passando o caminho de parametro, fiz alguma coisa errado?
  7. Olá a todos, nos site da secretaria de tributação do RN saiu uma notícia informando que a partir do dia 06 de maio de 2013 o ambiente autorizador será alterado de SVAN para SVRS, conforme link a seguir: http://www.set.rn.gov.br/contentProducao/aplicacao/set_v2/noticias/enviados/detalhe.asp?sTipoNoticia=&nCodigoNoticia=2930 é necessário alguma alteração/configuração no componente ACBrNFe2 ? grato pela ajuda
  8. estou adequando meu sistema para 01.13, mas procurei um comando para escrever negrito no observação e nao encontrei, tem como?
  9. Pessoal, qual versão da ER voces estão utilizando? pergunto porque estou com a versão 01.12 e nao encontro esse requisito VIII-B, apenas o VIII e o VIII-A (que fala sobre minas legal e cupom mania) grato
  10. Ola, no requisito XXX onde diz "As informações prestadas neste relatório referem-se aos documentos emitidos por todos os equipamentos ECF do estabelecimento usuário e não apenas pelo ECF que emitiu o relatório, podendo se limitar ao movimento do dia imediatamente anterior ao da emissão do relatório" como você fez? puxa as informações da retaguarda para gerar o relatório? E quando o PAF-ECF estiver sem comunicação com a retaguarda?? grato
  11. Olá, nesse requisito XXX eu fiquei na duvida do seguinte: o requisito manda separar o valor de cartão credito e debito, mas no arquivo de resposta do tef RESP\IntPos.001 não vi nenhum campo que indique se o usuario escolheu credito ou debito. Fica inconsistente o usuario informar na aplicação se foi credito ou debito e depois no tef marcar outra coisa. Como voces resolveram isso? Grato pela ajuda
  12. Legal ter ajudado, visitarei a Autocom desse ano, voces estarão com um stand lá né?
  13. Ola, no componente ACBrECF na unit da Daruma tem uma programação para cancelar o CCD (quando necessário) e depois cancelar o cupom fiscal. A programação funciona apenas quando se tem um CCD depois do cupom fiscal, impossibilitando o cancelamento de cupom fiscal quando se tem mais de um CCD (tef com multiplos cartões). Então, o código era assim: procedure TACBrECFDaruma.CancelaCupom; var RetCmd : String ; NumCupCCD : String ; NumCupom: String; begin fsNumCupom := ''; AguardaImpressao := True ; if fpMFD then begin RetCmd := EnviaComando( FS + 'R' + #200 + '046'); // Verifica se precisa cancelar CCD; Autor: Andre Bohn if copy(RetCmd, 6, 1) <> '0' then begin try RetCmd := EnviaComando( FS + 'R' + #200 + '050'); NumCupCCD := GetNumCupom; NumCupom := copy(RetCmd, 6, 6); if NumCupom <> NumCupCCD then begin EnviaComando(FS + 'F' + #214 , 15); // Fecho o CCD caso ainda não esteja fechado EnviaComando(FS + 'F' + #218 + NumCupCCD +#255+#255+#255, 15); // Cancela Conprovante Não Fiscal EnviaComando(FS + 'F' + #214 , 15); // Fecha Comprovante de estorno Cancela Conprovante Não Fiscal end; except end; EnviaComando(FS + 'F' + #211, 15) ; // Cancela Cupom RespostasComando.Clear; RespostasComando.AddField('COO', Copy(fpRespostaComando, 10, 6)); RespostasComando.AddField('CCF', Copy(fpRespostaComando, 16, 6)); RespostasComando.AddField('ValorCancelado', Copy(fpRespostaComando, 22, 12)); end else raise EACBrECFCMDInvalido.Create( ACBrStr('Não existe documento para cancelar.') ); end else if fsNumVersao = '2000' then EnviaComando(ESC + #211, 15) else EnviaComando(ESC + #206, 15) ; ZeraTotalApagar; FechaRelatorio ; { Fecha relatorio se ficou algum aberto (só por garantia)} end; e eu alterei para que faça o cancelamento de vários CCDs, ficando assim: procedure TACBrECFDaruma.CancelaCupom; var RetCmd : String ; NumUltimoCupom : String ; NumCupomCancelavel: String; iNumUltimoCupom, iNumCupomCancelavel: integer; begin fsNumCupom := ''; AguardaImpressao := True ; if fpMFD then begin RetCmd := EnviaComando( FS + 'R' + #200 + '046'); // Verifica se precisa cancelar CCD; if copy(RetCmd, 6, 1) <> '0' then begin try RetCmd := EnviaComando( FS + 'R' + #200 + '050'); // retorna numero do cupom cancelavel NumCupomCancelavel := copy(RetCmd, 6, 6); NumUltimoCupom := GetNumCupom; iNumUltimoCupom := StrToInt(NumUltimoCupom); iNumCupomCancelavel := StrToInt(NumCupomCancelavel); while iNumCupomCancelavel < iNumUltimoCupom do begin NumUltimoCupom := FormatFloat('000000',iNumUltimoCupom); EnviaComando(FS + 'F' + #214 , 15); // Fecho o CCD caso ainda não esteja fechado EnviaComando(FS + 'F' + #218 + NumUltimoCupom +#255+#255+#255, 15); // Cancela Conprovante Não Fiscal EnviaComando(FS + 'F' + #214 , 15); // Fecha Comprovante de estorno Cancela Conprovante Não Fiscal dec(iNumUltimoCupom); end; except end; EnviaComando(FS + 'F' + #211, 15) ; // Cancela Cupom RespostasComando.Clear; RespostasComando.AddField('COO', Copy(fpRespostaComando, 10, 6)); RespostasComando.AddField('CCF', Copy(fpRespostaComando, 16, 6)); RespostasComando.AddField('ValorCancelado', Copy(fpRespostaComando, 22, 12)); end else raise EACBrECFCMDInvalido.Create( ACBrStr('Não existe documento para cancelar.') ); end else if fsNumVersao = '2000' then EnviaComando(ESC + #211, 15) else EnviaComando(ESC + #206, 15) ; ZeraTotalApagar; FechaRelatorio ; { Fecha relatorio se ficou algum aberto (só por garantia)} end; Resolveu aqui pra mim, tenho uma FS-600 e testei com até 3 CCDs depois do cupom. Espero er ajudado
  14. Ola, estou fazendo o sped pis/cofins e o validador apresentou erro nos registros C381 e C385. No caso eu estou usando os campos VL_BC_PIS e ALIQ_PIS e não preenchi os campos QUANT_BC_PIS e ALIQ_PIS_QUANT (são excludentes) porém o componente escreveu 0,00 nos campos que não preenchi, aí o validador recusou dizendo que os campos deveriam estar em branco. Como não achei esse problema no forum, então alterei o arquivo ACBrEPCBloco_C_Class no procedimento WriteRegistroC381 e substituí o trecho de codigo Add( LFill('C381') + LFill(strCST_PIS) + LFill(COD_ITEM) + LFill(VL_ITEM,0,2) + LFill(VL_BC_PIS,0,2) + LFill(ALIQ_PIS,8,4) + LFill(QUANT_BC_PIS,0,3) + LFill(ALIQ_PIS_QUANT,0,4) + LFill(VL_PIS,0,2) + LFill(COD_CTA) ) ; por: Add( LFill('C381') + LFill(strCST_PIS) + LFill(COD_ITEM) + LFill(VL_ITEM,0,2) + LFill(VL_BC_PIS,0,2,true) + LFill(ALIQ_PIS,8,4,true) + LFill(QUANT_BC_PIS,0,3,true) + LFill(ALIQ_PIS_QUANT,0,4,true) + LFill(VL_PIS,0,2) + LFill(COD_CTA) ) ; e fiz a mesma coisa no WriteRegistroC385, resolveu aqui, alguem teve algum problema parecido???
  15. Marcio, deu certo, muito obrigado, alterei a linha 1232 do pcnNFeW para if (nfe.Det.Imposto.II.vII > 0) or (nfe.Det.Imposto.II.vBc > 0) or (nfe.Det.Imposto.II.vDespAdu > 0) or (nfe.Det.Imposto.II.vIOF > 0) then e resolveu o problema, obrigado mesmo
  16. Ola, consegui falar com o pessoal que gera a Declaração de Importação, realmente acontecem casos em que a Aliquota Advalorem (TEC) é zero, gerando valor zero para o imposto de importação em determinadas adições. No meu cliente ainda está tudo funcionando, porque essa tag só passa a ser obrigatória nas notas de importação a partir de 01 de novembro de 2011, mas no ambiente de testes já está obrigatório. Agradeço a ajuda
  17. Pois é, também achava isso, mas tenho aqui em mãos uma Declaração de Importação que das adições, apenas uma o imposto de importação é zero, também achei bastante estranho, estou tentando enttrar em contato com a empresa que gera a declaração de importação mas ainda não consegui
  18. Olá, não sei se alguém teve algum problema parecido, estou emitindo uma NFe de Importação, e para cada item devo informar os dados da Tag que fica dentro da Tag , são quatro campos, vBC, vDespAdu, vII, vIOF. Até aqui tudo certo, as Tags são geradas no xml tudo certinho. Porém aconteceu um caso em que os campos vBC, vII e vIOF são zero, apenas o vDespAdu é maior que zero. Como o vII é zero a Tag não é escrita no XML, aí acontece a rejeição porque quando o cfop é de importação a Tag II é obrigatória. Se alguém puder ajudar, ou me dizer em qual arquivo dos fontes eu devo alterar, eu agradeço
  19. Ola pessoal, procurei aqui no forum mas nao encontrei nada a respeito, então resolvi criar o topico pra saber se mais alguem teve esse problema. Seguinte: tenho um cliente que emite nota de importação, então precisei gerar o bloco C120, porém o PVA acusou problema de estrutura, quando fui ver, o TRegistroC120 não tem o campo NUM_ACDRAW, "Número do Ato Concessório do regime Drawback", então fiz as seguintes mudanças no código e funcionou, arquivo: ACBrEFDBloco_C, a partir da linha: 416 TRegistroC120 = class private fCOD_DOC_IMP: TACBrDoctoImporta; /// Documento de importação: fNUM_DOC__IMP: String; /// Número do documento de Importação. fPIS_IMP: currency; /// Valor pago de PIS na importação fCOFINS_IMP: currency; /// Valor pago de COFINS na importação fNUM_ACDRAW: String; /// Numero do Ato Concessório ro regime Drawback public property COD_DOC_IMP: TACBrDoctoImporta read FCOD_DOC_IMP write FCOD_DOC_IMP; property NUM_DOC__IMP: String read FNUM_DOC__IMP write FNUM_DOC__IMP; property PIS_IMP: currency read FPIS_IMP write FPIS_IMP; property COFINS_IMP: currency read FCOFINS_IMP write FCOFINS_IMP; property NUM_ACDRAW: String read fNUM_ACDRAW write fNUM_ACDRAW; end; arquivo: ACBrEFDBloco_C_Class, a partir da linha 1109 with RegC100.RegistroC120.Items[intFor] do begin Add( LFill('C120') + LFill( Integer(COD_DOC_IMP), 0 ) + LFill( NUM_DOC__IMP ) + LFill( PIS_IMP,0,2 ) + LFill( COFINS_IMP,0,2 ) + LFill( NUM_ACDRAW ) ) ; end; então, pra mim funcionou, mas nao sei como é o processo de sugerir alteração/correção, aí eu postei aki, espero ter ajudado
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...