$PBExportHeader$w_main_child_biz.srw forward global type w_main_child_biz from w_mface_base end type type st_12 from uo_text_m within w_main_child_biz end type type st_3 from uo_text_m within w_main_child_biz end type type st_8 from uo_text_m within w_main_child_biz end type type st_7 from uo_text_m within w_main_child_biz end type type st_6 from uo_text_m within w_main_child_biz end type type st_29 from uo_text_m within w_main_child_biz end type type p_33 from picture within w_main_child_biz end type type p_9 from picture within w_main_child_biz end type type st_9 from uo_text_m within w_main_child_biz end type type st_10 from uo_text_m within w_main_child_biz end type type st_2 from uo_text_m within w_main_child_biz end type type st_11 from uo_text_m within w_main_child_biz end type type st_5 from uo_text_m within w_main_child_biz end type type st_18 from uo_text_m within w_main_child_biz end type type st_19 from uo_text_m within w_main_child_biz end type type st_17 from uo_text_m within w_main_child_biz end type type p_1 from picture within w_main_child_biz end type type st_1 from uo_text_m within w_main_child_biz end type type st_13 from uo_text_m within w_main_child_biz end type type p_3 from picture within w_main_child_biz end type type st_4 from uo_text_m within w_main_child_biz end type type ln_1 from line within w_main_child_biz end type type rr_1 from roundrectangle within w_main_child_biz end type end forward global type w_main_child_biz from w_mface_base integer x = 1001 integer y = 80 integer width = 2601 integer height = 1352 boolean titlebar = false boolean controlmenu = false boolean minbox = false boolean maxbox = false boolean resizable = false boolean border = false windowtype windowtype = child! st_12 st_12 st_3 st_3 st_8 st_8 st_7 st_7 st_6 st_6 st_29 st_29 p_33 p_33 p_9 p_9 st_9 st_9 st_10 st_10 st_2 st_2 st_11 st_11 st_5 st_5 st_18 st_18 st_19 st_19 st_17 st_17 p_1 p_1 st_1 st_1 st_13 st_13 p_3 p_3 st_4 st_4 ln_1 ln_1 rr_1 rr_1 end type global w_main_child_biz w_main_child_biz forward prototypes public function integer wf_kk () end prototypes public function integer wf_kk ();st_4.x=0 st_4.y=0 st_4.width=this.width st_4.height=this.height int i for i=1 to this.width/200+1 st_4.x=st_4.x+200 sleep(0.4) next return 0 end function on w_main_child_biz.create int iCurrent call super::create this.st_12=create st_12 this.st_3=create st_3 this.st_8=create st_8 this.st_7=create st_7 this.st_6=create st_6 this.st_29=create st_29 this.p_33=create p_33 this.p_9=create p_9 this.st_9=create st_9 this.st_10=create st_10 this.st_2=create st_2 this.st_11=create st_11 this.st_5=create st_5 this.st_18=create st_18 this.st_19=create st_19 this.st_17=create st_17 this.p_1=create p_1 this.st_1=create st_1 this.st_13=create st_13 this.p_3=create p_3 this.st_4=create st_4 this.ln_1=create ln_1 this.rr_1=create rr_1 iCurrent=UpperBound(this.Control) this.Control[iCurrent+1]=this.st_12 this.Control[iCurrent+2]=this.st_3 this.Control[iCurrent+3]=this.st_8 this.Control[iCurrent+4]=this.st_7 this.Control[iCurrent+5]=this.st_6 this.Control[iCurrent+6]=this.st_29 this.Control[iCurrent+7]=this.p_33 this.Control[iCurrent+8]=this.p_9 this.Control[iCurrent+9]=this.st_9 this.Control[iCurrent+10]=this.st_10 this.Control[iCurrent+11]=this.st_2 this.Control[iCurrent+12]=this.st_11 this.Control[iCurrent+13]=this.st_5 this.Control[iCurrent+14]=this.st_18 this.Control[iCurrent+15]=this.st_19 this.Control[iCurrent+16]=this.st_17 this.Control[iCurrent+17]=this.p_1 this.Control[iCurrent+18]=this.st_1 this.Control[iCurrent+19]=this.st_13 this.Control[iCurrent+20]=this.p_3 this.Control[iCurrent+21]=this.st_4 this.Control[iCurrent+22]=this.ln_1 this.Control[iCurrent+23]=this.rr_1 end on on w_main_child_biz.destroy call super::destroy destroy(this.st_12) destroy(this.st_3) destroy(this.st_8) destroy(this.st_7) destroy(this.st_6) destroy(this.st_29) destroy(this.p_33) destroy(this.p_9) destroy(this.st_9) destroy(this.st_10) destroy(this.st_2) destroy(this.st_11) destroy(this.st_5) destroy(this.st_18) destroy(this.st_19) destroy(this.st_17) destroy(this.p_1) destroy(this.st_1) destroy(this.st_13) destroy(this.p_3) destroy(this.st_4) destroy(this.ln_1) destroy(this.rr_1) end on event open;setnull(io_cont) end event event mousemove;call super::mousemove;window ls_w ls_w=this.parentwindow() ls_w.triggerevent("mousemove") end event event closequery;return 1 end event event key;f_x_genapp_frame() end event type st_12 from uo_text_m within w_main_child_biz integer x = 1929 integer y = 1008 integer width = 553 integer height = 64 boolean bringtotop = true integer textsize = -9 boolean underline = true long textcolor = 0 string text = "单据毛利统计表" end type event clicked;call super::clicked;f_sys_main(119) end event type st_3 from uo_text_m within w_main_child_biz integer x = 1929 integer y = 1136 integer width = 553 integer height = 64 boolean bringtotop = true integer textsize = -9 boolean underline = true long textcolor = 0 string text = "产品销售毛利明细表" end type event clicked;call super::clicked;f_sys_main(112) end event type st_8 from uo_text_m within w_main_child_biz integer x = 1230 integer y = 1228 integer width = 288 integer height = 48 boolean bringtotop = true integer textsize = -9 boolean underline = true string text = "产品及物料" end type event clicked;call super::clicked;f_sys_main(201) end event type st_7 from uo_text_m within w_main_child_biz integer x = 119 integer y = 1228 integer width = 233 integer height = 52 boolean bringtotop = true integer textsize = -9 boolean underline = true long textcolor = 0 string text = "客户区域" end type event clicked;call super::clicked;f_sys_main(116) end event type st_6 from uo_text_m within w_main_child_biz integer x = 864 integer y = 1228 integer width = 233 integer height = 52 boolean bringtotop = true integer textsize = -9 boolean underline = true long textcolor = 0 string text = "客户资料" end type event clicked;call super::clicked;f_sys_main(105) end event type st_29 from uo_text_m within w_main_child_biz integer x = 498 integer y = 1228 integer width = 238 integer height = 52 boolean bringtotop = true integer textsize = -9 boolean underline = true string text = "会员类型" end type event clicked;call super::clicked;f_sys_main(168) end event type p_33 from picture within w_main_child_biz integer x = 773 integer y = 404 integer width = 169 integer height = 80 boolean bringtotop = true string pointer = "HAND.CUR" string picturename = "graphics\arrow_1.bmp" boolean focusrectangle = false end type type p_9 from picture within w_main_child_biz integer x = 1929 integer y = 60 integer width = 183 integer height = 160 string pointer = " " boolean originalsize = true string picturename = "graphics\bbxx.bmp" boolean focusrectangle = false end type event clicked;st_9.triggerevent(clicked!) end event type st_9 from uo_text_m within w_main_child_biz integer x = 2094 integer y = 132 integer width = 165 integer height = 60 boolean bringtotop = true integer textsize = -9 string pointer = " " long textcolor = 0 string text = "报表" end type event clicked;// end event type st_10 from uo_text_m within w_main_child_biz integer x = 1929 integer y = 372 integer width = 553 integer height = 64 boolean bringtotop = true integer textsize = -9 boolean underline = true long textcolor = 0 string text = "区域销售统计表" end type event clicked;call super::clicked;f_sys_main(132) end event type st_2 from uo_text_m within w_main_child_biz integer x = 1929 integer y = 244 integer width = 553 integer height = 64 boolean bringtotop = true integer textsize = -9 boolean underline = true long textcolor = 0 string text = "销售明细表" end type event clicked;call super::clicked;f_sys_main(110) end event type st_11 from uo_text_m within w_main_child_biz integer x = 1929 integer y = 884 integer width = 553 integer height = 64 boolean bringtotop = true integer textsize = -9 boolean underline = true long textcolor = 0 string text = "客户销售金额汇总表" end type event clicked;call super::clicked;f_sys_main(114) end event type st_5 from uo_text_m within w_main_child_biz integer x = 1929 integer y = 1252 integer width = 553 integer height = 64 boolean bringtotop = true integer textsize = -9 long textcolor = 0 string text = "更多报表>>" end type event clicked;call super::clicked;m_sale_rp_biz om_1 om_1 = CREATE m_sale_rp_biz om_1.PopMenu(w_main_child_biz.X+THIS.X,w_main_child_biz.Y+THIS.Y) DESTROY om_1 end event type st_18 from uo_text_m within w_main_child_biz integer x = 1929 integer y = 628 integer width = 553 integer height = 64 boolean bringtotop = true integer textsize = -9 boolean underline = true long textcolor = 0 string text = "客户产品销售汇总表" end type event clicked;call super::clicked;f_sys_main(115) end event type st_19 from uo_text_m within w_main_child_biz integer x = 1929 integer y = 756 integer width = 553 integer height = 64 boolean bringtotop = true integer textsize = -9 boolean underline = true long textcolor = 0 string text = "产品类别销售统计表" end type event clicked;call super::clicked;f_sys_main(121) end event type st_17 from uo_text_m within w_main_child_biz integer x = 1929 integer y = 500 integer width = 553 integer height = 64 boolean bringtotop = true integer textsize = -9 boolean underline = true long textcolor = 0 string text = "产品销售汇总表" end type event clicked;call super::clicked;f_sys_main(113) end event type p_1 from picture within w_main_child_biz integer x = 1038 integer y = 360 integer width = 183 integer height = 160 boolean bringtotop = true string pointer = "HAND.CUR" boolean originalsize = true string picturename = "graphics\xsd.bmp" boolean focusrectangle = false end type event clicked;st_1.triggerevent(clicked!) end event type st_1 from uo_text_m within w_main_child_biz integer x = 955 integer y = 520 integer width = 398 integer height = 52 boolean bringtotop = true integer textsize = -9 long textcolor = 0 string text = "客户兑换礼品单" alignment alignment = center! end type event clicked;call super::clicked;f_sys_main(169) end event type st_13 from uo_text_m within w_main_child_biz integer x = 416 integer y = 520 integer width = 306 integer height = 52 boolean bringtotop = true integer textsize = -9 long textcolor = 0 string text = "零售单" alignment alignment = center! end type event clicked;call super::clicked;f_sys_main(138) end event type p_3 from picture within w_main_child_biz integer x = 475 integer y = 360 integer width = 183 integer height = 160 boolean bringtotop = true string pointer = "HAND.CUR" boolean originalsize = true string picturename = "graphics\xsd.bmp" boolean focusrectangle = false end type event clicked;st_13.triggerevent(clicked!) end event type st_4 from uo_text_m within w_main_child_biz boolean visible = false integer width = 297 integer height = 80 integer textsize = -9 string text = "" boolean border = true end type event clicked;call super::clicked;f_sys_main(406) end event type ln_1 from line within w_main_child_biz long linecolor = 33554432 linestyle linestyle = dot! integer linethickness = 4 integer beginx = 1879 integer beginy = 36 integer endx = 1879 integer endy = 1300 end type type rr_1 from roundrectangle within w_main_child_biz long linecolor = 15780518 integer linethickness = 6 long fillcolor = 16777215 integer x = 18 integer y = 1180 integer width = 1842 integer height = 144 integer cornerheight = 40 integer cornerwidth = 46 end type