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

$PBExportHeader$m_jg_rp.srm
forward
global type m_jg_rp from menu
end type
type m_外协损耗单明细表 from menu within m_jg_rp
end type
type m_其他出仓分类仓统计表 from menu within m_jg_rp
end type
type m_- from menu within m_jg_rp
end type
type m_外协商推算结存表 from menu within m_jg_rp
end type
global type m_jg_rp from menu
m_外协损耗单明细表 m_外协损耗单明细表
m_其他出仓分类仓统计表 m_其他出仓分类仓统计表
m_- m_-
m_外协商推算结存表 m_外协商推算结存表
end type
end forward

global type m_jg_rp from menu
m_外协损耗单明细表 m_外协损耗单明细表
m_其他出仓分类仓统计表 m_其他出仓分类仓统计表
m_- m_-
m_外协商推算结存表 m_外协商推算结存表
end type
global m_jg_rp m_jg_rp

on m_jg_rp.create
m_jg_rp=this
call super::create
this.text = "m_jg_rp"
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_其他出仓分类仓统计表
this.Item[UpperBound(this.Item)+1]=this.m_-
this.Item[UpperBound(this.Item)+1]=this.m_外协商推算结存表
end on

on m_jg_rp.destroy
call super::destroy
destroy(this.m_外协损耗单明细表)
destroy(this.m_其他出仓分类仓统计表)
destroy(this.m_-)
destroy(this.m_外协商推算结存表)
end on

event clicked;f_sys_main(335)
end event

type m_外协损耗单明细表 from menu within m_jg_rp
end type

event clicked;f_sys_main(216)
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_jg_rp
end type

event clicked;f_sys_main(422)
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_jg_rp
end type

on m_-.create
call super::create
this.text = "-"
end on

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

type m_外协商推算结存表 from menu within m_jg_rp
end type

event clicked;f_sys_main(918)
end event

on m_外协商推算结存表.create
call super::create
this.text = "外协商推算结存表"
end on

on m_外协商推算结存表.destroy
call super::destroy
end on