CobreMAL

[alex2002]

Pessoal.

Estivemos pessoalmente no Rio de Janeiro na CobreBEM. Fomos recebidos por uma mulher chamada "Elisa Ferraz" mas segundo ela se pronuncia "ELAIZA" (rsrsrssrsrs). Ela nos atendeu 5 minutos e disse que teria compromissos "profissionais" (como se eu e a pessoa que foi comigo estivéssemos a passeio). Mas o importante é que descobrimos que o tal do cobrebem está PARADO literalmente e não tem data para retornar os desenvolvimentos. Ou seja, se pintar qualquer alteração nos bancos esqueçam.

Isso eu escutei da boca dela. Então, essa "ESTÓRIA" de que está no setor de desenvolvimentos deles é para boi dormir.

Vejam bem, eu não fui como desenvolvedor e sim como Instituição Financeira (BANCO). Como já temos clientes usando a plataforma de cobrança e eles enviam alguns arquivos, fomos pedir que eles fizessem umas pequenas modificações, pequenas mesmo. Mas ficamos sabendo que não tem como fazer nada. O legal é que eles continuam vendendo a DLL (estranho isso).

Bom, estou colocando aqui apenas para que os amigos fiquem sabendo. No nosso caso, estamos falando para os desenvolvedores mudarem do CobreMAL para outra DLL. Mas vocês que utilizam se preparem, inclusive porque vem ai uma alteração enorme no quesito "Boleto Bancário" (vai mudar tudo).

Um abraço,

[Eroni]

Boa tarde Alex. Eu uso o harbour boleto, estive recentemente mexendo para atender ao banco Sicoob, que atende a região sul, e o pessoal deles me passou um monte de alterações no layout do boleto, foram várias mesmo. Vamos ver o que espera agora, mas o importante é que neste caso temos todos os fontes que precisamos para mexer.

[alex2002]

Pois é meu amigo.

Vai haver muitas mudanças pra frente. Para se ter idéia, boleto vencido vai poder ser pago em qualquer banco.

Vai mudar o código de barras, enfim, é muita alteração. Quem usa o CobreBEM está ferrado com a política atual deles.

[Luiz Fernando]

Ola Alex, a mais ou menos dois anos atras eu postei aqui no forum que a cobrebem tinha parado de dar continuidade na DLL deles, eles numca esconderam isto de ninguem, me dizeram por telefone mais de uma vez , logico que fora esta DLL eles tem outras soluções para boleto aonde não é viavel para gente, como os boleto numca muda continuo usando a solução deles sem problema algum, agora o que ficou preocupante foi vc mencionar acima que havera grandes mudança na questão de boleto bancario, dai o bicho vai pegar...

Abraços

Luiz Fernando

[rochinha]

Pode-se esperar um SPED-Boleto. ká ká ká.

[alex2002]

Então Luiz.

Para nós eles nunca disseram que tinham parado, só agora. E se eles pararam, deveriam parar de comercializar tambem. Concorda?

Pois é Rochinha, vai melhorar muita coisa no nosso dia-dia.

[Pablo.Softgraf]

Oi Alê,ainda bem que você nos deu esta noticia !

Acabei de comprar uma, pior de tudo , cara pra cacete , 500 paus por licença, você sabe como funciona !

agora essa noticia, bando de sem vergonha.

Isso deve ser divulgado para a maior quantidade de pessoas.

[alex2002]

Ta vendo!

O setor comercial continua a todo vapor, o de desenvolvimento não!

É de chorar isso.

[rochinha]

Amiguinhos,

Deixe-me então dar meus 20 centavos de contribuição.

Eu conheço este CobreBemX e sempre gostei de integrar .OCX aos meus sistemas. Mas a maioria das que integro não tem rabo preso.

Não sei qual a politica desta .OCX(vitalícia, anual, etc) mas sua integração simples torna os nossos sistemas mais profissionais em termos de programação, mas com pontos de entrada a falhas, já que a falha alheia não se pode consertar e deve-se requerer novo build.

Livremente conheço dois projetos, MRBoleto e Harbour Boleto. Lógico que de algo livre e disponibilizado, não se deve esperar builds a cada minuto, mesmo porque que disponibilizou tem outras coisas pra fazer e necessita produzir e receber pelo trabalho. Então resta a quem quer usar, dispor tempo também para caçar bugs e melhorar a ferramenta para a comunidade.

Entre as opções comerciais temos o CobreBemX e o BoletoPRO. Este segundo é um executável que recebe por linha de comando os parâmetros para suas ações.

Então vem aquela máxima: " Ahhhh, mas não fica tão profissional quanto a .OCX...".

O que define se uma ação é profissional ou não, o fato de rodar por linha de comandos, então o Windows e o Linux são exemplos de não-profissionalidade, pois o coração de suas ações reside em pequeninos programas que são executados via interface, transparente e automatizadas.

No caso do BoletoPRO entra em foco a automatização e por meio de parâmetros voce define como a mesma resultará.

Gosto de exemplificar minhas analises com códigos, portanto:

Function IntegraBoletoPro
   BolCMD := [ -M /P /QE "/F:Boletos.csv" ]
   cMacro := [BoletoPRO\boletoPRO.exe ] + BolCMD
   MsgRun( "Gerando Impressao.." )
   //memowrit( "boletos.bat", cMacro )
   WinExec( cMacro, 7 )
   if file( "boletos.log" )
      iLOG := memoread( "boletos.log" )
      if "ERROR" $ Upper( iLOG )
         MsgStop( iLOG )
      endif
      fErase( "boletos.log" )
   endif
   return .t.

