Pular para o conteúdo principal

Postagem em destaque

🚀 Oferecendo Serviços Remotos de Desenvolvedor AdvPL e Mais 🖥️

🚀 Oferecendo Serviços Remotos de Desenvolvedor AdvPL e Mais 🖥️ Olá pessoal, Espero que este post encontre todos vocês bem! É com grande entusiasmo que compartilho que estou expandindo meus serviços como Desenvolvedor AdvPL para novos desafios e colaborações. Com mais de duas décadas de experiência sólida, minha jornada profissional tem sido enriquecedora, com a oportunidade de participar de projetos empolgantes ao longo dos anos. Agora, estou ansioso para trazer minha experiência e habilidades para novas equipes e projetos, trabalhando de forma remota. Minha expertise abrange não apenas AdvPL, mas também outras tecnologias-chave, incluindo JS, SQL, Infraestrutura e Otimização de Processos. Acredito que essa combinação de conhecimentos me permite oferecer soluções abrangentes e eficazes para uma variedade de necessidades de desenvolvimento. Acredito que a tecnologia tem o poder de transformar negócios e impulsionar o sucesso, e estou comprometido em ajudar meus clientes a alcançar seu

BlackTDN :: Código BlackTDN no fonte padrão da TOTVS

Estou pasmo e, de certa forma, lisonjeado: Baixei o novo RPO e ao compilar os fontes NDJLib:

d:\github\blacktdn\templates\ndjlib\ndjlib017.prg...
   (no projeto NDJLib)
Erro de compilação:
                             Duplicated function U_FT (found in OFIIA200.PRW)

corrijgi ndjlib017.prg renomeando User Function fT para User Function ufT e, novamente:

Compilando arquivos...
   d:\github\blacktdn\templates\ndjlib\ndjlib017.prg...
   (no projeto git_NDJLib.prj)
Erro de compilação:
                             Duplicated class FT (found in OFIIA200.PRW)

Processo interrompido por erro FATAL de compilação.

Clonaram o nosso código (com TRYEXCEPTION e tudo) e incorporaram ao padrão.

A classe ft, disponibilizada no BlackTDN agora faz parte do padrão, exatamente como foi escrtita.

/*/
    CLASS:        fT
    Autor:        Marinaldo de Jesus [http://www.blacktdn.com.br]
    Data:        01/05/2011
    Descricao:    Alternativa aas funcoes tipo FT_F* devido as limitacoes apontadas em (http://tdn.totvs.com.br/kbm#9734)
    Sintaxe:    ft():New() : Objeto do Tipo fT
/*/

Bem, fazer o que. BlackTDN é de domínio público. Vou ter que renomear a Classe da Lib e atualizar GitHub com a nova versão.

Obrigado ao pessoal do SIGAOFI por valorizar o nosso trabalho.

P.S.: O que mais de BlackTDN foi incorporado ao padrão? Fica a questão.

dump-file-0-ofiia200.prw
dump-file-1-ofiia200.prw
 dump-file-2-ofiia200.prw

[]s
иαldσ dj

Comentários

  1. Com certeza isso é apenas um pequeno fragmento do que ja foi "clonado" do BlackTDN e incorporado ao padrão... Como dia meu irmao Naldo DJ, existe algo de podre no Reino da Dinamarca... Hehehehe... Clonando na cara dura, e nem se dao ao trabalho de citar o BlackTDN como referencia.... Agora existem perguntas que nao querem calar : "BlackTDN sendo usado como referencia pela mae do produto, por qual motivo ???" ou entao "Qual o motivo de usarem as ideias e codigos publicados em BlackTDN ?" .... Isso sem contar muito do que ja mudaram no produto devido as falhas aqui apresentadas... Enfim, vamos ver quais serão os proximos capitulos...

    ResponderExcluir
  2. Boa tarde Naldo.

    Nós da TOTVS MIL, responsáveis pelo OFIIA200, queremos nos retratar e explicar o ocorrido com a utilização da Classe FT.
    Averiguando as alterações sofridas na rotina desde sua criação, verifiquei que em Agosto de 2011 um ex colaborador de nossa equipe possivelmente utilizou o BLACKTDN para consulta e por fim acabou copiando a classe em questão, fato que não aconteceria atualmente, já que nosso processo de desenvolvimento contempla fase de auditoria de programação.
    Quero deixar claro que não temos esta conduta como prática em nosso trabalho e que vamos alterar nossa rotina o quanto antes para a retirada desta classe.

    Desculpe-nos pelo transtorno.

    Manoel Filho
    Lider de Desenvolvimento
    TOTVS MIL

    ResponderExcluir
  3. Uma tremenda bobagem essa "disputinha" e orgulho de ambas. Oque é de fato para a evolução deve ser perpetuado. Esqueçam as magoas passadas, pois o passado tem um nome bem sugestivo de algo que ja passou. Quanta ignorancia!

    Se a classe é boa, use-a. A totvs tbm deve se curvar, pois nao é dona das melhores soluções, pois eh feita de pessoas que detem o conhecimento e "ela" nao tem os melhores, ela tem os aprendizes! Nao é suporte!?

    Suporte diz:... nao sabemos a causa vamos transferir para outro nivel!

    tu... tu... tu...

    ResponderExcluir
    Respostas
    1. Falou tudo, galera de ADVPL/Proteus tem muito que aprender pra chegar em um nível humano de aprendizagem, tanto lá quanto aqui vemos a diferença onde a ignorância/arrogância prevalece antes do profissionalismo.

      Excluir

