RetornaRespostasTeste

Tem o objetivo de buscar as respostas das perguntas geradas para o teste de certificação.

Sintaxe: RetornaRespostasTeste(Alfa Posicao)

Parâmetros:

Nome Tipo Descrição
Posicao Alfa Indica qual a posição da lista deve ser lida. Sendo:
"I" = Primeiro registro da grade
"P" = Próximo


Tipo de Retorno: Indica o resultado da leitura. Sendo:               

Valor Descrição
-1 não encontrou registros
0 encontrou registro
1 chegou ao final da lista

Exemplo:

xRet = RetornaPerguntasTeste("I");
Se (xRet <> -1)
{
     Enquanto (xRet = 0)
      {
         LstPerguntas.Adicionar();
         LstPerguntas.GruPer = R202PER.GruPer;
         LstPerguntas.CodPer = R202PER.CodPer;
         LstPerguntas.DesPer = R202PER.DesPer;
         LstPerguntas.Gravar();
         xRetRes = RetornaPerguntasTeste("I");
         Se (xRetRes <> -1)
         {
             Enquanto (xRetRes = 0)
              {
                 Se (R202PER.GruPer = R202RES.GruPer) e (R202PER.CodPer = R202RES.CodPer)
                  {
                      LstRespostas.Adicionar();
                      LstRespostas.GruPer = R202RES.GruPer;
                      LstRespostas.CodPer = R202RES.CodPer;
                      LstRespostas.CodRes = R202RES.CodRes;
                      LstRespostas.DesRes = R202RES.DesRes;
                      LstRespostas.Gravar();
                   }
                   xRetRes = RetornaRespostasTeste("P");
              }
        }
        xRet = RetornaPerguntasTeste("P");
    }
}

Utilização: Regra que executa o teste.

Disponível para o(s) Módulo(s): TR

Este artigo ajudou você?