FXApp/ws_objects/tmp_pc.pbl.src/w_saletask_pc.srw

$PBExportHeader$w_saletask_pc.srw
forward
global type w_saletask_pc from w_publ_base_style
end type
type dw_1 from u_dw_rbtnfilter within w_saletask_pc
end type
type ddlb_1 from dropdownlistbox within w_saletask_pc
end type
type st_3 from statictext within w_saletask_pc
end type
type st_4 from statictext within w_saletask_pc
end type
type em_1 from editmask within w_saletask_pc
end type
type em_2 from editmask within w_saletask_pc
end type
type pb_em1 from picturebutton within w_saletask_pc
end type
type pb_em2 from picturebutton within w_saletask_pc
end type
type pb_2 from picturebutton within w_saletask_pc
end type
type st_1 from statictext within w_saletask_pc
end type
type cb_1 from uo_imflatbutton within w_saletask_pc
end type
type tab_1 from tab within w_saletask_pc
end type
type tabpage_1 from userobject within tab_1
end type
type dw_2 from datawindow within tabpage_1
end type
type tabpage_1 from userobject within tab_1
dw_2 dw_2
end type
type tabpage_2 from userobject within tab_1
end type
type p_1 from picture within tabpage_2
end type
type cb_2 from commandbutton within tabpage_2
end type
type tabpage_2 from userobject within tab_1
p_1 p_1
cb_2 cb_2
end type
type tabpage_3 from userobject within tab_1
end type
type tab_2 from tab within tabpage_3
end type
type tabpage_4 from userobject within tab_2
end type
type cb_8 from commandbutton within tabpage_4
end type
type cb_7 from commandbutton within tabpage_4
end type
type cb_6 from commandbutton within tabpage_4
end type
type dw_4 from datawindow within tabpage_4
end type
type tabpage_4 from userobject within tab_2
cb_8 cb_8
cb_7 cb_7
cb_6 cb_6
dw_4 dw_4
end type
type tabpage_5 from userobject within tab_2
end type
type cb_5 from commandbutton within tabpage_5
end type
type cb_4 from commandbutton within tabpage_5
end type
type cb_3 from commandbutton within tabpage_5
end type
type dw_5 from datawindow within tabpage_5
end type
type tabpage_5 from userobject within tab_2
cb_5 cb_5
cb_4 cb_4
cb_3 cb_3
dw_5 dw_5
end type
type tab_2 from tab within tabpage_3
tabpage_4 tabpage_4
tabpage_5 tabpage_5
end type
type dw_3 from datawindow within tabpage_3
end type
type tabpage_3 from userobject within tab_1
tab_2 tab_2
dw_3 dw_3
end type
type tab_1 from tab within w_saletask_pc
tabpage_1 tabpage_1
tabpage_2 tabpage_2
tabpage_3 tabpage_3
end type
type ln_1 from line within w_saletask_pc
end type
type ln_2 from line within w_saletask_pc
end type
end forward

global type w_saletask_pc from w_publ_base_style
integer width = 3013
integer height = 2000
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
tab_1 tab_1
ln_1 ln_1
ln_2 ln_2
end type
global w_saletask_pc w_saletask_pc

type variables
datawindow dw_2

datawindow dw_3

tab tab_2

datawindow dw_4

datawindow dw_5
end variables

on w_saletask_pc.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.tab_1=create tab_1
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.tab_1
this.Control[iCurrent+13]=this.ln_1
this.Control[iCurrent+14]=this.ln_2
end on

on w_saletask_pc.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.tab_1)
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) / 3

tab_1.width = this.workspacewidth() - tab_1.x
tab_1.y = dw_1.y + dw_1.Height
tab_1.height = dw_1.Height * 2

dw_2.width = tab_1.tabpage_1.width
dw_2.Height = tab_1.tabpage_1.height

dw_3.width = tab_1.tabpage_3.width / 2
dw_3.height = tab_1.tabpage_3.height

tab_2.x = dw_3.x + dw_3.width
tab_2.width = dw_3.width
tab_2.height = dw_3.height

dw_4.width = tab_1.tabpage_3.tab_2.tabpage_4.width
dw_4.height = tab_1.tabpage_3.tab_2.tabpage_4.height - dw_4.y

dw_5.width = tab_1.tabpage_3.tab_2.tabpage_5.width
dw_5.height = tab_1.tabpage_3.tab_2.tabpage_5.height - dw_5.y
end event

event open;call super::open;dw_2 = tab_1.tabpage_1.dw_2

dw_3 = tab_1.tabpage_3.dw_3

tab_2 = tab_1.tabpage_3.tab_2

