$PBExportHeader$w_emp_mx_taskwork_group.srw forward global type w_emp_mx_taskwork_group from w_publ_base end type type dw_1 from u_dw_rbtnfilter within w_emp_mx_taskwork_group end type end forward global type w_emp_mx_taskwork_group from w_publ_base integer width = 3035 integer height = 1668 string title = "工组计件明细" boolean minbox = false long backcolor = 80269524 dw_1 dw_1 end type global w_emp_mx_taskwork_group w_emp_mx_taskwork_group on w_emp_mx_taskwork_group.create int iCurrent call super::create this.dw_1=create dw_1 iCurrent=UpperBound(this.Control) this.Control[iCurrent+1]=this.dw_1 end on on w_emp_mx_taskwork_group.destroy call super::destroy destroy(this.dw_1) end on event open;call super::open;//s_wageeditw_open s_wageedit_tran //s_wageedit_tran=message.powerobjectparm //this.title=s_wageedit_tran.empname + ' 计件明细' //dw_1.settransobject(sqlca) //dw_1.retrieve(s_wageedit_tran.empid,s_wageedit_tran.wagemth) end event type cb_func from w_publ_base`cb_func within w_emp_mx_taskwork_group end type type cb_exit from w_publ_base`cb_exit within w_emp_mx_taskwork_group boolean visible = false end type type dw_1 from u_dw_rbtnfilter within w_emp_mx_taskwork_group integer width = 2994 integer height = 1572 integer taborder = 20 boolean bringtotop = true string dataobject = "dw_emp_taskmx" end type event constructor;call super::constructor; titleclick_sort_use=true //单击标题排序功能开关 RBUTTON_FILTER_USE=true //右键查询功能开关 end event