🚀 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
Utilizando GetFuncPrm( cFunction ) para retornar os parâmetros de uma função em Advpl.
Se você tem dúvidas sobre quais parâmetros formais uma função em Advpl possui, utilize GetFuncPrm( cFunction ) para obtê-los.
GetFuncPrm() retorna um array com todos os parâmetros formais da função.
Ex.:
Local aPrmFunc := {}
IF FindFunction( "SomaHoras" )
aPrmFunc := GetFuncPrm( "SomaHoras" )
aEval( aPrmFunc , { |cPrm| ConOut( cPrm ) } ) //-> nHr1 , nHr2
EndIF
O problema é que GetFuncPrm() só retorna os parâmetros de funções em Advpl, não retorna as "Internal Functions". Por exempo, não posso utilizar GetFuncPrm() para retornar os parâmetros da função aEval(), pois aEval() não está escrita em Advpl mas sim em C++ e em função disso, não consta na pilha de funções Advpl.
Na realidade, quase toda função que possa ser localizada por FindFunction( cFunction ) pode ter os seus parâmetros formais retornados pela GetFuncPrm().
Além de não retornar os parâmetros de "Internal Functions" GetFuncPrm() também não retorna os parâmetros de "Métodos de Classes" escritas em Advpl.
Outro problema de GetFuncPrm() é que ela só retorna os parâmetros das funções, não o que deve ser passado a eles, aí vai da experiência de cada um e de como os parâmetros formais foram declarados. No nosso exemplo sei que SomaHoras( nHr1 , nHr2 ) recebe dois parâmetros do tipo numérico, e pela descrição podemos inferir que temos que passar valores em horas. Mas pode ocorrer de GetFuncPrm() retornar parâmetros "esdrúxulos" como em:
Local aPrmFunc := {}
IF FindFunction( "EmpOpenFile" )
aPrmFunc := GetFuncPrm( "EmpOpenFile" )
aEval( aPrmFunc , { |cPrm| ConOut( cPrm ) } ) //-> cExp1,cExp2,nExp3,lExp4,cExp5,cExp6
EndIF
Nesse exemplo receberemos os seguintes parâmetros formais : cExp1, cExp2, nExp3, lExp4, cExp5, cExp6. Mas o que eles significam? Apenas podemos identificar o seu "Tipo" cExp1, cExp2, nExp3, cExp5, cExp6 como caracteres e lExp4 como lógico. (É nem tudo são flores). Ainda bem que sei o que passar para EmpOpenFile().
EmpOpenFile() é uma função em Advpl utilizada para abrir Tabelas de outra empresa e seus parâmetros formais, traduzidos, são:
EmpOpenFile( cNewAlias , cAlias , nOrder , lForceOpen , cEmpresa , cModo ) -> lOpened
onde:
cNewAlias: Alias que sera atribuido a Nova Tabela
cAlias: Alias da Tabela Para Pesquisa e Comparação
nOrder : Numero do Indice
lForceOpen: DEFAULT .T., se força a abertura da nova Tabela
cEmpresa: Código da Empresa
cModo: Modo de Acesso do SX2 da nova Tabela (retornado por referência).
Descobri uma função que retorna a CallStack:
ResponderExcluirDWCALLSTACK()