REPORT demo_html_input.

CLASS demo DEFINITION.

  PUBLIC SECTION.

    CLASS-METHODS main.

  PRIVATE SECTION.

    CLASS-METHODS handle_sapevent

      FOR EVENT sapevent

                  OF cl_abap_browser

      IMPORTING action

                  query_table.

ENDCLASS.

CLASS demo IMPLEMENTATION.

  METHOD main.

    DATA error_list TYPE cl_abap_browser=>html_table.

    SET HANDLER handle_sapevent.

    DATA(html_str) =

       `<html>`

    && `  <head>`

    && `    <meta http-equiv="content-type" `

    && `          content="text/html; `

    && `          charset=utf-8">`

    && `    <script language="JavaScript">`

    && `      function sendInput(form) `

    && `          { fname=form.name;       `

    && `            document[fname].submit();} `

    && `      function InputKeyDown(form) {`

    && `        if(event.keyCode == 13) {`

    && `            fname=form.name;`

    && `            document[fname].submit();} }`

    && `    </script>`

    && `  </head>`

    && `  <body>`

    && `    <form name="INPUT" accept-charset="utf-8" `

    && `          method="post" action="SAPEVENT:INPUT"> `

    && `      <input type="text" id="in1" name="field1" `

    && `             size=30 maxlength=30 title="" value="aaa" `

    && `             onKeyDown="InputKeyDown(this.form);"><br>`

    && `      <input type="text" id="in2" name="field2" `

    && `             size=30 maxlength=30 title="" value="bbb" `

    && `             onKeyDown="InputKeyDown(this.form);"><br>`

    && `      <input type="text" id="in3" name="field3" `

    && `             size=30 maxlength=30 title="" value="ccc" `

    && `             onKeyDown="InputKeyDown(this.form);"><br><br>`

    && `     <button id="enterButton" type="button" `

    && `             title="Enter" onClick="sendInput(INPUT);" `

    && `             onKeypress="if(event.keycode=13) `

    && `             sendInput(INPUT);">`

    && `             Enter</button>`

    && `    </form>`

    && `  </body>`

    && `</html>`.

    cl_abap_browser=>show_html(

      EXPORTING

        html_string = html_str

        title       = 'Input Demo'

      IMPORTING

         html_errors = error_list ).

    IF error_list IS NOT INITIAL.

      MESSAGE 'Error in HTML' TYPE 'I' DISPLAY LIKE 'E'.

    ENDIF.

  ENDMETHOD.

  METHOD handle_sapevent.

    DATA(out) = cl_demo_output_stream=>open( ).

    SET HANDLER cl_demo_output_html=>handle_output FOR out.

    out->write_data( iv_name = 'ACTION'      ia_value = action ).

    out->write_data( iv_name = 'QUERY_TABLE' ia_value = query_table ).

    out->close( ).

  ENDMETHOD.

ENDCLASS.

START-OF-SELECTION.

  demo=>main( ).

Description

