Histórico da Página
...
| Bloco de código | ||||||||||
|---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
user function exemplo()
aInfo := GetUserInfoArray() // Resultado: (Informações dos processos)
varinfo("Threads:",aInfo)
Return
|
| Bloco de código | ||||||||
|---|---|---|---|---|---|---|---|---|
| ||||||||
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
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas