import.css=/download/attachments/6062824/tecnologia.css

Busca a Annotation nas funções de um programa fonte e retorna uma lista com o nome das mesmas. 

Sintaxe

Reflection.getProgramFunctionsByAnnotation(cProgramName, cAnnotationName)

Parâmetros

Nome

Tipo

Descrição

Obrigatório

Referência

cProgramName

caractere

Nome do programa onde serão procuradas funções que contenham a Annotation.

X


cAnnotationName
caractereNome da Annotation a ser procurada.           X

Retorno

Nome

Tipo

Descrição

aRet

Array

Array com o nome das funções onde a Annotation foi encontrada. Caso não seja encontrado nenhum resultado o retorno é NIL.

Exemplos

/*
Programa test_doc_resourceGetProgramFunctionsByAnnotation.tlpp
*/

#include "tlpp-core.th"

@annotation AnnotationExemplo
resourceExemplo as char
@end

@AnnotationExemplo(resourceExemplo='Valor de Exemplo1')
function u_resourceGetProgramFunctionsByAnnotation()
return
#include "tlpp-core.th"

Function u_testGetProgramFunctionsByAnnotation()
	Local aRet

	aRet := Reflection.getProgramFunctionsByAnnotation("test_doc_resourceGetProgramFunctionsByAnnotation.tlpp", "AnnotationExemplo")

	if (valType(aRet) <> 'U') .and. (valType(aRet) == 'A' .and. len(aRet) > 0)
		aEval(aRet,{|x| conout(x)})
	else
		conout('Nao foi encontrada Annotation com os parametros informados')
	endIf

Return

Resultado do Exemplo

U_RESOURCEGETPROGRAMFUNCTIONSBYANNOTATION

Abrangência

17.3.0.3

Veja também