DATA: gv_1 TYPE c.

DATA: gv_2 TYPE i.

gv_2 = 60.

IF gv_2 >= 0 AND gv_2 < 60 .

gv_1 = 'A'.

ELSEIF gv_2 >= 60 AND gv_2 < 70.

gv_1 = 'B'.

ELSEIF gv_2 >= 70 AND gv_2 < 80.

gv_1 = 'C'.

ELSEIF gv_2 >= 80 AND gv_2 < 90.

gv_1 = 'D'.

ELSEIF gv_2 >= 90 AND gv_2 <= 100.

gv_1 = 'E'.

else.

gv_1 = 'F'.

ENDIF.

CASE gv_1.

WHEN 'A'.

*   MESSAGE '.BACK.' TYPE 'i'.

WRITE: / gv_2 ,'不及格'.

WHEN 'B'.

*    MESSAGE '.CANCEL.' TYPE 'i'.

WRITE: / gv_2,'及格'.

WHEN 'C'.

*    MESSAGE '.exit.' TYPE '1'.

WRITE: / gv_2,'中'.

WHEN 'D'.

*    MESSAGE '.CANCEL.' TYPE 'i'.

WRITE: / gv_2,'良好'.

WHEN 'E'.

*    MESSAGE '.CANCEL.' TYPE 'i'.

WRITE: / gv_2,'優秀'.

WHEN 'F'.

*    MESSAGE '.CANCEL.' TYPE 'i'.

WRITE: / gv_2,'大於100,請輸入0~100中間的數值!'.

*  WHEN OTHERS.

**    MESSAGE '.OTHERS.' TYPE 'i'.

*    WRITE: / gv_2 ,'大於100,請輸入0~100中間的數值!'.

ENDCASE.

abap case when 例子的更多相关文章

  1. ABAP:从例子学习ABAP

    1.插入内表行: *插入内表行: DATA: BEGIN OF man, name(20) TYPE c, high TYPE p DECIMALS 2, weight TYPE p DECIMALS ...

  2. ABAP table control例子

    [转自]http://blog.csdn.net/lhx20/article/details/3039909Table control用于在screen上以表格的形式显示数据,在table contr ...

  3. case使用例子

    echo 'Input a number between 1 to 4' echo 'Your number is:\c' read aNum case $aNum in 1) echo 'You s ...

  4. verilog学习笔记(3)_task/case小例子及其tb

    module ex_case `timescale lns/1ns module ex_case( input wire rst_n, input wire sclk, output reg [7:0 ...

  5. oracle 存储过程和函数例子

    关于 游标 if,for 的例子 create or replace procedure peace_if is cursor var_c is select * from grade; begin ...

  6. Oracle中是用case...when语句进行判断

    使用case...when语句进行判断,其语法格式如下: case<selector> when<expression_1> then pl_sqlsentence_1; wh ...

  7. mysql中 case when的使用

    SELECT a.hsid, a.house_code, a.sale_date, a.pjid, COUNT( sdid ) AS num, b.hsid, b.pscid, b.hscode, b ...

  8. oracle 存储过程和函数例子 --2

    关于 游标 if,for 的例子 create or replace procedure peace_if is cursor var_c is select * from grade; begin ...

  9. CASE WHEN 小结

    1.简单的一个case when 例子: CASE sex ' THEN '男' ' THEN '女' ELSE '其他' END 2. case when 在一整个表为空强行让其显示出一个值,在其后 ...

随机推荐

  1. RGB颜色对照图

  2. ORA-01109:数据库未打开

    ORA-01109:数据库未打开 在此之前做了这样一操作,在plsql创建了2表空间,由于装的是oracle精简版所以创建表空间大小超过4G就不能创建,然后我就手动把表空间给删除了,回收站也给删了,问 ...

  3. synergy帮组提升办公效率

    这个synergy确实很不错哦,当你在办公室拥有两台或者多台电脑的时候,放在面前多台显示器,多个鼠标,多个键盘,但是你的桌面上,是不是多出了些你不需要看到的键盘或者鼠标?至少我是这样子的,我希望多个显 ...

  4. VBA 按照文件类型名称打开一个文件

    Application.GetOpenFilename(fileFilter, fileIndex, fileSelectTitle, button, False) fileFilter: 指定能够被 ...

  5. 【shell】read

    read:read命令接收标准输入(键盘)的输入,或其他文件描述符的输入(后面在说).得到输入后,read命令将数据放入一个标准变量中. [参数][变量]  注意:变量要在参数的后面 主要参数: -t ...

  6. 【linux】 /etc/shadow 文件

    格式:username: passwd: lastchg: min: max: warn: inactive: expire: flag 登录名:加密口令:最后一次修改时间:最小时间间隔:最大时间间隔 ...

  7. C# .net 最大HTTP连接数

    说明:本WCF程序收到请求时会对外HTTP请求. 桌面系统默认是2个,如果是SERVER,默认是10个,超过10个就会排队,当有大量向外请求时,很多对外请求就会超时.排队的HTTP请求超时仍在计时. ...

  8. Linux常见设备及相应/dev/xxx文件名、Mount Point、挂载点、Mount命令、fstab、挂载分区

    Linux 中的设备有2种类型:字符设备(无缓冲且只能顺序存取).块设备(有缓冲且可以随机存取).这些设备中,有些设备是对实际存在的物理硬件的抽象,而有些设备则是内核自身提供的功能(不依赖于特定的物理 ...

  9. 黄聪:Emeditor 编辑器常用的正则表达式

    Emeditor 目前来说是我个人感觉非常不错的一款记事本软件, 其中查找替换功能由于支持正则表达式而显得非常强大. <tr[^>]*> 匹配:<tr xxxxxxxxxxxx ...

  10. C#学习笔记五: C#3.0Lambda表达式及Linq解析

    最早使用到Lambda表达式是因为一个需求:如果一个数组是:int[] s = new int[]{1,3,5,9,14,16,22};例如只想要这个数组中小于15的元素然后重新组装成一个数组或者直接 ...