dw_4 = tab_1.tabpage_3.tab_2.tabpage_4.dw_4

dw_5 = tab_1.tabpage_3.tab_2.tabpage_5.dw_5
end event

type cb_func from w_publ_base_style`cb_func within w_saletask_pc
integer x = 151
string text = "报价"
end type

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

type cb_exit from w_publ_base_style`cb_exit within w_saletask_pc
integer x = 302
end type

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

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

type r_bar from w_publ_base_style`r_bar within w_saletask_pc
end type

type dw_1 from u_dw_rbtnfilter within w_saletask_pc
integer y = 296
integer width = 2455
integer height = 852
integer taborder = 20
boolean bringtotop = true
string dataobject = "dw_saletask_pc_index"
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_pc
integer x = 329
integer y = 188
integer width = 549
integer height = 476
integer taborder = 30
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_pc
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_pc
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_pc
integer x = 1230
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 em_2 from editmask within w_saletask_pc
integer x = 1842
integer y = 180
integer width = 407
integer height = 88
integer taborder = 130
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_pc
integer x = 1646
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_1.triggerevent(rbuttondown!)
end event

type pb_em2 from picturebutton within w_saletask_pc
integer x = 2258
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 = "date.BMP"
alignment htextalign = left!
end type

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

type pb_2 from picturebutton within w_saletask_pc
integer x = 2368
integer y = 180
integer width = 101
integer height = 92
integer taborder = 150
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_pc
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_pc
integer width = 151
integer height = 164
integer taborder = 10
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 tab_1 from tab within w_saletask_pc
integer y = 1152
integer width = 2240
integer height = 1008
integer taborder = 30
boolean bringtotop = true
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long backcolor = 134217739
boolean raggedright = true
boolean focusonbuttondown = true
integer selectedtab = 1
tabpage_1 tabpage_1
tabpage_2 tabpage_2
tabpage_3 tabpage_3
end type

on tab_1.create
this.tabpage_1=create tabpage_1
this.tabpage_2=create tabpage_2
this.tabpage_3=create tabpage_3
this.Control[]={this.tabpage_1,&
this.tabpage_2,&
this.tabpage_3}
end on

on tab_1.destroy
destroy(this.tabpage_1)
destroy(this.tabpage_2)
destroy(this.tabpage_3)
end on

type tabpage_1 from userobject within tab_1
integer x = 18
integer y = 96
integer width = 2203
integer height = 896
long backcolor = 134217739
string text = "附件"
long tabtextcolor = 33554432
long tabbackcolor = 134217739
long picturemaskcolor = 536870912
dw_2 dw_2
end type

on tabpage_1.create
this.dw_2=create dw_2
this.Control[]={this.dw_2}
end on

on tabpage_1.destroy
destroy(this.dw_2)
end on

type dw_2 from datawindow within tabpage_1
integer width = 1961
integer height = 400
integer taborder = 40
string title = "none"
string dataobject = "dw_saletask_pc_fj"
boolean hscrollbar = true
boolean vscrollbar = true
boolean hsplitscroll = true
boolean livescroll = true
borderstyle borderstyle = stylelowered!
end type

type tabpage_2 from userobject within tab_1
integer x = 18
integer y = 96
integer width = 2203
integer height = 896
long backcolor = 134217739
string text = "物料清单"
long tabtextcolor = 33554432
long tabbackcolor = 134217739
long picturemaskcolor = 536870912
p_1 p_1
cb_2 cb_2
end type

on tabpage_2.create
this.p_1=create p_1
this.cb_2=create cb_2
this.Control[]={this.p_1,&
this.cb_2}
end on

on tabpage_2.destroy
destroy(this.p_1)
destroy(this.cb_2)
end on

type p_1 from picture within tabpage_2
integer y = 92
integer width = 6231
integer height = 1020
boolean originalsize = true
string picturename = "QQ截图20150626162704.png"
boolean focusrectangle = false
end type

type cb_2 from commandbutton within tabpage_2
integer y = 8
integer width = 279
integer height = 84
integer taborder = 30
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
string text = "导入BOM"
end type

type tabpage_3 from userobject within tab_1
integer x = 18
integer y = 96
integer width = 2203
integer height = 896
long backcolor = 134217739
string text = "指令单"
long tabtextcolor = 33554432
long tabbackcolor = 134217739
long picturemaskcolor = 536870912
tab_2 tab_2
dw_3 dw_3
end type

on tabpage_3.create
this.tab_2=create tab_2
this.dw_3=create dw_3
this.Control[]={this.tab_2,&
this.dw_3}
end on

on tabpage_3.destroy
destroy(this.tab_2)
destroy(this.dw_3)
end on

type tab_2 from tab within tabpage_3
integer x = 1303
integer width = 2240
integer height = 1008
integer taborder = 40
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
long backcolor = 134217739
boolean raggedright = true
boolean focusonbuttondown = true
integer selectedtab = 1
tabpage_4 tabpage_4
tabpage_5 tabpage_5
end type

on tab_2.create
this.tabpage_4=create tabpage_4
this.tabpage_5=create tabpage_5
this.Control[]={this.tabpage_4,&
this.tabpage_5}
end on

on tab_2.destroy
destroy(this.tabpage_4)
destroy(this.tabpage_5)
end on

type tabpage_4 from userobject within tab_2
integer x = 18
integer y = 96
integer width = 2203
integer height = 896
long backcolor = 134217739
string text = "已安排工作"
long tabtextcolor = 33554432
long tabbackcolor = 134217739
long picturemaskcolor = 536870912
cb_8 cb_8
cb_7 cb_7
cb_6 cb_6
dw_4 dw_4
end type

on tabpage_4.create
this.cb_8=create cb_8
this.cb_7=create cb_7
this.cb_6=create cb_6
this.dw_4=create dw_4
this.Control[]={this.cb_8,&
this.cb_7,&
this.cb_6,&
this.dw_4}
end on

on tabpage_4.destroy
destroy(this.cb_8)
destroy(this.cb_7)
destroy(this.cb_6)
destroy(this.dw_4)
end on

type cb_8 from commandbutton within tabpage_4
integer x = 411
integer width = 183
integer height = 84
integer taborder = 20
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
string text = "打印"
end type

type cb_7 from commandbutton within tabpage_4
integer x = 187
integer width = 219
integer height = 84
integer taborder = 20
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
string text = "全不选"
end type

type cb_6 from commandbutton within tabpage_4
integer width = 183
integer height = 84
integer taborder = 50
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
string text = "全选"
end type

type dw_4 from datawindow within tabpage_4
integer y = 104
integer width = 686
integer height = 400
integer taborder = 40
string title = "none"
string dataobject = "dw_sc_task_wkp_uc"
boolean hscrollbar = true
boolean vscrollbar = true
boolean hsplitscroll = true
boolean livescroll = true
borderstyle borderstyle = stylelowered!
end type

type tabpage_5 from userobject within tab_2
integer x = 18
integer y = 96
integer width = 2203
integer height = 896
long backcolor = 134217739
string text = "待安排工作"
long tabtextcolor = 33554432
long tabbackcolor = 134217739
long picturemaskcolor = 536870912
cb_5 cb_5
cb_4 cb_4
cb_3 cb_3
dw_5 dw_5
end type

on tabpage_5.create
this.cb_5=create cb_5
this.cb_4=create cb_4
this.cb_3=create cb_3
this.dw_5=create dw_5
this.Control[]={this.cb_5,&
this.cb_4,&
this.cb_3,&
this.dw_5}
end on

on tabpage_5.destroy
destroy(this.cb_5)
destroy(this.cb_4)
destroy(this.cb_3)
destroy(this.dw_5)
end on

type cb_5 from commandbutton within tabpage_5
integer x = 411
integer width = 274
integer height = 84
integer taborder = 10
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
string text = "新建派工"
end type

type cb_4 from commandbutton within tabpage_5
integer x = 187
integer width = 219
integer height = 84
integer taborder = 10
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
string text = "全不选"
end type

type cb_3 from commandbutton within tabpage_5
integer width = 183
integer height = 84
integer taborder = 40
integer textsize = -9
integer weight = 400
fontcharset fontcharset = gb2312charset!
fontpitch fontpitch = variable!
string facename = "宋体"
string text = "全选"
end type

type dw_5 from datawindow within tabpage_5
integer y = 96
integer width = 686
integer height = 400
integer taborder = 40
string title = "none"
string dataobject = "dw_sc_task_wkp_notplan_index"
boolean hscrollbar = true
boolean vscrollbar = true
boolean hsplitscroll = true
boolean livescroll = true
borderstyle borderstyle = stylelowered!
end type

type dw_3 from datawindow within tabpage_3
integer width = 1285
integer height = 640
integer taborder = 40
string title = "none"
string dataobject = "dw_order_ml_zlmx"
boolean hscrollbar = true
boolean vscrollbar = true
boolean hsplitscroll = true
boolean livescroll = true
borderstyle borderstyle = stylelowered!
end type

type ln_1 from line within w_saletask_pc
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_pc
long linecolor = 16777215
integer linethickness = 4
integer beginx = -18
integer beginy = 172
integer endx = 2030
integer endy = 172
end type