RPW

[Sidival Nascimento]

Bom dia, Pessoal,

         Alguem sabe como identificar se o programa esta rodando em modo RPW ? Se tem alguma vaariavel de ambiente ou coisa assim que mostre que o programa esta rodando no RPW ?, preciso diferenciar se o usuario esta rodando na sua estação ou pelo RPW ?

At.te

Sem Mais
Sidival F. Nascimento

[Sidival Nascimento]

Bom dia, Pessoal ,

        Achei.

def new global shared var i-num-ped-exec-rpw   as integer no-undo.  

if i-num-ped-exec-rpw  = 0 then

   message "Ta local".

else

   message "TA RPW".

:)

       

--

Sem Mais
Sidival F. Nascimento

Analista de Sistemas
Laos Consultoria em Informatica LTDA.

[Doglans Cesar Esidio]

Bom dia!! 

Show isso aí!
TA certo!

--
Recebeu esta mensagem porque subscreveu ao grupo "Progress - 4GL" do Grupos do Google.
Para anular a subscrição deste grupo e parar de receber emails do mesmo, envie um email para progress_4gl...@googlegroups.com.
Para ver esta discussão, visite https://groups.google.com/d/msgid/progress_4gl/CAP_Em99tBoarZML8UifcG4X3ZJceFLo-yNAOJup4aVW9sbF%2BGg%40mail.gmail.com.

[Marcelo Torres]

Tem uma forma mais fácil.

SESSION:BATCH-MODE

IF NOT SESSION:BATCH-MODE THEN DO:

    MESSAGE "Não está em RPW"

        VIEW-AS ALERT-BOX.

END.

Para ver esta discussão, visite https://groups.google.com/d/msgid/progress_4gl/CA%2Bby%3DVAEnAaeQeRmE2DuFXqB1ZVsuy%2B6Gifs9im4rp7GEgdmVA%40mail.gmail.com.