Q5/ws_objects/Ew_gz.pbl.src/m_dwchild_rbotton_taskwork.srm

$PBExportHeader$m_dwchild_rbotton_taskwork.srm
forward
global type m_dwchild_rbotton_taskwork from menu
end type
type m_0 from menu within m_dwchild_rbotton_taskwork
end type
type m_插行 from menu within m_0
end type
type m_增行 from menu within m_0
end type
type m_删行 from menu within m_0
end type
type m_-0 from menu within m_0
end type
type m_复制行 from menu within m_0
end type
type m_复制行员工 from menu within m_0
end type
type m_复制行员工及工序 from menu within m_0
end type
type m_- from menu within m_0
end type
type m_右键筛选 from menu within m_0
end type
type m_显示全部 from menu within m_0
end type
type m_0 from menu within m_dwchild_rbotton_taskwork
m_插行 m_插行
m_增行 m_增行
m_删行 m_删行
m_-0 m_-0
m_复制行 m_复制行
m_复制行员工 m_复制行员工
m_复制行员工及工序 m_复制行员工及工序
m_- m_-
m_右键筛选 m_右键筛选
m_显示全部 m_显示全部
end type
global type m_dwchild_rbotton_taskwork from menu
m_0 m_0
end type
end forward

global type m_dwchild_rbotton_taskwork from menu
m_0 m_0
end type
global m_dwchild_rbotton_taskwork m_dwchild_rbotton_taskwork

on m_dwchild_rbotton_taskwork.create
m_dwchild_rbotton_taskwork=this
call super::create
this.text = "m_mstpay"
this.m_0=create m_0
this.Item[UpperBound(this.Item)+1]=this.m_0
end on

on m_dwchild_rbotton_taskwork.destroy
call super::destroy
destroy(this.m_0)
end on

event clicked;//w_mustpay.triggerevent('ue_add')
end event

type m_0 from menu within m_dwchild_rbotton_taskwork
m_插行 m_插行
m_增行 m_增行
m_删行 m_删行
m_-0 m_-0
m_复制行 m_复制行
m_复制行员工 m_复制行员工
m_复制行员工及工序 m_复制行员工及工序
m_- m_-
m_右键筛选 m_右键筛选
m_显示全部 m_显示全部
end type

on m_0.create
call super::create
this.m_插行=create m_插行
this.m_增行=create m_增行
this.m_删行=create m_删行
this.m_-0=create m_-0
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_增行
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_复制行
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_0.destroy
call super::destroy
destroy(this.m_插行)
destroy(this.m_增行)
destroy(this.m_删行)
destroy(this.m_-0)
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_0
end type

on m_插行.create
call super::create
this.text = "插行 Shift + ↑"
end on

on m_插行.destroy
call super::destroy
end on

event clicked;parentwindow.event dynamic ue_insertmx()
end event

type m_增行 from menu within m_0
end type

event clicked;parentwindow.event dynamic ue_addmx()
end event

on m_增行.create
call super::create
this.text = "增行 Shift + ↓"
end on

on m_增行.destroy
call super::destroy
end on

type m_删行 from menu within m_0
end type

event clicked;parentwindow.event dynamic ue_deletemx()
end event

on m_删行.create
call super::create
this.text = "删行 Shift + →"
end on

on m_删行.destroy
call super::destroy
end on

type m_-0 from menu within m_0
end type

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

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

type m_复制行 from menu within m_0
end type

on m_复制行.create
call super::create
this.text = "复制行(工序) Ctrl+ A"
end on

on m_复制行.destroy
call super::destroy
end on

event clicked;parentwindow.event dynamic ue_copyrow_pro()
end event

type m_复制行员工 from menu within m_0
end type

on m_复制行员工.create
call super::create
this.text = "复制行(员工) Ctrl+ S"
end on

on m_复制行员工.destroy
call super::destroy
end on

event clicked;parentwindow.event dynamic ue_copyrow_emp()
end event

type m_复制行员工及工序 from menu within m_0
end type

event clicked;parentwindow.event dynamic ue_copyrow()
end event

on m_复制行员工及工序.create
call super::create
this.text = "复制行(员工及工序) Ctrl+ D"
end on

on m_复制行员工及工序.destroy
call super::destroy
end on

type m_- from menu within m_0
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_0
end type

on m_右键筛选.create
call super::create
this.text = "右键筛选"
end on

on m_右键筛选.destroy
call super::destroy
end on

event clicked;parentwindow.event dynamic ue_rbbutton()
end event

type m_显示全部 from menu within m_0
end type

on m_显示全部.create
call super::create
this.text = "显示全部"
end on

on m_显示全部.destroy
call super::destroy
end on

event clicked;parentwindow.event dynamic ue_dwchild_filter()
end event