ExisteTabelaWSGenericPersistence

Retorna se uma determinada tabela do sistema está disponível para uso nas regras de integração com o ambiente Cloud.

Sintaxe: ExisteTabelaWSGenericPersistence(Alfa aTabela);

Parâmetros:

Nome	Tipo	Descrição
aTabela	Alfa	Nome da tabela do sistema

Exemplo:

Definir Cursor cCursorBuscaUltimaMatricula;
Definir Alfa aMensagemErro;
Definir alfa cLinha;
CaracterPAraAlfa(13, cLinha);
Se(vExecucaoRegra = 0){
      nNumEmp = R034FUN.NumEmp;
      cCursorBuscaUltimaMatricula.SQL "SELECT Usu_UltCad FROM R030EMP WHERE NumEmp = :nNumEmp";
      cCursorBuscaUltimaMatricula.AbrirCursor();
      xNovo = 1;
      Se(cCursorBuscaUltimaMatricula.Achou) {
            xNovo = cCursorBuscaUltimaMatricula.Usu_UltCad + 1;
      }
      cCursorBuscaUltimaMatricula.FecharCursor();
      ExecSqlEx("UPDATE R030EMP SET Usu_UltCad = :xNovo WHERE NumEmp = :nNumEmp ", xErro, aMensagemErro);
      Se (ExisteTabelaWSGenericPersistence("R034FUN") = 1) {
            R034FUN.NumCad = xNovo;
      }
}

Utilização: Editor de Regras (somente para as regras de integração com o ambiente Cloud).

Disponível para o módulo: Todos os módulos do Gestão de Pessoas | HCM.

PORTAL DE DOCUMENTAÇÃO
Gestão de Pessoas \| HCM - versão 6.10.3