102: l_mesg_count number := 0;
103: l_calling_fn varchar2(60) := 'fa_journals_pkg.write_errmsg_log';
104: BEGIN
105:
106: l_mesg_count := fnd_msg_pub.count_msg;
107:
108: if (l_mesg_count > 0) then
109: fnd_file.put(FND_FILE.LOG,
110: fnd_msg_pub.get(fnd_msg_pub.G_FIRST, l_encoded));
106: l_mesg_count := fnd_msg_pub.count_msg;
107:
108: if (l_mesg_count > 0) then
109: fnd_file.put(FND_FILE.LOG,
110: fnd_msg_pub.get(fnd_msg_pub.G_FIRST, l_encoded));
111: fnd_file.new_line(FND_FILE.LOG,1);
112:
113: for i in 1..(l_mesg_count-1) loop
114: fnd_file.put(FND_FILE.LOG,
111: fnd_file.new_line(FND_FILE.LOG,1);
112:
113: for i in 1..(l_mesg_count-1) loop
114: fnd_file.put(FND_FILE.LOG,
115: fnd_msg_pub.get(fnd_msg_pub.G_NEXT, l_encoded));
116: fnd_file.new_line(FND_FILE.LOG,1);
117: end loop;
118:
119: end if;