Boletos BRADESCO, BB e ITAU no HARBOURBOLETO estao ok?

[ANDRIL]

Galera que usa o HarbourBoleto, como já disseram os fontes do sourceforce estao desatualizados. Gostaria de saber se os boletos que estão no exemplo DEMOBOLETO dos bancos citados no titulo estao ok. Vi no fonte que apenas estes bancos tem um tratamento para o tamanho dos campos AGENCIA, CONTA e NOSSO NUMERO.

Código: Selecionar todos

   if cBanco $ "104/409/399/356"
      oBol:cNossoNumero := "5682571934"
   elseif cBanco = "001"
      // Banco do Brasil - carteira 17/18 - 11 posiþ§es
      if val(cCarteira) = 17 .or. val(cCarteira) = 18
         oBol:cNossoNumero := "56825374192"
      else // demais carteiras - 5 posiþ§es
         oBol:cNossoNumero := "56825"
      endif
   elseif cBanco = "341"
      oBol:cNossoNumero := "98712345"
   elseif cBanco = "237"
      oBol:cNossoNumero := "56825374192"
   endif

E os outros bancos nao precisam desse tipo de verificação? E outras carteiras desses bancos do exemplo acima ficariam com a mesma quantidade de digitos?

Nos testes que fiz algumas vezes os boletos nao ficam com o codigo de barras preenchido totalmente, ai ajusto a largura da agencia/conta e ficam. Só que e seu estiver ajustando errado, pondo numero onde nao tem e tirando de onde tem...

Estou implementando algumas modificacoes (atualizando algumas opcoes ja existentes que nao funcionavam e criando novas, como parametro para retornar as impressoras cadastradas no Windows) e gostaria dessas informacoes, assim que conseguir fechar disponibilizo aqui para download (se for permitido).

Abraços

[BHS]

Bom dia

Comecei a usar faz uns meses o Harbourboleto e a versão que baixei de 2008 funciona para o Bradesco, Itau e BB.
Só tem uma coisa na versão 2008 que achei estranho, quando eu crio o bol.ini e coloco o lpromptprint = .t., em vez de a caixa de dialgo de impressão aparecer na frente do meu sistema, ela abre por de tras do sistema, sendo assim, meu sistema fica emcobrindo a caixa de seleção de impressora.

Será que alguem tem uma outra versão sem esse problema ?

Obrigado

Henrique

[Imatech]

Olá BHS !


o Harbour Boleto vem com os fontes justamente para poder ser ajustado ao projeto do utilizador...



Podemos lhe ajudar em dificuldades especificas, post exemplo explicito em problemas encontrados...



Abç...

[sygecom]

Henrique,
Eu não tenho esse problema da impressora aqui, você por acaso já tentou ver um PREVIEW antes de imprimir para ver se perder o foco.

[BHS]

Boa tarde amigos

Leonardo, fiz diversos testes com o hboleto, que foram:

1.
lPrint=.t.
lPreview=.f.
lPromptPrint=.f.

nesse modo o cliente manda direto para a impressora padrão (funcionando perfeitamente)

2.
lPrint=.t.
lPreview=.t.
lPromptPrint=.f.

assim funciona, porem a janela do IE abre por tras do meu sistema, isto é, a minha janela fica a frente do IE.

3.
lPrint=.t.
lPreview=.f.
lPromptPrint=.t.

mesma coisa do problema acima, o a caixa de dialogo para selecionar a impressora, aparece tambem por tras do meu sistema

como disse acima, baixei e estou usando o hboleto compilado na data 10/08/07.
o ultimo de 2010, testei e somente imprime se deixar o preview habilitado, caso contrario não imprime nada.

OBS: não mexi em nada nos prgs do hboleto, somente usando o hboleto ja compilado. Caso alguem tenha um outro ja compilado pra testar ou se alguem puder me ajudar a mexer nos fontes dessa parte ficarei agradecido.

Obrigado

Henrique

[BHS]

Consegui resolver

Código: Selecionar todos

METHOD Print( lPreview, lPromptPrint, cPrinter ) CLASS oBoleto

   DEFAULT lPreview     TO ::lPreview ,;
           lPromptPrint TO .T.,;
           cPrinter     TO GetDefaultPrinter()

   IF ::lBoleto .AND. ::nBoletos > 0
      
    IF lPromptPrint = .f.
            PrintHTML(::Destino + ::Nomehtm, cPrinter, lPreview, lPromptPrint, !lPreview )
    ELSE 
      xhbrun('c:\windows\system32\RUNDLL32.EXE c:\windows\system32\MSHTML.DLL,PrintHTML "'+::Destino + ::Nomehtm+'"',.T.,.f.)
    ENDIF

   ENDIF

RETURN Self

Como só uso o windows, dessa maneira a caixa de dialogo para escolher a impressora não abre por tras do sistema.

Henrique

[sygecom]

Menos mal que resolveu, só não entendi a causa disso ! é muito estranho aqui não acontecer. Deve ser alguma coisa relacionada a navegador de internet.