Páginas filhas
  • LGX - LFORM

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

Pagetitle
LGX - LFORM
LGX - LFORM
Componente abstrato herdado pelos componentes de criação de janelas LDIALOG e LFRAME.


Hierarquia



Métodos GET


Efetua uma requisição GET e retorna verdadeiro se a requisição foi efetuada com sucesso.


Expandir
titleGET GET

Sintaxe




Bloco de código
_ADVPL_get_property(< l_reference >,"GET", < l_path >, [ l_headers ]) => SMALLINT

Parâmetros




NomeTipoDescriçãoObrigatório?Padrão
l_pathCHARCaminho do serviço REST para requisição.Sim
l_headersCHARLista de cabeçalhos específicos da requisição.1Não

1 Por ser uma lista de valores, os cabeçalhos precisam ser informados no formato {{"Header1: Content1"},{"Header2: Content2"}}. Exemplo: {{"Authorization: Basic QWxhZGRpbjpvcGVuIHNlc2FtZQ=="}}.

Retorno




TipoDescrição
SMALLINTVerdadeiro se a requisição foi efetuada com sucesso.

Exemplo




Bloco de código
titleExemplo SQLCODE
linenumberstrue
#------------------------------------------------------------------------------#
FUNCTION LREST_getGET()
#------------------------------------------------------------------------------#
    DEFINE l_status SMALLINT

    LET l_status = _ADVPL_get_property(m_rest_reference,"GET","/posts")

    IF  l_status THEN
        CALL CONOUT("OK.:",_ADVPL_get_property(m_rest_reference,"RESULT"))
    ELSE
        CALL CONOUT("NOK:",_ADVPL_get_property(m_rest_reference,"ERROR_MESSAGE"))
    END IF
END FUNCTION

Observação


  • Para recuperar o resultado da requisição, utilize o método RESULT, disponível na Classe LREST.
  • Para recuperar a mensagem de erro, no caso da requisição não ter sido executada, utilize o método ERROR_MESSAGE, disponível na Classe LREST.


Métodos SET


Métodos acessíveis através da função _ADVPL_set_property que permite alterar e manipular os valores do componente:


Expandir
titleSET TITLE

Método SET: TITLE 

Define o título da janela.

Sintaxe




Bloco de código
CALL _ADVPL_set_property(< l_reference >,"TITLE", < l_title >)

Parâmetros




NomeTipoDescriçãoObrigatório?Padrão
l_titleCHARTítulo que será definido para a janela.Sim

Exemplo




Bloco de código
linenumberstrue
CALL _ADVPL_set_property(m_form_reference,"TITLE","Manutenção de Pedidos")





Expandir
titleSET ENABLE_ESC_CLOSE

Método SET: ENABLE_ESC_CLOSE

Habilita/desabilita o encerramento da janela através do botão ESC.

Sintaxe




Bloco de código
CALL _ADVPL_set_property(< l_reference >,"ENABLE_ESC_CLOSE", < l_enable >)

Parâmetros




NomeTipoDescriçãoObrigatório?Padrão
l_enableSMALLINTVerdadeiro para habilitar o encerramento da janela através do botão ESC, falso para desabilitar.Sim

Exemplo




Bloco de código
linenumberstrue
CALL _ADVPL_set_property(m_form_reference,"ENABLE_ESC_CLOSE",FALSE)





Expandir
titleSET MAXIMIZED

Método SET: MAXIMIZED

Maximiza a janela.

Sintaxe




Bloco de código
CALL _ADVPL_set_property(< l_reference >,"MAXIMIZED", < l_maximized >)

Parâmetros




NomeTipoDescriçãoObrigatório?Padrão
l_maximized
SMALLINTVerdadeiro para maximizar a janela, falso para manter o tamanho definido.Sim

Exemplo




Bloco de código
linenumberstrue
CALL _ADVPL_set_property(m_form_reference,"MAXIMIZED",TRUE)




Expandir
titleSET CENTERED

Método SET: CENTERED

Centraliza a janela.

Sintaxe




Bloco de código
CALL _ADVPL_set_property(< l_reference >,"CENTERED", < l_centered >)

Parâmetros




NomeTipoDescriçãoObrigatório?Padrão
l_centered
SMALLINTVerdadeiro para centralizar a janela, falso para manter na posição definida.Sim

Exemplo




Bloco de código
linenumberstrue
CALL _ADVPL_set_property(m_form_reference,"CENTERED",TRUE)

Observação


  • Este método só tem efeito se a janela não está maximizada.




Expandir
titleSET HOTKEY

Método SET: HOTKEY

Define uma tecla de atalho para a janela.

Sintaxe




Bloco de código
CALL _ADVPL_set_property(< l_reference >,"HOTKEY", < l_hotkey >, [ l_event ], [ l_info ], [ l_component ], [ l_focus ])

Parâmetros




NomeTipoDescriçãoObrigatório?Padrão
l_hotkey
SMALLINTCódigo da tecla de atalho. 1Sim
l_event
CHARFunção 4GL que será executada na tecla de atalho. 2Não
l_info
CHARBreve descrição da tecla de atalho (utilizada na tela de exibição das teclas de atalho disponíveis na janela).Não
l_component
VARCHARReferência do componente FREEFORM para o qual será definida a tecla de atalho. 3Não
l_focus
SMALLINTVerdadeiro para limitar a execução da tecla de atalho apenas quando o componente informado estiver focado.Não

1 As teclas de atalho disponíveis encontram-se no link Teclas de atalhos disponíveis atualmente para formulários Freeform e Metadado.
2
Se não informada a função 4GL, a tecla de atalho será removida da janela.
3 Se informado um componente, a execução da tecla de atalho não será realizada quando este estiver desabilitado ou invisível.

Exemplo




Bloco de código
linenumberstrue
CALL _ADVPL_set_property(m_form_reference,"HOTKEY",116,"job005_refresh","Atualiza os valores da tela")




Expandir
titleSET CLEAR_HOTKEYS

Método SET: CLEAR_HOTKEYS

Remove todas as teclas de atalho disponíveis na janela.

Sintaxe




Bloco de código
CALL _ADVPL_set_property(< l_reference >,"CLEAR_HOTKEYS")

Exemplo




Bloco de código
linenumberstrue
CALL _ADVPL_set_property(m_form_reference,"CLEAR_HOTKEYS")






Expandir
titleSET INIT_EVENT

Método SET: INIT_EVENT

Adiciona um evento que será executado na ativação da janela.

Sintaxe




Bloco de código
CALL _ADVPL_set_property(< l_reference >,"INIT_EVENT", < l_event >)

Parâmetros




NomeTipoDescriçãoObrigatório?Padrão
l_event
CHARFunção 4GL que será executada na ativação da janela.Sim

Exemplo




Bloco de código
linenumberstrue
CALL _ADVPL_set_property(m_form_reference,"INIT_EVENT","job0005_init_event")






Expandir
titleSET MAXIMIZE_EVENT

Método SET: MAXIMIZE_EVENT

Define um evento que será executado quando o usuário maximizar a janela.

Sintaxe




Bloco de código
CALL _ADVPL_set_property(< l_reference >,"MAXIMIZE_EVENT", < l_event >)

Parâmetros




NomeTipoDescriçãoObrigatório?Padrão
l_event
CHARFunção 4GL que será executada quando o usuário maximizar a janela.Sim

Exemplo




Bloco de código
linenumberstrue
CALL _ADVPL_set_property(m_form_reference,"MAXIMIZE_EVENT","job0005_maximize_event")