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. centos 安装 pip

    下载文件 wget https://bootstrap.pypa.io/get-pip.py --no-check-certificate 执行安装 python get-pip.py

  2. es6语法重构react代码

    1.使用React.Component创建组件,需要通过在constructor中调用super()将props传递给React.Component.另外react 0.13之后props必须是不可变 ...

  3. [mybatis] mybatis错误：Invalid bound statement (not found)

    点击菜单抛出异常: org.springframework.web.util.NestedServletException: Request processing failed; nested exc ...

  4. eclipse debug小技巧

    测试 Expressions 代码 public static void main(String[] args) { int x=100; System.out.println("----& ...

  5. Oracle维护常用SQL

    --查询表空间.表空间大小及表空间对应物理路径 select a.tablespace_name,b.file_name,a.block_size,a.block_size,b.bytes/1024 ...

  6. Spring实战3：装配bean的进阶知识

    主要内容: Environments and profiles Conditional bean declaration 处理自动装配的歧义 bean的作用域 The Spring Expressio ...

  7. [系统开发] Squid 认证系统

    一.用途 用过 Squid 的用户认证模块的同事一定知道,它有个很麻烦的问题:每过一段时间就会跳出一个重新输入密码的窗口,用户不胜其烦,我查了网上的各种配置资料,始终没有找到一个圆满的解决方法,所以编 ...

  8. CSS图片垂直居中方法

    让div里面的多行文本垂直居中的方法: div{height:100px;width:100px;border:solid 1px red;text-align:center; display:tab ...

  9. ubuntu用终端卸载软件

    我们需要知道我们要卸载的软件的名称,sudo apt-get autoremove --purge 之后输入软件名称,可以先输入前缀之后按tab,会自动补全. 现在不要急着回车,我们来讲解一下这个命令 ...

  10. int long long范围

    unsigned   int   0-4294967295   int   2147483648-2147483647 unsigned long 0-4294967295long   2147483 ...