Files
MBS/PROYECTO/otrodir/enviacorreo_att.4gl
T

19 lines
691 B
Plaintext

{
================================================================
FUNCION : ENVIACORREO
OBJETIVO : Reutilizacion de codigos para ejecuar Store
Procedures relacionado al envio de correo
PROGRAMADOR : ING. JUAN SOTO
FECHA : 28 DE ABRIL 2011
================================================================
}
FUNCTION envia_correo_att(emailTO,emailCC,emailBody,emailSubject,Procedimiento,fileatt)
DEFINE Procedimiento VARCHAR(500),
emailTO,emailCC,emailSubject,emailBody,fileatt VARCHAR(2000)
PREPARE smt FROM procedimiento
EXECUTE smt USING emailTo IN,emailCC IN,emailSubject IN,emailBody IN,fileatt IN
END FUNCTION