Jump to content

zanona

Membros
  • Posts

    30
  • Joined

  • Last visited

Recent Profile Visitors

1,027 profile views

zanona's Achievements

Contributor

Contributor (5/14)

  • First Post
  • Collaborator Rare
  • Conversation Starter
  • Week One Done
  • One Month Later

Recent Badges

1

Reputation

1

Community Answers

  1. É pelo demo que estou testando! Basicamente incluo o boleto conforme exemplo abaixo! var Titulo: TACBrTitulo; begin Titulo := dm.ACBrBoleto.CriarTituloNaLista; with Titulo do begin Vencimento := StrToDate(edtVencimento.Text); DataDocumento := StrToDate(edtDataDoc.Text); NumeroDocumento := edtNumeroDoc.Text; EspecieDoc := edtEspecieDoc.Text; if cbxAceite.ItemIndex = 0 then Aceite := atSim else Aceite := atNao; DataProcessamento := Now; Carteira := edtCarteira.Text; NossoNumero := edtNossoNro.Text; ValorDocumento := StrToCurr(edtValorDoc.Text); Sacado.NomeSacado := edtNome.Text; Sacado.CNPJCPF := OnlyNumber(edtCPFCNPJ.Text); Sacado.Logradouro := edtEndereco.Text; Sacado.Numero := edtNumero.Text; Sacado.Bairro := edtBairro.Text; Sacado.Cidade := edtCidade.Text; Sacado.UF := edtUF.Text; Sacado.CEP := OnlyNumber(edtCEP.Text); ValorAbatimento := StrToCurrDef(edtValorAbatimento.Text, 0); LocalPagamento := edtLocalPag.Text; ValorMoraJuros := StrToCurrDef(edtMoraJuros.Text, 0); ValorDesconto := StrToCurrDef(edtValorDesconto.Text, 0); ValorAbatimento := StrToCurrDef(edtValorAbatimento.Text, 0); DataMoraJuros := StrToDateDef(edtDataMora.Text, 0); DataDesconto := StrToDateDef(edtDataDesconto.Text, 0); DataAbatimento := StrToDateDef(edtDataAbatimento.Text, 0); DataProtesto := StrToDateDef(edtDataProtesto.Text, 0); PercentualMulta := StrToCurrDef(edtMulta.Text, 0); Mensagem.Text := memMensagem.Text; OcorrenciaOriginal.Tipo := toRemessaBaixar; Instrucao1 := PadRight(trim(edtInstrucoes1.Text), 2, '0'); Instrucao2 := PadRight(trim(edtInstrucoes2.Text), 2, '0'); end; E depois clico duas vezes no botão imprimir! Código abaixo! dm.ACBrBoletoReport.FastReportFile:= 'D:\projetos\ACBR\trunk2\Exemplos\ACBrBoleto\Delphi\Report\BoletoNovo.fr3'; dm.ACBrBoletoReport.DirLogo:='D:\projetos\ACBR\trunk2\Fontes\ACBrBoleto\Logos\Colorido\'; dm.ACBrBoleto.Imprimir;
  2. Olá pessoal, quando vou imprimir a mensagem padrão do boleto aparece corretamente! Se mando imprimir novamente a mensagem duplica! Tem como evitar isso?
  3. Resolvido! Era o arquivo com problema! O campo DataField="QrCodeCarregado" estava desta forma! Eu simplesmente apaguei e deu certo!
  4. Pessoal, tenho uma NFC-e está saindo sem QRCODE. Pelo que eu vi está autorizado a nota mas não tá saindo! O que poderia ser? Modelo DANFeNFCeA4.fr3 arquivo.xml
  5. Eu tenho o XE7 também! Eu tentei instalar para os dois Delphi inicialmente! Não deu certo! Eliminei a install dos dois Delphi e deixei apenas o D2007 mas ainda ocorre!
  6. --------------------------- bds.exe - Ponto de entrada não encontrado --------------------------- Não foi possível localizar o ponto de entrada do procedimento @[email protected]@[email protected] na DLL (dynamic-link library) D:\projetos\code\trunk2\Lib\Delphi\LibD11\ACBr_SATExtratoRL.bpl. --------------------------- OK ---------------------------
  7. Já procurei em todo meu PC as BPLs que tinham! Apaguei tudo! Mesmo assim ainda ocorre o problema
  8. Sim! Inclusive criei outro diretório diferente do que estava instalado para tentar evitar qualquer outro problema!
  9. Eu instalo o ACBR tranquilamente! Quando vou abrir um projeto que tenha acbr dá mensagem abaixo! Dou OK na mensagem e abro menu Delphi Install componentes e vários pacotes desmarcados! Delphi 2007 e Xe7! Ambos com problema bds.exe - Ponto de entrada não encontrado --------------------------- Não foi possível localizar o ponto de entrada do procedimento @[email protected]@[email protected] na DLL (dynamic-link library) D:\Projetos\ACBR\trunk2\Lib\Delphi\LibD11\ACBr_NFeDanfeFR.bpl. --------------------------- OK ---------------------------
  10. Sim no mesmo SO! Qual seria o fast que o ACBR usa? 4 ou 5 ?
  11. Quando vou jogar o componente ACBrCTeDACTEFR dá o seguinte erro abaixo! --------------------------- Error --------------------------- Access violation at address 50BDDD17 in module 'dsnap210.bpl'. Read of address 00000000. --------------------------- OK Details >> --------------------------- Isto ocorre no Delphi XE7 com fast report 5.5.8 OBS: No meu Delphi 2007 com fast 4 isto não ocorre! Alguém sabe o que poderia ser?
  12. Juliomar, vc usou alguma ferramenta para identificar este erro conforma a imagem?
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.