Q5/ws_objects/Ew_mainface.pbl.src/m_sale_rp_biz.srm

$PBExportHeader$m_sale_rp_biz.srm
forward
global type m_sale_rp_biz from menu
end type
type m_客户产品类别销售汇总表 from menu within m_sale_rp_biz
end type
type m_产品价格 from menu within m_sale_rp_biz
end type
type m_客户投拆单 from menu within m_sale_rp_biz
end type
global type m_sale_rp_biz from menu
m_客户产品类别销售汇总表 m_客户产品类别销售汇总表
m_产品价格 m_产品价格
m_客户投拆单 m_客户投拆单
end type
end forward

global type m_sale_rp_biz from menu
m_客户产品类别销售汇总表 m_客户产品类别销售汇总表
m_产品价格 m_产品价格
m_客户投拆单 m_客户投拆单
end type
global m_sale_rp_biz m_sale_rp_biz

on m_sale_rp_biz.create
m_sale_rp_biz=this
call super::create
this.text = "m_sale_rp_biz"
this.m_客户产品类别销售汇总表=create m_客户产品类别销售汇总表
this.m_产品价格=create m_产品价格
this.m_客户投拆单=create m_客户投拆单
this.Item[UpperBound(this.Item)+1]=this.m_客户产品类别销售汇总表
this.Item[UpperBound(this.Item)+1]=this.m_产品价格
this.Item[UpperBound(this.Item)+1]=this.m_客户投拆单
end on

on m_sale_rp_biz.destroy
call super::destroy
destroy(this.m_客户产品类别销售汇总表)
destroy(this.m_产品价格)
destroy(this.m_客户投拆单)
end on

type m_客户产品类别销售汇总表 from menu within m_sale_rp_biz
end type

event clicked;f_sys_main(178)
end event

on m_客户产品类别销售汇总表.create
call super::create
this.text = "客户产品类别销售汇总表"
end on

on m_客户产品类别销售汇总表.destroy
call super::destroy
end on

type m_产品价格 from menu within m_sale_rp_biz
end type

on m_产品价格.create
call super::create
this.text = "销售金额汇总对比表"
end on

on m_产品价格.destroy
call super::destroy
end on

event clicked;f_sys_main(120)

end event

type m_客户投拆单 from menu within m_sale_rp_biz
end type

on m_客户投拆单.create
call super::create
this.text = "业务员销售统计表"
end on

on m_客户投拆单.destroy
call super::destroy
end on

event clicked;f_sys_main(109)
end event