52: LEVEL_5 VARCHAR2(30);
53: LEVEL_6 VARCHAR2(30);
54: begin
55:
56: if icx_sec.validateSession
57: then
58: if(user_mode = 'SD') then
59: htp.p('
Note: you are running an unsupported screen. This developer/troubleshooting screen is intended only as a last resort when regular screens are unreachable from the menu. ');
60: htp.p('You may get "access denied" errors after you press buttons in this screen; ignore them and press the back arrow to get back.
169: htp.p('
245:
247: Session id to purge: 248: 250: |
251: Value="Purge log data for particular session"> |
299: htp.p('
300:
301:
302: ');
303: end if; --icx_sec.validatesession
304:
305: exception
306: when others then
307: htp.p(SQLERRM);
336:
337: /* Mode = 'U' for user mode, or 'S' for sysadmin */
338: procedure find_log(user_mode in varchar2) is
339: begin
340: if icx_sec.validateSession
341: then
342:
343: if(user_mode = 'SD') then
344: htp.p('
Note: you are running an unsupported screen. This developer/troubleshooting screen is intended only as a last resort when the regular screens are unreachable from the menu.
');
356:
357: htp.p('');
358: htp.p('
452:
453:
511: b_previous_clause boolean := FALSE;
512:
513: nrows number;
514: begin
515: if icx_sec.validateSession
516: then
517: if (find_user is not null) then
518: f_buttonname := 'FIND_USER';
519: f_user_id := fnd_global.user_id;
521: f_buttonname := 'FIND_SYSADMIN';
522: f_user_id := NULL;
523: elsif (clearsessionlog is not null) then /* if user pressed... */
524: nrows := FND_LOG_ADMIN.DELETE_BY_USER_SESSION(FND_GLOBAL.USER_ID,
525: icx_sec.getsessioncookie());
526: commit;
527: htp.p(
528: 'Cleared '|| nrows||
529: ' rows of log data for this session. Use back arrow to get back.');
570: f_end_date := null;
571: end if;
572:
573: if(only_session is not null) then
574: f_session_id := icx_sec.getsessioncookie();
575: else
576: f_session_id := NULL;
577: end if;
578:
1002: htp.p('
1078: the_filename varchar2(2000);
1079: nrows number;
1080:
1081: begin
1082: if icx_sec.validateSession
1083: then
1084: made_changes := TRUE;
1085: purged := FALSE;
1086: go_back_to_prefs := TRUE;
1170: else
1171: user_id_x := FND_GLOBAL.USER_ID;
1172: end if;
1173: nrows := FND_LOG_ADMIN.DELETE_BY_USER_SESSION(user_id_x,
1174: icx_sec.getsessioncookie());
1175: commit;
1176: htp.p('Purged '|| nrows || ' rows of log data for this session.');
1177: purged := TRUE;
1178: elsif (sysclearuserlog is not null) then /* if user pressed... */
1270: SESSION_ID NUMBER;
1271: USER_ID NUMBER;
1272: begin
1273:
1274: if icx_sec.validateSession
1275: then
1276: htp.p('');
1277:
1278: FND_LOGVIEW.Update_Prefs('on', null, 3,
1289: aflog_filename := FND_PROFILE.VALUE('AFLOG_FILENAME');
1290: aflog_level := to_number(FND_PROFILE.VALUE('AFLOG_LEVEL'));
1291: aflog_module := FND_PROFILE.VALUE('AFLOG_MODULE');
1292: user_id := fnd_profile.value('USER_ID');
1293: session_id := icx_sec.getsessioncookie();
1294:
1295: htp.p('
AFLOG_FILENAME='||AFLOG_FILENAME);
1296: htp.p('
AFLOG_LEVEL='||TO_CHAR(AFLOG_LEVEL));
1297: htp.p('
AFLOG_MODULE='||AFLOG_MODULE);
1301: htp.p('
Note: This test routine clears the log messages for the ');
1304: htp.p(' user and resets the user preferences, so be careful!
1369:
1370: FND_LOGVIEW.Display(3, 'fnd.src.%',
1371: null, null, null, null, null, 'Find');
1372:
1373: end if; --icx_sec.validatesession
1374:
1375: exception
1376: when others then
1377: htp.p(SQLERRM);