FXApp/ws_objects/tmp.pbl.src/w_saletask_dm.srw

$PBExportHeader$w_saletask_dm.srw
forward
global type w_saletask_dm from w_publ_base_style
end type
type dw_1 from u_dw_rbtnfilter within w_saletask_dm
end type
type ddlb_1 from dropdownlistbox within w_saletask_dm
end type
type st_3 from statictext within w_saletask_dm
end type
type st_4 from statictext within w_saletask_dm
end type
type em_1 from editmask within w_saletask_dm
end type
type em_2 from editmask within w_saletask_dm
end type
type pb_em1 from picturebutton within w_saletask_dm
end type
type pb_em2 from picturebutton within w_saletask_dm
end type
type pb_2 from picturebutton within w_saletask_dm
end type
type st_1 from statictext within w_saletask_dm
end type
type cb_1 from uo_imflatbutton within w_saletask_dm
end type
type cb_2 from uo_imflatbutton within w_saletask_dm
end type
type cb_3 from uo_imflatbutton within w_saletask_dm
end type
type cb_4 from uo_imflatbutton within w_saletask_dm
end type
type cb_5 from uo_imflatbutton within w_saletask_dm
end type
type ln_1 from line within w_saletask_dm
end type
type ln_2 from line within w_saletask_dm
end type
end forward

global type w_saletask_dm from w_publ_base_style
integer width = 3177
integer height = 1968
string title = "订单管理(门店)"
boolean maxbox = true
boolean resizable = true
dw_1 dw_1
ddlb_1 ddlb_1
st_3 st_3
st_4 st_4
em_1 em_1
em_2 em_2
pb_em1 pb_em1
pb_em2 pb_em2
pb_2 pb_2
st_1 st_1
cb_1 cb_1
cb_2 cb_2
cb_3 cb_3
cb_4 cb_4
cb_5 cb_5
ln_1 ln_1
ln_2 ln_2
end type
global w_saletask_dm w_saletask_dm

on w_saletask_dm.create
int iCurrent
call super::create
this.dw_1=create dw_1
this.ddlb_1=create ddlb_1
this.st_3=create st_3
this.st_4=create st_4
this.em_1=create em_1
this.em_2=create em_2
this.pb_em1=create pb_em1
this.pb_em2=create pb_em2
this.pb_2=create pb_2
this.st_1=create st_1
this.cb_1=create cb_1
this.cb_2=create cb_2
this.cb_3=create cb_3
this.cb_4=create cb_4
this.cb_5=create cb_5
this.ln_1=create ln_1
this.ln_2=create ln_2
iCurrent=UpperBound(this.Control)
this.Control[iCurrent+1]=this.dw_1
this.Control[iCurrent+2]=this.ddlb_1
this.Control[iCurrent+3]=this.st_3
this.Control[iCurrent+4]=this.st_4
this.Control[iCurrent+5]=this.em_1
this.Control[iCurrent+6]=this.em_2
this.Control[iCurrent+7]=this.pb_em1
this.Control[iCurrent+8]=this.pb_em2
this.Control[iCurrent+9]=this.pb_2
this.Control[iCurrent+10]=this.st_1
this.Control[iCurrent+11]=this.cb_1
this.Control[iCurrent+12]=this.cb_2
this.Control[iCurrent+13]=this.cb_3
this.Control[iCurrent+14]=this.cb_4
this.Control[iCurrent+15]=this.cb_5
this.Control[iCurrent+16]=this.ln_1
this.Control[iCurrent+17]=this.ln_2
end on

on w_saletask_dm.destroy
call super::destroy
destroy(this.dw_1)
destroy(this.ddlb_1)
destroy(this.st_3)
destroy(this.st_4)
destroy(this.em_1)
destroy(this.em_2)
destroy(this.pb_em1)
destroy(this.pb_em2)
destroy(this.pb_2)
destroy(this.st_1)
destroy(this.cb_1)
destroy(this.cb_2)
destroy(this.cb_3)
destroy(this.cb_4)
destroy(this.cb_5)
destroy(this.ln_1)
destroy(this.ln_2)
end on

event resize;call super::resize;ln_1.endx = this.width
ln_2.endx = this.width

dw_1.width = this.Workspacewidth() - dw_1.x
dw_1.Height = this.workspaceheight() - dw_1.y
end event

type cb_func from w_publ_base_style`cb_func within w_saletask_dm
integer x = 1001
end type

type cb_exit from w_publ_base_style`cb_exit within w_saletask_dm
integer x = 1152
end type

type ln_bar from w_publ_base_style`ln_bar within w_saletask_dm
integer beginy = 280
integer endy = 280
end type

type ln_bar2 from w_publ_base_style`ln_bar2 within w_saletask_dm
integer beginy = 284
integer endy = 284
end type

