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

$PBExportHeader$m_rsgz_rp.srm
forward
global type m_rsgz_rp from menu
end type
type m_批修改计件单计件单价 from menu within m_rsgz_rp
end type
type m_-00 from menu within m_rsgz_rp
end type
type m_计件单明细表 from menu within m_rsgz_rp
end type
type m_个人产品计件单统计表 from menu within m_rsgz_rp
end type
type m_产品个人计件单统计表 from menu within m_rsgz_rp
end type
type m_部门员工计件工资汇总表 from menu within m_rsgz_rp
end type
type m_0 from menu within m_rsgz_rp
end type
type m_1 from menu within m_rsgz_rp
end type
type m_2 from menu within m_rsgz_rp
end type
type m_- from menu within m_rsgz_rp
end type
type m_产品价格 from menu within m_rsgz_rp
end type
type m_客户投拆单 from menu within m_rsgz_rp
end type
type m_客户费用单 from menu within m_rsgz_rp
end type
type m_客户投诉统计表 from menu within m_rsgz_rp
end type
type m_废弃销售单明细表 from menu within m_rsgz_rp
end type
global type m_rsgz_rp from menu
m_批修改计件单计件单价 m_批修改计件单计件单价
m_-00 m_-00
m_计件单明细表 m_计件单明细表
m_个人产品计件单统计表 m_个人产品计件单统计表
m_产品个人计件单统计表 m_产品个人计件单统计表
m_部门员工计件工资汇总表 m_部门员工计件工资汇总表
m_0 m_0
m_1 m_1
m_2 m_2
m_- m_-
m_产品价格 m_产品价格
m_客户投拆单 m_客户投拆单
m_客户费用单 m_客户费用单
m_客户投诉统计表 m_客户投诉统计表
m_废弃销售单明细表 m_废弃销售单明细表
end type
end forward

global type m_rsgz_rp from menu
m_批修改计件单计件单价 m_批修改计件单计件单价
m_-00 m_-00
m_计件单明细表 m_计件单明细表
m_个人产品计件单统计表 m_个人产品计件单统计表
m_产品个人计件单统计表 m_产品个人计件单统计表
m_部门员工计件工资汇总表 m_部门员工计件工资汇总表
m_0 m_0
m_1 m_1
m_2 m_2
m_- m_-
m_产品价格 m_产品价格
m_客户投拆单 m_客户投拆单
m_客户费用单 m_客户费用单
m_客户投诉统计表 m_客户投诉统计表
m_废弃销售单明细表 m_废弃销售单明细表
end type
global m_rsgz_rp m_rsgz_rp

on m_rsgz_rp.create
m_rsgz_rp=this
call super::create
this.text = "m_rsgz_rp"
this.menutextcolor = 134217735
this.menubackcolor = 134217732
this.menuhighlightcolor = 134217741
this.textsize = 8
this.weight = 400
this.facename = "Tahoma"
this.titlebackcolor = 134217730
this.bitmapbackcolor = 12632256
this.menubitmaps = true
this.titlegradient = true
this.toolbartextcolor = 134217746
this.toolbarbackcolor = 67108864
this.toolbarhighlightcolor = 134217741
this.toolbargradient = true
this.bitmapgradient = true
this.m_批修改计件单计件单价=create m_批修改计件单计件单价
this.m_-00=create m_-00
this.m_计件单明细表=create m_计件单明细表
this.m_个人产品计件单统计表=create m_个人产品计件单统计表
this.m_产品个人计件单统计表=create m_产品个人计件单统计表
this.m_部门员工计件工资汇总表=create m_部门员工计件工资汇总表
this.m_0=create m_0
this.m_1=create m_1
this.m_2=create m_2
this.m_-=create m_-
this.m_产品价格=create m_产品价格
this.m_客户投拆单=create m_客户投拆单
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_-00
this.Item[UpperBound(this.Item)+1]=this.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_部门员工计件工资汇总表
this.Item[UpperBound(this.Item)+1]=this.m_0
this.Item[UpperBound(this.Item)+1]=this.m_1
this.Item[UpperBound(this.Item)+1]=this.m_2
this.Item[UpperBound(this.Item)+1]=this.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_客户费用单
this.Item[UpperBound(this.Item)+1]=this.m_客户投诉统计表
this.Item[UpperBound(this.Item)+1]=this.m_废弃销售单明细表
end on