This example creates a HTML file containing multiple input fields, a pushbutton, and JavaScript functions for handling the input. The form INPUT uses method="post" to send the input data. The HTML control in CFW uses the parameter QUERY_TABLE of the event SAPEVENT to pass this data to its handler. The class CL_ABAP_BROWSER (a wrapper for the class CL_GUI_HTML_VIEWER also passes this parameter and the user input can be used in the ABAP program.

Also see the corresponding example for ICF.

SAP 实例 6 HTML input的更多相关文章

  1. SAP 实例 10 List Box with value list from input help

    *&---------------------------------------------------------------------* *& Report DEMO_DROP ...

  2. SAP 实例 4 CFW

    *&---------------------------------------------------------------------* *& Report demo_cfw ...

  3. Vue实例：演示input 和 textarea 元素中使用 v-model 实现双向数据绑定

    最终效果: 主要代码: <template> <div> <p>input 元素:</p> <input v-model="messag ...

  4. SAP 实例- 下拉框

    效果图 源代码 REPORT rsdemo_dropdown_listbox . DATA init. TABLES scarr. TABLES spfli. TABLES sflight. TABL ...

  5. SAP 实例- 页签tabsrip

    屏幕页签:项目上有一需求,对标准TCODE 一个屏幕增加一个页签.于是做了个例子. 下面屏幕有两个页签. 我们来看一下屏幕结构.100屏幕是主屏幕,101,102是子屏幕,对应页签test1,test ...

  6. SAP 实例 12 List Box with Value List from PBO Module

    REPORT demo_dynpro_dropdown_listbox. DATA: name TYPE vrm_id, list TYPE vrm_values, value LIKE LINE O ...

  7. SAP 实例 8 HTML from the MIME Repository

    REPORT demo_html_from_mime. CLASS mime_demo DEFINITION. PUBLIC SECTION. CLASS-METHODS main. PRIVATE ...

  8. SAP 实例 5 CFW Events

    REPORT demo_custom_control . * Declarations ***************************************************** CL ...

  9. SAP 实例 3 Context Menus

    REPORT demo_dynpro_context_menu. DATA: field1 TYPE i VALUE 10, field2 TYPE p DECIMALS 4. DATA: prog ...

随机推荐

  1. 物理层（PHY）

    一.物理层的定义 物理层是OSI的第一层,它虽然处于最底层,却是整个开放系统的基础.物理层为设备之间的数据通信提供传输媒体及互连设备,为数据传输提供可靠的环境.如果您想要用尽量少的词来记住这个第一层, ...

  2. 日志、第三方模块(openpyxl模块)

    目录 1.日志模块 2.第三方模块 内容 日志模块 1.日志模块的主要组成部分 1.logger对象:产生日志 无包装的产品 import logging logger = logging.getLo ...

  3. Ubuntu 下 Apache2 和 PHP 服务器环境配置

    Ubuntu 下 Apache2 和 PHP 服务器环境配置 1.简介 本文主要是 Ubuntu 下 Apache2 和 PHP 服务器环境配置方法,同样适用于 Debian 系统:Ubuntu 20 ...

  4. postgreSQL使用sql归一化数据表的某列，以及出现“字段 ‘xxx’ 必须出现在 GROUP BY 子句中或者在聚合函数中”错误的可能原因之一

    前言: 归一化(区别于标准化)一般是指,把数据变换到(0,1)之间的小数.主要是为了方便数据处理,或者把有量纲表达式变成无量纲表达式,便于不同单位或量级的指标能够进行比较和加权. 不过还是有很多人使用 ...

  5. 【Hadoop】ZooKeeper组件

    目录 一.配置时间同步 二.部署zookeeper(master节点) 1.使用xftp上传软件包至~ 2.解压安装包 3.创建 data 和 logs 文件夹 4.写入该节点的标识编号 5.修改配置 ...

  6. 攻防世界-MISC:掀桌子

    这是攻防世界新手练习区的第八题,题目如下: 就给了一串16进制的字符串.哎,又是不懂,看了一下官方WP,说是将每两位16进制数转换为10进制,再减去128再转换为ASCII码.直接上脚本 str1 = ...

  7. 按照 Promise/A+ 规范逐行注释并实现 Promise

    0. 前言 面试官:「你写个 Promise 吧.」 我:「对不起,打扰了,再见!」 现在前端越来越卷,不会手写 Promise 都不好意思面试了(手动狗头.jpg).虽然没多少人会在业务中用自己实现 ...

  8. zabbix 添加监控交换机温度item

    首先需要获取到交换机温度对应的OID,可以官方文档进行查询(多为私有OID),以盛科为例 官方文档查询到温度节点对于的OID为 10.0.3.102 1.3.6.1.4.1.27975.37.1.3. ...

  9. 每天一个 HTTP 状态码 205

    205 Reset Content 205 Reset Content 表示服务器成功地处理了客户端的请求,要求客户端重置它发送请求时的文档视图.这个响应码跟 204 No Content 类似,也不 ...

  10. drools执行完某个规则后终止别的规则执行

    目录 1.背景 2.需求 3.实现方案 1.通过Fact判断 2.通过全局变量判断 3.通过halt方法 4.实现上述需求 4.1 drl 文件编写 4.2 运行结果 5.完整代码 1.背景 在我们开 ...