UPC para programas HTML
18 views
Skip to first unread message
Fabiano Soares da Silva
Oct 10, 2025, 9:03:23 AMOct 10
to Progress - 4GL
Bom dia a todos,
sabem se é possível criar UPC para os programas em HTML no mesmo formato que os em Progress?
Preciso disparar um email quando salvar um registro em um programa padrão HTML.
DudaBrito
Nov 4, 2025, 9:37:10 AMNov 4
to Progress - 4GL
Bom dia,
Veja se entende e ajuda:
Veja se entende e ajuda:
Use a include {utp/utapi019.i2} para disparar e-mail.
tt-envio2.formato = "HTML"
ASSIGN c-msagem = "<HTML> <BODY>" +
"<P><FONT FACE='CALIBRI'>Prezado " + repres.nome-abrev + ",</P>" + CHR(10) +
"<P>" + "Segue em anexo relatorios xxxxx" +
"<BR>" + "Favor providenciar a nota fiscal com o valor total de R$ 99,989 " + ".</P>" + CHR(10) +
"<TABLE width='250 px' border='0' bordercolor='#000000'>" +
"<TR><TH COLSPAN=2>Resumo dos Valores</TH></TR>" +
"<TR>" + "</TR></TABLE></BODY></HTML>".
CREATE tt-mensagem.
ASSIGN tt-mensagem.seq-mensagem = 1
tt-mensagem.mensagem = c-msagem.
RUN utp/utapi019.p PERSISTENT SET h-utapi019.
RUN pi-execute4 in h-utapi019(INPUT TABLE tt-envio2,
INPUT TABLE tt-mensagem,
INPUT TABLE tt-paramEmail2,
INPUT TABLE ttAttachment,
OUTPUT TABLE tt-erros).
DELETE PROCEDURE h-utapi019.
tt-envio2.formato = "HTML"
ASSIGN c-msagem = "<HTML> <BODY>" +
"<P><FONT FACE='CALIBRI'>Prezado " + repres.nome-abrev + ",</P>" + CHR(10) +
"<P>" + "Segue em anexo relatorios xxxxx" +
"<BR>" + "Favor providenciar a nota fiscal com o valor total de R$ 99,989 " + ".</P>" + CHR(10) +
"<TABLE width='250 px' border='0' bordercolor='#000000'>" +
"<TR><TH COLSPAN=2>Resumo dos Valores</TH></TR>" +
"<TR>" + "</TR></TABLE></BODY></HTML>".
CREATE tt-mensagem.
ASSIGN tt-mensagem.seq-mensagem = 1
tt-mensagem.mensagem = c-msagem.
RUN utp/utapi019.p PERSISTENT SET h-utapi019.
RUN pi-execute4 in h-utapi019(INPUT TABLE tt-envio2,
INPUT TABLE tt-mensagem,
INPUT TABLE tt-paramEmail2,
INPUT TABLE ttAttachment,
OUTPUT TABLE tt-erros).
DELETE PROCEDURE h-utapi019.
Reply all
Reply to author
Forward
0 new messages