学习使用OO在ABAP中.简单入门概念.用个例子来说明

作者:龙伍佑 | 转载自SAP 开发论坛 | 2008-02-11 16:15 | 投票
标签: sap abap oo 面向对象 

学习使用OO在ABAP中.简单入门概念.用个例子来说明

ABAP Object Oriented Programming

  
  REPORT ZHEF_ABAP_OBJECTS_EXAMPLE2.
  *定义一个父类,只是定义里面的一些数据类型,
  * 具体的方法和内容在下面实现.
  CLASS Employee DEFINITION.
  *定义公共部分的数据和方法
  PUBLIC SECTION.
   DATA:
   nEmployeeNo(4) type n, “雇员员工号
   cEmployeeName(30) type c, “雇员姓名
   iNoOfUnits type i, “生产的的单元的数量
   iPayPerUnit type i. “每个单元的价格
  
  *定义两个方法,一个是输出,一个是输入
   METHODS:
   CalculatePay RETURNING VALUE(iPay) TYPE i,
   WritePay IMPORTING VALUE(iPay) TYPE i.
  ENDCLASS.
  
  
  *这里是具体的实现的
  CLASS Employee IMPLEMENTATION.
  *实现上面的方法
   METHOD CalculatePay.
  
   iPay = iNoOfUnits * iPayPerUnit.
   ENDMETHOD.
  
   METHOD WritePay.
  
   WRITE: / 'The pay for employee ',
   nEmployeeNo, cEmployeeName,
   ' is : ', iPay.
   ENDMETHOD.
  
  ENDCLASS.
  
  ************************************************************************
  * Subclass Factory Worker
  *
  * The class FactoryWorker is a subclass of the superclass Employee.
  * Note that the attribute iExtraNoUnits have been added and the
[1] [2] [3] [4] [5] 
Baidu 广告
Google 广告