| Pagetitle |
|---|
| Find4GLFunction |
|---|
| Find4GLFunction |
|---|
|
Retorna Verifica se uma determinada função está compilada disponível no RPO em execução ou se faz parte das funções 4GL do binário. Para funções declaradas como PRIVATE, sempre será retornado FALSE, caso estejam declaradas em outros arquivos ou TRUE se estivem declaradas no mesmo. repositório ou no binário do Application Server. Sintaxe| Bloco de código |
|---|
| Find4GLFunction(Param)
|
ParâmetrosNome | Tipo | Descrição | Obrigatório | Referência |
|---|
Param | Caracter | Nome da função a ser procurada. | X | |
RetornoNome | Tipo | Descrição |
|---|
var | Lógico | Retorna verdadeiro (true), se a função está compilada no RPO ou contida na lista de funções 4GL e Falsodisponível no repositório ou no binário; caso contrario, falso(false), caso não seja encontrada. |
Observações- Função disponível a partir da build 7.00.101202A.O
- Para funções declaradas como Private, somente será retornado TRUE caso a função esteja declarada no mesmo arquivo. Caso contrário, sempre será retornado Falso. O recurso de Private Functions está disponível a partir do da build 7.00.131227A.
Exemplos| Bloco de código |
|---|
| theme | Eclipse |
|---|
| language | cpp |
|---|
| title | Exemplo 1 |
|---|
| linenumbers | true |
|---|
| collapse | false |
|---|
| MAIN
DEFINE bOK SMALLINT
LET bOK = Find4GLFunction("SetOracleStmtCache")
IF bOK = TRUE THEN
CALL CONOUT("Funcao encontrada")
ELSE
CALL CONOUT("Funcao nao encontrada")
END IF
END MAIN
|
|