$PBExportHeader$w_msg_send_normal.srw
forward
global type w_msg_send_normal from w_msg_send_mt
end type
end forward
global type w_msg_send_normal from w_msg_send_mt
string title = "发送消息"
end type
global w_msg_send_normal w_msg_send_normal
event open;this.triggerevent('ue_before_open')
wf_movetocenter()
s_msg = Message.PowerObjectParm
ins_kind = -1
dw_mt_fj.SetTransObject(sys_filedb_sqlca)
wf_dw()
If Integer(f_ProfileString (sys_empid,This.ClassName(), "x",String(This.X))) = 0 Then
This.X = 23
This.Y = 24
Else
This.X = Integer(f_ProfileString (sys_empid,This.ClassName(), "x",String(This.X)))
This.Y = Integer(f_ProfileString (sys_empid,This.ClassName(), "y",String(This.Y)))
End If
If s_msg.ifback = 1 Then
mle_objdpm.Text = s_msg.sendemp
sle_billcode.Text = s_msg.billcode
sle_msgtitle.Text = '回复:'+s_msg.msgtitle
uo_html.uf_sethtml('
' + s_msg.msg)
Else
sle_billcode.Text = s_msg.billcode
End If
end event
on w_msg_send_normal.create
int iCurrent
call super::create
end on
on w_msg_send_normal.destroy
call super::destroy
end on
type cb_func from w_msg_send_mt`cb_func within w_msg_send_normal
end type
type cb_exit from w_msg_send_mt`cb_exit within w_msg_send_normal
end type
type sle_msgtitle from w_msg_send_mt`sle_msgtitle within w_msg_send_normal
string text = ""
end type
type st_2 from w_msg_send_mt`st_2 within w_msg_send_normal
end type
type mle_objdpm from w_msg_send_mt`mle_objdpm within w_msg_send_normal
end type
type dw_1 from w_msg_send_mt`dw_1 within w_msg_send_normal
end type
type rb_usergrp from w_msg_send_mt`rb_usergrp within w_msg_send_normal
end type
type rb_user from w_msg_send_mt`rb_user within w_msg_send_normal
end type
type cb_que from w_msg_send_mt`cb_que within w_msg_send_normal
end type
type cb_1 from w_msg_send_mt`cb_1 within w_msg_send_normal
end type
type st_1 from w_msg_send_mt`st_1 within w_msg_send_normal
end type
type sle_billcode from w_msg_send_mt`sle_billcode within w_msg_send_normal
end type
type st_3 from w_msg_send_mt`st_3 within w_msg_send_normal
end type
type uo_html from w_msg_send_mt`uo_html within w_msg_send_normal
end type
type dw_mt_fj from w_msg_send_mt`dw_mt_fj within w_msg_send_normal
end type
type p_fj_add from w_msg_send_mt`p_fj_add within w_msg_send_normal
end type
type st_4 from w_msg_send_mt`st_4 within w_msg_send_normal
end type
type st_fj_add from w_msg_send_mt`st_fj_add within w_msg_send_normal
end type
type st_6 from w_msg_send_mt`st_6 within w_msg_send_normal
end type
type st_send_suc_w from w_msg_send_mt`st_send_suc_w within w_msg_send_normal
end type
type ln_bar from w_msg_send_mt`ln_bar within w_msg_send_normal
end type
type ln_bar2 from w_msg_send_mt`ln_bar2 within w_msg_send_normal
end type
type r_bar from w_msg_send_mt`r_bar within w_msg_send_normal
end type
type st_send_suc from w_msg_send_mt`st_send_suc within w_msg_send_normal
end type