Postar um comentário

Postagens mais visitadas deste blog

BlackTDN :: RLeg ~ Desvendando a Função ParamBox

Para quem precisar desenvolver uma interface de entrada de dados, coisa rápida, e não quer ter aquele trabalhão danado que todos já sabemos, o Protheus tem uma função que ajuda muito, é uma interface semelhante a função Pergunte, porém com muito mais opção de objeto de entrada de dados, alias até colocar o scrollbox desta interface com todos os objetos em outra MsDialog ou Wizard é simples. Vejam o exemplo abaixo, boa sorte! Rleg. //---------------------------------------------------------- // Função exemplo utilizando a função ParamBox() //---------------------------------------------------------- User Function xParamBox() Local aRet := {} Local aParamBox := {} Local aCombo := {"Janeiro","Fevereiro","Março","Abril","Maio","Junho","Julho","Agosto","Setembro","Outubro","Novembro","Dezembro"} Local i := 0 Private cCadastro := "xParambox" // ---------------

BlackTDN :: Customizando a interface de Login no Protheus e by You

A publicação “ BlackTDN :: By You e sua nova tela de login ”  de nosso amigo OBona deu o que falar e, em função disso, esse que a muito não vos escreve resolveu criar uma versão onde será possível personalizar, “por completo”, a tela de login no Protheus/by You. Considerando que OBona já havia “mapeado, identificado e customizado” as imagens peguei-as emprestadas para o exemplo que se segue: O primeiro passo para a customização “total” da interface de login do Protheus/by You será implementar o “Ponto de Entrada” ChgPrDir (Diretório de impressão) . Usaremos esse PE juntamente como programa U_FindMsObject.prg (apresentado pela primeira vez em: Protheus :: ADVPL : The Container : Presents Pandora's box ). Diferente do exemplo proposto por OBona, que substitui, durante o processo de compilação, as imagens padrões do sistema (excluindo-as) por imagens customizadas (com o mesmo nome) este novo exemplo mantém, no RPO, as imagens padrões adicionando novas imagens customizadas que serã

Protheus :: Chamando Funções do Menu Diretamente e sem a Necessidade de Login

Ferne$ perguntou: "...é possível abrir alguma rotina do sistema sem solicitar login ao usuário, como por exemplo a rotina MATA010..." Sim Ferne$, é possível sim. Abaixo um Exemplo para a Chamada à função MATA010 sem a necessidade de Login no sistema. #INCLUDE "PROTHEUS.CH" #INCLUDE "TBICONN.CH" /*/ Funcao: MATA010Ex Data: 30/04/2011 Autor: Marinaldo de Jesus Descricao: Executar a Funcao MATA010 diretamente sem a necessidade de LOGIN no Protheus Sintaxe: 1 ) U_MATA010Ex ( Chamada diretamente na Tela de Entrada do Sistema ) ; ou 2 ) totvsclient.exe -q -p=u_MATA010Ex -a=01;01 -c=rnp_local -e=rnp -m -l ( Chamada Via Linha de Comando ) /*/ User Function MATA010Ex( cEmpFil ) Local aEmpFil Local bWindowInit := { || __Execute( "MATA010()" , "xxxxxxxxxxxxxxxxxxxx" , "MATA010" , "SIGAFAT" , "SIGAFAT", 1 , .T. ) } Local cEmp Local cFil Local cMod Local cModName := "SIGAFAT" DEFA