SAP ABAP 案例控制聲明

當(dāng)您需要比較兩個或更多字段時，將使用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.

以下規(guī)則適用于CASE語句 :
1、<field>字段不能使用邏輯表達(dá)式。
2、CASE語句中使用的字段字符串被視為類型C變量。
3、如果<field>中顯示的字段的內(nèi)容類似于<abc>，<def>，<ghi>到<xyz>之一的字段的內(nèi)容，則執(zhí)行WHEN子句后面的語句塊。
4、在執(zhí)行WHEN語句中指定的所有條件后，程序繼續(xù)處理ENDCASE語句之后的剩余語句。
5、當(dāng)<field>的值與WHEN子句的<abc> <xyz>字段中指定的任何值不匹配時，在程序中執(zhí)行WHEN OTHERS子句。
6、如果省略WHEN OTHERS子句并且<field>的值與WHEN子句的<abc>至<xyz>字段中指定的任何值不匹配，程序?qū)⒗^續(xù)處理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. 

以上代碼產(chǎn)生以下輸出:

Yes, this is the title.