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:

<div class="Code"><p>xRet = RetornaPerguntasTeste("I");<br></br>Se (xRet &#x3C;> -1) <br></br>{<br></br> Enquanto (xRet = 0) <br></br> {<br></br> LstPerguntas.Adicionar();<br></br> LstPerguntas.GruPer = R202PER.GruPer;<br></br> LstPerguntas.CodPer = R202PER.CodPer;<br></br> LstPerguntas.DesPer = R202PER.DesPer;<br></br> LstPerguntas.Gravar();<br></br> xRetRes = RetornaPerguntasTeste("I");<br></br> Se (xRetRes &#x3C;> -1) <br></br> {<br></br> Enquanto (xRetRes = 0) <br></br> {<br></br> Se (R202PER.GruPer = R202RES.GruPer) e (R202PER.CodPer = R202RES.CodPer)<br></br> {<br></br> LstRespostas.Adicionar();<br></br> LstRespostas.GruPer = R202RES.GruPer;<br></br> LstRespostas.CodPer = R202RES.CodPer;<br></br> LstRespostas.CodRes = R202RES.CodRes;<br></br> LstRespostas.DesRes = R202RES.DesRes;<br></br> LstRespostas.Gravar();<br></br> }<br></br> xRetRes = RetornaRespostasTeste("P");<br></br> }<br></br> }<br></br> xRet = RetornaPerguntasTeste("P");<br></br> }<br></br>}</p></div>

Utilização: Regra que executa o teste.

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

Este artigo ajudou você?