Pular para o conteúdo principal

Postagem em destaque

BlackTDN :: Gerenciamento de Erros e Avisos em Projetos AdvPL/TLPP: Um Desafio Frequente no Desenvolvimento TOTVS Protheus

_Créditos da imagem: Gerada com auxílio do ChatGPT_ --- **Gerenciamento de Erros e Avisos em Projetos AdvPL/TLPP: Um Desafio Frequente no Desenvolvimento TOTVS Protheus** Ao trabalhar com projetos desenvolvidos na linguagem AdvPL/TLPP, especialmente em ambientes como o TOTVS Microsiga Protheus, desenvolvedores frequentemente se deparam com uma série de problemas e avisos de compilação. Recentemente, em uma análise de código de um dos nossos projetos, foram identificados mais de 700 problemas durante o processo de compilação, distribuídos entre erros críticos e avisos que podem afetar o desempenho e a manutenção da aplicação. ### Principais Problemas Encontrados Entre os problemas destacados, podemos citar: 1. **Erros de Nomenclatura e Duplicação de Fontes**: - Um dos erros mais críticos que surgiram foi: "Not allowed more than one source with same name". Este erro é comum quando há múltiplos arquivos PRW com o mesmo nome em diferentes pastas do projeto, o que pode

PowerShell :: Técnica Russa de Multiplicação

Mais uma curiosidade Matemática.

Muito Interessante esse "script" em PowerShell que demonstra a metodologia Russa de Multiplicação.

Obtive essa iguaria em: The PowerShell Guy


function Invoke-RussianMultiply ([int]$a,[int]$b) 
{
 $r = 0 
 do { 
    "$a x $b"
    if (($a%2) -and ($a -gt 0)) {$r+=$b;"`t+$b";$a--}
    $a = $a/2
    $b = $b*2
  } until ($a -eq 0)
 "result : $r"
} 


A saida, no console do PowerShell, Seria algo do tipo: Invoke-RussianMultiply 340 125


PS C:\Documents and Settings\marinaldo.jesus\Meus documentos> Invoke-RussianMultiply 340 125
340 x 125
170 x 250
85 x 500
 +500
42 x 1000
21 x 2000
 +2000
10 x 4000
5 x 8000
 +8000
2 x 16000
1 x 32000
 +32000
result : 42500


Tranquilo para implementar em Advpl.

[]s
иαldσ dj

...

Comentários

  1. Cara, vc conhece muito de ADVPL.
    Estou começando a engatinhar agora, tenho um ano de ADVPL, atualmente trabalho na TOTVS UnBH.
    Gostaria de chegar a um nível perto do seu. Tenho estudado bastante pelo TDN. Você poderia me dar alguma ajuda?

    Att,
    Sergio

    ResponderExcluir
  2. Sérgio,

    Obrigado pelo elogio. Com certeza o estudo irá te ajudar muito. O meu blog, de certa forma, já é uma ajuda. Se tiver alguma dúvida específica pode postar nos comentários que, se estiver à minha altura farei um esforço pra responder.

    []s
    иαldσ dj

    ResponderExcluir

Postar um comentário

Postagens mais visitadas