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	Descripción
aTabela	Alfa	Nome da tabela do sistema

Ejemplo:

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.