$PBExportHeader$w_rp_sale_month_amt.srw forward global type w_rp_sale_month_amt from w_publ_easyq end type type ddlb_1 from dropdownlistbox within w_rp_sale_month_amt end type type st_1 from statictext within w_rp_sale_month_amt end type end forward global type w_rp_sale_month_amt from w_publ_easyq string title = "销售年度汇总表" ddlb_1 ddlb_1 st_1 st_1 end type global w_rp_sale_month_amt w_rp_sale_month_amt on w_rp_sale_month_amt.create int iCurrent call super::create this.ddlb_1=create ddlb_1 this.st_1=create st_1 iCurrent=UpperBound(this.Control) this.Control[iCurrent+1]=this.ddlb_1 this.Control[iCurrent+2]=this.st_1 end on on w_rp_sale_month_amt.destroy call super::destroy destroy(this.ddlb_1) destroy(this.st_1) end on type cb_func from w_publ_easyq`cb_func within w_rp_sale_month_amt end type type cb_exit from w_publ_easyq`cb_exit within w_rp_sale_month_amt end type type cb_2 from w_publ_easyq`cb_2 within w_rp_sale_month_amt end type type cb_psetup from w_publ_easyq`cb_psetup within w_rp_sale_month_amt end type type cb_1 from w_publ_easyq`cb_1 within w_rp_sale_month_amt end type event cb_1::clicked;call super::clicked;long firstmth,endmth firstmth=long(eM_1.TEXT) endmth=long(EM_2.TEXT) Int li_option_outrep IF sys_power_issuper THEN li_option_outrep = 0 ELSE li_option_outrep = sys_option_outrep END IF dw_1.Retrieve(firstmth,endmth, sys_user_outrep, li_option_outrep) end event type st_3 from w_publ_easyq`st_3 within w_rp_sale_month_amt integer x = 23 integer width = 315 string text = "统计年份从" end type type st_4 from w_publ_easyq`st_4 within w_rp_sale_month_amt integer x = 635 string text = "到" end type type em_1 from w_publ_easyq`em_1 within w_rp_sale_month_amt integer x = 357 integer width = 224 string mask = "yyyy" end type type em_2 from w_publ_easyq`em_2 within w_rp_sale_month_amt integer x = 754 integer width = 224 string mask = "yyyy" end type type ddlb_yl from w_publ_easyq`ddlb_yl within w_rp_sale_month_amt end type type cbx_yl from w_publ_easyq`cbx_yl within w_rp_sale_month_amt end type type dw_1 from w_publ_easyq`dw_1 within w_rp_sale_month_amt integer y = 304 string dataobject = "dw_rp_sale_month_amt" end type type sle_mtrl from w_publ_easyq`sle_mtrl within w_rp_sale_month_amt end type type sle_cust from w_publ_easyq`sle_cust within w_rp_sale_month_amt end type type st_mtrl from w_publ_easyq`st_mtrl within w_rp_sale_month_amt end type type st_cust from w_publ_easyq`st_cust within w_rp_sale_month_amt end type type cbx_loginretr from w_publ_easyq`cbx_loginretr within w_rp_sale_month_amt end type type pb_em1 from w_publ_easyq`pb_em1 within w_rp_sale_month_amt integer x = 576 end type type pb_em2 from w_publ_easyq`pb_em2 within w_rp_sale_month_amt integer x = 1065 end type type pb_2 from w_publ_easyq`pb_2 within w_rp_sale_month_amt integer x = 1175 end type type cb_help from w_publ_easyq`cb_help within w_rp_sale_month_amt end type type cb_copyself from w_publ_easyq`cb_copyself within w_rp_sale_month_amt end type type gb_1 from w_publ_easyq`gb_1 within w_rp_sale_month_amt end type type ln_bar from w_publ_easyq`ln_bar within w_rp_sale_month_amt end type type ln_bar2 from w_publ_easyq`ln_bar2 within w_rp_sale_month_amt end type type r_bar from w_publ_easyq`r_bar within w_rp_sale_month_amt end type type ln_1 from w_publ_easyq`ln_1 within w_rp_sale_month_amt end type type ln_2 from w_publ_easyq`ln_2 within w_rp_sale_month_amt end type type ln_3 from w_publ_easyq`ln_3 within w_rp_sale_month_amt end type type ln_4 from w_publ_easyq`ln_4 within w_rp_sale_month_amt end type type ddlb_1 from dropdownlistbox within w_rp_sale_month_amt integer x = 1385 integer y = 196 integer width = 654 integer height = 300 integer taborder = 130 boolean bringtotop = true integer textsize = -9 integer weight = 400 fontcharset fontcharset = gb2312charset! fontpitch fontpitch = variable! string facename = "宋体" long textcolor = 33554432 string text = "销售金额年度汇总表" string item[] = {"销售金额年度汇总表","销售数量金额年度汇总表"} borderstyle borderstyle = stylelowered! end type event selectionchanged;dw_1.uf_save_profile_layout() IF THIS.Text = '销售金额年度汇总表' THEN dw_1.DataObject = 'dw_rp_sale_month_amt' ELSE dw_1.DataObject = 'dw_rp_sale_month_amt_mtrl_1' END IF dw_1.SetTransObject(sqlca) dw_1.cur_DataObject = dw_1.DataObject dw_1.uf_read_profile_layout() cb_1.TriggerEvent(Clicked!) end event type st_1 from statictext within w_rp_sale_month_amt integer x = 2066 integer y = 208 integer width = 1257 integer height = 52 boolean bringtotop = true integer textsize = -9 integer weight = 400 fontcharset fontcharset = gb2312charset! fontpitch fontpitch = variable! string facename = "宋体" long textcolor = 16711680 long backcolor = 134217739 string text = "注意:本统计表只统计财务审核的单据" boolean focusrectangle = false end type