on m_rsgz_rp.destroy
call super::destroy
destroy(this.m_批修改计件单计件单价)
destroy(this.m_-00)
destroy(this.m_计件单明细表)
destroy(this.m_个人产品计件单统计表)
destroy(this.m_产品个人计件单统计表)
destroy(this.m_部门员工计件工资汇总表)
destroy(this.m_0)
destroy(this.m_1)
destroy(this.m_2)
destroy(this.m_-)
destroy(this.m_产品价格)
destroy(this.m_客户投拆单)
destroy(this.m_客户费用单)
destroy(this.m_客户投诉统计表)
destroy(this.m_废弃销售单明细表)
end on

type m_批修改计件单计件单价 from menu within m_rsgz_rp
end type

event clicked;f_sys_main(717)
end event

on m_批修改计件单计件单价.create
call super::create
this.text = "批修改计件单计件单价"
this.menutextcolor = 134217735
this.menubackcolor = 134217732
this.menuhighlightcolor = 134217741
this.textsize = 8
this.weight = 400
this.facename = "Tahoma"
this.titlebackcolor = 134217730
this.bitmapbackcolor = 12632256
this.menubitmaps = true
this.titlegradient = true
this.toolbartextcolor = 134217746
this.toolbarbackcolor = 67108864
this.toolbarhighlightcolor = 134217741
this.toolbargradient = true
this.bitmapgradient = true
end on

on m_批修改计件单计件单价.destroy
call super::destroy
end on

type m_-00 from menu within m_rsgz_rp
end type

on m_-00.create
call super::create
this.text = "-"
this.menutextcolor = 134217735
this.menubackcolor = 134217732
this.menuhighlightcolor = 134217741
this.textsize = 8
this.weight = 400
this.facename = "Tahoma"
this.titlebackcolor = 134217730
this.bitmapbackcolor = 12632256
this.menubitmaps = true
this.titlegradient = true
this.toolbartextcolor = 134217746
this.toolbarbackcolor = 67108864
this.toolbarhighlightcolor = 134217741
this.toolbargradient = true
this.bitmapgradient = true
end on

on m_-00.destroy
call super::destroy
end on

type m_计件单明细表 from menu within m_rsgz_rp
end type

event clicked;f_sys_main(719)
end event

on m_计件单明细表.create
call super::create
this.text = "个人工序计件单统计表"
this.menutextcolor = 134217735
this.menubackcolor = 134217732
this.menuhighlightcolor = 134217741
this.textsize = 8
this.weight = 400
this.facename = "Tahoma"
this.titlebackcolor = 134217730
this.bitmapbackcolor = 12632256
this.menubitmaps = true
this.titlegradient = true
this.toolbartextcolor = 134217746
this.toolbarbackcolor = 67108864
this.toolbarhighlightcolor = 134217741
this.toolbargradient = true
this.bitmapgradient = true
end on

on m_计件单明细表.destroy
call super::destroy
end on

type m_个人产品计件单统计表 from menu within m_rsgz_rp
end type

event clicked;f_sys_main(728)
end event

on m_个人产品计件单统计表.create
call super::create
this.text = "个人产品计件单统计表"
this.menutextcolor = 134217735
this.menubackcolor = 134217732
this.menuhighlightcolor = 134217741
this.textsize = 8
this.weight = 400
this.facename = "Tahoma"
this.titlebackcolor = 134217730
this.bitmapbackcolor = 12632256
this.menubitmaps = true
this.titlegradient = true
this.toolbartextcolor = 134217746
this.toolbarbackcolor = 67108864
this.toolbarhighlightcolor = 134217741
this.toolbargradient = true
this.bitmapgradient = true
end on

on m_个人产品计件单统计表.destroy
call super::destroy
end on

