Regra por processo 763 - Personalizar convite de treinamento

Esta regra será executada quando o usuário clicar no nome do curso na tela de convites pendentes no TRWEB. É através desta regra que o usuário poderá manipular o html disponibilizado, mostrando as informações da turma em questão.

Recursos utilizados: estará disponível para esta regra os campos da tabela R134DTU, inclusive campos de usuário.

Ejemplo:

Definir Cursor Cur_R128CUA;
Definir Alfa xHTML;
Definir Alfa xStrHtml;
Definir Alfa xQuebra;
Definir Alfa aDatIni;
Definir Alfa aDatFim;

/* Informações da definição da turma */
xCodCua = R134DTU.CodCua;
xTmaCua = R134DTU.TmaCua;

RetornaAscII(13, xQuebra);
xStrHtml = "";

Cur_R128CUA.SQL "SELECT * FROM R128CUA WHERE CODCUA = :xCodCua";
Cur_R128CUA.AbrirCursor();
Se (Cur_R128CUA.Achou)
{
/* Nome do Curso */
xStrHtml = xStrHtml + "<div id=01 class=TITULOCURSO align=center>Curso:
+ Cur_R128CUA.NomCua + "</div>" + xQuebra;

/* Período da Turma */
ConverteDateTime(R134DTU.DatIni, 2, aDatIni);
ConverteDateTime(R134DTU.DatFim, 2, aDatFim);
xStrHtml = xStrHtml + "<div id=02>" + xQuebra +
" <span class=ROTULO>Período: </span>" + xQuebra +
" <span class=INFO>" + aDatIni + " à " + aDatFim + "</span>" + xQuebra +
"</div>" + xQuebra;

xStrHtml = xStrHtml + "<hr class='LINHACONVITE'/>" + xQuebra;
}
Cur_R128CUA.FecharCursor();

xStrHtml = xStrHtml + xQuebra;

xHTML = WEB_HTML;
WAdicionanoHTML(xStrHtml, xHTML, "");
WEB_HTML = xHTML;

Disponível para o módulo: TR.