zoukankan      html  css  js  c++  java
  • ABAP REPLACE的使用 和数据库更新try.endtry.的使用

    1、在通过REPLACE来删除字符串中某些指定的字符串时,比如要删除“ABCDEFGH”中的"DEF"时

    我们如果用REPLACE,则语法如下

    REPLACE 'DEF' WITH `` INTO 'ABCDEFGH'.

    执行出来的结果就是'ABCGH'.

    注意这里面WITH 后面用到的是STRING类型的NULL,即··,而不是CHAR类型的‘’,否则执行完之后就会多加一个空格

    即‘ABF GH'

    2、数据库表更新用TRY.的时候,语法如下

    DATA: lcx_error TYPE REF TO cx_root. 

    DATA: err_text type c length 1000.

    try.

      xxxxxxxxxxxxxxxxx  "更新数据库语句

      CATCH cx_sy_open_sql_db INTO lcx_error.

      err_text = lcx_error->get_text( ).

    endtry.

    if err_text is initial.

      commit work.

    else.

      rollback work.

    endif.

    err_text就是try失败的原因描述

    3、弹出对话框选择“是”与“否”

    data:  str TYPE string.

    DATA: re  TYPE c.

    CALL FUNCTION 'POPUP_TO_CONFIRM'
        EXPORTING
          titlebar              ' '
          diagnose_object       ' '
          text_question         = str
          text_button_1         '是'(001)
          icon_button_1         ' '
          text_button_2         '否'(002)
          icon_button_2         ' '
          default_button        '1'
          display_cancel_button ' '
          userdefined_f1_help   ' '
          start_column          25
          start_row             8
          iv_quickinfo_button_1 ' '
          iv_quickinfo_button_2 ' '
        IMPORTING
          answer                = re
        EXCEPTIONS
          text_not_found        1
          OTHERS                2.
      IF re <> 001.
        LEAVE PROGRAM.
        STOP.
      ELSE.
      ENDIF.

  • 相关阅读:
    检查网上下载“学习资料”的完整性,用这招就够了
    MP4 视频“只闻其声,不见其人”,是怎么回事呢?
    大型网课翻车现场!原因竟是……
    看图说话,P2P 分享率 90% 以上的 P2P-CDN 服务,来了!
    Linux删除除了某些文件之外的所有文件或文件夹
    git分支管理三
    git远程仓库(二)
    git基础(一)
    ntp时间服务器
    oracle-3-Linux-11g安装-图形安装
  • 原文地址:https://www.cnblogs.com/jingqing/p/13083755.html
Copyright © 2011-2022 走看看