TIPTOP JavaMail邮件通知功能

系统 TIPTOP GP 3.0

对于一些需要审核的单据，可以采用【邮件通知】的功能，知会审核人，详细介绍如下：

将发送邮件的处理写成一个共享函数，以便调用

***************************************************************************************************

目录：/u1/topprod/topcust/clib/4gl/ cl_javamail_notice.4gl

共享函数名称：cl_javamail_notice

Descriptions...: JavaMail 通知简讯

Input parameter: cl_javamail_notice(p_str1,p_str2,p_str3)

p_str1,p_str2,p_str3 暂时写三个参数,第一个单号，后两个可以为空

***************************************************************************************************

<1>在要使用的程序中修改4gl文件，_menu()与_pb()函数中加入按钮信息，

并且在p_link中将此共享函数引用进去

EX: aqct4100程序中
#menu()函数**********
WHEN 'l_javamail'
IF cl_chk_act_auth() AND l_ac != 0  THEN
IF NOT cl_null(g_qci.qci01) AND NOT cl_null(g_qci.qci02) AND NOT cl_null(g_qci.qci03) THEN
CALL  cl_javamail_notice(g_qci.qci01,g_qci.qci02,g_qci.qci03)
END IF
END IF
#END
#BP()函数**********
ON ACTION l_javamail
LET g_action_choice="l_javamail"
EXIT DISPLAY
#END

<2>在aooi998中设置需要使用邮件通知的程序,如图



<3>对于发件人,需要维护p_zx里面的邮件地址(zx09字段)或者是基础资料aooi040中的(gen06字段)

<4>点【邮件通知】按钮,在outLook中可以查看收到的邮件：如下图(附件的内容是txt文件)



收到邮件如下图所示：



附件task.txt 内容：



******************************************************************************************************************************************





====
Till good is better, but better best





====“我的努力不会停止，敬请期待吧！”My
trying hard will go on!Please wait and see!

******************************************************************************************************************************************