WEB_HTML
Permite que seja carregado no browser um determinado conteúdo. Para isso, deve-se atribuir a esta variável uma string, geralmente em formato html.
Tipo: String.
Exemplo: No browser, o usuário pode clicar em um botão que executará uma regra com o conteúdo abaixo. Esta regra fará a leitura do html "treinamentos_lista.htm" e irá inserir algumas informações neste html. Em seguida, retornará este html para o browser através da variável WEB_HTML.
Definir Alfa xHtml_Acao;
Definir Alfa xHTML_Lista;
Definir Alfa xRandom;
Definir Numero xNumEmp;
Definir Numero xTipCol;
Definir Numero xNumCad;
Definir Numero Cracha;
Definir cursor cR134LES;
WCheckValDouble("CRACHA", "Crachá", Cracha, "S", 0);
se (cracha <> 0)
xAchou = RetColabPorCracha(Cracha, xNumEmp, xTipCol, xNumCad);
senao
xAchou = RetColabPorCodUsu(CodUsu, xNumEmp, xTipCol, xNumCad);
se (xAchou = 0)
inicio
cR134LES.SQL"SELECT NUMEMP FROM R134LES WHERE NUMEMP = :xNumEmp AND TIPCOL =
:xTipCol AND NumCad = :xNumCad";
cR134LES.AbrirCursor();
Se (cR134LES.Achou)
inicio
WLerHtml("treinamentos_lista.htm", xHTML_Lista);
xHtml_Acao = CgiAddr + WNConector + "?ACAO=EXEQUIOSQUE&SIS=FP&BASE=QUIOSQUE&TIPO=RELATORIO&NOME=FPRE097.COL&TEMPLATE=treinamentos_relatorio_template.htm";
xHtml_Acao = xHtml_Acao + "&Dado_EAbrEmp=" + Formatar(xNumEmp, "%2.2f");
xHtml_Acao = xHtml_Acao + "&Dado_EAbrTcl=" + Formatar(xTipCol, "%2.2f");
xHtml_Acao = xHtml_Acao + "&Dado_EAbrCad=" + Formatar(xNumCad, "%2.2f");
HoraServidor(xRandom);
xHtml_Acao = xHtml_Acao + "&RANDOM=" + xRandom;
WAdicionaNoHtml(xHtml_Acao, xHtml_Lista, "#CHAMADA_TREINAMENTOS");
WEB_HTML = xHTML_Lista;
fim;
Senao
inicio
WLerHtml("quiosque_registronaoencontrado.htm", xHTML_Lista);
WEB_HTML = xHTML_Lista;
fim;
fim;
senao
inicio
WLerHtml("usuario_nao_associado.htm", xHTML_Lista);
WEB_HTML = xHTML_Lista;
fim;
Utilização: Todas as regras do sistema.
Observação: Não poderá ser utilizada via processo automático pois sua funcionalidade não será utilizada e poderá ocorrer um erro na execução do processo.
Disponível para os módulos: CS, QL, RS, Administração de Pessoal, Controle de Ponto e Refeitório, SM e TR.