type m_产品个人计件单统计表 from menu within m_rsgz_rp
end type

event clicked;f_sys_main(729)
end event

on m_产品个人计件单统计表.create
call super::create
this.text = "产品个人计件单统计表"
this.menutextcolor = 134217735
this.menubackcolor = 134217732
this.menuhighlightcolor = 134217741
this.textsize = 8
this.weight = 400
this.facename = "Tahoma"
this.titlebackcolor = 134217730
this.bitmapbackcolor = 12632256
this.menubitmaps = true
this.titlegradient = true
this.toolbartextcolor = 134217746
this.toolbarbackcolor = 67108864
this.toolbarhighlightcolor = 134217741
this.toolbargradient = true
this.bitmapgradient = true
end on

on m_产品个人计件单统计表.destroy
call super::destroy
end on

type m_部门员工计件工资汇总表 from menu within m_rsgz_rp
end type

event clicked;f_sys_main(733)
end event

on m_部门员工计件工资汇总表.create
call super::create
this.text = "部门员工计件工资汇总表 "
this.menutextcolor = 134217735
this.menubackcolor = 134217732
this.menuhighlightcolor = 134217741
this.textsize = 8
this.weight = 400
this.facename = "Tahoma"
this.titlebackcolor = 134217730
this.bitmapbackcolor = 12632256
this.menubitmaps = true
this.titlegradient = true
this.toolbartextcolor = 134217746
this.toolbarbackcolor = 67108864
this.toolbarhighlightcolor = 134217741
this.toolbargradient = true
this.bitmapgradient = true
end on

on m_部门员工计件工资汇总表.destroy
call super::destroy
end on

type m_0 from menu within m_rsgz_rp
end type

on m_0.create
call super::create
this.text = "-"
this.menutextcolor = 134217735
this.menubackcolor = 134217732
this.menuhighlightcolor = 134217741
this.textsize = 8
this.weight = 400
this.facename = "Tahoma"
this.titlebackcolor = 134217730
this.bitmapbackcolor = 12632256
this.menubitmaps = true
this.titlegradient = true
this.toolbartextcolor = 134217746
this.toolbarbackcolor = 67108864
this.toolbarhighlightcolor = 134217741
this.toolbargradient = true
this.bitmapgradient = true
end on

on m_0.destroy
call super::destroy
end on

type m_1 from menu within m_rsgz_rp
end type

on m_1.create
call super::create
this.text = "在职人员明细表"
this.menutextcolor = 134217735
this.menubackcolor = 134217732
this.menuhighlightcolor = 134217741
this.textsize = 8
this.weight = 400
this.facename = "Tahoma"
this.titlebackcolor = 134217730
this.bitmapbackcolor = 12632256
this.menubitmaps = true
this.titlegradient = true
this.toolbartextcolor = 134217746
this.toolbarbackcolor = 67108864
this.toolbarhighlightcolor = 134217741
this.toolbargradient = true
this.bitmapgradient = true
end on

on m_1.destroy
call super::destroy
end on

event clicked;  f_sys_main(710)
end event

type m_2 from menu within m_rsgz_rp
end type

on m_2.create
call super::create
this.text = "人员异动明细表"
this.menutextcolor = 134217735
this.menubackcolor = 134217732
this.menuhighlightcolor = 134217741
this.textsize = 8
this.weight = 400
this.facename = "Tahoma"
this.titlebackcolor = 134217730
this.bitmapbackcolor = 12632256
this.menubitmaps = true
this.titlegradient = true
this.toolbartextcolor = 134217746
this.toolbarbackcolor = 67108864
this.toolbarhighlightcolor = 134217741
this.toolbargradient = true
this.bitmapgradient = true
end on

on m_2.destroy
call super::destroy
end on

event clicked;  f_sys_main(716)
end event

type m_- from menu within m_rsgz_rp
end type

