Histórico da Página
...
Criação de chave de profile chamada logix.freeform.debug.listOfComponents que permite gerar uma listagem com informações dos componentes de telas desenvolvidas com componentes FreeForm/Metadado. Esta chave permite o valor 0 (INATIVO) e 1 (ATIVO).
...
A listagem dos dados dos componentes é realizada quando o valor da chave no profile é setada da seguinte forma:
Informações |
---|
logix.freeform.debug.listOfComponents = 1 |
A listagem dos componentes é gerada no arquivo de LOG do AppServer durante a execução dos programas FreeForm/Metadados que fazem uso dos componetes Framework Logix herdados da classe principal chamada LComponent (Classe base de todos os componentes do Metadados/FreeForm) e somente será gerada para componentes herdados deste componente base.
No momento em que cada janela de telas freeform/metadado é aberta e exibida em tela, no arquivo de LOG do AppServer é gerada uma listagem semelhante a lista a seguir:
Nessa lista podem ser observadas as informações como Título da Janela e a listagem de seus componentes pode-se observar as seguintes informações:
♦ Título da Janela
♦ Listagem dos componentes da janela com os respectivos valores
...
das propriedades HELP_NAME e VARIABLE e também a classe de componente utilizada (TYPE)
Para recuperar a referência dos componentes com base nestas propriedades pode ser realizada com base na propriedade COMPONENT_REFERENCE_BY_HELP_NAME da janela usando a função _ADVPL_getProperty.
Bloco de código | ||||||
---|---|---|---|---|---|---|
| ||||||
DEFINE l_form_reference VARCHAR(10)
DEFINE l_menu_inform_referece VARCHAR(10)
DEFINE l_cod_rotina_reference VARCHAR(10)
LET l_form_reference = _ADVPL_GetFormReference("Consulta de Auditorias")
#Recuperar a referência do botão "INFORMAR" existente na barra de ferramentas da janela a partir da propriedade HELP_NAME do botão
LET l_menu_inform_reference = _ADVPL_get_property(l_form_reference,"COMPONENT_REFERENCE_BY_HELP_NAME","menu_inform")
#Acionar o evento de click do botão usando a propriedade DO_CLICK
CALL _ADVPL_get_property(l_menu_inform_reference,"DO_CLICK")
#Recuperar a referência do campo "COD_ROTINA" pelo nome da variavel (Propriedade VARIABLE)
LET l_cod_rotina_reference = _ADVPL_get_property(l_form_reference,"COMPONENT_REFERENCE_BY_VARIABLE","cod_rotina")
#Atribuir o valor "001" para o campo "COD_ROTINA" usando a propriedade VALUE
CALL _ADVPL_set_property(l_cod_rotina_reference,"VALUE","001") |
Card documentos Informacao Use esse box para destacar informações relevantes e/ou de destaque. Titulo IMPORTANTE!
...