-
Total de ítens
16 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Tudo que delphijean postou
-
NÃO FUNCIONA ACBrAAC1.IdentPAF.OutrosArquivos.Count
um tópico no fórum postou delphijean ACBrSintegra/ACBrPAF
Pessoal o ACBrAAC1.IdentPAF.OutrosArquivos.Count parace não funcionar, estou usando a função abaixo (Código 1) e não retorna resultado, mesmo que eu registre vários arquivos como mostra abaixo (Arquivo 1). Count retorna zero, então não adiciona os itens dentro do ListBox2. O que há de errado, alguém sabe? Código 1 with ACBrAAC1.IdentPAF.OutrosArquivos do begin for I := 0 to Count - 1 do ListBox2.Items.Add(Objects.Nome+' | '+Objects.MD5); end; Arquivo 1 |N1|00000000000000|0000000000 |0000000000 |ProNúcleo & VisualTec |N2|54212542 |Frente de Caixa ProNúcleo & VisualTec |1.00.00 |N3|LIBEAY32.DLL |1966C992DC4A5B50BE3E58FC26B8B0D7 |N3|MP2032.DLL |B4A2AAA47C48ADE67BFA342B1C59DFB9 |N3|OPENSSL.EXE |F604C26DDAA13680A3278620C485212C |N3|PROREGECF.EXE |921970344E89ED9B5598DB9DD77EADA4 |N3|SIUSBXP.DLL |75355D591FFED68A6FEABCC3592380A4 |N3|SSLEAY32.DLL |FE51AF337B27B5A2B404129DD22B25E7 |N9|00000000000000|0000000000 |6,00 EADB089422C5FE0DA6323661EDE9E813D12EC78FBE1A987B960BAA0970C961A80BC0A39CDC3A13EDC10A4E74B3F387E7BB40B3F564D63C559B1B8519A382710E1AD53345E93A74D0E17A63F895AF088B16E5E78FFE41988D1C34702D190EB29C6FB67B45171444F43EF91B4B4CA682B59D52134A4F63F3C86E99D11EA3C8F21066D -
O meu ACBr não ta imprimindo o código MD-5 no cupom fiscal, tenho que informar manualmente, ou automaticamente o ACBr reconhece e imprime????
-
Pessoal como estão controlando a Emissão e Impressão do DAV?
-
já Já estou fazendo usando ACBr, RESOLVIDO.
-
Resolvido, entendir. eu acho! r.s..s
-
Pessoal como vocês estão gerando a lista das ECFs liberadas pra a empresa? estou fazendo isso sem ACBr, o ACBr já faz isso? quais componentes usar? manda uma dica ai de comom proceder pra fazer isso com ACbr se isso é possível?
-
Pessoal me da uma ajuda, porfavor. tou muito confuso com a montagem do paf, quais componentes devo usar para gerar os arquivos exigidos pelo ato/cotepe? ACBrPAF = uso pra gerar o que? ACBrEAD = uso pra gerar o que? ACBrAAC = uso pra gerar o que? é que tou vendo nos exemplos que preenche me parece as mesma informações no componentes distintos. alguem pode me ajudar a entende como gerar os arquiovos de inicialização do paf-ecf.exe, arquivos auxiliares, arquivo com a lista de arquivos. quero entender melhor isso. Lembrando que eu estava usando versão anterior do ACBr(acho que 0.47) que nao tinha o EAD e AAC.
-
Valeu amigo, deu certo. Obrigado.
-
Pessoal pra que serve essa classe: DadosReducaoZClass? estou tentando usar ela pra obter os dados da redução z logo após executá-la, mas todos os dados veêm vazios. existe a função: DadosUltimaReducaoZ, que retorna uma string Achei que essa classe ACBrECF1.DadosReducaoZClass também retornava os dados da última Reduçãoz. se retorna como usar? estou usando assim: //Executo a redução z: ACBrECF1.ReducaoZ( now ); //Tenta obter os dados da última ReduçãoZ: DT := ACBrECF1.DadosReducaoZClass.DataDaImpressora; Serie := ACBrECF1.DadosReducaoZClass.NumeroDeSerie; SerieMFD := ACBrECF1.DadosReducaoZClass.NumeroDeSerieMFD; NumeroECF := ACBrECF1.DadosReducaoZClass.NumeroDoECF;
-
OK! valeu meu amigo.
-
Olá pessoal, eu gostaria de saber como vocês fizeram para gerar os dados dos RegistrosR2..3..4..5..6..7 vocês armazenam esses dados em tabelas especificas no banco de dados? qual seria a lógica para eu ter esses dados na hora de gerar o arquivo? de onde eu vou pegar esses dados? abrigado.
-
OK, estou no aguardo, preciso disso pra ontem pois vou homologar ainda essa semana. Dai se precisar eu implemento. No Aguardo...
-
Olá amigos gostaria de saber se o ACBrECF está emitindo a Leitura da Memória Fiscal do mês anterior automáticamente, Quando da emissão da primeira ReduçãoZ do mês? para atender o Covênio ICMS 156/94.
-
Olá pessoal fiz algumas mudanças e acho que deu certo agora. Ao invés de usar: Agora eu inicializo o TEF na inicialização do sistema. Nas vendas agora faço assim: ACBrTEFD1.ATV(TACBrTEFDTipo(ecfTEFTipo)); ACBrTEFD1.CRT( ValorPago, '02', ACBrECF1.NumCOO); Isso antes de cada pagamento com cartão. Mas, agora a questão é, será que vai funcionar quando por exemplo eu mudar da VISANET para HIPERCARD por exemplo. Porque o cliente pode pagar com 2 cartões um Visa e o outro HiperCard. Bom amanhã vou num cliente testar. depois eu vou postar aqui.
-
Amigo eu uso o código acima, porque foi a única forma que achei para efetuar venda com operadoras diferentes, por exemplo: Se eu vender no Cartão usando VISANET e depois tentar fazer uma nova venda usando o HIPERCARD não estava funcionando ou seja, se eu vender como visa net tenho que sair do sistema e entrar novamente para poder vende para HIPERCARD. Pelo menos não achei outra forma. e isso mesmo usando multi-cartões, também não funciona.
-
Olá pessoal estou de volta aos foruns do ACBr depois de um tempão sumido! Galera e em especial Sr. Daniel, gostaria de saber se alguém tem a receita do bolo para uso do ACBrTEFD+MultiplosCartões? Estou usando a mais rescente versão do ACBrTEFD, configuro tudo para multilpos cartões mas, não esta funcionando. Veja os passos: 1- Efetuo a Venda (R$100,00) 2- Subtotalizo a Venda (Total: R$100,00) 3- Efetuo um pagamento em dinheiro no valor de R$20,00 ACBrECF1.EfetuaPagamento( '01', 20.00, '' , false ); 4- Efetuo um pagamento em cartão no valor de R$40,00 ACBrTEFD1.Inicializar(TACBrTEFDTipo(ecfTEFTipo)); ecfTEFUsouCartao := ACBrTEFD1.CRT( 40.00, '02', ACBrECF1.NumCOO); ACBrTEFD1.DesInicializar(TACBrTEFDTipo(ecfTEFTipo)); --->Até aqui todo bem e falta somente R$40,00 5- Efetuo um novo pagamento no valor de R$40,00 com outro cartão ACBrTEFD1.Inicializar(TACBrTEFDTipo(ecfTEFTipo)); ecfTEFUsouCartao := ACBrTEFD1.CRT( 40.00, '02', ACBrECF1.NumCOO); ACBrTEFD1.DesInicializar(TACBrTEFDTipo(ecfTEFTipo)); --->Aqui acontece um ERRO, ao invés de prosseguir o pagamento, O cupom é cancelado. quando vou Conectar novamente no ACBrTEFD ele avisa que tem Transações Pendentes. Então o que estou fazendo errado? Como devo proceder para usar multiplos cartões? Vejam o código abaixo: ACBrTEFD1.Inicializar(TACBrTEFDTipo(ecfTEFTipo)); ecfTEFUsouCartao := ACBrTEFD1.CRT( 40.00, '02' ACBrECF1.NumCOO); ACBrTEFD1.DesInicializar(TACBrTEFDTipo(ecfTEFTipo)); :::>Faço esses procedimento quantas vezes forem necessárias até que a soma dos valores Pagos sejam igual ao Total a Pagar. no meu exemplo acima efetuo esse procedimento nos passos 4 e 5. PS: ecfTEFTipo é uma variavel que recebe os valores: {0=NãoUsaTef;1=TefDial;2=TefDisc;3=HiperTef;4=CliSiTef;5=TefGpu;6=VeSPague} no meu caso uso mais o 1 e 3