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

$PBExportHeader$m_jg_cc.srm
forward
global type m_jg_cc from menu
end type
type m_0 from menu within m_jg_cc
end type
type m_车间外协发出单 from menu within m_jg_cc
end type
type m_仓库外协退回单 from menu within m_jg_cc
end type
type m_车间外协退回单 from menu within m_jg_cc
end type
global type m_jg_cc from menu
m_0 m_0
m_车间外协发出单 m_车间外协发出单
m_仓库外协退回单 m_仓库外协退回单
m_车间外协退回单 m_车间外协退回单
end type
end forward

global type m_jg_cc from menu
m_0 m_0
m_车间外协发出单 m_车间外协发出单
m_仓库外协退回单 m_仓库外协退回单
m_车间外协退回单 m_车间外协退回单
end type
global m_jg_cc m_jg_cc

on m_jg_cc.create
m_jg_cc=this
call super::create
this.text = "m_jg_cc"
this.m_0=create m_0
this.m_车间外协发出单=create m_车间外协发出单
this.m_仓库外协退回单=create m_仓库外协退回单
this.m_车间外协退回单=create m_车间外协退回单
this.Item[UpperBound(this.Item)+1]=this.m_0
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_cc.destroy
call super::destroy
destroy(this.m_0)
destroy(this.m_车间外协发出单)
destroy(this.m_仓库外协退回单)
destroy(this.m_车间外协退回单)
end on

type m_0 from menu within m_jg_cc
end type

on m_0.create
call super::create
this.text = "仓库外协发出单"
end on

on m_0.destroy
call super::destroy
end on

event clicked;f_sys_main(922)
end event

type m_车间外协发出单 from menu within m_jg_cc
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(908)
end event

type m_仓库外协退回单 from menu within m_jg_cc
end type

event clicked;f_sys_main(904)
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_cc
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(909)
end event