Chinaunix首页 | 论坛 | 博客
  • 博客访问: 93781
  • 博文数量: 38
  • 博客积分: 0
  • 博客等级: 民兵
  • 技术积分: 460
  • 用 户 组: 普通用户
  • 注册时间: 2014-12-27 21:11
文章分类

全部博文(38)

我的朋友

分类: 信息化

2015-05-10 21:39:14

REPORT  ZTHOMAS_DEMO.
tables: spfli,sflight.
data: a type table of spfli,
     b type table of sflight.
call function 'BCALV_GENERATE_TEST_DATA'
  EXPORTING
    i_amount_spfli = 100       " int4 Natural Number 要初始化的数量 i_amount_sflight = 100 " int4 Natural Number要初始化的数量 tables ET
    TABLES
    et_SPFLI         = a
    ET_SFLIGHT     = b.
commit work and wait.
DELETE ADJACENT DUPLICATES FROM a comparing CARRID CONNID.
DELETE ADJACENT DUPLICATES FROM b comparing CARRID CONNID FLDATE.
delete from spfli. delete from sflight.


insert spfli from table a.
insert sflight from table b.
data len type i.
describe table a lines len.
write: 'spfli内表新增的行数是:', LEN.   describe table b lines len.
write: / , 'sflight内表新增的行数是:', LEN.    data: MAX_ROWS type i,       I_DROP type i,        ET_OUTTAB type ALV_T_GEN.
call function 'BCALV_GENERATE_ALV_T_T2'
  EXPORTING
    I_MAX_ROWS = 20
    I_DROP     = 2
  IMPORTING
    ET_OUTTAB  = ET_OUTTAB.
阅读(930) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~