注册 登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

黑山老妖的博客

 
 
 

日志

 
 
关于我

主要用来存放收集的资料,几乎都是转贴的东西!感谢原作者!

网易考拉推荐

查找锁定函数  

2008-06-17 15:23:02|  分类: ABAP |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |

REPORT  ZRFI0090 LINE-COUNT 70
                 LINE-SIZE  255
                 NO STANDARD PAGE HEADING.
type-pools: slis.
tables: DD02L,dd26s.
data: begin of g_tab occurs 10,
  TABNAME like dd26s-TABNAME,
  VIEWNAME type dd26s-VIEWNAME,
  ename like EMFIN-FBEMFIN,
  dname like EMFIN-FBEMFIN,
end of g_tab.
data g_fcat  type slis_t_fieldcat_alv.
data:  g_fieldcat type slis_fieldcat_alv.
select-options s_table for dd02l-TABNAME default 'VBAK'.

end-of-selection.
  select dd26s~TABNAME dd25l~VIEWNAME
  INTO CORRESPONDING FIELDS OF TABLE g_tab
  from dd26s
  inner join dd25l
    on dd26s~VIEWNAME = dd25l~VIEWNAME
       and dd25l~AGGTYPE = 'E'
    where TABNAME in s_table.
  loop at g_tab.
    concatenate 'ENQUEUE_' g_tab-VIEWNAME into g_tab-ename.
    concatenate 'DEQUEUE_' g_tab-VIEWNAME into g_tab-dname.
    modify g_tab.
  endloop.

  call function 'REUSE_ALV_FIELDCATALOG_MERGE'
    EXPORTING
      i_program_name     = 'ZTEST4'
      I_INTERNAL_TABNAME = 'G_TAB'
      i_inclname         = 'ZTEST4'
    CHANGING
      ct_fieldcat        = g_fcat.

  g_fieldcat-fieldname = 'ENAME'.
  g_fieldcat-seltext_s = '?????'.
  append g_fieldcat to g_fcat.

 g_fieldcat-fieldname = 'DNAME'.
  g_fieldcat-seltext_s = '?????'.
  append  g_fieldcat to g_fcat.

  call function 'REUSE_ALV_GRID_DISPLAY'
    exporting
*      i_callback_program       = repname
*      i_callback_user_command  = g_user_command
*      i_structure_name         = 'INV'
*      is_layout                = layout
       it_fieldcat              = g_fcat
*      is_variant               = g_variant
*      it_events                = events[]
*      i_callback_pf_status_set = 'F01_ALV_EVENT_PF_STATUS_SET'
    tables
      t_outtab                 = g_tab.

  评论这张
 
阅读(146)| 评论(0)
推荐 转载

历史上的今天

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2018