on m_-.create
call super::create
this.text = "-"
this.menutextcolor = 134217735
this.menubackcolor = 134217732
this.menuhighlightcolor = 134217741
this.textsize = 8
this.weight = 400
this.facename = "Tahoma"
this.titlebackcolor = 134217730
this.bitmapbackcolor = 12632256
this.menubitmaps = true
this.titlegradient = true
this.toolbartextcolor = 134217746
this.toolbarbackcolor = 67108864
this.toolbarhighlightcolor = 134217741
this.toolbargradient = true
this.bitmapgradient = true
end on

on m_-.destroy
call super::destroy
end on

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

on m_产品价格.create
call super::create
this.text = "人员籍贯分析图表"
this.menutextcolor = 134217735
this.menubackcolor = 134217732
this.menuhighlightcolor = 134217741
this.textsize = 8
this.weight = 400
this.facename = "Tahoma"
this.titlebackcolor = 134217730
this.bitmapbackcolor = 12632256
this.menubitmaps = true
this.titlegradient = true
this.toolbartextcolor = 134217746
this.toolbarbackcolor = 67108864
this.toolbarhighlightcolor = 134217741
this.toolbargradient = true
this.bitmapgradient = true
end on

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

event clicked; f_sys_main(711)
end event

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

on m_客户投拆单.create
call super::create
this.text = "人员年龄构成图表"
this.menutextcolor = 134217735
this.menubackcolor = 134217732
this.menuhighlightcolor = 134217741
this.textsize = 8
this.weight = 400
this.facename = "Tahoma"
this.titlebackcolor = 134217730
this.bitmapbackcolor = 12632256
this.menubitmaps = true
this.titlegradient = true
this.toolbartextcolor = 134217746
this.toolbarbackcolor = 67108864
this.toolbarhighlightcolor = 134217741
this.toolbargradient = true
this.bitmapgradient = true
end on

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

event clicked; f_sys_main(712)
end event

type m_客户费用单 from menu within m_rsgz_rp
end type

on m_客户费用单.create
call super::create
this.text = "人员学历结构图表"
this.menutextcolor = 134217735
this.menubackcolor = 134217732
this.menuhighlightcolor = 134217741
this.textsize = 8
this.weight = 400
this.facename = "Tahoma"
this.titlebackcolor = 134217730
this.bitmapbackcolor = 12632256
this.menubitmaps = true
this.titlegradient = true
this.toolbartextcolor = 134217746
this.toolbarbackcolor = 67108864
this.toolbarhighlightcolor = 134217741
this.toolbargradient = true
this.bitmapgradient = true
end on

on m_客户费用单.destroy
call super::destroy
end on

event clicked; f_sys_main(713)
end event

type m_客户投诉统计表 from menu within m_rsgz_rp
end type

event clicked; f_sys_main(714)
end event

on m_客户投诉统计表.create
call super::create
this.text = "部门人员结构图表"
this.menutextcolor = 134217735
this.menubackcolor = 134217732
this.menuhighlightcolor = 134217741
this.textsize = 8
this.weight = 400
this.facename = "Tahoma"
this.titlebackcolor = 134217730
this.bitmapbackcolor = 12632256
this.menubitmaps = true
this.titlegradient = true
this.toolbartextcolor = 134217746
this.toolbarbackcolor = 67108864
this.toolbarhighlightcolor = 134217741
this.toolbargradient = true
this.bitmapgradient = true
end on

on m_客户投诉统计表.destroy
call super::destroy
end on

type m_废弃销售单明细表 from menu within m_rsgz_rp
end type

event clicked; f_sys_main(715)
end event

on m_废弃销售单明细表.create
call super::create
this.text = "离职类别分析图表"
this.menutextcolor = 134217735
this.menubackcolor = 134217732
this.menuhighlightcolor = 134217741
this.textsize = 8
this.weight = 400
this.facename = "Tahoma"
this.titlebackcolor = 134217730
this.bitmapbackcolor = 12632256
this.menubitmaps = true
this.titlegradient = true
this.toolbartextcolor = 134217746
this.toolbarbackcolor = 67108864
this.toolbarhighlightcolor = 134217741
this.toolbargradient = true
this.bitmapgradient = true
end on

on m_废弃销售单明细表.destroy
call super::destroy
end on