$PBExportHeader$w_rp_mtrl_spt_price.srw forward global type w_rp_mtrl_spt_price from w_publ_easyq end type type tv_1 from uo_tv_mtrltype within w_rp_mtrl_spt_price end type end forward global type w_rp_mtrl_spt_price from w_publ_easyq string title = "物料价格提醒" tv_1 tv_1 end type global w_rp_mtrl_spt_price w_rp_mtrl_spt_price type variables String ls_handtype = '' end variables on w_rp_mtrl_spt_price.create int iCurrent call super::create this.tv_1=create tv_1 iCurrent=UpperBound(this.Control) this.Control[iCurrent+1]=this.tv_1 end on on w_rp_mtrl_spt_price.destroy call super::destroy destroy(this.tv_1) end on event resize;call super::resize;tv_1.height=this.height - dw_1.y - 115 end event type cb_func from w_publ_easyq`cb_func within w_rp_mtrl_spt_price end type type cb_exit from w_publ_easyq`cb_exit within w_rp_mtrl_spt_price end type type cb_2 from w_publ_easyq`cb_2 within w_rp_mtrl_spt_price boolean bringtotop = true end type type cb_psetup from w_publ_easyq`cb_psetup within w_rp_mtrl_spt_price boolean bringtotop = true end type type cb_1 from w_publ_easyq`cb_1 within w_rp_mtrl_spt_price boolean bringtotop = true end type event cb_1::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')) //dw_1.Retrieve(ls_handtype,first_date,end_date) dw_1.Retrieve(ls_handtype) end event type st_3 from w_publ_easyq`st_3 within w_rp_mtrl_spt_price boolean visible = false integer x = 2062 integer y = 204 end type type st_4 from w_publ_easyq`st_4 within w_rp_mtrl_spt_price boolean visible = false integer x = 2775 integer y = 204 end type type em_1 from w_publ_easyq`em_1 within w_rp_mtrl_spt_price boolean visible = false integer x = 2277 integer y = 188 integer width = 402 integer taborder = 120 end type type em_2 from w_publ_easyq`em_2 within w_rp_mtrl_spt_price boolean visible = false integer x = 2862 integer y = 188 integer width = 402 integer taborder = 130 end type type ddlb_yl from w_publ_easyq`ddlb_yl within w_rp_mtrl_spt_price integer x = 1563 integer y = 12 end type type cbx_yl from w_publ_easyq`cbx_yl within w_rp_mtrl_spt_price integer x = 1344 integer y = 16 end type type dw_1 from w_publ_easyq`dw_1 within w_rp_mtrl_spt_price integer x = 768 integer y = 184 integer width = 2373 integer height = 1188 string dataobject = "dw_rp_mtrl_spt_price" end type type sle_mtrl from w_publ_easyq`sle_mtrl within w_rp_mtrl_spt_price end type type sle_cust from w_publ_easyq`sle_cust within w_rp_mtrl_spt_price end type type st_mtrl from w_publ_easyq`st_mtrl within w_rp_mtrl_spt_price end type type st_cust from w_publ_easyq`st_cust within w_rp_mtrl_spt_price end type type cbx_loginretr from w_publ_easyq`cbx_loginretr within w_rp_mtrl_spt_price boolean visible = true integer x = 1344 end type type pb_em1 from w_publ_easyq`pb_em1 within w_rp_mtrl_spt_price boolean visible = false integer x = 2674 integer y = 188 end type type pb_em2 from w_publ_easyq`pb_em2 within w_rp_mtrl_spt_price boolean visible = false integer x = 3269 integer y = 188 end type type pb_2 from w_publ_easyq`pb_2 within w_rp_mtrl_spt_price boolean visible = false integer x = 3374 integer y = 188 end type type cb_help from w_publ_easyq`cb_help within w_rp_mtrl_spt_price integer y = 4 end type type cb_copyself from w_publ_easyq`cb_copyself within w_rp_mtrl_spt_price end type type gb_1 from w_publ_easyq`gb_1 within w_rp_mtrl_spt_price end type type ln_bar from w_publ_easyq`ln_bar within w_rp_mtrl_spt_price end type type ln_bar2 from w_publ_easyq`ln_bar2 within w_rp_mtrl_spt_price end type type r_bar from w_publ_easyq`r_bar within w_rp_mtrl_spt_price end type type ln_1 from w_publ_easyq`ln_1 within w_rp_mtrl_spt_price end type type ln_2 from w_publ_easyq`ln_2 within w_rp_mtrl_spt_price end type type ln_3 from w_publ_easyq`ln_3 within w_rp_mtrl_spt_price end type type ln_4 from w_publ_easyq`ln_4 within w_rp_mtrl_spt_price end type type tv_1 from uo_tv_mtrltype within w_rp_mtrl_spt_price integer y = 184 integer width = 768 integer height = 1120 integer taborder = 20 boolean bringtotop = true integer textsize = -9 fontcharset fontcharset = gb2312charset! fontfamily fontfamily = anyfont! string facename = "宋体" end type event selectionchanged;call super::selectionchanged;ls_handtype = THIS.uo_cur_info.handtype ls_handtype = ls_handtype + '%' cb_1.triggerevent(clicked!) end event