$PBExportHeader$m_jg_th.srm forward global type m_jg_th from menu end type type m_0 from menu within m_jg_th end type type m_车间外协退回单 from menu within m_jg_th end type global type m_jg_th from menu m_0 m_0 m_车间外协退回单 m_车间外协退回单 end type end forward global type m_jg_th from menu m_0 m_0 m_车间外协退回单 m_车间外协退回单 end type global m_jg_th m_jg_th on m_jg_th.create m_jg_th=this call super::create this.text = "m_jg_th" this.m_0=create m_0 this.m_车间外协退回单=create m_车间外协退回单 this.Item[UpperBound(this.Item)+1]=this.m_0 this.Item[UpperBound(this.Item)+1]=this.m_车间外协退回单 end on on m_jg_th.destroy call super::destroy destroy(this.m_0) destroy(this.m_车间外协退回单) end on type m_0 from menu within m_jg_th 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(904) end event type m_车间外协退回单 from menu within m_jg_th 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