Chinaunix首页 | 论坛 | 博客
  • 博客访问: 7188924
  • 博文数量: 655
  • 博客积分: 10264
  • 博客等级: 上将
  • 技术积分: 8278
  • 用 户 组: 普通用户
  • 注册时间: 2007-06-04 17:47
个人简介

ABAP顾问

文章分类

全部博文(655)

文章存档

2017年(2)

2014年(8)

2013年(3)

2012年(2)

2011年(18)

2010年(102)

2009年(137)

2008年(274)

2007年(134)

分类:

2009-01-11 18:28:36

REPORT  z_barry_table_field.

TYPE-POOLS slis.

DATA: it_fields TYPE STANDARD TABLE OF dd03p ,
      gs_layout TYPE slis_layout_alv .

PARAMETERS p_table TYPE ddobjname OBLIGATORY.

CALL FUNCTION 'DDIF_TABL_GET'
  EXPORTING
    name          = p_table
    langu         = sy-langu
  TABLES
    dd03p_tab     = it_fields
  EXCEPTIONS
    illegal_input = 1
    OTHERS        = 2.

*DELETE it_fields WHERE fieldname+0(1) = '.'.

gs_layout-zebra             = 'X'.
gs_layout-colwidth_optimize = 'X'.
gs_layout-no_keyfix         = 'X'.

CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
  EXPORTING
    i_structure_name   = 'DD03P'
    is_layout          = gs_layout
  TABLES
    t_outtab           = it_fields
  EXCEPTIONS
    program_error      = 1
    OTHERS             = 2.

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

chinaunix网友2009-01-12 23:12:09

老大这东西我也会

chinaunix网友2009-01-12 12:42:30

谢谢白老师!