$PBExportHeader$m_msttake.srm forward global type m_msttake from menu end type type m_0 from menu within m_msttake 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_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_msttake m_收款 m_收款 m_增加 m_增加 m_删除 m_删除 m_- m_- m_确认 m_确认 m_-0 m_-0 m_筛选数据 m_筛选数据 m_显示全部 m_显示全部 end type global type m_msttake from menu m_0 m_0 end type end forward global type m_msttake from menu m_0 m_0 end type global m_msttake m_msttake on m_msttake.create m_msttake=this call super::create this.m_0=create m_0 this.Item[UpperBound(this.Item)+1]=this.m_0 end on on m_msttake.destroy call super::destroy destroy(this.m_0) end on type m_0 from menu within m_msttake m_收款 m_收款 m_增加 m_增加 m_删除 m_删除 m_- m_- m_确认 m_确认 m_-0 m_-0 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_-=create m_- this.m_确认=create m_确认 this.m_-0=create m_-0 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_- 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_显示全部 end on on m_0.destroy call super::destroy destroy(this.m_收款) destroy(this.m_增加) destroy(this.m_删除) destroy(this.m_-) destroy(this.m_确认) destroy(this.m_-0) destroy(this.m_筛选数据) destroy(this.m_显示全部) end on type m_收款 from menu within m_0 end type event clicked;parentwindow.event dynamic ue_take() 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_0 end type event clicked;parentwindow.event dynamic ue_add() 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_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_del() 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 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_view_bill() end event 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 = "筛选数据" 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