English
Español
Regras do identificador "FIN-615PRJBL01"
Regras
Com esta regra, é gerado um e-mail com um arquivo html em anexo.
DEFINIR ALFA VSAssunto;
DEFINIR ALFA VSRemetente;
DEFINIR ALFA VSDestinatario;
DEFINIR ALFA VSTipEmail;
DEFINIR ALFA VSCOrpo;
VSTipEmail = "0";
VSAssunto = "BLOQUEIO DE ORÇAMENTO";
VSRemetente = "xxx@senior.com.br";
VSDestinatario = "yyy@senior.com.br";
VSCOrpo= "Saldo orçamentário do projeto ultrapassado. Necessita-se de
análise e aprovação";
Com esta regra, é gerado um e-mail com as informações da tela no corpo do e-mail.
DEFINIR ALFA VSAssunto;
DEFINIR ALFA VSRemetente;
DEFINIR ALFA VSDestinatario;
DEFINIR ALFA VSTipEmail;
VSTipEmail = "1";
VSAssunto = "BLOQUEIO DE ORÇAMENTO";
VSRemetente = "xxx@senior.com.br";
VSDestinatario = "yyy@senior.com.br";
Com esta regra, é gerado um e-mail com um arquivo pdf em anexo.
DEFINIR ALFA VSAssunto;
DEFINIR ALFA VSRemetente;
DEFINIR ALFA VSDestinatario;
DEFINIR ALFA VSTipEmail;
DEFINIR ALFA VSCOrpo;
VSTipEmail = "2";
VSAssunto = "BLOQUEIO DE ORÇAMENTO";
VSRemetente = "xxx@senior.com.br";
VSDestinatario = "yyy@senior.com.br";
VSCOrpo= "Saldo orçamentário do projeto ultrapassado. Necessita-se de
análise e aprovação";
Com esta regra, também é gerado um e-mail com as informações da tela no corpo do e-mail.
DEFINIR ALFA VSCtrFis;
DEFINIR ALFA VSCaption;
DEFINIR ALFA VSECriOrc;
DEFINIR ALFA VSLDCriterio;
DEFINIR ALFA VSETipReg;
DEFINIR ALFA VSEDatBas;
DEFINIR ALFA VSMMenOrc;
DEFINIR ALFA VSENumPrj;
DEFINIR ALFA VSLAbrNumPrj;
DEFINIR ALFA VSECodFpj;
DEFINIR ALFA VSLAbrCodFpj;
DEFINIR ALFA VSECtaFin;
DEFINIR ALFA VSLAbrCtaFin;
DEFINIR ALFA VSECodCcu;
DEFINIR ALFA VSLAbrCodCcu;
DEFINIR ALFA VSProSer;
DEFINIR ALFA VSEProSer;
DEFINIR ALFA VSLAbrProSer;
DEFINIR ALFA VSECodDer;
DEFINIR ALFA VSLAbrCodDer;
DEFINIR ALFA VSMes;
DEFINIR ALFA VSProjeto;
DEFINIR ALFA VSFase;
DEFINIR ALFA VSConta;
DEFINIR ALFA VSCusto;
DEFINIR ALFA VSNivFis;
DEFINIR ALFA VSNivCap;
DEFINIR ALFA VSEVlrOrc;
DEFINIR ALFA VSEPerPrj;
DEFINIR ALFA VSEOrcCal;
DEFINIR ALFA VSESalAlo;
DEFINIR ALFA VSEVlrDis;
DEFINIR ALFA VSEVlrAnt;
DEFINIR ALFA VSEVlrAtu;
DEFINIR ALFA VSEVlrAlo;
DEFINIR ALFA VSEVlrExc;
DEFINIR ALFA VSLRotPpj;
DEFINIR ALFA VSLSeqRp2;
DEFINIR ALFA VSLStrRp1;
DEFINIR ALFA VSLNumRpj;
DEFINIR ALFA VSLDatRp1;
DEFINIR ALFA VSLStrRp2;
DEFINIR ALFA VSLSeqRp1;
DEFINIR ALFA VSLDatRp2;
DEFINIR ALFA VSLStrRp3;
DEFINIR ALFA VSAssunto;
DEFINIR ALFA VSRemetente;
DEFINIR ALFA VSDestinatario;
DEFINIR ALFA VSCorpo;
DEFINIR ALFA HTML1;
DEFINIR ALFA HTML2;
DEFINIR ALFA HTML3;
DEFINIR ALFA HTML4;
DEFINIR ALFA HTML5;
DEFINIR ALFA VSTipEmail;
VSTipEmail = "3";
HTML1 = "<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.0 Transitional//EN\">
" +
"<HTML> " +
"<HEAD> " +
"<TITLE> " + VSCaption + " </TITLE> " +
"</HEAD> " +
"<BODY> " +
"<table border=1 bordercolor=black cellspacing=0> " +
"<tr> " +
"<td colspan=2> " +
"<center> <b> " + VSCaption + " </b></center> " +
"</td> " +
"</tr> " +
"<tr> " +
"<td colspan=2> " +
"<b>Detalhes:</b> " +
"</td> " +
"</tr> " +
"<tr> " +
"<td colspan=2 width=100%> " +
"<table border=0> " +
"<tr> " +
"<td> " +
"<p align=right> <font color=red>Critério:</font> </p> " +
"</td> " +
"<td> " +
"<input type=Text size=1 readonly style='text-align: center' value=" +
VSECriOrc +" > " + VSLDCriterio +
"</td> " +
"</tr> " +
"<tr> " +
"<td> " +
"<p align=right> Regime: </p> " +
"</td> " +
"<td> " +
"<input type=Text size=8 maxlength=8 readonly style='text-align: center'
value=" + VSETipReg + " > " +
"</td> " +
"<td> " +
"<p align=right> Data </p> " +
"</td> " +
"<td> " +
"<input type=Text size=8 maxlength=8 readonly style='text-align: center'
value= " + VSEDatBas + " > " +
"</td> " +
"</tr> " +
"<tr> " +
"<td> " +
"<p align=right> <font color=red> Mensagem: </font> </p> " +
"</td> " +
"<td> " +
"<textarea readonly rows=2 cols=50 maxlength=100 style=overflow:hidden
style=color:red>" + VSMMenOrc + "</textarea> " +
"</td> " +
"</tr> " +
"<tr> " +
"<td> " +
"<p align=right> Projeto: </p> " +
"</td> " +
"<td> " +
"<input type=Text size=10 maxlength=10 readonly style='text-align: right'
value=" + VSENumPrj + "> " + VSLAbrNumPrj +
"</td> " +
"</tr> " +
"<tr> " +
"<td>" +
"<p align=right> Fase: </p> " +
"</td> " +
"<td> " +
"<input type=Text size=10 maxlength=10 readonly style='text-align: right'
value= " + VSECodFpj + "> " + VSLAbrCodFpj +
"</td> " +
"</tr> " +
"<tr> " +
"<td> " +
"<p align=right> Conta Financeira: </p> " +
"</td> " +
"<td> ";
HTML2 = "<input type=Text size=10 maxlength=10 readonly style='text-align:
right' value= " + VSECtaFin + "> " + VSLAbrCtaFin +
"</td> " +
"</tr> " +
"<tr> " +
"<td> " +
"<p align=right> Centro de custos: </p> " +
"</td> " +
"<td> " +
"<input type=Text size=10 maxlength=10 readonly style='text-align: right'
value= " + VSECodCcu + "> " + VSLAbrCodCcu +
"</td> " +
"</tr> ";
se (VSCtrFis = "True")
{
se (VSProSer = "Produto")
{
HTML2 = HTML2 +
"<tr> " +
"<td> " +
"<p align=right> Produto: </p> " +
"</td> " +
"<td> " +
"<input type=Text size=10 maxlength=10 readonly style='text-align: right'
value= " + VSEProSer + "> " + VSLAbrProSer +
"</td> " +
"</tr> " +
"<tr> " +
"<td> " +
"<p align=right> Derivação: </p> " +
"</td> " +
"<td> " +
"<input type=Text size=10 maxlength=10 readonly style='text-align: right'
value= " + VSECodDer + "> " + VSLAbrCodDer +
"</td> " +
"</tr> ";
}
senao
se (VSProSer = "Servico")
{
HTML2 = HTML2 +
"<tr> " +
"<td> " +
"<p align=right> Serviço: </p> " +
"</td> " +
"<td> " +
"<input type=Text size=10 maxlength=10 readonly style='text-align: right'
value= " + VSEProSer + "> " + VSLAbrProSer +
"</td> " +
"</tr> ";
}
}
HTML2 = HTML2 +
"</table> " +
"</td> " +
"</tr> " +
"<tr> " +
"<td> " +
"<b>Excedido no Nível: </b> " +
"</td> " +
"<td> " +
"<b>Valores:</b> " +
"</td> " +
"</tr> " +
"<tr> ";
HTML3="<td width = 25%> " +
"<table width=100%> " +
"<tr> " +
"<td> " +
"<input type=checkbox " + VSMes + " disabled> Mês " +
"</td>" +
"</tr> " +
"<tr> " +
"<td> " +
"<input type=checkbox " + VSProjeto + " disabled> Projeto " +
"</td> " +
"</tr> " +
"<tr> " +
"<td> " +
"<input type=checkbox " + VSFase + " disabled> Fase " +
"</td> " +
"</tr> " +
"<tr> " +
"<td> " +
"<input type=checkbox " + VSConta + " disabled> Conta Financeira " +
"</td> " +
"</tr> " +
"<tr> " +
"<td> " +
"<input type=checkbox " + VSCusto + " disabled> Centro de Custos " +
"</td> " +
"</tr> ";
se (VSCtrFis = "True")
{
HTML3= HTML3 +
"<tr> " +
"<td> " +
"<input type=checkbox " + VSNivFis + " disabled> " + VSNivCap +
"</td> " +
"</tr> ";
}
HTML3= HTML3 +
"</table> " +
"</td> " +
"<td> " +
"<table width=100%> " +
"<tr> " +
"<td width=25%> " +
"<p align=right> Orçamento: </p> " +
"</td> " +
"<td> " +
"<input align=left type=Text size=15 readonly style='text-align: right'
value= " + VSEVlrOrc + "> " +
"</td> " +
"</tr> " +
"<tr> " +
"<td> " +
"<p align=right> Tolerância: </p> " +
"</td> " +
"<td> " +
"<input align=left type=Text size=15 readonly style='text-align: right'
value= " + VSEPerPrj + "> % " +
"</td> " +
"<td> " +
"<p align=right> Anterior: </p> " +
"</td> " +
"<td> " +
"<input align=left type=Text size=15 readonly style='text-align: right'
value= " + VSEVlrAnt + "> " +
"</td>" +
"</tr> " +
"<tr> " +
"<td> " +
"<p align=right> Orç. Calculado: </p> " +
"</td> " +
"<td> " +
"<input align=left type=Text size=15 readonly style='text-align: right'
value= " + VSEOrcCal + "> " +
"</td> " +
"<td> " +
"<p align=right> Atual: </p> " +
"</td> " +
"<td> " +
"<input align=left type=Text size=15 readonly style='text-align: right'
value= " + VSEVlrAtu + "> " +
"</td> " +
"</tr> " +
"<tr> " +
"<td> " +
"<p align=right> Saldo Alocado: </p> " +
"</td> " +
"<td> " +
"<input align=left type=Text size=15 readonly style='text-align: right'
value= " + VSESalAlo + "> " +
"</td> " +
"<td> " +
"<p align=right> <b>A Alocar: </b></p> " +
"</td> " +
"<td> " +
"<input align=left type=Text size=15 readonly style='text-align: right'
value= " + VSEVlrAlo + "> " +
"</td> " +
"</tr> " +
"<tr> " +
"<td> " +
"<p align=right> <b>Disponível: </b> </p> ";
HTML4="</td> " +
"<td> " +
"<input align=left type=Text size=15 readonly style='text-align: right'
value= " + VSEVlrDis + "> " +
"</td> " +
"<td> " +
"<p align=right> <font color=red><b>Excedido: </b> </font></p> " +
"</td> " +
"<td> " +
"<input align=left type=Text size=15 readonly style='text-align: right;
color:red' value= " + VSEVlrExc + "> " +
"</td> " +
"</tr> " +
"</table> " +
"</td> " +
"</tr> " +
"<tr> " +
"<td colspan=2> " +
"<b>Endereço de rotina:</b> " +
"</td> " +
"</tr> " +
"<tr> " +
"<td colspan=2> " +
"<table width=100%> " +
"<tr> " +
"<td align=right> " +
"Rotina: " +
"</td> " +
"<td align=left> " +
"<b> " + VSLRotPpj + " </b> " +
"</td> " +
"<td align=right> " +
"2ª Sequência: " +
"</td> " +
"<td align=left> " +
"<b> " + VSLSeqRp2 + " </b> " +
"</td> " +
"<td align=right> " +
"1ª String: " +
"</td> " +
"<td align=left> " +
"<b> " + VSLStrRp1 + " </b> " +
"</td> " +
"</tr> " +
"<tr> " +
"<td align=right> " +
"Número: " +
"</td> " +
"<td align=left> " +
"<b> " + VSLNumRpj + " </b> " +
"</td> " +
"<td align=right> " +
"1ª Data: " +
"</td> " +
"<td align=left> " +
"<b> " + VSLDatRp1 + " </b> " +
"</td> " +
"<td align=right> " +
"2ª String: " +
"</td> " +
"<td align=left> " +
"<b> " + VSLStrRp2 + " </b> " +
"</td> " +
"</tr> " +
"<tr> " +
"<td align=right> " +
"1ª Sequência: " +
"</td> " +
"<td align=left> " +
"<b> " + VSLSeqRp1 + " </b> " +
"</td> " +
"<td align=right> " +
"2ª Data: " +
"</td> " +
"<td align=left> ";
HTML5="<b> " + VSLDatRp2 + " </b> " +
"</td> " +
"<td align=right> " +
"3ª String: " +
"</td> " +
"<td align=left> " +
"<b> " + VSLStrRp3 + " </b> " +
"</td> " +
"</tr> " +
"</table> " +
"</td> " +
"</tr> " +
"</table> " +
"</BODY> " +
"</HTML> ";
VSAssunto = "BLOQUEIO DE ORÇAMENTO";
VSRemetente = "xxx@senior.com.br";
VSDestinatario = "yyy@senior.com.br";
VSCorpo = HTML1 + HTML2 + HTML3 + HTML4 + HTML5;
English
Español
