1个回答
2013-11-13
展开全部
这是我刚接触report的时候下的,转给你参考[这个贴子最后由tanglun在 2003/12/03 01:39pm 第 1 次编辑]在这里我给初学者示范一个实例,讲讲abap开发报表的简单过程。程序的正确与否我们不与讨论,我们只关心这个程序的编写过程。首先,在任何程序的开始阶段,我们都要确定将会用到的表。我们所讲的这个程序是查询采购订单是否完成的。将会用到以下三个表:EKKO,EKPO,EKET。程序的开头为:REPORTTEST.TABLES:EKKO,EKET,EKPO.现在我们已经定义了所要用到的表,接下来的工作就是定义内表和数据。内表是用来存储我们从上述三个表中查询到的数据。相关定义如下:DATA: BEGIN OF ITAB OCCURS 0, EBELN LIKE EKKO-EBELN, MENGE LIKE EKPO-MENGE, WEMNG LIKE EKET-WEMNG, END OF ITAB.现在我们已经定义完了内表ITAB。接着我们该定义数据了。数据就像C语言里的常量。其相关定义如下:DATA: MATNRLIKE EKPO-MATNR, MENGELIKE EKPO-MENGE, WEMNGLIKE EKET-WEMNG, EBELNLIKE EKPO-EBELN.到这里我们已经把程序里要用到的数据和内表都定义好了。接着我们要做的工作就是选择屏幕。所谓选择屏幕是指程序运行时,你要从屏幕上输入的内容。比如说一个程序运行时,你输入一个物料号,就可以得到该物料的当前的库存数,那你就要编写一个屏幕以供查询者输入查询的条件。其相关定义如下:SELECT-OPTIONS: EBELN1 FOREKKO-EBELN, BEDAT FOREKKO-BEDAT, EKGRP FOREKKO-EKGRP.PARAMETERS:R1 RADIOBUTTON GROUP RADI, R2 RADIOBUTTON GROUP RADI, R3 RADIOBUTTON GROUP RADI.现在我们已经完成了程序的前期准备,接着就开始真正的到表里查询我们需要的相关数据了。其代码如下:SELECTK"EBELN INTO CORRESPONDING FIELDS OF TABLE ITAB FROM EKKO AS K WHERE K"EBELN IN EBELN1 AND K"BEDAT IN BEDAT AND K"EKGRP IN EKGRP.LOOP AT ITAB. SELECT SUM( MENGE ) INTO ITAB-MENGE FROM EKPO WHERE EBELN EQ ITAB-EBELN. MODIFY ITAB.ENDLOOP.
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
面向科技
2024-12-04 广告
2024-12-04 广告
数据清洗、对账及分析是数据处理的关键环节。数据清洗指对原始数据进行预处理,包括去除重复、纠正错误、填补缺失值等,以确保数据质量。对账则是将不同来源的数据进行比对,核实数据的一致性,常用于财务、库存管理等领域的核对工作。分析则基于清洗后的数据...
点击进入详情页
本回答由面向科技提供
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询