Chinaunix首页 | 论坛 | 博客
  • 博客访问: 484197
  • 博文数量: 199
  • 博客积分: 0
  • 博客等级: 民兵
  • 技术积分: 1902
  • 用 户 组: 普通用户
  • 注册时间: 2020-05-14 13:25
个人简介

代码5S

文章分类

全部博文(199)

文章存档

2021年(5)

2020年(194)

我的朋友

分类: 其他平台

2020-05-26 14:07:04

*&---------------------------------------------------------------------*
*& Report  ZDEMO06
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*

REPORT zdemo06.

*----------------------------------------------------------------------*
*       CLASS demo DEFINITION
*----------------------------------------------------------------------*
*
*----------------------------------------------------------------------*
CLASS demo DEFINITION.
  PUBLIC SECTION.
    CLASS-METHODS main.
ENDCLASS.                    "demo DEFINITION

*----------------------------------------------------------------------*
*       CLASS demo IMPLEMENTATION
*----------------------------------------------------------------------*
*
*----------------------------------------------------------------------*
CLASS demo IMPLEMENTATION.
  METHOD main.
    DATA:BEGIN OF gs_itab,
     matnr TYPE makt-matnr,
     maktx TYPE makt-maktx,
    END OF gs_itab,
    gt_itab LIKE TABLE OF gs_itab,
          xmlstr TYPE xstring.

    SELECT matnr maktx UP TO 20 ROWS
      INTO TABLE gt_itab
      FROM makt.

    CALL TRANSFORMATION id
                        SOURCE table gt_itab
                        RESULT XML xmlstr.

    cl_abap_browser=>show_xmlxml_xstring xmlstr ).
  ENDMETHOD.                    "main
ENDCLASS.                    "demo IMPLEMENTATION

START-OF-SELECTION.
  demo=>main).

阅读(1750) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~