Upgrade to Pro — share decks privately, control downloads, hide ads and more …

AdvPL - As vantagens de se manter uma linguagem proprietária

AdvPL - As vantagens de se manter uma linguagem proprietária

Este post conta a trajetória de nossa linguagem, do Clipper ao TLPP, passando pelos desafios e conquistas que ocorrem até os dias de hoje.

TOTVS Developers

August 25, 2020
Tweet

More Decks by TOTVS Developers

Other Decks in Programming

Transcript

  1. TODOS OS DIREITOS RESERVADOS AdvPL As vantagens de uma linguagem

    proprietária /Ricardo Mansano Agosto /2020
  2. 4 E no princípio Deus (do latim DEVSupremus) criou o

    Clipper e viu Deus que era bom... Onde tudo começou...
  3. 5 E no princípio Deus (do latim DEVSupremus) criou o

    Clipper e viu Deus que era bom... Onde tudo começou... brincadeira...
  4. 8 A então Microsiga tinha milhões de linhas de código

    em Clipper E uma dúvida... A necessidade
  5. 9 A primeira iniciativa foi o porte para o Fivewin.

    Clipper 5.3 => 5.Win A necessidade
  6. 10 Por ser uma linguagem de 16 bits, as quedas

    eram constantes... A necessidade
  7. 15 A resposta foi difícil mas incisiva Porque migrar para

    uma nova linguagem se posso simplesmente criar a minha própria ??? Fora da caixa
  8. 16 A resposta foi difícil mas incisiva Porque migrar para

    uma nova linguagem se posso simplesmente criar a minha pŕopria ??? Economizando anos com a re-escrita de fontes e testes de toda uma nova engine... Fora da caixa
  9. 21 • Criar o ecossistema • Ambiente Client/Server • Como

    me comunicar com um SGDB através do ISAM? Desafios DbSkip() x Eof()
  10. 22 Desafios • Criar o ecossistema • Ambiente Client/Server •

    Como me comunicar com um SGDB através do ISAM?
  11. 23 Desafios SB1->( DBAppend( .F. ) ) SB1->B1_DESCR := "PRODUTO

    001" SB1->B1_VALOR := 10.00 SB1->( DBCommit() ) X DBEnv [POSTGRES/PROTHEUS12] DBThread [(ID 23381)] [127.0.0.1:5027] IDLE [ ] InTransact [0 s.] Memory [1246288] Running [ROP_UPDATE] RCV [438092]SND [1711952] TCBuild [20181212-20181220] TCVersion [18.2.1.0_RC1] ARCH [64] OS [LINUX] UPDATE SB1990 SET B1_DESCR = ?,B1_VALOR = ? WHERE R_E_C_N_O_ = ? • Criar o ecossistema • Ambiente Client/Server • Como me comunicar com um SGDB através do ISAM?
  12. 24 Desafios SB1->( DBAppend( .F. ) ) SB1->B1_DESCR := "PRODUTO

    001" SB1->B1_VALOR := 10.00 SB1->( DBCommit() ) X DBEnv [POSTGRES/PROTHEUS12] DBThread [(ID 23381)] [127.0.0.1:5027] IDLE [ ] InTransact [0 s.] Memory [1246288] Running [ROP_UPDATE] RCV [438092]SND [1711952] TCBuild [20181212-20181220] TCVersion [18.2.1.0_RC1] ARCH [64] OS [LINUX] UPDATE SB1990 SET B1_DESCR = ?,B1_VALOR = ? WHERE R_E_C_N_O_ = ? • Criar o ecossistema • Ambiente Client/Server • Como me comunicar com um SGDB através do ISAM?
  13. 25 Desafios • Criar o ecossistema • Ambiente Client/Server •

    Como me comunicar com um SGDB através do ISAM? • Interface
  14. 26 Desafios • Criar o ecossistema • Ambiente Client/Server •

    Como me comunicar com um SGDB através do ISAM? • Interface
  15. 27 Desafios • Criar o ecossistema • Ambiente Client/Server •

    Como me comunicar com um SGDB através do ISAM? • Interface • Ambiente de desenvolvimento
  16. 28 Desafios • Criar o ecossistema • Ambiente Client/Server •

    Como me comunicar com um SGDB através do ISAM? • Interface • Ambiente de desenvolvimento • E misturando tudo isso...
  17. 29 Desafios • Criar o ecossistema • Ambiente Client/Server •

    Como me comunicar com um SGDB através do ISAM? • Interface • Ambiente de desenvolvimento • E misturando tudo isso… • Nascia em 1997 o Protheus 5.07
  18. 33 Estendendo o ecossistema para novos SO’s • Mantendo a

    compatibilidade • Garantindo esforço zero aos nossos Dev’s • e principalmente aos nossos clientes Evolução contínua
  19. 34 Estendendo o ecossistema para novos SO’s • Mantendo a

    compatibilidade • Garantindo esforço zero aos nossos Dev’s • e principalmente aos nossos clientes Evolução contínua
  20. 35 Estendendo o ecossistema para novos SO’s • Mantendo a

    compatibilidade • Garantindo esforço zero aos nossos Dev’s • e principalmente aos nossos clientes Evolução contínua
  21. 36 Estendendo o ecossistema para novos SO’s • Mantendo a

    compatibilidade • Garantindo esforço zero aos nossos Dev’s • e principalmente aos nossos clientes Evolução contínua nossos Dev’s desenvolvem para multiplataforma...
  22. 52 Evolução contínua Controlando as mudanças • Estendendo novos protocolos

    • Criando novas funções conforme a necessidade • Agregando novas ferramentas • Decidindo por novos a caminhos sem perder o foco no legado WebSocket SSL HTTPs
  23. 53 Evolução contínua Controlando as mudanças • Estendendo novos protocolos

    • Criando novas funções conforme a necessidade • Agregando novas ferramentas • Decidindo por novos a caminhos sem perder o foco no legado
  24. 54 Evolução contínua AdvPL x JS Controlando as mudanças •

    Estendendo novos protocolos • Criando novas funções conforme a necessidade • Agregando novas ferramentas • Decidindo por novos a caminhos sem perder o foco no legado
  25. 55 Evolução contínua Controlando as mudanças • Estendendo novos protocolos

    • Criando novas funções conforme a necessidade • Agregando novas ferramentas • Decidindo por novos a caminhos sem perder o foco no legado
  26. 56 Evolução contínua Controlando as mudanças • Estendendo novos protocolos

    • Criando novas funções conforme a necessidade • Agregando novas ferramentas • Decidindo por novos a caminhos sem perder o foco no legado
  27. totvs.com @totvs /totvs company/totvs totvs.store @totvs • Tecnologia + Conhecimento

    são nosso DNA. • O sucesso do cliente é o nosso sucesso. • Valorizamos gente boa que é boa gente. OBRIGADO RICARDO MANSANO Tecnologia [email protected] #SOMOSTOTVERS