Pular para o conteúdo principal

Postagens

Mostrando postagens de junho, 2011

Postagem em destaque

BlackTDN :: Social :: Rifa Festival da Arte Capoeira Projeto Eu Sou Ninja

Angariar fundos para cobrir os custos logísticos do "Festival da Arte Capoeira" e apoiar o projeto Eu Sou Ninja em sua missão de promover a integração social e cultural na comunidade de Jacaraípe. Com a criação da rifa, buscamos envolver a comunidade de forma ativa no financiamento do evento, permitindo que todos contribuam para o sucesso do festival e para a continuidade das atividades do projeto. Prêmio: Copia da minha biblioteca pessoal de AdvPL/TLpp ..etc Participe da Rifa Eu já contribui. Só falta você! ```cmd Pasta de C:\GitHub\naldodj-tlpp 13/04/2024 19:17 . 19/03/2024 13:49 .. 05/01/2024 12:22 2.742 .gitattributes 14/11/2023 16:02 83 .gitignore 02/12/2023 20:08 .vscode 05/01/2024 12:05 bin 13/04/2024 19:18 4.121 ChangeLog.txt 27/12/2023 02:05 include 14/11/2023 16:02 27.030 LICENSE.txt 14/11/2023 16:02 0 makepatch.lst 14/11/2

Protheus :: Advpl : TContainer a Evolução

TContainer ( Protheus :: ADVPL : The Container : Presents Pandora's box  ) evoluiu para By You, P11 ou TOTVS Série T. Alguns objetos sofreram metamorfose. TBTNBMP "digievoluiu" para TBROWSEBUTTON, Naraku absorveu novos objetos TMENU e TMENU ITEM, isso alterou :HWND de Wally que era 4020 para 4022. Desvende-o. Obtenha a nova versão ao clicar aqui []s иαldσ dj

Protheus :: ADVPL : The Container : Presents Pandora's box

Era uma vez um objeto que não queria limitar-se pelo escopo , seu desejo era fazer-se presente em todos os momentos, em todos os lugares, e que, como a um "Buraco Negro", tomava para si todos os demais objetos devorando-os e controlando-os. Tornou-se Publico por sua natureza e arrastou contigo tudo o que se lhe apresentava. Um meio-youkai poderoso em busca do corpo perfeito. Queria tornar-se indestrutível. Seu Nome a muito se perdeu. Uns o chamavam de Naraku, outros "The Container" (O Recipiente) e, muito recentemente, passou a denominar-se oWnd. Sem Controle o devorador de objetos poderia ser invocado por GetWndDefault() e, quase tudo o que lhe pertencia estava contido em __ClsArr(). __ClsArr() uma "Internal Function" do "Protheus" (agora mais conhecido como By You) revela todos os poderes e segredos daqueles que podem ser devorados por oWnd. As histórias se misturam, youkais, Deuses Gregos. Tudo sem controle. Descontrolado. Um perfeito CAOS

Protheus :: WebServices : Exemplo de uso da Estrutura TableView

Um pequeno e simples exemplo de como utilizar a Estrutura TableView nos WebServices em ADVPL. Os componentes de TableView são: TableStruct e TableData. Carregamos em TableView:TableStruct as informações da Estrutura de uma Tabela de acordo com o Array retornado pela função dbStruct(). Já TableView:TableData deverá conter os itens da Tabela de Acordo com a estrutura definida em TableStruct. Para maior compreensão, eis o exemplo: #INCLUDE "APWEBSRV.CH" #INCLUDE "PROTHEUS.CH" #INCLUDE "DBSTRUCT.CH" #INCLUDE "TRYEXCEPTION.CH" /*/ WebService: U_TblViewSample Autor: Marinaldo de Jesus Data: 25/06/2011 Descricao: Exemplo de Uso da Estrutura de WS TableView Uso: WebServices /*/ WSSERVICE U_TblViewSample DESCRIPTION "Exemplode Uso da Estrutura TableView" NAMESPACE "http://u_tblviewsample.apw" WSDATA Table AS TableView WSDATA Alias AS STRING WSDATA rInit AS INTEGER WSDATA rEnd AS INTEGER WSMETHOD GET DESCRIPTI

Protheus :: Dividindo para Conquistar

Protheus :: Dividindo para conquistar, mostra que Números Perfeitos não são só perfeitos na sua essência. Eles são um perfeito exemplo. Por causa deles criamos e exploramos as Classes para operações com números muito grandes que acabaram por suavizar a operação de "Números Perfeitos". Mas, como dito anteriormente, apesar de suavizar a operação TMath não consegue, por si só, resolver todos os Números Perfeitos em tempo satisfatório e, por isso, o exemplo para encontrar os Números Perfeitos foi reescrito. Agora usando Threads. Dividindo para conquistar utiliza o Conceito de Múltiplas Threads do Protheus para tentar amenizar o custoso trabalho de se encontrar os Números Perfeitos. Como tenho dito, abstrair é a melhor forma se chegar a uma solução. Números Perfeitos é a minha mais perfeita abstração. Se entender os exemplos com Números Perfeitos entenderá qualquer outro exemplo. Eis agora, Números Perfeitos em Multi Thread. Será o suficiente? #INCLUDE "PROTHEUS.CH&

Protheus :: Advpl : Números Perfeitos o Retorno

"Trama em segredo teus planos Parte sem dizer adeus Nem lembra dos meus desenganos Fere quem tudo perdeu ... Ah coração leviano não sabe o que fez do meu Ah coração leviano não sabe o que fez do meu (mas trama) Este pobre navegante meu coração amante ... Ah coração teu engano foi esperar por um bem De um coração leviano que nunca será de ninguém" ( Coração Leviano :: Paulinho da Viola) Esse dramalhão todo é só pra dizer que, temporariamente, estou me despedindo da Class TMath[I/F]Str. Esse que vos escreve está se enveredando no mundo dos "Games". Então, em processo de enamoramento, de conquista e de novas "paixões" deixo por um tempo, o Adplv que, com sua bidimensionalidade, está me deixando sem dimensão. Procuro algo mais cheio de curvas, círculos, esferas, polígonos, vértices, enfim, mais dimensões. Uma delas é o AutoDesk Maya que, como uma "Penteadeira de Puta", está me deixando "perdidinho". Não acho nada, cheio de b

Protheus :: Advpl :: TMath[I/F]Str : O Processo de Implementação Continua...

Uma mexida aqui, uma alteração ali, uma revisão de conceitos acolá e eis que o mostro vai surgindo... (Dr. Frankstein ficaria orgulhoso) O Processo de "criação", que pensei demorar um pouco mais, até que está sendo rápido. Um tempinho na hora do almoço, outro entre uma pesquisa aqui outra ali, atenção pra um, pra outro e... A classe TMath e uma brincadeira bem divertida. Napier , Libiniz , Euler e outros grandes matemáticos , estes sim facilitaram as nossas vidas. Tive que reavivar vários conceitos e alguns, graças a Google e Wikipédia, achei facilmente. Se baixou as versões anteriores, vai perceber que esta está um pouco diferente. Acredito que até a versão final muita coisa poderá ou não ser mudada. Ainda falta a potência de números fracionários, calcular PI, Log, otimizar POW, dentre outras. Mas a idéia é essa, demonstrar pouco a pouco, como algo aparente difícil é, de fato, muito simples e que, com o domínio da linguagem podemos manipulá-la de forma a fazer o que qu

Protheus :: Advpl :: Class TMathFloatStr : Otimizando o método SQRT

Para otimização do cálculo da "Raiz Quadrada" (do Latim " Radix Quadratum "), foi implementado o método SQRTSetDecimalPrecision que irá determinar a precisão decimal para o cálculo de aproximação da "Raiz". Para baixar o código fonte das classes e exemplos, clique aqui . []s иαldσ dj

Protheus :: Advpl :: Class TMathIntegerStr/TMathFloatStr : Implementado método SQRT

Corrigi algumas "não conformidades", implementei alguns métodos (Int, Abs, dentre outros) e, na TMathFloatStr, utilizando como modelo o método Newton-Raphson , codifiquei SQRT para obter a "Raiz Quadrada", ou, do Latin, " Radix Quadratum " de um número. Para baixar a nova versão, das classes e exemplos, clique aqui . []s иαldσ dj

Protheus :: Advpl : Class TMathIntegerStr ( Brincando de ser GRANDE )

No "AMM - ADVPL Básico : Introdução á programação e ADVPL Básico : página 27" tem a seguinte afirmação: "Uma variável do tipo de dado numérico pode conter um número de dezoito dígitos incluindo o ponto flutuante, no intervalo de 2.2250738585072014 E–308 até 1.7976931348623158 E+308". Que, considerando a precisão numérica, torna-se uma inverdade. A precisão numérica no Protheus são de 15 dígitos: incluido aí o ponto flutuante. Para "Brincar um pouco de ser GRANDE", e superar os limites numéricos da linguagem, e, a exemplo do post : Protheus :: Multiplicando Números Absurdamente Grandes , vamos agora implementar as 4 Operações. Para isso implementaremos a Classe base denominada TMathIntegerStr, que será utilizada para operações com Números Inteiros, e sua derivada TMathFloatStr para números em Ponto Flutuante. É uma divertida brincadeira e que funciona de verdade. TMathIntegerStr, a despeito de futuras otimizações no método Pow (exponenciação), es