27:
28:
29:
30: /*srw.user_exit('FND GETPROFILE
31: NAME="PA_DEBUG_MODE"
32: FIELD=":p_debug_mode"
33: PRINT_ERROR="N"');*/null;
34:
35:
160: number_of_messages NUMBER;
161: message_buf VARCHAR2(256);
162: prog_error exception;
163: BEGIN
164: number_of_messages := pa_debug.no_of_debug_messages;
165:
166: IF (p_debug_mode = 'Y' AND number_of_messages > 0 ) THEN
167: /*srw.message(1,'Debug Messages:');*/null;
168:
168:
169:
170: FOR i IN 1..number_of_messages LOOP
171:
172: pa_debug.get_message(i,message_buf);
173: /*srw.message(1,message_buf);*/null;
174:
175:
176: END LOOP;