API de Inclusão de dados (001)

Nome Físico: sec/seapi002aa.r

Nome do Include com Parâmetros: sec/seapi002aa.i

Versão de Integração: 001

Objetivo: 

Criar registros nas tabelas usuar_mestre, usuar_mestre_ext, grp_usuar, usuar_grp_usuar.

Pré-requisitos: 

Não se aplica




Considerações Gerais

  • Essa API deve ser utilizada apenas pelo Gestão de Planos.
  • A lista de grupos será disponibilizada pela FDEs do Gestão de Planos.
  • A variável “c_list_grp’ contém a lista de grupos disponibilizada pela FDEs do Gestão de Planos.


Parâmetros de Entrada 

  • Temp-table contendo a lista de usuários e grupos a serem manutenidos e a ação a ser tomada.
  • O campo l_inclui da temp-table tt_grp_usuar indica se o usuário será incluído (valor YES) ou excluído (valor NO) do respectivo grupo.

Definição da temp-table tt_grp_usuar  

DEFINE TEMP-TABLE tt_grp_usuar NO-UNDO
    FIELD c_cod_usuario       AS CHAR
    FIELD c_cod_grp_usuar     AS CHAR
    FIELD l_inclui            AS LOGICAL

INDEX i_grp_usuar IS PRIMARY UNIQUE c_cod_usuario c_cod_grp_usuar.

Parâmetros de Saída (Retorno)

  • Temp-table de erros



Definição da temp-table RowErrors


DEFINE TEMP-TABLE RowErrors NO-UNDO
    FIELD c_cod_usuario   AS CHAR
    FIELD c_cod_grp_usuar AS CHAR
    FIELD c_error_desc    AS CHAR.


Exemplo de chamada da API


Run sec/seapi001aa.r ( Input Table tt_grp_usuar, Output Table RowErrors).
For Each RowErrors:
    Message "Erro: "
            RowErrors.c_cod_usuario + " - ":U +
            RowErrors.c_cod_grp_usuar + " - ":U +
            RowErrors.c_error_desc
            View-as Alert-box Information.
End.