CharlieShen

新人，大家多关照啦@_@
  博客中心 :: 首页 :: 新随笔 :: 联系 :: 聚合  :: 登录 ::
  3994 随笔 :: 0 文章 :: 20 评论 :: 0 Trackbacks
Cached @ 2025/4/28 18:06:31Control ASP.skins_cogitation_controls_blogstats_ascx
<2007年9月>
日一二三四五六
2627282930311
2345678
9101112131415
16171819202122
23242526272829
30123456

留言簿(14)

随笔档案

文章档案

搜索

最新评论

阅读排行榜

评论排行榜

Cached @ 2025/4/28 18:06:31Control ASP.skins_cogitation_controls_singlecolumn_ascx
定义TABLE的读写属性
定义TABLE的读写属性
匿名用户发表评论于 2007-7-18 15:18:53,回复此帖
WHEN 'READWR'
*当单击按钮时,第一列为只读,其他列读写切换
LOOP AT TBL1-CONLS INTO ACOL WHERE INDEX GT 0.
IF SY-TABIX = 1.
ACOL-SCREEN-INPUT = '0'.
ELSE.
IF ACOL-SCREEN-INPUT = '0'.
ACOL-SCREEN-INPUT = '1'.
ELSEIF ACOL-SCREEN-INPUT = '1'.
ACOL-SCREEN-INPUT = '0'.
ENDIF.
MODIFY TBL1-COLS FROM ACOL INDEX SY-TABIX.
ENDLOOP.
分享按钮发布于： 2007-09-05 08:29 CharlieShen 阅读(268) 评论(0)  编辑 收藏