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.

<div class="Code"><p>Definir Cursor Cur_R128CUA;<br></br>Definir Alfa xHTML;<br></br>Definir Alfa xStrHtml;<br></br>Definir Alfa xQuebra;<br></br>Definir Alfa aDatIni;<br></br>Definir Alfa aDatFim;<br></br><br></br>/* Informações da definição da turma */<br></br>xCodCua = R134DTU.CodCua;<br></br>xTmaCua = R134DTU.TmaCua;<br></br><br></br>RetornaAscII(13, xQuebra);<br></br>xStrHtml = "";<br></br><br></br>Cur_R128CUA.SQL "SELECT * FROM R128CUA WHERE CODCUA = :xCodCua";<br></br>Cur_R128CUA.AbrirCursor();<br></br>Se (Cur_R128CUA.Achou)<br></br>{<br></br> /* Nome do Curso */<br></br> xStrHtml = xStrHtml + "&#x3C;div id=01 class=TITULOCURSO align=center>Curso: <br></br> + Cur_R128CUA.NomCua + "&#x3C;/div>" + xQuebra;<br></br><br></br> /* Período da Turma */<br></br> ConverteDateTime(R134DTU.DatIni, 2, aDatIni);<br></br> ConverteDateTime(R134DTU.DatFim, 2, aDatFim);<br></br> xStrHtml = xStrHtml + "&#x3C;div id=02>" + xQuebra +<br></br> " &#x3C;span class=ROTULO>Período: &#x3C;/span>" + xQuebra +<br></br> " &#x3C;span class=INFO>" + aDatIni + " à " + aDatFim + "&#x3C;/span>" + xQuebra +<br></br> "&#x3C;/div>" + xQuebra; <br></br><br></br>xStrHtml = xStrHtml + "&#x3C;hr class='LINHACONVITE'/>" + xQuebra;<br></br>}<br></br>Cur_R128CUA.FecharCursor();<br></br><br></br>xStrHtml = xStrHtml + xQuebra;<br></br><br></br>xHTML = WEB_HTML;<br></br>WAdicionanoHTML(xStrHtml, xHTML, "&#x3C;!--INSERE_TEXTO_TEMPLATE-->");<br></br>WEB_HTML = xHTML;</p></div>

Disponível para o módulo: TR.