1. This site uses cookies. By continuing to use this site, you are agreeing to our use of cookies. Learn More.

  2. Anuncie Aqui ! Entre em contato fdantas@4each.com.br

[RESOLVIDO] Desenvolvimento de Boleto em Word

Discussão em 'EMS , HCM e Totvs 11' iniciado por muertebr, Novembro 25, 2009.

Status do Tópico:
Não esta aberto para novas mensagens.
  1. muertebr

    muertebr Membro Participativo

    Segue...

    Código:
    CREATE "word.application" appword.
                appword:VISIBLE = NO.
                appword:Documents:open("q:\ems2\_custom\layout\Boleto.doc",False,False,False,"","",False).
    
    for each tt-boleto....
        run imprime-especifico. /** Imprimir especifico em word. Depois de ter escolhido o banco. **/
    end.
    
    PROCEDURE imprime-especifico.
       AppWord:Selection:Find:Text = "#dt_vencto".
         AppWord:Selection:Find:Replacement:TEXT = string(tt-bloqueto.dt-vencto, "99/99/99").
         AppWord:Selection:Find:Forward = True.
         AppWord:Selection:Collapse.
         AppWord:Selection:Find:Execute(,,,,,,,,,,1,,,,).
         AppWord:Selection:Find:Text = "#dt_emissao".
         AppWord:Selection:Find:Replacement:TEXT = string(tt-bloqueto.dt-emissao, "999999").
         AppWord:Selection:Find:Forward = True.
         AppWord:Selection:Collapse.
         AppWord:Selection:Find:Execute(,,,,,,,,,,1,,,,).
    .... bla bla bla bla ....
    end procedure.
    
    appword:ActiveDocument:SaveAs("c:\work\boleto" + tt-bloqueto.nr-docto + ".doc").
    ch-Documento = appword:ActiveDocument:CLOSE NO-ERROR.
    ch-Documento = Appword:ActiveDocument:QUIT.
    release object appword.
    release object ch-Documento.
  2. marcosgiufrida

    marcosgiufrida Sem Pontuação

    Olá Pessoal !
    Eu tb preciso desenvolver um programa para geração de boleto bancário para o banco do Brasil e Bradesco...
    Poderiam me enviar alguns exemplos? (layout montado no word ou excel)

    Obrigado !
  3. eduardo.leite

    eduardo.leite Equipe de Suporte Moderador Equipe de Suporte

    Meu caro,


    Tenho pronto para o BANCO DO BRASIL, onde já foi homologado por ele, uma rotina para gerar em PDF o boleto sem ter uma fonte de código de barra windows instalado na máquina.

    A rotina está criando o código de barra para o Nosso Número Livre, se você quiser posso enviar um DEMONSTRAÇÃO para você testar e validar junto ao BANCO BRASIL.

    So me informe seu e-mail e versão do Progress e tento montar um DEMONSTRAÇÃO.
  4. berriel

    berriel Membro Participativo

    Olá, estou precisando gerar boletos para o Bradesco e não estou conseguindo gerar o código de barras. Alguém tem a fonte Interleaved 2of5 ou outra maneira?

    Abraços
  5. eduardo.leite

    eduardo.leite Equipe de Suporte Moderador Equipe de Suporte

    Caro colega, tenho uma solução pronta que gera o boleto bancário em PDF sem a necessidade de fontes instaladas no Windows.

    Comercializo ela a preço acessível e já vem preparada para outros bancos.

    Se desejar entre em contato Quite podemos até enviar uma copia de avaliação
  6. arnaldolima

    arnaldolima Sem Pontuação

    Eduardo ,

    Te enviei um email solicitando condições para Adquirir esta rotina favor me respoder no email arnaldoclima2012@hotmail.com

    Arnaldo Cavalcante
Status do Tópico:
Não esta aberto para novas mensagens.

Compartilhe esta Página