[Home] [Help]
39: -- Procedure Add_SQL_Error
40: --
41: PROCEDURE Add_SQL_Error
42: ( calling_fn in varchar2,
43: p_log_level_rec in fa_api_types.log_level_rec_type default null) IS
44:
45: BEGIN
46:
47: -- reset the global FA_ERROR_LEVEL to 1
82: token5 in varchar2 := null,
83: value5 in varchar2 := null,
84: translate in boolean := FALSE,
85: application in varchar2 := 'OFA',
86: p_log_level_rec in fa_api_types.log_level_rec_type default null,
87: p_message_level in number := FND_LOG.LEVEL_ERROR) IS
88:
89: BEGIN
90:
150: mesg4 in out nocopy varchar2,
151: mesg5 in out nocopy varchar2,
152: mesg6 in out nocopy varchar2,
153: mesg7 in out nocopy varchar2
154: , p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) IS
155:
156: BEGIN
157:
158: mesg_count := fnd_msg_pub.count_msg;
170: -- Procedure Set_Message_Level
171: --
172: PROCEDURE Set_Message_Level (
173: message_level in number
174: , p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) IS
175:
176: BEGIN
177:
178: if (message_level is null) then
218: --
219: PROCEDURE Write_Msg_Log
220: ( msg_count in number,
221: msg_data in varchar2
222: , p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) IS
223:
224: -- For test purpose, you may set h_coded to TRUE. Then messages will be
225: -- printed out in encoded format instead of translated format. This is useful
226: -- if you want to test the message, but if you have not registered your