Histórico da Página

...

Bloco de código

language	xml
firstline	1
title	JSon de retorno do Endpoint do Framework
linenumbers	true
collapse	true

{
    "fields": [
        {
            "visible": true,
            "gridColumns": 6,
            "disable": false,
            "property": "codIdiomacod_idioma",
            "label": "Idioma",
            "type": "string"
        },
        {
            "visible": true,
            "gridColumns": 6,
            "disable": false,
            "property": "codIdiomPadrcod_idiom_padr",
            "label": "Idioma Padrão",
            "type": "string"
        },
        {
            "visible": true,
            "gridColumns": 6,
            "disable": false,
            "property": "desIdiomades_idioma",
            "label": "Descrição",
            "type": "string"
        },
        {
            "visible": false,
            "property": "id",
            "type": "number",
            "key": true
        }
    ]
}

...

Procedure

Parâmetros

Descrição/Exemplo

piGetTTPersonalizaton

INPUT cProg AS CHARACTER

OUTPUT TABLE ttPersonalization

Retorna a temp-table ttPersonalization com a lista de campos personalizáveis de um determinado programa.

Exemplo:

Bloco de código

firstline	1
title	Exemplo de chamada do utilitário btb/personalizationUtil.p
linenumbers	true
collapse	true

{ btb/personalizationUtil.i }

DEFINE VARIABLE hPers AS HANDLE NO-UNDO.

RUN btb/personalizatinUtil.p PERSISTENT SET hPers.
RUN piGetTTPersonalizaton IN hPers ("codigo_do_programa", OUTPUT TABLE ttPersonalization).
DELETE PROCEDURE hPers.

FOR EACH ttPersonalization:
    DISPLAY ttPersonalization.
END.

piGetFieldList

INPUT cProg AS CHARACTER

OUTPUT cList AS CHARACTER

OUTPUT cTypeList AS CHARACTER

Retorna duas listas caracter, uma contendo a lista de campos e uma lista dos seus respectivos tipos, de um determinado programa.

OBS: As listas usam como separador a vírgula ",".

Exemplo:

Bloco de código

firstline	1
title	Exemplode chamada de procedure
linenumbers	true
collapse	true

DEFINE VARIABLE hPers     AS HANDLE    NO-UNDO.
DEFINE VARIABLE cList     AS CHARACTER NO-UNDO.
DEFINE VARIABLE cTypeList AS CHARACTER NO-UNDO.

RUN btb/personalizatinUtil.p PERSISTENT SET hPers.
RUN piGetFieldList IN hPers ("codigo_do_programa", OUTPUT cList, OUTPUT cTypeList).
DELETE PROCEDURE hPers.

MESSAGE cList SKIP cTypeList VIEW-AS ALERT-BOX

3) Criação pela área de negócio de um componente PO-DYNAMIC-FORM e PO-DYNAMIC-VIEW. Se desejar, criar também um componente PO-PAGE-DYNAMIC-TABLE, que servirá para navegar nos registros e permitir a visualização e edição dos registros personalizados.

...

Árvore de páginas

Versões comparadas

Versão antiga 19

Nova versão 20

Chave