Imprimi Página | Fechar janela

Obter dados de parâmetro

Impresso de: Helpfacil - Portal do conhecimento
Nome do Forum: ADVPL
Descrição do Forum: Dúvidas sobre a programação em ADVPL
URL:http://www.helpfacil.com.br/display_topic_threads.asp?ForumID=1&TopicID=41871
Data da Impressão: sábado, 21 de julho de 2018 at 14:16


Topico: Obter dados de parâmetro

Postado por: EV_ALVES
Assunto: Obter dados de parâmetro
Data Postagem: sexta-feira, 13 de abril de 2018 at 13:33

Pessoal boa tarde

Minha primeira participação aqui no fórum e desde já agradeço a oportunidade. Meu problema é o seguinte: estou criando o ponto de entrada M380ZEMP para controlar permissões para zerar empenhos e utilizei o comando GetNewPar para verificar se o ID do usuário está contido no parâmetro. Acontece que no debug vejo que o valor retornado é NIL. Sou novo em ADVPL e gostaria de uma ajuda.


Valeu pessoal!


Respostas:

Postado Por: WALTERFCAR
Data Postagem: sexta-feira, 13 de abril de 2018 at 16:51

Olá tenta ao inves, usar a funcao GETMV("seuparametro")




Postado Por: GLAKATOS
Data Postagem: sexta-feira, 13 de abril de 2018 at 16:59

Boa tarde,

Você pode utilizar a função GetMv("nome do parâmetro") para retornar o conteúdo do parâmetro (sugiro atribuir esse valor a uma variável) e para a validação utilizar o pertence ($). Então ficaria dessa forma:

cUsers := GetMv("nome do parâmetro") //nome do parâmetro entre aspas mesmo

If __cUserID $ cUsers //irá resultar em True ou False
--processamento--
EndIf

__cUserID = retorna o ID do usuário logado
$ = valida se a expressão da esquerda (no caso __cUserID) pertence a expressão da direta (no caso a variável cUsers)

Espero te ajudado. Qualquer dúvida fique a vontade para perguntar.

Atenciosamente,
Gabriel Lakatos




Postado Por: ANDRESAKAI
Data Postagem: sábado, 14 de abril de 2018 at 00:11

Na configuracao do debug veja se tem o parametro -m. Tem alguns bugs com ele. Senao tenta getmv (‘mv_par‘,.t.,‘000111‘) para definir um parâmetro padrão.
Andre Sakai
Desenvolvedor Advpl



Postado Por: EV_ALVES
Data Postagem: segunda-feira, 16 de abril de 2018 at 15:18

Pessoal boa tarde

Fiz conforme vocês me orientaram usando o GETMV e deu tudo certinho. O erro estava ocasionado por ter colocado alguns parênteses que não era necessário, acredito. Agradeço a todos.

Vinicius Barros
Analista de TI




Imprimir Página | Fechar Janela