type r_bar from w_publ_base_style`r_bar within w_saletask_dm
end type

type dw_1 from u_dw_rbtnfilter within w_saletask_dm
integer y = 296
integer width = 2455
integer height = 1372
integer taborder = 20
boolean bringtotop = true
string dataobject = "dw_saletask_dm"
boolean hscrollbar = true
boolean vscrollbar = true
boolean hsplitscroll = true
end type

event rowfocuschanged;call super::rowfocuschanged;this.selectrow(0, false)
if currentrow > 0 then
	this.selectrow(currentrow, true)
end if
end event

type ddlb_1 from dropdownlistbox within w_saletask_dm
integer x = 329
integer y = 188
integer width = 549
integer height = 476
integer taborder = 20
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long textcolor = 33554432
string text = "待设计"
boolean sorted = false
string item[] = {"待询价","已报价","已下单","已发货","已收货"}
borderstyle borderstyle = stylelowered!
end type

type st_3 from statictext within w_saletask_dm
integer x = 905
integer y = 196
integer width = 315
integer height = 60
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long textcolor = 33554432
long backcolor = 134217739
boolean enabled = false
string text = "订货日期从:"
alignment alignment = right!
boolean focusrectangle = false
end type

event constructor;this.backcolor = 14215660
end event

type st_4 from statictext within w_saletask_dm
integer x = 1737
integer y = 196
integer width = 105
integer height = 60
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long textcolor = 33554432
long backcolor = 134217739
boolean enabled = false
string text = "到:"
alignment alignment = right!
boolean focusrectangle = false
end type

event constructor;this.backcolor = 14215660
end event

type em_1 from editmask within w_saletask_dm
integer x = 1230
integer y = 180
integer width = 407
integer height = 88
integer taborder = 110
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long textcolor = 33554432
borderstyle borderstyle = stylelowered!
maskdatatype maskdatatype = datemask!
string mask = "yyyy-mm-dd"
boolean spin = true
end type

event rbuttondown;s_calender_arg s_calender
s_calender.PointerX = THIS.PointerX()
s_calender.PointerY = THIS.PointerY()
s_calender.X = THIS.X
s_calender.Y = THIS.Y


OpenWithParm(w_calendar,s_calender)
THIS.Text = String(id_date_selected)


end event

type em_2 from editmask within w_saletask_dm
integer x = 1842
integer y = 180
integer width = 407
integer height = 88
integer taborder = 120
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long textcolor = 33554432
borderstyle borderstyle = stylelowered!
maskdatatype maskdatatype = datemask!
string mask = "yyyy-mm-dd"
boolean spin = true
end type

event rbuttondown;s_calender_arg s_calender
s_calender.PointerX = THIS.PointerX()
s_calender.PointerY = THIS.PointerY()
s_calender.X = THIS.X
s_calender.Y = THIS.Y


OpenWithParm(w_calendar,s_calender)
THIS.Text = String(id_date_selected)


end event

type pb_em1 from picturebutton within w_saletask_dm
integer x = 1646
integer y = 180
integer width = 101
integer height = 92
integer taborder = 120
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
string picturename = "date.BMP"
alignment htextalign = left!
end type

event clicked;em_1.triggerevent(rbuttondown!)
end event

type pb_em2 from picturebutton within w_saletask_dm
integer x = 2258
integer y = 180
integer width = 101
integer height = 92
integer taborder = 130
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
string picturename = "date.BMP"
alignment htextalign = left!
end type

event clicked;em_2.triggerevent(rbuttondown!)
end event

type pb_2 from picturebutton within w_saletask_dm
integer x = 2368
integer y = 180
integer width = 101
integer height = 92
integer taborder = 140
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
string picturename = "date1.BMP"
alignment htextalign = left!
end type

event clicked;m_Dfc_Control_PopupMenu dmPopupMenu
string menustr


menustr="Text=本日~tEvent=ue_date1"
menustr = menustr + "|" + "Text=本周~tEvent=ue_date2"
menustr = menustr + "|" + "Text=本月~tEvent=ue_date3"
	
if len(trim(menustr))<>0 then
	dmPopupMenu = Create m_Dfc_Control_PopupMenu
	dmPopupMenu.mf_BuildMenu(This, menustr)
	dmPopupMenu.mf_PopMenu()
	Destroy dmPopupMenu
end if
end event

type st_1 from statictext within w_saletask_dm
integer x = 23
integer y = 200
integer width = 288
integer height = 48
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long textcolor = 33554432
long backcolor = 134217739
string text = "订单状态"
alignment alignment = right!
boolean focusrectangle = false
end type

event constructor;this.backcolor = 14215660
end event

type cb_1 from uo_imflatbutton within w_saletask_dm
integer width = 151
integer height = 164
integer taborder = 50
boolean bringtotop = true
string text = "刷新"
string normalpicname = "refresh.bmp"
integer picsize = 16
toolbaralignment pic_align = alignattop!
boolean border = false
end type

event clicked;call super::clicked;//DateTime first_date,end_date
//
//first_date = DateTime(Date(em_1.Text),Time(0))
//end_date = DateTime(Date(em_2.Text),Time('23:59:59'))

//String ls_cust_str, ls_mtrl_str
//IF Pos(sle_cust.Text,"%") <> 0 THEN
//	ls_cust_str = trim(sle_cust.Text)
//ELSE
//	ls_cust_str = "%"+trim(sle_cust.Text)+"%"
//END IF
//IF Pos(sle_mtrl.Text,"%") <> 0 THEN
//	ls_mtrl_str = trim(sle_mtrl.Text)
//ELSE
//	ls_mtrl_str = "%"+trim(sle_mtrl.Text)+"%"
//END IF
//dw_1.Retrieve(DATE(EM_1.TEXT),DATE(EM_2.TEXT),ls_cust_str,ls_mtrl_str)
//dw_1.OBJECT.date_mid.TEXT=EM_1.TEXT+'~~'+EM_2.TEXT


end event

type cb_2 from uo_imflatbutton within w_saletask_dm
integer x = 151
integer width = 151
integer height = 164
integer taborder = 60
boolean bringtotop = true
string text = "新建"
string normalpicname = "NEW.BMP"
integer picsize = 16
toolbaralignment pic_align = alignattop!
boolean border = false
end type

event clicked;call super::clicked;open(w_saletask_dm_edit)
end event

type cb_3 from uo_imflatbutton within w_saletask_dm
integer x = 453
integer width = 274
integer height = 164
integer taborder = 70
boolean bringtotop = true
string text = "下单确认"
string normalpicname = "ok.bmp"
integer picsize = 16
toolbaralignment pic_align = alignattop!
boolean border = false
end type

event clicked;call super::clicked;//DateTime first_date,end_date
//
//first_date = DateTime(Date(em_1.Text),Time(0))
//end_date = DateTime(Date(em_2.Text),Time('23:59:59'))

//String ls_cust_str, ls_mtrl_str
//IF Pos(sle_cust.Text,"%") <> 0 THEN
//	ls_cust_str = trim(sle_cust.Text)
//ELSE
//	ls_cust_str = "%"+trim(sle_cust.Text)+"%"
//END IF
//IF Pos(sle_mtrl.Text,"%") <> 0 THEN
//	ls_mtrl_str = trim(sle_mtrl.Text)
//ELSE
//	ls_mtrl_str = "%"+trim(sle_mtrl.Text)+"%"
//END IF
//dw_1.Retrieve(DATE(EM_1.TEXT),DATE(EM_2.TEXT),ls_cust_str,ls_mtrl_str)
//dw_1.OBJECT.date_mid.TEXT=EM_1.TEXT+'~~'+EM_2.TEXT


end event

type cb_4 from uo_imflatbutton within w_saletask_dm
integer x = 727
integer width = 274
integer height = 164
integer taborder = 80
boolean bringtotop = true
string text = "收货确认"
string normalpicname = "ok.bmp"
integer picsize = 16
toolbaralignment pic_align = alignattop!
boolean border = false
end type

event clicked;call super::clicked;//DateTime first_date,end_date
//
//first_date = DateTime(Date(em_1.Text),Time(0))
//end_date = DateTime(Date(em_2.Text),Time('23:59:59'))

//String ls_cust_str, ls_mtrl_str
//IF Pos(sle_cust.Text,"%") <> 0 THEN
//	ls_cust_str = trim(sle_cust.Text)
//ELSE
//	ls_cust_str = "%"+trim(sle_cust.Text)+"%"
//END IF
//IF Pos(sle_mtrl.Text,"%") <> 0 THEN
//	ls_mtrl_str = trim(sle_mtrl.Text)
//ELSE
//	ls_mtrl_str = "%"+trim(sle_mtrl.Text)+"%"
//END IF
//dw_1.Retrieve(DATE(EM_1.TEXT),DATE(EM_2.TEXT),ls_cust_str,ls_mtrl_str)
//dw_1.OBJECT.date_mid.TEXT=EM_1.TEXT+'~~'+EM_2.TEXT


end event

type cb_5 from uo_imflatbutton within w_saletask_dm
integer x = 302
integer width = 151
integer height = 164
integer taborder = 70
boolean bringtotop = true
string text = "修改"
string normalpicname = "Open.bmp"
integer picsize = 16
toolbaralignment pic_align = alignattop!
boolean border = false
end type

event clicked;call super::clicked;open(w_saletask_dm_edit)
end event

type ln_1 from line within w_saletask_dm
long linecolor = 268435456
integer linethickness = 4
integer beginx = -18
integer beginy = 168
integer endx = 1998
integer endy = 168
end type

type ln_2 from line within w_saletask_dm
long linecolor = 16777215
integer linethickness = 4
integer beginx = -18
integer beginy = 172
integer endx = 2030
integer endy = 172
end type