Histórico da Página
...
Nome | Tipo | Descrição | Obrigatório | Referência |
|---|---|---|---|---|
lShowMoreInfo* | lógico | Se informado verdadeiro (.T.), retorna mais informações por thread (apenas 4GL/Telnet 4GL). |
|
|
Retorno
Nome | Tipo | Descrição |
|---|---|---|
aRet | vetor | Retorna um array multidimensional com os números e dados de cada uma das threads. |
...
| Bloco de código | ||||||||||
|---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
user function exemplo()
aInfo := GetUserInfoArray() // Resultado: (Informações dos processos)
varinfo("Threads:",aInfo)
Return
User Function exemplo4gl()
Local i
aInfo := GetUserInfoArray(.F.)
conout("GetUserInfoArray com parametro .F.")
for i := 1 to Len(aInfo)
conout("ThreadID:" + cvaltochar(aInfo[i][3]) + " Program:" + aInfo[i][5] + " Obs:" + aInfo[i][11])
next
//Resultado:
//[Thread 4920] GetUserInfoArray com parametro .F.
//[Thread 4920] ThreadID:4920 Program:U_GINFARR Obs:
//[Thread 4920] ThreadID:6392 Program:MAN0110.4GL Obs:
//[Thread 4920] ThreadID:6428 Program:MEN1100 Obs:
aInfo := GetUserInfoArray(.T.)
conout("GetUserInfoArray com parametro .T.")
for i := 1 to Len(aInfo)
conout("ThreadID:" + cvaltochar(aInfo[i][3]) + " Program:" + aInfo[i][5] + " Obs:" + aInfo[i][11])
next
//Resultado:
//[Thread 4920] GetUserInfoArray com parametro .T.
//[Thread 4920] ThreadID:4920 Program:U_GINFARR Obs:
//[Thread 4920] ThreadID:6392 Program:MAN0110.4GL Obs:Parent=1
//[Thread 4920] ThreadID:6392 Program:RUN4GLPROCESS.4GL Obs:Parent=0
//[Thread 4920] ThreadID:6428 Program:MEN1100 Obs:
Return
|
Abrangência
Advanced Protheus 6.09 , Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas