SAP ABAP 案例控制声明

当您需要比较两个或更多字段时，将使用CASE控制语句。
CASE控制语句的语法如下:

CASE <field>. 
 
WHEN <abc>. 
   <statement block>.
   
WHEN <def>. 
   <tatement block>.
   
WHEN <pqr>. 
   <statement block>. 
...... 
...... 
......  
WHEN <xyz>. 
   <statement block>. 
  
WHEN OTHERS. 
   <statement block>.  
ENDCASE.

以下规则适用于CASE语句 :
1、<field>字段不能使用逻辑表达式。
2、CASE语句中使用的字段字符串被视为类型C变量。
3、如果<field>中显示的字段的内容类似于<abc>，<def>，<ghi>到<xyz>之一的字段的内容，则执行WHEN子句后面的语句块。
4、在执行WHEN语句中指定的所有条件后，程序继续处理ENDCASE语句之后的剩余语句。
5、当<field>的值与WHEN子句的<abc> <xyz>字段中指定的任何值不匹配时，在程序中执行WHEN OTHERS子句。
6、如果省略WHEN OTHERS子句并且<field>的值与WHEN子句的<abc>至<xyz>字段中指定的任何值不匹配，程序将继续处理ENDCASE语句之后的剩余语句 。

流程图

实例

Report YH_SEP_15.
  
Data: Title_1(10) TYPE C,  
   Title_2(15) TYPE C.  
	
Title_1 = 'ABAP'.
Title_2 = 'Programming'.  

CASE Title_2.
  
WHEN 'ABAP'. 
   Write 'This is not the title'.  
	
WHEN 'Tutorials'.
   Write 'This is not the title'.  
	
WHEN 'Limited'.
   Write 'This is not the title'.
	
WHEN 'Programming'.
   Write 'Yes, this is the title'.
	
WHEN OTHERS.
   Write 'Sorry, Mismatch'.
	 
ENDCASE. 

以上代码产生以下输出:

Yes, this is the title.