Como podem ver é simples integrar a ferramenta ao seu sistema em poucos cliques.

Você deverá criar em seu financeiro um procedimento que gere, à partir de um registro financeiro o .CSV que será usado para a geração do boleto.

Segue a função/trecho para entender como criar o CSV necessário para a automatização.

FUNCTION ImprimeBDOC( dDataProc    ,;
                      dVencimento  ,;
                      nValor       ,;
                      cNossoNumero ,;
                      dDataDoc     ,;
                      cEspecie     ,;
                      cDocumento   ,;
                      cAceite      ,;
                      cInstrucao   ,;
                      cSacado      ,;
                      cCNPJ        ,;
                      cEndereco    ,;
                      nNumero      ,;
                      cComplemento ,;
                      cBairro      ,;
                      cCidade      ,;
                      cEstado      ,;
                      cCEP         ,;
                      nParcela     ,;
                      nParcelas    ,;
                      cEmail, lEmail )
   LOCAL nHandle, nLenght, cHeader
   DEFAULT dDataProc    := date()                ,;
           dVencimento  := date() + 30           ,;
           nValor       := 49.25                 ,; 
           cNossoNumero := ""                    ,;
           dDataDoc     := date()                ,;
           cEspecie     := "RC"                  ,;
           cDocumento   := "DOC_A_123"           ,;
           cAceite      := ""                    ,;
           cInstrucao   := "NAO RECEBER APOS O VENCIMENTO" ,;
           cSacado      := "JOSE CARLO DA ROCHA" ,;
           cCNPJ        := "123.456.789-00"      ,;
           cEndereco    := "R DR MARIO MAURO RAMOS MATOSO" ,;
           nNumero      := 50                    ,;
           cComplemento := "CASA 2"              ,;
           cBairro      := "PIRITUBA"            ,;
           cCidade      := "SAO PAULO"           ,;
           cEstado      := "SP"                  ,;
           cCEP         := "05171-340"           ,;
           nParcela     := 0                     ,;
           nParcelas    := 0                     ,;
           cEmail       := "irochinha@itelefonica.com.br" 
   cPathBLPRO   := VerifyINI( "BoletoPRO", "Pasta", "", cPath+"nfw.ini", .f. )
   cArquivoLote := VerifyINI( "BoletoPRO", "Lote" , "", cPath+"nfw.ini", .f. )
   if empty( cPathBLPRO )
      if MsgYesNo( "Procurar pasta do componente BoletoPRO?" )
         cPathBLPRO := cGetDir("Pasta do BoletoPRO",cPathBLPRO) + "\"
         VerifyINI( "BoletoPRO", "Pasta", cPathBLPRO, cPath+"nfw.ini", .t. )
      endif
   endif
   if !file( cArquivoLote )
      cArquivoLote := cGetFile( "Arquivo Lote (*.csv) |*.csv|" + "Todos arquivos (*.*) |*.*|", "Selecione o arquivo" )
      VerifyINI( "BoletoPRO", "Lote" , cArquivoLote, cPath+"nfw.ini", .t. )
   endif
   if file( cPathBLPRO+"\BoletoPRO.exe" )
      cHeader := "Data Processamento;Vencimento;Valor Documento;Nosso Número;Data Documento;Espécie Documento;Número Documento;Aceite;Instruções;Sacado;CNPJ;Rua;Número;Complemento;Bairro;Cidade;Estado;CEP;Parcela;NParcelas;E-Mail"+chr(13)+chr(10)
      cHeader += dtoc( dDataProc )    + ";"
      cHeader += dtoc( dVencimento )  + ";"
      cHeader += transf( nValor, "@e 999999.99" ) + ";"
      cHeader += cNossoNumero         + ";"
      cHeader += dtoc( dDataDoc )     + ";"
      cHeader += cEspecie             + ";"
      cHeader += cDocumento           + ";"
      cHeader += cAceite              + ";"
      cHeader += cInstrucao           + ";"
      cHeader += cSacado              + ";"
      cHeader += cCNPJ                + ";"
      cHeader += cEndereco            + ";"
      cHeader += str( nNumero, 4 )    + ";"
      cHeader += cComplemento         + ";"
      cHeader += cBairro              + ";"
      cHeader += cCidade              + ";"
      cHeader += cEstado              + ";"
      cHeader += cCEP                 + ";"
      cHeader += strzero(nParcela,3)  + ";"
      cHeader += strzero(nParcelas,3) + ";"
      cHeader += cEmail
      //                                                  
      nHandle := fCreate(cArquivoLote)
      fWrite( nHandle, cHeader, LEN(cHeader) )
      fClose( nHandle )
      if lEmail // MsgYesNo("Voce deseja enviar este boleto por email?") // empty(cEmail)
         WaitRun( cPathBLPRO+[\BoletoPRO.exe -M /E /QM /QE /F:]+cArquivoLote ) 
      else
         WaitRun( cPathBLPRO+[\BoletoPRO.exe -M /P /QM /QE /F:]+cArquivoLote ) 
      endif
   else
      MsgStop( "BoletoPRO nao instalado." )
   endif
   RETURN .T.

Pelo que reparei no site do produto o preço é bem mais atraente, mas é anual. Vale a pena analisar.

Ajuda On-Line