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

$PBExportHeader$m_ware_sale.srm
forward
global type m_ware_sale from menu
end type
type m_0 from menu within m_ware_sale
end type
type m_车间外协返工单 from menu within m_ware_sale
end type
global type m_ware_sale from menu
m_0 m_0
m_车间外协返工单 m_车间外协返工单
end type
end forward

global type m_ware_sale from menu
m_0 m_0
m_车间外协返工单 m_车间外协返工单
end type
global m_ware_sale m_ware_sale

on m_ware_sale.create
m_ware_sale=this
call super::create
this.text = "m_ck_sale"
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_ware_sale.destroy
call super::destroy
destroy(this.m_0)
destroy(this.m_车间外协返工单)
end on

type m_0 from menu within m_ware_sale
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(340)
end event

type m_车间外协返工单 from menu within m_ware_sale
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(341)
end event