CharlieShen

新人，大家多关照啦@_@

:: 登录 ::

3994 随笔 :: 0 文章 :: 20 评论 :: 0 Trackbacks

Cached @ 2025/4/27 0:37:17Control ASP.skins_cogitation_controls_blogstats_ascx

2007年8月

日

一

二

三

四

五

六

Cached @ 2025/4/27 0:37:17Control ASP.skins_cogitation_controls_singlecolumn_ascx

	SYS INFO
	REPORT z_barry_sysinfo LINE-SIZE 400. TABLES:shkontext. DATA: BEGIN OF version_info OCCURS 0, line(400), END OF version_info. DATA: database_release(10). CALL 'SAPCORE' ID 'ID' FIELD 'VERSION' ID 'TABLE' FIELD version_info-sys. LOOP AT version_info. WRITE / version_info. ENDLOOP. CALL 'GET_PARAM_TCOD' ID 'PTCOD' FIELD shkontext-tcode. CALL FUNCTION 'DB_GET_RELEASE' IMPORTING release = database_release. WRITE:/ 'Tcode:' , 22 shkontext-tcode. WRITE:/ 'DB-Release:', 22 database_release. WRITE:/ 'SAP-Release:', …… <DIV><FONT face=宋体>REPORT z_barry_sysinfo LINE-SIZE 400.</FONT></DIV> <DIV><FONT face=宋体>TABLES:shkontext.</FONT></DIV> <DIV><FONT face=宋体>DATA: BEGIN OF version_info OCCURS 0,<BR>        line(400),<BR>      END OF version_info.</FONT></DIV> <DIV><FONT face=宋体>DATA: database_release(10).</FONT></DIV> <DIV><FONT face=宋体>CALL 'SAPCORE' ID 'ID' FIELD 'VERSION'<BR>ID 'TABLE' FIELD version_info-sys.</FONT></DIV> <DIV><FONT face=宋体>LOOP AT version_info.<BR>  WRITE / version_info.<BR>ENDLOOP.</FONT></DIV> <DIV><FONT face=宋体>CALL 'GET_PARAM_TCOD'<BR>     ID 'PTCOD' FIELD shkontext-tcode.</FONT></DIV> <DIV><FONT face=宋体>CALL FUNCTION 'DB_GET_RELEASE'<BR>     IMPORTING<BR>          release = database_release.<BR>WRITE:/ 'Tcode:' , 22 shkontext-tcode.<BR>WRITE:/ 'DB-Release:', 22 database_release.<BR>WRITE:/ 'SAP-Release:', ……

分享按钮发布于： 2007-08-29 07:31 CharlieShen 阅读(207) 评论(0) 编辑收藏