Rogerio Figueira Posted March 16, 2015 Report Share Posted March 16, 2015 Estou usando xHarbour 1.2.3 Intl. (SimpLex) (Build 20130903) vou mandar no seu e-mail um ex. do prg que chama a classe. []´s kapiaba 1 Quote Link to comment Share on other sites More sharing options...
kapiaba Posted March 16, 2015 Report Share Posted March 16, 2015 Estou usando xHarbour 1.2.3 Intl. (SimpLex) (Build 20130903) vou mandar no seu e-mail um ex. do prg que chama a classe. []´s Blz. pode ser isso. Quote Link to comment Share on other sites More sharing options...
kapiaba Posted March 17, 2015 Report Share Posted March 17, 2015 RESOLVIDO!! Agradecimentos especiais a Rogério Figueira e ao Alessandro. Very good, uma imagem, fala por si, Obg. abs. Quote Link to comment Share on other sites More sharing options...
Rogerio Figueira Posted March 17, 2015 Report Share Posted March 17, 2015 Blz João, mas a classe que eu tinha te passado já está com o novo leiaute onde cedente é trocado por benificiário, sacado por pagador. Novas regras da central dos banqueiros. []´s kapiaba 1 Quote Link to comment Share on other sites More sharing options...
kapiaba Posted March 17, 2015 Report Share Posted March 17, 2015 Blz João, mas a classe que eu tinha te passado já está com o novo leiaute onde cedente é trocado por benificiário, sacado por pagador. Novas regras da central dos banqueiros. []´s Rogério, com a sua classe, não está aparecendo a BitMap, veja se o resto, está correto? Obg. abs Quote Link to comment Share on other sites More sharing options...
kapiaba Posted March 17, 2015 Report Share Posted March 17, 2015 Pohhhhhaaaa Rogerio... kkkkkkkkkkkkkkkkkkkkkkkkk Tõ ficando bom na bagaça... kkkkkkkkkkkkkkkkkk //*----------------------------------------------------------------------------* // // M., Ronaldo: Boleto Bancario em Harbour // // Method Draw_Image( nLeft, nTop, nWidth, nHeight ) Class MR_Boleto // //*----------------------------------------------------------------------------* Method Draw_Image( nLeft, nTop, nWidth, nHeight ) Class MR_Boleto //Local cFile := 'boletos\imagens\Logo_' + ::Banco________ + '.jpg' Local cFile := 'resources\Logo_' + ::Banco________ + '.jpg' Local oImage IF hb_FileExists( cFile ) oImage := HPDF_LoadJPEGImageFromFile( :_Pdf, cFile ) HPDF_Page_DrawImage( ::oPage, oImage, nLeft, ( ::Page_Height__ - nTop ), nWidth, nHeight ) ELSE ::Draw_Text( nLeft, nTop - ( ::Page_Height__ * 0.005 ), ::Banco_Nome___, ::oFont_v______, Font_Large____ ) ENDIF Return NIL abs. Quote Link to comment Share on other sites More sharing options...
kapiaba Posted March 17, 2015 Report Share Posted March 17, 2015 Show() de bola, valeu Rogério e Alessandro. Obg. abs. Quote Link to comment Share on other sites More sharing options...
fladimir Posted March 17, 2015 Report Share Posted March 17, 2015 Quais outros bancos ou lista geral ele esta contemplando, acho 1 otima opcao investirmos nessa classe pois pelo jeito ja esta mais de meio caminho andado com varios bancos ok... Quote Link to comment Share on other sites More sharing options...
kapiaba Posted March 17, 2015 Report Share Posted March 17, 2015 Download disponível em dicas: http://fivewin.com.br/index.php?/files/file/1111-mrboletozip/ Compilado com FWH13.06 e xHarbour xhb010315. abs. Quote Link to comment Share on other sites More sharing options...
HASA Posted March 17, 2015 Report Share Posted March 17, 2015 Boa tarde, queria baixar mas... Desculpe, você não tem permissão para isso!HASA kapiaba 1 Quote Link to comment Share on other sites More sharing options...
kapiaba Posted March 17, 2015 Report Share Posted March 17, 2015 Boa tarde, queria baixar mas...Desculpe, você não tem permissão para isso!HASA Buenas Tardes HASA, é necessário pedir acesso ao Sr. Admin.: Gilmer Tavares. abs Quote Link to comment Share on other sites More sharing options...
aferra Posted March 18, 2015 Report Share Posted March 18, 2015 http://www.4shared.com/rar/9C6kVfDkce/MRBoleto.html? Precisa ter conta no 4Shared. kapiaba 1 Quote Link to comment Share on other sites More sharing options...
HASA Posted March 18, 2015 Report Share Posted March 18, 2015 Aferra, 'MRBOLETO.ZIP' é arquivo unavailable.This foi eliminado. HASA Quote Link to comment Share on other sites More sharing options...
aferra Posted March 18, 2015 Report Share Posted March 18, 2015 Tente novamente, agora está tudo em ordem Quote Link to comment Share on other sites More sharing options...
kapiaba Posted March 18, 2015 Report Share Posted March 18, 2015 Como eu não sabia deste detalhe, e não quero problemas com o autor, estou postando o arquivo de licenças. /* * MR-Tools source code: * * Copyright 2012 M., Ronaldo <ronmesq@gmail.com> * https://github.com/MRonaldo/MR-Tools/downloads * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2, or (at your option) * any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this software; see the file COPYING. If not, write to * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, * Boston, MA 02111-1307 USA * or visit the site https://github.com/MRonaldo/MR-Tools/downloads * * As a special exception, the MR-Tool Project gives permission for * additional uses of the text contained in its release. * * The exception is that, if you link the MR-Tools libraries with other * files to produce an executable, this does not by itself cause the * resulting executable to be covered by the GNU General Public License. * Your use of that executable is in no way restricted on account of * linking the MR-Tools library code into it. * * This exception does not however invalidate any other reasons why * the executable file might be covered by the GNU General Public License. * * This exception applies only to the code released by the MR-Tools * Project under the name MR-Tools. If you copy code from other * MR-Tools Project or Free Software Foundation releases into a copy of * MR-Tools, as the General Public License permits, the exception does * not apply to the code that you add in this way. To avoid misleading * anyone as to the status of such modified files, you must delete * this exception notice from them. * * If you write modifications of your own for MR-Print, it is your choice * whether to permit this exception to apply to your modifications. * If you do not wish that, delete this exception notice. * * * * If you want to contribute in this project, just contact the author: * Bug reports * Ideas * Requests * Sources * ... * */ Abs Quote Link to comment Share on other sites More sharing options...
kapiaba Posted March 18, 2015 Report Share Posted March 18, 2015 http://www.4shared.com/rar/9C6kVfDkce/MRBoleto.html? Precisa ter conta no 4Shared. Agora compila em .bat e .lnk e com .xDev -> Show() de bola do Alessandro. abs. aferra 1 Quote Link to comment Share on other sites More sharing options...
marcioe Posted March 20, 2015 Report Share Posted March 20, 2015 Alguem tem mrboleto, rodando no XHARBOR, se sim postem para galera, com as libs, etc. Quote Link to comment Share on other sites More sharing options...
aferra Posted March 20, 2015 Report Share Posted March 20, 2015 ahhh "ctázoano", kkkkkk Mas tudo bem segue novamente http://fivewin.com.br/index.php?/files/file/1111-mrboletozip/ http://www.4shared.com/rar/9C6kVfDkce/MRBoleto.html? Quote Link to comment Share on other sites More sharing options...
marcioe Posted March 20, 2015 Report Share Posted March 20, 2015 Amigo,Foi compilar, mas dá um monte de pau.... To meio lesado mesmo... vou trocar o fornecedor de "baseado", pois ele esta me mandando uns vencidos. kkkk kapiaba 1 Quote Link to comment Share on other sites More sharing options...
IMATECH Posted March 22, 2015 Report Share Posted March 22, 2015 // *----------------------------------------------------------------------*// M., Ronaldo: Boleto Bancario em Harbour//// 2015-03-22 Compatibilizar código Harbour/xHarbour//// Method Draw_Zebra( nX, nY, nW, nZ ) Class MR_Boleto// *----------------------------------------------------------------------*Method Draw_Zebra( nX, nY, nW, nZ ) Class MR_Boleto IF hb_zebra_GetError( ::hZebra_______ ) != 0 RETURN HB_ZEBRA_ERROR_INVALIDZEBRA ENDIF hb_zebra_draw( ::hZebra_______, {| x, y, w, z | HPDF_Page_Rectangle( ::oPage, x, y, w, z ) }, nX, nY, nW, nZ ) HPDF_Page_Fill( ::oPage ) Return NIL *** Após alguem testar e confirmar o funcionamento, irei incluir no GitHub ( alem de outras atualizações ) A partir de 26/05/2015 será obrigatória a adoção do novo layout e da nova sistemática para emissão do boleto de cobrança, de modo a atender a convenção entre instituições financeiras do Sistema Financeiro Nacional realizada em 30/05/2014, circulares nº 3.598 de 06/06/2012 e nº 3.656 de 02/04/2013 BC ( Anexo o Môdelo Atual ) Beneficiário: o credor da dívida em cobrança. ( antigo cedente ) Pagador: o devedor da dívida em cobrança. ( antigo sacado ) MR_boleto.PDF kapiaba 1 Quote Link to comment Share on other sites More sharing options...
kapiaba Posted March 24, 2015 Report Share Posted March 24, 2015 Amigo, Foi compilar, mas dá um monte de pau.... To meio lesado mesmo... vou trocar o fornecedor de "baseado", pois ele esta me mandando uns vencidos. kkkk Márcio, quais erros te ocorrem, lembre-se que este exemplo, foi compilado com FWH13.06 e xHarbour última versão e BCC582, Para BCC55, tem que mudar CXB.BAT e CXB.LNK Quote Link to comment Share on other sites More sharing options...
kapiaba Posted March 24, 2015 Report Share Posted March 24, 2015 // *----------------------------------------------------------------------* // M., Ronaldo: Boleto Bancario em Harbour // // 2015-03-22 Compatibilizar código Harbour/xHarbour // // Method Draw_Zebra( nX, nY, nW, nZ ) Class MR_Boleto // *----------------------------------------------------------------------* Method Draw_Zebra( nX, nY, nW, nZ ) Class MR_Boleto IF hb_zebra_GetError( ::hZebra_______ ) != 0 RETURN HB_ZEBRA_ERROR_INVALIDZEBRA ENDIF hb_zebra_draw( ::hZebra_______, {| x, y, w, z | HPDF_Page_Rectangle( ::oPage, x, y, w, z ) }, nX, nY, nW, nZ ) HPDF_Page_Fill( ::oPage ) Return NIL *** Após alguem testar e confirmar o funcionamento, irei incluir no GitHub ( alem de outras atualizações ) A partir de 26/05/2015 será obrigatória a adoção do novo layout e da nova sistemática para emissão do boleto de cobrança, de modo a atender a convenção entre instituições financeiras do Sistema Financeiro Nacional realizada em 30/05/2014, circulares nº 3.598 de 06/06/2012 e nº 3.656 de 02/04/2013 BC ( Anexo o Môdelo Atual ) Beneficiário: o credor da dívida em cobrança. ( antigo cedente ) Pagador: o devedor da dívida em cobrança. ( antigo sacado ) Que bacana, não sabia que o Autor do projeto, fazia parte do FiveWin Brasil. isto é excelente, pois, se pode perguntar diretamente a ele, sem se precisar se "matar". kkkkkkkkkkkkkkk, Abraços. IMATECH 1 Quote Link to comment Share on other sites More sharing options...
jfaguiar Posted August 14, 2018 Author Report Share Posted August 14, 2018 ahhh "ctázoano", kkkkkk Mas tudo bem segue novamente http://fivewin.com.br/index.php?/files/file/1111-mrboletozip/ http://www.4shared.com/rar/9C6kVfDkce/MRBoleto.html? Bom amigos. Alguém tem um exemplo em xharbour? Tentei compilar esse exemplo de http://www.4shared.com/rar/9C6kVfDkce/MRBoleto.html? , mas dar erro. Alterei o projeto direitinho para a minha versão e paths, mas não foi. ahhh "ctázoano", kkkkkk Mas tudo bem segue novamente http://fivewin.com.br/index.php?/files/file/1111-mrboletozip/ http://www.4shared.com/rar/9C6kVfDkce/MRBoleto.html? Quote Link to comment Share on other sites More sharing options...
kapiaba Posted August 14, 2018 Report Share Posted August 14, 2018 ahhh "ctázoano", kkkkkk - veja o exemplo que tem o CXB.BAT https://www.4shared.com/zip/hSds8SDpce/MRBoleto3.html https://www.4shared.com/rar/K-JflMkJba/Mrboleto__1_.html https://www.4shared.com/rar/RWcTdFeXba/MRBOLETO.html https://www.4shared.com/zip/HuVoI08ice/MRBOLETO.html Abs Quote Link to comment Share on other sites More sharing options...
jfaguiar Posted August 14, 2018 Author Report Share Posted August 14, 2018 Márcio, quais erros te ocorrem, lembre-se que este exemplo, foi compilado com FWH13.06 e xHarbour última versão e BCC582, Para BCC55, tem que mudar CXB.BAT e CXB.LNK Bom dia Kapiaba. Também alterei os cxb para a minha versão (fwh1307) mas não funcionou. Alguém tem alguma novidade por í? Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.