arron99

saper

  博客中心 :: 首页 :: 新随笔 :: 联系 :: 聚合  :: 登录 ::
  515 随笔 :: 0 文章 :: 235 评论 :: 0 Trackbacks
Cached @ 2025/7/6 13:41:14Control ASP.skins_cogitation_controls_blogstats_ascx
<2006年11月>
2930311234
567891011
12131415161718
19202122232425
262728293012
3456789

留言簿(2)

随笔档案

文章档案

搜索

最新评论

阅读排行榜

评论排行榜

Cached @ 2025/7/6 13:41:14Control ASP.skins_cogitation_controls_singlecolumn_ascx
This chapter contains functions that could be associated with BASIS type of operations, such
as finding the IP address of a terminal and opening FTP sessions.
ABAP4_CALL_TRANSACTION
Summary
Initiates a transaction in a separate window.
Description
Basically a wrapper to CALL TRANSACTION. Within an ABAP program, this will start
an additional transaction. The normal rules of authorisation to run the transaction naturally
still apply.
Parameters
EXPORTING
TCODE Contains the transaction code to be called.
SKIP_SCREEN If set, will skip the first screen of the transaction.
MODE_VAL Display mode:
Value Meaning
A (default) Display the screens
E Only display screens if an error occurs
N Do not display (background mode)
UPDATE_VAL Update mode:
Value Meaning
A (default) Asynchronous update
S Synchronous update
L Local update
TABLES
USING_TAB BDC data for the transaction
SPAGPA_TAB Holds SPA\GPA parameters to fill input fields
MESS_TAB Contains any error messages from the transaction
2 Common SAP R/3 Functions Manual
Example
REPORT ZEXAMPLE.
DATA: BEGIN OF IMESS OCCURS 0.
INCLUDE STRUCTURE BDCMSGCOLL.
DATA: END OF IMESS.
CALL FUNCTION 慉BAP4_CALL_TRANSACTION?STARTING NEW TASK 慫TSK?BR>EXPORTING
TCODE = 慡E38?揝TART ABAP DEVELOPMENT
TABLES
MESS_TAB = IMESS
EXCEPTIONS
CALL_TRANSACTION_DENIED = 1
TCODE_INVALID = 2
OTHERS = 3.
IF SY-SUBRC <> 0.
LOOP AT IMESS.
WRITE:/IMESS-MSGV1,
IMESS-MSGV2,
IMESS-MSGV3.
ENDLOOP.
ENDIF.
See Also
HLP_MODE_CREATE, TH_REMOTE_TRANSACTION, TRANSACTION_CALL
ARFC_GET_TID
Summary
Returns the IP address of the server in hexadecimal.
Description
The IP address is returned from the function in hexadecimal, so this should be formatted to
the normal dotted notation of an IP address before being displayed to the user. The example
will do this for you.
Parameters
IMPORTING
TID Contains the IP address of the user抯 computer that runs the function.
Example
REPORT ZEXAMPLE.
DATA: TERM_IP LIKE ARFCTID,
IP_ADDR(20) TYPE C,
IP_BIT(3) TYPE C,
HOSTADDR(4) TYPE X,
HEX_CHAR TYPE X,
HADDR_X(8) TYPE X,
IP_LEN TYPE I,
HEXIP_LEN TYPE I VALUE 0,
HEXIP TYPE I,
CHAR_HEX TYPE I.
CALL FUNCTION 慉RFC_GET_TID?BR>IMPORTING
TID = TERM_IP.
HOSTADDR = TERM_IP(8).
HADDR_X = HOSTADDR.
DESCRIBE FIELD HOSTADDR LENGTH HEXIP_LEN.
HEXIP_LEN = HEXIP_LEN ?1.
DO HEXIP_LEN TIMES.
HEX_CHAR = HADDR_X + HEXIP(1).
CHAR_HEX = HEX_CHAR.
IP_BIT = CHAR_HEX.
CONDENSE IP_BIT.
IP_LEN = STRLEN(IP_ADDR).
IP_ADDR + IP_LEN = IP_BIT.
IP_LEN = STRLEN(IP_ADDR).
IP_ADDR + IP_LEN = ??
HEXIP = HEXIP + 1.
ENDDO.
HEX_CHAR = HADDR_X + HEXIP(1).
CHAR_HEX = HEX_CHAR.
IP_BIT = CHAR_HEX.
CONDENSE IP_BIT.
IP_LEN = STRLEN(IP_ADDR).
IP_ADDR + IP_LEN = IP_BIT.
WRITE:/ 慡ERVER IP ADDRESS IS:? IP_ADDR.
See Also
TERMINAL_ID_GET, TH_USER_INFO
AUTHORITY_CHECK_DATASET
Summary
Checks file access authorisation.
Chapter 1 ?System 3
4 Common SAP R/3 Functions Manual
Description
This function module allows you to check the user抯 authorisation to access files (with commands
OPEN DATASET, READ DATASET, TRANSFER and DELETE DATASET). A check
should be performed before opening a file. This function is well documented.
Parameters
EXPORTING
PROGRAM Program containing file access command (default: current program)
ACTIVITY Access type required to file:
Value Meaning
READ Read file
WRITE Change file
READ_WITH_FILTER Read file with filter function
WRITE_WITH_FILTER Change file with filter function
DELETE Delete file
FILENAME Name of accessed file
Example
REPORT ZEXAMPLE.
DATA: BEGIN OF ITAB OCCURS 0,
ATYPE(20),
END OF ITAB.
PARAMETER P_FNAME LIKE AUTHB-FILENAME.
PARAMETERS:P_READ AS CHECKBOX DEFAULT 慩?
P_WRITE AS CHECKBOX DEFAULT 慩?
P_RWF AS CHECKBOX DEFAULT 慩?
P_WWF AS CHECKBOX DEFAULT 慩?
P_DELETE AS CHECKBOX DEFAULT 慩?
CLEAR: ITAB, ITAB[].
IF P_READ EQ 慩?
ITAB-ATYPE = 慠EAD?
APPEND ITAB.
ENDIF.
IF P_WRITE EQ 慩?
ITAB-ATYPE = 慦RITE?
APPEND ITAB.
ENDIF.
IF P_RWF EQ 慩?
ITAB-ATYPE = 慠EAD_WITH_FILTER?
APPEND ITAB.
ENDIF.
IF P_WWF EQ 慩?
ITAB-ATYPE = 慦RITE_WITH_FILTER?
APPEND ITAB.
ENDIF.
IF P_DELETE EQ 慩?
ITAB-ATYPE = 慏ELETE?
APPEND ITAB.
ENDIF.
LOOP AT ITAB.
CALL FUNCTION 慉UTHORITY_CHECK_DATASET?BR>EXPORTING
ACTIVITY = ITAB-ATYPE
FILENAME = P_FNAME
EXCEPTIONS
NO_AUTHORITY = 1
ACTIVITY_UNKNOWN = 2
OTHERS = 3.
CASE SY-SUBRC.
WHEN 0.
WRITE:/ 慪ou have? ITAB-ATYPE, 慳ccess to? P_FNAME.
WHEN 1.
WRITE:/ 慪ou do not have? ITAB-ATYPE, 慳ccess to? P_FNAME.
WHEN OTHERS.
WRITE:/ 慐rror with function?
ENDCASE.
ENDLOOP.
BP_EVENT_RAISE
Summary
Triggers an event in the background-processing system from an ABAP program.
Description
Events let you start background jobs under defined conditions. The event IDs are defined in
transaction SM62 (event arguments are specified when the job is scheduled).
When you define a new event, a transport request must be manually created if it is to be
transported to another system.
Parameters
EXPORTING
EVENTID The event name, defined in SM62
EVENTPARM Job can be scheduled to wait for an EVENTID or combination of EVENTID
and EVENTPARM
Example
REPORT ZEXAMPLE.
DATA: Q_EVENT LIKE TBTCJOB-EVENTID VALUE 慡AP_QEVENT?
Q_EVENTPARM LIKE TBTCJOB-EVENTPARM.
Chapter 1 ?System 5
6 Common SAP R/3 Functions Manual
CALL FUNCTION 態P_EVENT_RAISE?BR>EXPORTING
EVENTID = Q_EVENT
EVENTPARM = Q_EVENTPARM
EXCEPTIONS
BAD_EVENTID = 1
EVENTID_DOES_NOT_EXIST = 2
EVENTID_MISSING = 3
RAISE_FAILED = 4
OTHERS = 5.
IF SY-SUBRC NE 0.
WRITE:/ 慐VENT? Q_EVENT, 慛OT RAISED?
ELSE.
WRITE:/ 慐VENT? Q_EVENT, 慠AISED SUCCESSFULLY?
ENDIF.
See Also
GET_JOB_RUNTIME_INFO
CAT_CHECK_RFC_DESTINATION
Summary
Checks for the RFC destinations and connections on a client.
Description
RFC destinations are defined within SAP using transaction code SM59.
Parameters
EXPORTING
RFCDESTINATION System to be tested
IMPORTING
MSGV1 RFC message
MSGV2 RFC message
RFC_SUBRC RFC return code
Example
REPORT ZEXAMPLE.
DATA: RFCDESTINATION LIKE RSCAT-RFCDEST,
V_MSGV1 LIKE SY-MSGV1,
V_MSGV2 LIKE SY-MSGV2,
V_SUBRC LIKE SYST-SUBRC.
CALL FUNCTION 慍AT_CHECK_RFC_DESTINATION?BR>EXPORTING
RFCDESTINATION = RFCDESTINATION
IMPORTING
MSGV1 = V_MSGV1
MSGV2 = V_MSGV2
RFC_SUBRC = V_SUBRC.
IF V_SUBRC NE 0.
WRITE:/ 慐RROR:? V_MSGV1, V_MSGV2.
ELSE.
SET PARAMETER ID 慠FC?FIELD RFCDESTINATION.
WRITE:/ 慍ONNECTION TO? RFCDESTINATION, 慖S WORKING?
ENDIF.
See Also
CAT_PING, TH_SERVER_LIST
CAT_PING
Summary
Checks RFC system and configuration.
Description
Tests if an RFC system is reachable and returns configuration data if possible.
Parameters
EXPORTING
RFCDESTINATION System to be tested
IMPORTING
SYSINFO Structure with RFC system configuration information
Example
REPORT ZEXAMPLE.
DATA: BEGIN OF SYSINFO.
INCLUDE STRUCTURE CATFR.
DATA: END OF SYSINFO.
DATA RFC_DESTINATION LIKE RFCDES-RFCDEST.
SYSINFO = SPACE.
CALL FUNCTION 慍AT_PING?DESTINATION RFC_DESTINATION
IMPORTING
SYSINFO = SYSINFO
Chapter 1 ?System 7
8 Common SAP R/3 Functions Manual
EXCEPTIONS
COMMUNICATION_FAILURE = 1
SYSTEM_FAILURE = 2.
IF SY-SUBRC NE 0.
WRITE:/ 慍OULD NOT CONNECT TO? RFC_DESTINATION.
ELSE.
WRITE:/ SYSINFO.
ENDIF.
See Also
CAT_CHECK_RFC_DESTINATION
DEQUEUE_ES_PROG
Summary
Releases program locks.
Description
This function releases a lock in a program that has been set by ENQUEUE_ES_PROG.
Parameters
EXPORTING
NAME Program name to lock
Example
REPORT ZEXAMPLE.
DATA V_PGM TYPE PROGRAMM.
CALL FUNCTION 慏EQUEUE_ES_PROG?BR>EXPORTING
NAME = V_PGM.
WRITE:/ 慞ROGRAM? V_PGM, 慖S UNLOCKED?
See Also
DEQUEUE_ESFUNCTION, ENQUEUE_ES_PROG
ENQUEUE_ES_PROG
Summary
Prevents the parallel execution of a program.
Description
This function creates a lock in a program that should not be processed more than once, simultaneously.
The lock remains in place until either the DEQUEUE_ES_PROG function module
is called or the transaction is completed (with an implicit DEQUEUE_ALL call).
Parameters
EXPORTING
NAME Program name to lock
SCOPE Controls how the lock is passed to the update program:
Value Meaning
1 The lock is not passed to the update program. The lock
is removed when the transaction ends.
2 (default) The lock is passed to the update program. The update
program is responsible for removing the lock.
3 The lock is passed to the update program. The lock must
be removed in both the interactive program and in the
update program.
Example
REPORT ZEXAMPLE.
DATA V_PGM TYPE PROGRAMM.
CALL FUNCTION 慐NQUEUE_ES_PROG?BR>EXPORTING
NAME = V_PGM
SCOPE = ??BR>EXCEPTIONS
FOREIGN_LOCK = 1
SYSTEM_FAILURE = 2
OTHERS = 3.
IF SY-SUBRC NE 0.
WRITE:/ 慙OCK FAILED ON PROGRAM ZPROGRAM?
ELSE.
WRITE:/ V_PGM, 慡UCCESSFULLY LOCKED AGAINST SIMULTANEOUS PROCESSING?
ENDIF.
See Also
DEQUEUE_ES_PROG, ENQUEUE_ESFUNCTION
FTP_COMMAND
Summary
Executes a command on an FTP server.
Chapter 1 ?System 9
10 Common SAP R/3 Functions Manual
Description
Passes an FTP command to an FTP server for processing.
Parameters
EXPORTING
HANDLE Unique ID identifying FTP session (from FTP_CONNECT)
COMMAND Any FTP command. For example, DIR lists files in a directory
TABLES
DATA Results from FTP command. For example, filenames in a directory
Example
See FTP_CONNECT
See Also
FTP_CONNECT
FTP_CONNECT
Summary
Opens a connection to the FTP server.
Description
FTP_CONNECT requires an encrypted password to work. It returns a unique ID (handle)
that can be used with other FTP functions (e.g. FTP_COMMAND).
For the RFC_DESTINATION value, you can use CAT_CHECK_RFC_DESTINATION to
determine the FTP server as defined in SAP.
Parameters
EXPORTING
USER Username to the FTP server
PASSWORD Password valid for the FTP server (encrypted)
HOST FTP server name
RFC_DESTINATION The server name as configured in SAP
IMPORTING
HANDLE Unique ID created for this FTP session
Example
REPORT ZEXAMPLE.
DATA: FTP_USER(64) VALUE 慒TPUSER?
FTP_PWD(64) VALUE 慒TPPWD?
FTP_HOST(50) VALUE 慒TPSERVER?
RFC_DEST LIKE RSCAT-RFCDEST VALUE 慠FC_SERVER?
DATA: HDL TYPE I,
KEY TYPE I VALUE 26101957,
DSTLEN TYPE I.
DATA: BEGIN OF FTP_DATA OCCURS 0,
LINE(132) TYPE C,
END OF FTP_DATA.
DESCRIBE FIELD FTP_PWD LENGTH DSTLEN.
CALL 慉B_RFC_X_SCRAMBLE_STRING?BR>ID 慡OURCE?FIELD FTP_PWD
ID 慘EY?FIELD KEY
ID 慡CR?FIELD 慩?BR>ID 慏ESTINATION?FIELD FTP_PWD
ID 慏STLEN?FIELD DSTLEN.
CALL FUNCTION 慒TP_CONNECT?BR>EXPORTING
USER = FTP_USER
PASSWORD = FTP_PWD
HOST = FTP_HOST
RFC_DESTINATION = RFC_DEST
IMPORTING
HANDLE = HDL
EXCEPTIONS
NOT_CONNECTED = 1
OTHERS = 2.
IF SY-SUBRC NE 0.
WRITE:/ 慍OULD NOT CONNECT TO? FTP_HOST.
ELSE.
WRITE:/ 慍ONNECTED SUCCESSFULLY. SESSION HANDLE IS? HDL.
CALL FUNCTION 慒TP_COMMAND?BR>EXPORTING
HANDLE = HDL
COMMAND = 慏IR?BR>TABLES
DATA = FTP_DATA
EXCEPTIONS
TCPIP_ERROR = 1
COMMAND_ERROR = 2
DATA_ERROR = 3
OTHERS = 4.
IF SY-SUBRC NE 0.
WRITE:/ 慍OULD NOT EXECUTE FTP COMMAND?
Chapter 1 ?System 11
12 Common SAP R/3 Functions Manual
ELSE.
LOOP AT FTP_DATA.
WRITE: / FTP_DATA.
ENDLOOP.
CALL FUNCTION 慒TP_DISCONNECT?BR>EXPORTING
HANDLE = HDL
EXCEPTIONS
OTHERS = 1.
IF SY-SUBRC NE 0.
WRITE:/ 慍OULD NOT DISCONNECT FROM FTP SERVER?
ELSE.
WRITE:/ 慏ISCONNECTED FROM FTP SERVER?
ENDIF.
ENDIF.
ENDIF.
See Also
CAT_CHECK_RFC_DESTINATION, FTP_COMMAND, FTP_DISCONNECT
分享按钮发布于: 2006-11-22 14:07 arron99 阅读(1022) 评论(0)  编辑 收藏

评论

标题
姓名
主页
内容 
  登录  使用高级评论  Top 订阅回复  取消订阅
[使用Ctrl+Enter键可以直接提交]