ABAP--如何在ABAP中使用日志管理

1、sap提供标准两数來操作应川h志，这篇文章将详细介绍如何使川应川h志。1> 和关 tcodeslgo > used to maintain the log objectslg1 -> used to view the log2、配置步骤1）运行slgo,系统将弹出一个提示窗口，点击“ok“按钮；2）点击噺增”按钮，在对象名中输入”ztestlog”,在描述中”test log“，并点击”保存”按钮;3、开发步骤1）川se11创建一个结构乙log_message,结构的字段如f：compone ntcomp onent typemsgtysymsgtymsg_text_1sym

2、sgvmsg_text_2symsgvmsg_text_3symsgvmsg_text_4symsgv2) 用se91创建消息类zmessage,并在999输入四个占位符(&)3) 用se37创建函数族”zlog”4) 在创建函数纽后创建函数,ziu_message_logging,*import parameters:l_log_object type balobj d -> application log: object name (application code)i extnumber type string -> application log: external

3、 idexport parameters: nonechanging parameters: nonetables parameters:t_log_message type z_log_messageexceptions:log_header_inconsistentlogging error代码如f:function ziu_message_logging."“local interface:*h importing *h reference(i_log_object) type balobj_d*" reference(i_extnumber) type string

4、*m tables*n t_log_message structure z_log_message*" exceptions*" log_header_inconsistent*n logging_error* author:ashim chowdhury* description: this function module is used insert messages in the* application logconstants: c_message type syst-msgid value message, c_999 type syst-msgno value

5、 '999'.data:l_log_handle type balloghndl, l_s_log type bal_s_log, l_dummy type string, l_ext_no type bal_s_log-extnumber, l_s_mdef type bal_s_mdef. if t_log_message is not initial. lsjog-object = l_log_object. i_ext_no = l_extnumber.i s log-extnumber = i ext no.* create the log with header d

6、atacall function 'bal_log_create'exportingi_s_log = l_s_logimportinge log handle = i log handleexceptionslog_header_inconsistent = 1others = 2.if sy-subrc <> 0.case sy-subrcwhen 1.raise log_header_inconsistent.when othersraise logging_error endcase.endif.i_s_mdef-log_handle = l_log_ha

7、ndle.* set the default valuecall function ,bal_glb_msg_defaults_set,exportingi s msg defaults = i s mdefexceptionsothers = 0.* loop the message table and write the messages into the logloop at t_log_message* use the message type zmessage and msg no 999* issue the message in a dummy variablemessage i

8、d c_message type t_log_message-msgty number c_999 with t_log_message-msg_text_1 t_log_message-msg_text_2 t_log_message-msg_text_3 t_log_message-msg_text_4 into l_dummy.* the parameters set by message statement will be used* add the message in the logperform msg_add.endloop * save logs in the databas

9、ecall function ,bal_db_save,exporting l_save_all = xexceptionslog_not_found = 1save_not_allowed = 2numbering_error = 3others = 4if sy-subrc <> 0.message id sy-msgid type sy-msgty number sy-msgnowith sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.endif.endif.endfunction.* form msg_addadd the message to th

10、e logform msg_adddata:l_s_msg type bal_s_msg.* define data of message for application logl_s_msg-msgty = sy-msgty.i_s_msg-msgid = sy-msgid l_s_msg-msg no = sy-msgno.i_s_msg-msgv1 = sy-msgv1.i_s_msg-msgv2 = sy-msgv2.i_s_msg-msgv3 = sy-msgv3 i_s_msg-msgv4 = sy-msgv4.* add this message to log file* (l_

11、log_handle is not specified, we want to add to the default log.* if it does not exist we do not care =>exceptions log_not_found = 0)call function 'bal_log_msg_add'exporting* l_log_handle =i_s_msg = l_s_msgexceptionslog_not_f ound = 0others = 1.if sy-subrc <> 0.message id sy-msgid ty

12、pe sy-msgty number sy-msgnowith sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4endif.endform.5) 在程序屮使川ziu.message.logging函数來维护应用fl志，代码如下data declarations* internal table for message loggingdata: it_log_message type standard table of z_log_message, wa_log_message type z_log_message,l_ext_number type string.con s

13、tants:c_obj_zxiproxy type balobj_d value 'ztestlog*.* now populate the internal table with the log messages as shown below. wa_log_message-* msgty is the type of the message* e -> error, w -> warning, s -> success* logging code for insert message into logclear wa_log_messagewa_log_messa

14、ge-msgty = "e1. “ can use w or s wa_log_message-msg_text_1 = < message text 1> wa_log_message-msg_text_2 = < message text 2> wa_log_message-msg_text_3 = < message text 3> wa_log_message-msg_text_4 = < message text 4>* append the message into the internal table append wa_

15、log_message to it_log_messageat the end transfer the log message to the system log by calling function module ziu_message_logging. i_ext_number w川 bt any str泊g of your choice.* function module ziu_message_logging will do the logging* ijog_object is the object type (to be configrd using txn slgocall function ,ziu_message_logging,exportingi_log_object = c_obj_zxiproxyi_extnu mber = l_ext_numbertablest_lo