$PBExportHeader$w_rp_rapmoney_mx.srw forward global type w_rp_rapmoney_mx from w_publ_easyq end type type ddlb_scid from uo_ddlb_scid within w_rp_rapmoney_mx end type type st_5 from statictext within w_rp_rapmoney_mx end type end forward global type w_rp_rapmoney_mx from w_publ_easyq integer width = 3538 integer height = 2104 string title = "出纳帐明细帐" ddlb_scid ddlb_scid st_5 st_5 end type global w_rp_rapmoney_mx w_rp_rapmoney_mx type variables long cur_scid_arr[] end variables on w_rp_rapmoney_mx.create int iCurrent call super::create this.ddlb_scid=create ddlb_scid this.st_5=create st_5 iCurrent=UpperBound(this.Control) this.Control[iCurrent+1]=this.ddlb_scid this.Control[iCurrent+2]=this.st_5 end on on w_rp_rapmoney_mx.destroy call super::destroy destroy(this.ddlb_scid) destroy(this.st_5) end on event open;call super::open;//菜单打开 if_ue_retr=true if_ue_filter=true if_ue_sort=true if_ue_sentdataout=true IF cbx_loginretr.Checked THEN cb_1.TriggerEvent(Clicked!) END IF end event type cb_func from w_publ_easyq`cb_func within w_rp_rapmoney_mx end type type cb_exit from w_publ_easyq`cb_exit within w_rp_rapmoney_mx integer x = 1157 end type type cb_2 from w_publ_easyq`cb_2 within w_rp_rapmoney_mx integer width = 192 string text = "打印&P" end type type cb_psetup from w_publ_easyq`cb_psetup within w_rp_rapmoney_mx end type type cb_1 from w_publ_easyq`cb_1 within w_rp_rapmoney_mx end type event cb_1::clicked;call super::clicked;DateTime firstdate,enddate firstdate = DateTime(Date(em_1.Text),Time(0)) enddate =DateTime(Date(em_2.Text),Time('23:59:59')) dw_1.Retrieve(firstdate,enddate,sys_user_account,cur_scid_arr) end event type st_3 from w_publ_easyq`st_3 within w_rp_rapmoney_mx integer x = 690 end type type st_4 from w_publ_easyq`st_4 within w_rp_rapmoney_mx integer x = 1399 end type type em_1 from w_publ_easyq`em_1 within w_rp_rapmoney_mx integer x = 891 end type type em_2 from w_publ_easyq`em_2 within w_rp_rapmoney_mx integer x = 1504 end type type ddlb_yl from w_publ_easyq`ddlb_yl within w_rp_rapmoney_mx integer x = 1609 integer y = 8 end type type cbx_yl from w_publ_easyq`cbx_yl within w_rp_rapmoney_mx integer x = 1390 integer y = 8 end type event cbx_yl::clicked;call super::clicked;if this.checked then dw_1.selectrow(0,false) end if end event type dw_1 from w_publ_easyq`dw_1 within w_rp_rapmoney_mx integer y = 312 integer height = 1024 string dataobject = "dw_rp_rapmoney_mx" end type event dw_1::rowfocuschanged;call super::rowfocuschanged;IF currentrow <=0 THEN RETURN this.selectrow(0,false) this.selectrow(currentrow,true) end event type sle_mtrl from w_publ_easyq`sle_mtrl within w_rp_rapmoney_mx end type type sle_cust from w_publ_easyq`sle_cust within w_rp_rapmoney_mx end type type st_mtrl from w_publ_easyq`st_mtrl within w_rp_rapmoney_mx end type type st_cust from w_publ_easyq`st_cust within w_rp_rapmoney_mx end type type cbx_loginretr from w_publ_easyq`cbx_loginretr within w_rp_rapmoney_mx boolean visible = true integer x = 1390 integer y = 100 end type type pb_em1 from w_publ_easyq`pb_em1 within w_rp_rapmoney_mx integer x = 1307 end type type pb_em2 from w_publ_easyq`pb_em2 within w_rp_rapmoney_mx integer x = 1920 end type type pb_2 from w_publ_easyq`pb_2 within w_rp_rapmoney_mx integer x = 2030 end type type cb_help from w_publ_easyq`cb_help within w_rp_rapmoney_mx integer x = 1006 end type type cb_copyself from w_publ_easyq`cb_copyself within w_rp_rapmoney_mx end type type gb_1 from w_publ_easyq`gb_1 within w_rp_rapmoney_mx end type type ln_bar from w_publ_easyq`ln_bar within w_rp_rapmoney_mx end type type ln_bar2 from w_publ_easyq`ln_bar2 within w_rp_rapmoney_mx end type type r_bar from w_publ_easyq`r_bar within w_rp_rapmoney_mx end type type ln_1 from w_publ_easyq`ln_1 within w_rp_rapmoney_mx end type type ln_2 from w_publ_easyq`ln_2 within w_rp_rapmoney_mx end type type ln_3 from w_publ_easyq`ln_3 within w_rp_rapmoney_mx end type type ln_4 from w_publ_easyq`ln_4 within w_rp_rapmoney_mx end type type ddlb_scid from uo_ddlb_scid within w_rp_rapmoney_mx integer x = 160 integer y = 192 integer width = 480 integer height = 620 integer taborder = 150 boolean bringtotop = true end type event constructor;call super::constructor;cur_scid_arr = THIS.uo_scid_arr end event event selectionchanged;call super::selectionchanged; cur_scid_arr = THIS.uo_scid_arr cb_1.triggerevent(clicked!) end event type st_5 from statictext within w_rp_rapmoney_mx integer x = 23 integer y = 204 integer width = 128 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