Verifica se o Application Server está sendo executado em ambiente 64 bit.
Sintaxe
isSrv64() |
Retorno
Nome | Tipo | Descrição |
|---|---|---|
lRet | lógico | Retorna verdadeiro (.T.) se o Application Server estiver sendo executado em ambiente 64 bit. Caso contrário, falso (.F.). |
Exemplos
User Function teste()
local lisSrv64 := isSrv64()
if ( lisSrv64 )
conout( "Application Server is 64 bit" )
else
conout( "Application Server not 64 bit" )
endif
Return
|