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. 【转】DNS劫持和DNS污染的区别

    什么是DNS服务器? 简单来说,DNS服务器就是域名管理系统. DNS(Domain Name System)是域名解析服务器的意思. DNS服务器是干什么的? DNS服务器在互联网的作用是:把域名转 ...

  2. javascript中in和hasOwnProperty区别

    in操作符只要通过对象能访问到属性就返回true.hasOwnProperty()只在属性存在于实例中时才返回true. function Person(){ } Person.prototype.n ...

  3. adb failed to start daemon 的解决办法

    很多人遇到下面这个问题 * daemon not running. starting it now on port 5037 * ADB server didn't ACK<br>* fa ...

  4. Maven 依赖管理

    1  概念介绍 之前我们说过,maven 坐标能够确定一个项目.换句话说,我们可以用它来解决依赖关系.在 POM 中,依赖关系是在 dependencies部分中定义的.在上面的 POM 例子中,我们 ...

  5. Tomcat无法启动：org.apache.catalina.LifecycleException: Failed to start component 问题解决

    问题如下:需要使用到数据库mysql,于是将mysql-connector-java-5.1.30-bin.jar的数据库驱动复制到WEE-INF/lib目录下.点击运行,但是服务器无法启动. 控制台 ...

  6. Ruby1.9.3-下载网络图片至本地，并按编号保存。

    #本程序功能:下载网络图片至本地,并按编号保存. #使用Ruby1.9.3在winxp_sp3下编写. require 'nokogiri' require 'open-uri' #以下 根据网址解析 ...

  7. Spring Tool Suite中的Tomcat启动状态修改java代码保存立刻生效

  8. hibernate.cfg.xml讲解

    <session-factory> <!-- 配置数据库连接信息 --> <!-- 数据库驱动 --> <property name="connec ...

  9. [JS]学习Javascript闭包（Closure）

    转自:阮一峰 闭包(closure)是Javascript语言的一个难点,也是它的特色,很多高级应用都要依靠闭包实现. 下面就是我的学习笔记,对于Javascript初学者应该是很有用的. 一.变量的 ...

  10. hibernate级联与反向

    cascade:设置本表与关联表之间的级联操作,如:设置为save-update,则插入或更新对象时同时保存或更新另一端的表,但不会产生关联关系数据,除非inverse为false. inverse: ...