Ir para conteúdo
  • Cadastre-se

IGNACIO RODRIGUES

Membros Pro
  • Total de ítens

    174
  • Registro em

  • Última visita

Tudo que IGNACIO RODRIGUES postou

  1. Mas quando uso o programa DarumaFramework_Delphi, consigo emitir leitura x por exemplo
  2. Sim esta certo, quando eu tinha colocada modelo ecfESC ativava mas não reconhecia nenhum comando, quando coloquei modelo ecfEscECF, recebi a mensagem "Impressora EscECF não está em linha", realmente o modelo ecfESC não existe.
  3. Além deu informar que é uma ECF esc, eu devo informar mais alguma coisa para que o acbr leia os método do darumaframework, pois parece que ele ativa a conexao com a ecf mas não consegue entender os metodos. Por exemplo quando quero lançar um leitura x logo depois de conseguir ativar a impressora. Project SIC.exe raised exception class EACBrECFCMDInvalido with message 'Procedure: LeituraX não implementada para a Impressora: Não Definido FDataModule.ACBrECF.Ativar; FDataModule.ACBrECF.LeituraX;
  4. Ok consegui ativar a impressora usando o modelo ecfESC, porem seguindo o ACBr não esta reconhecendo o status que a impressora esta me mandando que é status "Modo Fiscal", olhei em TACBrECFEstado e la não tem modo fiscal, isso ainda será implementado?
  5. IGNACIO RODRIGUES

    Fs800I

    A alguma configuração especifica que tenho que fazer para conseguir conectar a Daruma FS800i, pois uso a mesma maneira que conecto a FS600, e não conecta. estou usando o metodo ativar do acbr
  6. Recebo a mesma resposta do ECFTeste, Communication error 1: Função incorreta - + - + - + - + - + - + - + - + - + - + - + -
  7. Quando eu uso o modelo 'ecfNaoFiscal' recebo essa mensagem: Este Emulador destina-se EXCLUSIVAMENTE para auxiliar no desenvolvimento de aplicativos para as impressoras fiscais. Usar o emulador para fins comerciais sem a devida impressão do Cupom Fiscal ou Nota Fiscal pode caracterizar crime de Sonegação Fiscal. Continua com o do Emulador?
  8. Quando uso a solução ACBr eu uso as dll da bematech, na solução DarumaFrameWork eu uso a dll direto sem o uso do ACBr, mas que tenho que ter a solução ACBr tambem.
  9. Eu tenho duas soluções, uma eu uso o DarumaFrameWork para conectar a impressora Bematch MP-4200 TH não fiscal, e a outra solução que estou desenvolvendo é usando o ACBr, tambem estou tentando conecta na impressora MP-4200 TH não fiscal, eu apenas mencionei o uso do DarumaFrameWork para afirmar que a impressora MP-4200 TH não fiscal esta instalado corretamente.
  10. FDataModule.ACBrECF.Modelo := TACBrECFModelo(GetEnumValue(TypeInfo(TACBrECFModelo), 'ecfBematech')); //ecfBematech FDataModule.ACBrECF.Porta := Configuracao.PortaECF; //'COM6' FDataModule.ACBrECF.TimeOut := Configuracao.TimeOutECF; //100 FDataModule.ACBrECF.IntervaloAposComando := Configuracao.IntervaloECF; //0 FDataModule.ACBrECF.Device.Baud := Configuracao.BitsPorSegundo; //9600 FDataModule.ACBrECF.Ativar; esta ocorrendo esse erro > 'Communication error 1:Função incorreta', eu consigo acessar e imprimir a impressora diretamento pelo DarumaFrameWork, a impressora esta na porta virtual COM6 e velocidade 9600, então acredito que com isso o drive esteja instalado corretamente, para acessar com o ACBr coloco as dll da bematech na pasta principal da minha aplicação e tambem na system32, 'BemaFI32.dll', 'BemaFI32.ini' e 'mp2032.dll', então com o DarumaFrameWork eu consigo fazer tudo, vender, efetuar pagamento e imprimir o danfe. Acredito que não seja problema de instalação da impressora no PC, o que pode estar causando o erro.
  11. procedure TACBrBancoHSBC.GerarRegistroHeader400(NumeroRemessa : Integer; aRemessa: TStringList); var wLinha: String; begin with ACBrBanco.ACBrBoleto.Cedente do begin wLinha:= '0' + // ID do Registro '1' + // ID do Arquivo( 1 - Remessa) 'REMESSA' + // Literal de Remessa '01' + // Código do Tipo de Serviço padL( 'COBRANCA', 15 ) + // Descrição do tipo de serviço '0' + // Zero padR(OnlyNumber(Agencia), 4, '0') + // Agencia cedente '55' + // Sub-Conta padR(OnlyNumber(Conta)+ContaDigito, 11, '0') + // Conta Corrente //Removi agencia repetido //ALFEU MOTA // padL( '', 2,' ') + // Uso do banco padL( Nome, 30,' ') + // Nome da Empresa '399' + // Número do Banco na compensação padL('HSBC', 15) + // Nome do Banco por extenso FormatDateTime('ddmmyy',Now) + // Data de geração do arquivo '01600' + // Densidade de gravação 'BPI' + // Literal Densidade padL( '', 2,' ') + // Uso do banco 'LANCV08' + // Sigla Layout padL( '', 277,' ') + // Uso do Banco '000001' ; // Número Seqüencial aRemessa.Text:= aRemessa.Text + UpperCase(wLinha); end; end; Na linha onde informa o numero da conta com a contaDigito esta errado "padR(OnlyNumber(Conta)+ContaDigito, 11, '0') ", o correto é padR(Agencia + Conta, 11, '0'), tem que ser 4 digitos do numero da agencia, mais 7 digitos com o numero da conta, completando com zero a esquerda depois do numero da agencia e antes do numero da conta, formando assim 7 digitos com o numero da conta e 4 dígitos com o numero da agencia. http://www.hsbc.com.br/1/PA_esf-ca-app-content/content/hbbr-pws-gip16/portugues/business/comum/pdf/cob400_jan.pdf ver nota explicativa 1
  12. Acho que não é problema de aspas, tentei de todo jeito tanto com aspas simples quanto com aspas dupla, desta maneira: NFE.CriarEnviarNFe('[identificacao] ... , 1') NFE.CriarEnviarNFe("[identificacao] ... , 1") 'NFE.CriarEnviarNFe([identificacao] ... , 1)' "NFE.CriarEnviarNFe([identificacao] ... , 1)" tentei com aspas destas 4 maneiras.
  13. Estou enviando este mesmo arquivo texto para o acbrMonitor, tanto na versão 0.8.10.2 - CAPICOM, quando na versão 0.8.7.0 - CAPICOM. Na versão 0.8.7.0 imprime sem nenhum problema. Ja na versão 0.8.10.2 esta mostrando o seguinte erro: ERRO: '' is not a valid floating point value é como se eu estivesse mandando algum valor vazio em branco no lugar de algum valor em float preenchido, mas isso so ocorre na versão, 0.8.10.2. Seque o arquivo texto que estou testando nas duas versão, preciso da versão mais atual que esta com problema. porque nessa versão mais atual não da estouro de margem do danfe. NFE.CriarEnviarNFe( [identificacao] NaturezaOperacao=Venda interna mod=65 tpImp=4 indFinal=1 indPres=1 Codigo=10562 Numero=10562 Emissao=16/09/2014 Saida=16/09/2014 [Emitente] CNPJ=09428584000175 IE=283468068 Razao=ANDRADE ABREU & CIA LTDA Fantasia=ANDRADE ABREU & CIA LTDA Fone=9733732256 CEP=69800000 Logradouro=Rua Edmundo Monteiro Numero=10530 Complemento=Antigo Bairro do Banheiro heheeh Bairro=Nova Humaita CidadeCod=1301704 Cidade=Humaita UF=AM [Destinatario] CNPJ=05403329412 IE= ISUF= NomeRazao=JAKELLINE ANDRADE SANTANA Fone=9733733633 CEP=56511110 Logradouro=RUA EDMUNDO MONTEIRO Numero=1906 Complemento= Bairro=SAO PEDRO CidadeCod=1301704 Cidade=HUMAITA UF=AM [Produto001] Codigo=7898409952098 EAN=7898409952098 Descricao=GELATINA EM PO FLEISCMANN 30G MARACUJA.-FLEISCHMANN NCM=32041912 CFOP=5102 Unidade=UN Quantidade=123.00 ValorUnitario=0.80 ValorTotal=98.40 cEANTrib=7898409952098 [iCMS001] Aliquota=17 CST=40 ValorBase=98.40 Valor=16.73 [Total] BaseICMS=98.40 ValorICMS=16.73 ValorProduto=98.40 ValorNota=98.40 [Transportador] FretePorConta=9 [PAG001] tpag=01 vpag=98.40 [DadosAdicionais] Complemento=Teste Emissão NFCe. , 1 , 1 , 1 , 1 , 1)
  14. Consegui imprimir na minha MP-4200 TH, impressora não fiscal a nota consumidor, através do monitor mas esta comendo o ultimo caracter, como faço pra ajustar as margem do monitor, pois naquela aba Danfe/Dacte que tem os campos para as margens não esta resolvendo nada.
  15. Mesmo tendo mudado o danfe para fortes, continua a imprimir o danfe da NFE e não da nota consumidor
  16. Voce poderia passar tambem um layout com todo os possiveis campos a serem preenchidos, como exemplo, desconto, acrescimo, cofins, tanto um layout completo em xml quanto em arquivo texto para o monitor, desde ja agradeço.
  17. Uso esse danfe > TACBrNFeDANFERave 13140909428584000175650010000105692000105696-nfe.xml
  18. Ide.modelo := 65; Ide.tpEmis := pcnConversao.teContingencia; Ide.tpImp := pcnConversao.tiNFCe; Ide.indFinal := pcnConversao.cfConsumidorFinal; Ide.indPres := pcnConversao.pcPresencial; vNumLote := '1'; Sincrono := True; vAux := '10568'; FDataModule.ACBrNFe.NotasFiscais.Clear; FDataModule.ACBrNFe.Configuracoes.Geral.ModeloDF := pcnConversao.moNFCe; FDataModule.ACBrNFe.Configuracoes.Geral.VersaoDF := pcnConversao.ve300; FDataModule.ACBrNFe.DANFE.TipoDANFE := pcnConversao.tiNFCe; GerarNFCe(vAux); FDataModule.ACBrNFe.Enviar(StrToInt(vNumLote),True,Sincrono); Estou passando esses parametro para gerar uma nota consumidor atravez da dll, mas ao invés de gerar uma nota consumidor esta gerando uma NFE comum, o que mais esta faltando para eu configurar, para gerar o DANFE da Nota Consumidor e não da NFE.
  19. nesse exemplo não esta imprimindo danfe, não tem codigo para imprimir o danfe
  20. Voce tem um exemplo de como chama o danfe, ou dizer onde encontro?
  21. Estou usando o exemplo do acbr para enviar nota consumidor para a sefaz, recebo a mensagem de autorizado da sefaz e recebo o xml autorizado tambem, até aí tudo bem, o que preciso agora é gerar o danfe dessa nota consumidor, pelo que vi no codigo exemplo do acbr essa parte de imprimir o danfe ainda não esta implementado. Preciso saber como é gerado o danfe da nota consumidor, essa é a unica parte que falta. Obs: quando abro a aplicação exemplo do acbr para executar enviar a nota consumidor recebo essa mensagem: Field Form1.ACBrNFeDANFERaveCB1 does not have a corresponding component. Remove the declaration? mas acredito que não seja esse o problema, porque pelo que eu entendi do codigo ainda não esta imprimindo no danfe. Em anexo o exemplo que executei com a resposta da sefaz.
  22. O meu sistema esta fazendo tudo com a conectada MP-4200, a única coisa que esta faltando mesmo são 3 relatorios do PAF. Os relatorios são: Arq. MF, ARQ. MFD e o Ato cotepe 17/04. A minha aplicação roda tudo e imprime todos os relatorios do PAF com a MP-4000, inclusive esses 3 relatorios que citei. Mas quando eu mudo de ECF para a conectada da essa mensagem: Procedure: ArquivoMF_DLL não implementada para a Impressora: BEMATECH - MP-4200 TH FI Ajude no desenvolvimento do ACBrECF. Acesse nosso Forum em: http://acbr.sf.net Pelo que eu andei dando uma vasculhada no forum, voces ainda estão desenvolvendo os funções para a MP-4200, tem previsão de quando ficara pronto esses 3 relatorios, são os únicos que estão faltando para minha aplicação rodar 100% com a MP-4200, ou se derrepente mudou o nome da função a ser chamada.
  23. O acbr monitor já esta preparado para geração de Nota fiscal consumidor?
  24. IGNACIO RODRIGUES

    Nfe 3.10

    No usamos hoje o acbr monitor para emissão de notas eletrônicas. Desejamos saber qual o procedimentos que devemos fazer para adequar o layout da NFE 3.10.
  25. SOLUÇÃO LINHA DIGITÁVEL ENVIADO 0339965469 56000000002 01001400009 1 60130000033000 ESPERADO 0339965469 56000000002 01001401015 5 60130000033000 Também estou tendo problemas em gerar a linha digitável correta. No meu caso estou enviando a carteira corretamente, ja tentei com '101' e com 'ECR', nos dois casos é gerado a linha digitável como esta em 'enviado'. NossoNumero := '000000001001'; Vencimento := QueryContasReceberVENCIMENTO.AsDateTime; DataDocumento := Now; NumeroDocumento := QueryContasReceberDOC.AsString; Carteira := 'ECR'; ValorDocumento := QueryContasReceberVALOR.AsFloat; Sacado.NomeSacado := QueryContasReceberNOME.AsString; Sacado.CNPJCPF := QueryContasReceberCNPJ.AsString; Sacado.Logradouro := QueryContasReceberENDERECO.AsString; Sacado.Numero := QueryContasReceberNUMERO.AsString; Sacado.Bairro := QueryContasReceberBAIRRO.AsString; Sacado.Cidade := QueryContasReceberCIDADE.AsString; Sacado.UF := QueryContasReceberUF.AsString; Sacado.CEP := QueryContasReceberCEP.AsString; ValorAbatimento := 0; LocalPagamento := QueryConfigLOCAL_PAGTO.AsString; ValorMoraJuros := 0; ValorDesconto := 0; ValorAbatimento := 0; DataMoraJuros := 0; DataDesconto := 0; DataAbatimento := 0; DataProtesto := QueryContasReceberVENCIMENTO.AsDateTime + QueryConfigDIAS_PROTESTO.AsInteger; PercentualMulta := 0; Mensagem.Text := QueryConfigMENSAGEM.AsString; Instrucao1 := QueryConfigINSTRUCAO_1.AsString; Instrucao2 := QueryConfigINSTRUCAO_2.AsString; TotalParcelas := QueryContasReceberPARCELA.AsInteger; Parcela := QueryContasReceberPARCELA.AsInteger; segue o código que uso para preencher o TACBrTitulo.
×
×
  • 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...