1: package body icx_sec as
2: /* $Header: ICXSESEB.pls 120.6.12020000.3 2013/04/05 17:05:29 vijnagar ship $ */
3:
4: -- ***********************************************
5: -- function NewSessionId
117:
118: BEGIN
119: --htp.p('VP');--mputman debug
120: -- start additions for 1916792
121: -- icx_sec.g_security_group_id:=c_sec_grp_id; --mputman hosted update
122: --SECURITY_GROUP_KEY in the FND_SECURITY_GROUPS
123: fnd_profile.get(name => 'ENABLE_SECURITY_GROUPS',
124: val => l_hosted_profile);
125:
127: b_hosted:=TRUE;
128: fnd_global.apps_initialize(user_id => -1,
129: resp_id => -1,
130: resp_appl_id => -1,
131: security_group_id => icx_sec.g_security_group_id);--mputman hosted update
132:
133: END IF;
134:
135:
221:
222: fnd_global.apps_initialize(user_id => t_user_id,
223: resp_id => -1,
224: resp_appl_id => -1,
225: security_group_id => icx_sec.g_security_group_id);--mputman added 2092330
226: ELSE
227: fnd_global.apps_initialize(user_id => t_user_id,
228: resp_id => -1,
229: resp_appl_id => -1,
726: values (
727: p_session_id,
728: p_user_id,
729: l_org_id,
730: icx_sec.g_security_group_id,
731: c_mode_code,
732: l_language,
733: l_language_code,
734: p_pseudo_flag,
798: EXCEPTION
799: WHEN no_data_found THEN
800: l_server_id := '-1';
801: end;
802: icx_sec.g_security_group_id := c_sec_grp_id; --mputman hosted update
803:
804: l_session_id := NewSessionId(l_new_session_id);
805: l_message := createSessionPrivate( p_user_id => p_user_id,
806: p_server_id => l_server_id,
871: p_function_type,
872: p_page_id,
873: sysdate,
874: 'N',
875: icx_sec.g_user_id,
876: sysdate,
877: icx_sec.g_user_id,
878: sysdate)
879: returning transaction_id into l_transaction_id;
873: sysdate,
874: 'N',
875: icx_sec.g_user_id,
876: sysdate,
877: icx_sec.g_user_id,
878: sysdate)
879: returning transaction_id into l_transaction_id;
880:
881: return l_transaction_id;
903:
904: begin
905: begin
906:
907: -- l_result := icx_sec.validateSession;
908:
909: l_server_id := p_server_id;
910:
911: if l_server_id is null
935: exception
936: when no_data_found THEN
937: l_node_id := 9999;
938: end;
939: FND_GLOBAL.APPS_INITIALIZE(user_id => icx_sec.g_user_id,
940: resp_id => icx_sec.g_responsibility_id,
941: resp_appl_id => icx_sec.g_resp_appl_id,
942: server_id => l_node_id);
943:
936: when no_data_found THEN
937: l_node_id := 9999;
938: end;
939: FND_GLOBAL.APPS_INITIALIZE(user_id => icx_sec.g_user_id,
940: resp_id => icx_sec.g_responsibility_id,
941: resp_appl_id => icx_sec.g_resp_appl_id,
942: server_id => l_node_id);
943:
944:
937: l_node_id := 9999;
938: end;
939: FND_GLOBAL.APPS_INITIALIZE(user_id => icx_sec.g_user_id,
940: resp_id => icx_sec.g_responsibility_id,
941: resp_appl_id => icx_sec.g_resp_appl_id,
942: server_id => l_node_id);
943:
944:
945: end;
1112: then
1113: l_session_id := getsessioncookie;
1114: else
1115: l_session_id := p_session_id;
1116: IF icx_sec.g_query_set = -1 THEN
1117: select HOME_URL,
1118: WEBMASTER_EMAIL,
1119: QUERY_SET,
1120: MAX_ROWS,
1121: SESSION_COOKIE_DOMAIN, --mputman added 1574527
1122: SESSION_COOKIE_NAME, --mputman added 1574527
1123: WINDOW_COOKIE_NAME
1124:
1125: into icx_sec.g_home_url,
1126: icx_sec.g_webmaster_email,
1127: icx_sec.g_query_set,
1128: icx_sec.g_max_rows,
1129: icx_sec.g_session_cookie_domain, --mputman added 1574527
1122: SESSION_COOKIE_NAME, --mputman added 1574527
1123: WINDOW_COOKIE_NAME
1124:
1125: into icx_sec.g_home_url,
1126: icx_sec.g_webmaster_email,
1127: icx_sec.g_query_set,
1128: icx_sec.g_max_rows,
1129: icx_sec.g_session_cookie_domain, --mputman added 1574527
1130: icx_sec.g_session_cookie_name, --mputman added 1574527
1123: WINDOW_COOKIE_NAME
1124:
1125: into icx_sec.g_home_url,
1126: icx_sec.g_webmaster_email,
1127: icx_sec.g_query_set,
1128: icx_sec.g_max_rows,
1129: icx_sec.g_session_cookie_domain, --mputman added 1574527
1130: icx_sec.g_session_cookie_name, --mputman added 1574527
1131: icx_sec.g_window_cookie_name
1124:
1125: into icx_sec.g_home_url,
1126: icx_sec.g_webmaster_email,
1127: icx_sec.g_query_set,
1128: icx_sec.g_max_rows,
1129: icx_sec.g_session_cookie_domain, --mputman added 1574527
1130: icx_sec.g_session_cookie_name, --mputman added 1574527
1131: icx_sec.g_window_cookie_name
1132: from ICX_PARAMETERS;
1125: into icx_sec.g_home_url,
1126: icx_sec.g_webmaster_email,
1127: icx_sec.g_query_set,
1128: icx_sec.g_max_rows,
1129: icx_sec.g_session_cookie_domain, --mputman added 1574527
1130: icx_sec.g_session_cookie_name, --mputman added 1574527
1131: icx_sec.g_window_cookie_name
1132: from ICX_PARAMETERS;
1133: END IF; --mputman added 1574527
1126: icx_sec.g_webmaster_email,
1127: icx_sec.g_query_set,
1128: icx_sec.g_max_rows,
1129: icx_sec.g_session_cookie_domain, --mputman added 1574527
1130: icx_sec.g_session_cookie_name, --mputman added 1574527
1131: icx_sec.g_window_cookie_name
1132: from ICX_PARAMETERS;
1133: END IF; --mputman added 1574527
1134:
1127: icx_sec.g_query_set,
1128: icx_sec.g_max_rows,
1129: icx_sec.g_session_cookie_domain, --mputman added 1574527
1130: icx_sec.g_session_cookie_name, --mputman added 1574527
1131: icx_sec.g_window_cookie_name
1132: from ICX_PARAMETERS;
1133: END IF; --mputman added 1574527
1134:
1135: if (icx_sec.g_session_cookie_name is null) then
1131: icx_sec.g_window_cookie_name
1132: from ICX_PARAMETERS;
1133: END IF; --mputman added 1574527
1134:
1135: if (icx_sec.g_session_cookie_name is null) then
1136: icx_sec.g_session_cookie_name := FND_WEB_CONFIG.DATABASE_ID;
1137: end if;
1138:
1139: end if;
1132: from ICX_PARAMETERS;
1133: END IF; --mputman added 1574527
1134:
1135: if (icx_sec.g_session_cookie_name is null) then
1136: icx_sec.g_session_cookie_name := FND_WEB_CONFIG.DATABASE_ID;
1137: end if;
1138:
1139: end if;
1140:
1224: l_success boolean := FALSE;
1225:
1226: begin
1227:
1228: icx_sec.g_session_id := to_number(icx_call.decrypt3(p_ticket));
1229:
1230: setSessionPrivate(p_session_id => icx_sec.g_session_id,
1231: p_success => l_success);
1232:
1226: begin
1227:
1228: icx_sec.g_session_id := to_number(icx_call.decrypt3(p_ticket));
1229:
1230: setSessionPrivate(p_session_id => icx_sec.g_session_id,
1231: p_success => l_success);
1232:
1233: if (l_success)
1234: then
1262: RESPONSIBILITY_APPLICATION_ID,
1263: SECURITY_GROUP_ID,
1264: RESPONSIBILITY_ID
1265: into
1266: icx_sec.g_language,
1267: icx_sec.g_language_code, icx_sec.g_date_format,
1268: icx_sec.g_numeric_characters, icx_sec.g_date_language,
1269: icx_sec.g_nls_sort, icx_sec.g_nls_territory,
1270: icx_sec.g_user_id,
1263: SECURITY_GROUP_ID,
1264: RESPONSIBILITY_ID
1265: into
1266: icx_sec.g_language,
1267: icx_sec.g_language_code, icx_sec.g_date_format,
1268: icx_sec.g_numeric_characters, icx_sec.g_date_language,
1269: icx_sec.g_nls_sort, icx_sec.g_nls_territory,
1270: icx_sec.g_user_id,
1271: icx_sec.g_resp_appl_id,
1264: RESPONSIBILITY_ID
1265: into
1266: icx_sec.g_language,
1267: icx_sec.g_language_code, icx_sec.g_date_format,
1268: icx_sec.g_numeric_characters, icx_sec.g_date_language,
1269: icx_sec.g_nls_sort, icx_sec.g_nls_territory,
1270: icx_sec.g_user_id,
1271: icx_sec.g_resp_appl_id,
1272: icx_sec.g_security_group_id,
1265: into
1266: icx_sec.g_language,
1267: icx_sec.g_language_code, icx_sec.g_date_format,
1268: icx_sec.g_numeric_characters, icx_sec.g_date_language,
1269: icx_sec.g_nls_sort, icx_sec.g_nls_territory,
1270: icx_sec.g_user_id,
1271: icx_sec.g_resp_appl_id,
1272: icx_sec.g_security_group_id,
1273: icx_sec.g_responsibility_id
1266: icx_sec.g_language,
1267: icx_sec.g_language_code, icx_sec.g_date_format,
1268: icx_sec.g_numeric_characters, icx_sec.g_date_language,
1269: icx_sec.g_nls_sort, icx_sec.g_nls_territory,
1270: icx_sec.g_user_id,
1271: icx_sec.g_resp_appl_id,
1272: icx_sec.g_security_group_id,
1273: icx_sec.g_responsibility_id
1274: from ICX_SESSIONS
1267: icx_sec.g_language_code, icx_sec.g_date_format,
1268: icx_sec.g_numeric_characters, icx_sec.g_date_language,
1269: icx_sec.g_nls_sort, icx_sec.g_nls_territory,
1270: icx_sec.g_user_id,
1271: icx_sec.g_resp_appl_id,
1272: icx_sec.g_security_group_id,
1273: icx_sec.g_responsibility_id
1274: from ICX_SESSIONS
1275: where SESSION_ID = p_session_id;
1268: icx_sec.g_numeric_characters, icx_sec.g_date_language,
1269: icx_sec.g_nls_sort, icx_sec.g_nls_territory,
1270: icx_sec.g_user_id,
1271: icx_sec.g_resp_appl_id,
1272: icx_sec.g_security_group_id,
1273: icx_sec.g_responsibility_id
1274: from ICX_SESSIONS
1275: where SESSION_ID = p_session_id;
1276:
1269: icx_sec.g_nls_sort, icx_sec.g_nls_territory,
1270: icx_sec.g_user_id,
1271: icx_sec.g_resp_appl_id,
1272: icx_sec.g_security_group_id,
1273: icx_sec.g_responsibility_id
1274: from ICX_SESSIONS
1275: where SESSION_ID = p_session_id;
1276:
1277: setSessionPrivate(icx_sec.g_user_id,
1273: icx_sec.g_responsibility_id
1274: from ICX_SESSIONS
1275: where SESSION_ID = p_session_id;
1276:
1277: setSessionPrivate(icx_sec.g_user_id,
1278: icx_sec.g_responsibility_id,
1279: icx_sec.g_resp_appl_id,
1280: icx_sec.g_security_group_id,
1281: icx_sec.g_date_format,
1274: from ICX_SESSIONS
1275: where SESSION_ID = p_session_id;
1276:
1277: setSessionPrivate(icx_sec.g_user_id,
1278: icx_sec.g_responsibility_id,
1279: icx_sec.g_resp_appl_id,
1280: icx_sec.g_security_group_id,
1281: icx_sec.g_date_format,
1282: icx_sec.g_language,
1275: where SESSION_ID = p_session_id;
1276:
1277: setSessionPrivate(icx_sec.g_user_id,
1278: icx_sec.g_responsibility_id,
1279: icx_sec.g_resp_appl_id,
1280: icx_sec.g_security_group_id,
1281: icx_sec.g_date_format,
1282: icx_sec.g_language,
1283: icx_sec.g_date_language,
1276:
1277: setSessionPrivate(icx_sec.g_user_id,
1278: icx_sec.g_responsibility_id,
1279: icx_sec.g_resp_appl_id,
1280: icx_sec.g_security_group_id,
1281: icx_sec.g_date_format,
1282: icx_sec.g_language,
1283: icx_sec.g_date_language,
1284: icx_sec.g_numeric_characters,
1277: setSessionPrivate(icx_sec.g_user_id,
1278: icx_sec.g_responsibility_id,
1279: icx_sec.g_resp_appl_id,
1280: icx_sec.g_security_group_id,
1281: icx_sec.g_date_format,
1282: icx_sec.g_language,
1283: icx_sec.g_date_language,
1284: icx_sec.g_numeric_characters,
1285: icx_sec.g_nls_sort,
1278: icx_sec.g_responsibility_id,
1279: icx_sec.g_resp_appl_id,
1280: icx_sec.g_security_group_id,
1281: icx_sec.g_date_format,
1282: icx_sec.g_language,
1283: icx_sec.g_date_language,
1284: icx_sec.g_numeric_characters,
1285: icx_sec.g_nls_sort,
1286: icx_sec.g_nls_territory);
1279: icx_sec.g_resp_appl_id,
1280: icx_sec.g_security_group_id,
1281: icx_sec.g_date_format,
1282: icx_sec.g_language,
1283: icx_sec.g_date_language,
1284: icx_sec.g_numeric_characters,
1285: icx_sec.g_nls_sort,
1286: icx_sec.g_nls_territory);
1287: exception
1280: icx_sec.g_security_group_id,
1281: icx_sec.g_date_format,
1282: icx_sec.g_language,
1283: icx_sec.g_date_language,
1284: icx_sec.g_numeric_characters,
1285: icx_sec.g_nls_sort,
1286: icx_sec.g_nls_territory);
1287: exception
1288: when others
1281: icx_sec.g_date_format,
1282: icx_sec.g_language,
1283: icx_sec.g_date_language,
1284: icx_sec.g_numeric_characters,
1285: icx_sec.g_nls_sort,
1286: icx_sec.g_nls_territory);
1287: exception
1288: when others
1289: then
1282: icx_sec.g_language,
1283: icx_sec.g_date_language,
1284: icx_sec.g_numeric_characters,
1285: icx_sec.g_nls_sort,
1286: icx_sec.g_nls_territory);
1287: exception
1288: when others
1289: then
1290: -- htp.p(SQLERRM);
1336: resp_id => p_responsibility_id,
1337: resp_appl_id => p_resp_appl_id,
1338: security_group_id => p_security_group_id,
1339: site_id => -1,
1340: login_id => icx_sec.g_login_id,
1341: conc_login_id => -1,
1342: prog_appl_id => icx_sec.g_prog_appl_id,
1343: conc_program_id => -1,
1344: conc_request_id => -1,
1338: security_group_id => p_security_group_id,
1339: site_id => -1,
1340: login_id => icx_sec.g_login_id,
1341: conc_login_id => -1,
1342: prog_appl_id => icx_sec.g_prog_appl_id,
1343: conc_program_id => -1,
1344: conc_request_id => -1,
1345: server_id => c_node_id,
1346: conc_priority_request => -1);
1527:
1528: begin
1529: if c_session_id is null -- don't use nvl jsp doesn't like it
1530: then
1531: icx_sec.g_session_id := getsessioncookie;
1532: else
1533: icx_sec.g_session_id := c_session_id;
1534: end if;
1535:
1529: if c_session_id is null -- don't use nvl jsp doesn't like it
1530: then
1531: icx_sec.g_session_id := getsessioncookie;
1532: else
1533: icx_sec.g_session_id := c_session_id;
1534: end if;
1535:
1536: icx_sec.g_transaction_id := c_transaction_id;
1537: -- added last_connect into the select for 1755317 mputman
1532: else
1533: icx_sec.g_session_id := c_session_id;
1534: end if;
1535:
1536: icx_sec.g_transaction_id := c_transaction_id;
1537: -- added last_connect into the select for 1755317 mputman
1538: select NLS_LANGUAGE, LANGUAGE_CODE, DATE_FORMAT_MASK,
1539: NLS_NUMERIC_CHARACTERS, NLS_DATE_LANGUAGE,
1540: NLS_SORT, NLS_TERRITORY,
1550: MENU_ID,
1551: PAGE_ID,
1552: ORG_ID, MODE_CODE, LAST_CONNECT,
1553: login_id --mputman added 2020952
1554: into icx_sec.g_language, icx_sec.g_language_code, icx_sec.g_date_format,
1555: icx_sec.g_numeric_characters, icx_sec.g_date_language,
1556: icx_sec.g_nls_sort,icx_sec.g_nls_territory,
1557: n_limit_connects, n_limit_time,
1558: d_first_connect_time,n_counter,
1551: PAGE_ID,
1552: ORG_ID, MODE_CODE, LAST_CONNECT,
1553: login_id --mputman added 2020952
1554: into icx_sec.g_language, icx_sec.g_language_code, icx_sec.g_date_format,
1555: icx_sec.g_numeric_characters, icx_sec.g_date_language,
1556: icx_sec.g_nls_sort,icx_sec.g_nls_territory,
1557: n_limit_connects, n_limit_time,
1558: d_first_connect_time,n_counter,
1559: c_disabled_flag, c_pseudo_session,
1552: ORG_ID, MODE_CODE, LAST_CONNECT,
1553: login_id --mputman added 2020952
1554: into icx_sec.g_language, icx_sec.g_language_code, icx_sec.g_date_format,
1555: icx_sec.g_numeric_characters, icx_sec.g_date_language,
1556: icx_sec.g_nls_sort,icx_sec.g_nls_territory,
1557: n_limit_connects, n_limit_time,
1558: d_first_connect_time,n_counter,
1559: c_disabled_flag, c_pseudo_session,
1560: icx_sec.g_user_id,
1556: icx_sec.g_nls_sort,icx_sec.g_nls_territory,
1557: n_limit_connects, n_limit_time,
1558: d_first_connect_time,n_counter,
1559: c_disabled_flag, c_pseudo_session,
1560: icx_sec.g_user_id,
1561: icx_sec.g_resp_appl_id,
1562: icx_sec.g_security_group_id,
1563: icx_sec.g_responsibility_id,
1564: icx_sec.g_function_id,
1557: n_limit_connects, n_limit_time,
1558: d_first_connect_time,n_counter,
1559: c_disabled_flag, c_pseudo_session,
1560: icx_sec.g_user_id,
1561: icx_sec.g_resp_appl_id,
1562: icx_sec.g_security_group_id,
1563: icx_sec.g_responsibility_id,
1564: icx_sec.g_function_id,
1565: icx_sec.g_function_type,
1558: d_first_connect_time,n_counter,
1559: c_disabled_flag, c_pseudo_session,
1560: icx_sec.g_user_id,
1561: icx_sec.g_resp_appl_id,
1562: icx_sec.g_security_group_id,
1563: icx_sec.g_responsibility_id,
1564: icx_sec.g_function_id,
1565: icx_sec.g_function_type,
1566: icx_sec.g_menu_id,
1559: c_disabled_flag, c_pseudo_session,
1560: icx_sec.g_user_id,
1561: icx_sec.g_resp_appl_id,
1562: icx_sec.g_security_group_id,
1563: icx_sec.g_responsibility_id,
1564: icx_sec.g_function_id,
1565: icx_sec.g_function_type,
1566: icx_sec.g_menu_id,
1567: icx_sec.g_page_id,
1560: icx_sec.g_user_id,
1561: icx_sec.g_resp_appl_id,
1562: icx_sec.g_security_group_id,
1563: icx_sec.g_responsibility_id,
1564: icx_sec.g_function_id,
1565: icx_sec.g_function_type,
1566: icx_sec.g_menu_id,
1567: icx_sec.g_page_id,
1568: c_org_id, icx_sec.g_mode_code,
1561: icx_sec.g_resp_appl_id,
1562: icx_sec.g_security_group_id,
1563: icx_sec.g_responsibility_id,
1564: icx_sec.g_function_id,
1565: icx_sec.g_function_type,
1566: icx_sec.g_menu_id,
1567: icx_sec.g_page_id,
1568: c_org_id, icx_sec.g_mode_code,
1569: l_last_connect,
1562: icx_sec.g_security_group_id,
1563: icx_sec.g_responsibility_id,
1564: icx_sec.g_function_id,
1565: icx_sec.g_function_type,
1566: icx_sec.g_menu_id,
1567: icx_sec.g_page_id,
1568: c_org_id, icx_sec.g_mode_code,
1569: l_last_connect,
1570: icx_sec.g_login_id --mputman added 2020952
1563: icx_sec.g_responsibility_id,
1564: icx_sec.g_function_id,
1565: icx_sec.g_function_type,
1566: icx_sec.g_menu_id,
1567: icx_sec.g_page_id,
1568: c_org_id, icx_sec.g_mode_code,
1569: l_last_connect,
1570: icx_sec.g_login_id --mputman added 2020952
1571:
1564: icx_sec.g_function_id,
1565: icx_sec.g_function_type,
1566: icx_sec.g_menu_id,
1567: icx_sec.g_page_id,
1568: c_org_id, icx_sec.g_mode_code,
1569: l_last_connect,
1570: icx_sec.g_login_id --mputman added 2020952
1571:
1572: from ICX_SESSIONS
1566: icx_sec.g_menu_id,
1567: icx_sec.g_page_id,
1568: c_org_id, icx_sec.g_mode_code,
1569: l_last_connect,
1570: icx_sec.g_login_id --mputman added 2020952
1571:
1572: from ICX_SESSIONS
1573: where SESSION_ID = icx_sec.g_session_id;
1574:
1569: l_last_connect,
1570: icx_sec.g_login_id --mputman added 2020952
1571:
1572: from ICX_SESSIONS
1573: where SESSION_ID = icx_sec.g_session_id;
1574:
1575: if c_transaction_id is not null
1576: then
1577:
1582: MENU_ID,
1583: nvl(c_function_id,FUNCTION_ID),
1584: FUNCTION_TYPE,
1585: PAGE_ID
1586: into icx_sec.g_transaction_id,
1587: icx_sec.g_resp_appl_id,
1588: icx_sec.g_responsibility_id,
1589: icx_sec.g_security_group_id,
1590: icx_sec.g_menu_id,
1583: nvl(c_function_id,FUNCTION_ID),
1584: FUNCTION_TYPE,
1585: PAGE_ID
1586: into icx_sec.g_transaction_id,
1587: icx_sec.g_resp_appl_id,
1588: icx_sec.g_responsibility_id,
1589: icx_sec.g_security_group_id,
1590: icx_sec.g_menu_id,
1591: icx_sec.g_function_id,
1584: FUNCTION_TYPE,
1585: PAGE_ID
1586: into icx_sec.g_transaction_id,
1587: icx_sec.g_resp_appl_id,
1588: icx_sec.g_responsibility_id,
1589: icx_sec.g_security_group_id,
1590: icx_sec.g_menu_id,
1591: icx_sec.g_function_id,
1592: icx_sec.g_function_type,
1585: PAGE_ID
1586: into icx_sec.g_transaction_id,
1587: icx_sec.g_resp_appl_id,
1588: icx_sec.g_responsibility_id,
1589: icx_sec.g_security_group_id,
1590: icx_sec.g_menu_id,
1591: icx_sec.g_function_id,
1592: icx_sec.g_function_type,
1593: icx_sec.g_page_id
1586: into icx_sec.g_transaction_id,
1587: icx_sec.g_resp_appl_id,
1588: icx_sec.g_responsibility_id,
1589: icx_sec.g_security_group_id,
1590: icx_sec.g_menu_id,
1591: icx_sec.g_function_id,
1592: icx_sec.g_function_type,
1593: icx_sec.g_page_id
1594: from ICX_TRANSACTIONS
1587: icx_sec.g_resp_appl_id,
1588: icx_sec.g_responsibility_id,
1589: icx_sec.g_security_group_id,
1590: icx_sec.g_menu_id,
1591: icx_sec.g_function_id,
1592: icx_sec.g_function_type,
1593: icx_sec.g_page_id
1594: from ICX_TRANSACTIONS
1595: where TRANSACTION_ID = c_transaction_id
1588: icx_sec.g_responsibility_id,
1589: icx_sec.g_security_group_id,
1590: icx_sec.g_menu_id,
1591: icx_sec.g_function_id,
1592: icx_sec.g_function_type,
1593: icx_sec.g_page_id
1594: from ICX_TRANSACTIONS
1595: where TRANSACTION_ID = c_transaction_id
1596: and SESSION_ID = icx_sec.g_session_id
1589: icx_sec.g_security_group_id,
1590: icx_sec.g_menu_id,
1591: icx_sec.g_function_id,
1592: icx_sec.g_function_type,
1593: icx_sec.g_page_id
1594: from ICX_TRANSACTIONS
1595: where TRANSACTION_ID = c_transaction_id
1596: and SESSION_ID = icx_sec.g_session_id
1597: and DISABLED_FLAG <> 'Y'; --reordered select for bug #2389169 mputman
1592: icx_sec.g_function_type,
1593: icx_sec.g_page_id
1594: from ICX_TRANSACTIONS
1595: where TRANSACTION_ID = c_transaction_id
1596: and SESSION_ID = icx_sec.g_session_id
1597: and DISABLED_FLAG <> 'Y'; --reordered select for bug #2389169 mputman
1598:
1599: end if;
1600:
1597: and DISABLED_FLAG <> 'Y'; --reordered select for bug #2389169 mputman
1598:
1599: end if;
1600:
1601: if icx_sec.g_language_code is null
1602: then
1603: select language_code
1604: into icx_sec.g_language_code
1605: from fnd_languages
1600:
1601: if icx_sec.g_language_code is null
1602: then
1603: select language_code
1604: into icx_sec.g_language_code
1605: from fnd_languages
1606: where nls_language = icx_sec.g_language;
1607: end if;
1608:
1602: then
1603: select language_code
1604: into icx_sec.g_language_code
1605: from fnd_languages
1606: where nls_language = icx_sec.g_language;
1607: end if;
1608:
1609: -- **************************************************
1610: -- This section handles the multi-org implemenation
1609: -- **************************************************
1610: -- This section handles the multi-org implemenation
1611: -- **************************************************
1612:
1613: -- htp.p('DEBUG session_id='||icx_sec.g_session_id||' user_id='||icx_sec.g_user_id||' responsibility_id='||icx_sec.g_responsibility_id||' resp_appl_id='||icx_sec.g_resp_appl_id||' security_group_id='||icx_sec.g_security_group_id);
1614:
1615: -- htp.p('DEBUG function_id='||icx_sec.g_function_id);
1616:
1617: -- Allow easier performance tuning
1611: -- **************************************************
1612:
1613: -- htp.p('DEBUG session_id='||icx_sec.g_session_id||' user_id='||icx_sec.g_user_id||' responsibility_id='||icx_sec.g_responsibility_id||' resp_appl_id='||icx_sec.g_resp_appl_id||' security_group_id='||icx_sec.g_security_group_id);
1614:
1615: -- htp.p('DEBUG function_id='||icx_sec.g_function_id);
1616:
1617: -- Allow easier performance tuning
1618: /* Request to remove aalomari 16-NOV-1999
1619: DBMS_APPLICATION_INFO.SET_MODULE(
1616:
1617: -- Allow easier performance tuning
1618: /* Request to remove aalomari 16-NOV-1999
1619: DBMS_APPLICATION_INFO.SET_MODULE(
1620: module_name => icx_sec.g_function_id,
1621: action_name => 'Self Service');
1622: */
1623:
1624: -- *******************************************
1626: -- We want the database to return data in the
1627: -- appropriate language for the user
1628: -- *******************************************
1629:
1630: setSessionPrivate(icx_sec.g_user_id,
1631: icx_sec.g_responsibility_id,
1632: icx_sec.g_resp_appl_id,
1633: icx_sec.g_security_group_id,
1634: icx_sec.g_date_format,
1627: -- appropriate language for the user
1628: -- *******************************************
1629:
1630: setSessionPrivate(icx_sec.g_user_id,
1631: icx_sec.g_responsibility_id,
1632: icx_sec.g_resp_appl_id,
1633: icx_sec.g_security_group_id,
1634: icx_sec.g_date_format,
1635: icx_sec.g_language,
1628: -- *******************************************
1629:
1630: setSessionPrivate(icx_sec.g_user_id,
1631: icx_sec.g_responsibility_id,
1632: icx_sec.g_resp_appl_id,
1633: icx_sec.g_security_group_id,
1634: icx_sec.g_date_format,
1635: icx_sec.g_language,
1636: icx_sec.g_date_language,
1629:
1630: setSessionPrivate(icx_sec.g_user_id,
1631: icx_sec.g_responsibility_id,
1632: icx_sec.g_resp_appl_id,
1633: icx_sec.g_security_group_id,
1634: icx_sec.g_date_format,
1635: icx_sec.g_language,
1636: icx_sec.g_date_language,
1637: icx_sec.g_numeric_characters,
1630: setSessionPrivate(icx_sec.g_user_id,
1631: icx_sec.g_responsibility_id,
1632: icx_sec.g_resp_appl_id,
1633: icx_sec.g_security_group_id,
1634: icx_sec.g_date_format,
1635: icx_sec.g_language,
1636: icx_sec.g_date_language,
1637: icx_sec.g_numeric_characters,
1638: icx_sec.g_nls_sort,
1631: icx_sec.g_responsibility_id,
1632: icx_sec.g_resp_appl_id,
1633: icx_sec.g_security_group_id,
1634: icx_sec.g_date_format,
1635: icx_sec.g_language,
1636: icx_sec.g_date_language,
1637: icx_sec.g_numeric_characters,
1638: icx_sec.g_nls_sort,
1639: icx_sec.g_nls_territory);
1632: icx_sec.g_resp_appl_id,
1633: icx_sec.g_security_group_id,
1634: icx_sec.g_date_format,
1635: icx_sec.g_language,
1636: icx_sec.g_date_language,
1637: icx_sec.g_numeric_characters,
1638: icx_sec.g_nls_sort,
1639: icx_sec.g_nls_territory);
1640:
1633: icx_sec.g_security_group_id,
1634: icx_sec.g_date_format,
1635: icx_sec.g_language,
1636: icx_sec.g_date_language,
1637: icx_sec.g_numeric_characters,
1638: icx_sec.g_nls_sort,
1639: icx_sec.g_nls_territory);
1640:
1641: /* nlbarlow 1574527
1634: icx_sec.g_date_format,
1635: icx_sec.g_language,
1636: icx_sec.g_date_language,
1637: icx_sec.g_numeric_characters,
1638: icx_sec.g_nls_sort,
1639: icx_sec.g_nls_territory);
1640:
1641: /* nlbarlow 1574527
1642: fnd_profile.get(name => 'ICX_OA_HTML',
1635: icx_sec.g_language,
1636: icx_sec.g_date_language,
1637: icx_sec.g_numeric_characters,
1638: icx_sec.g_nls_sort,
1639: icx_sec.g_nls_territory);
1640:
1641: /* nlbarlow 1574527
1642: fnd_profile.get(name => 'ICX_OA_HTML',
1643: val => l_OA_HTML);
1643: val => l_OA_HTML);
1644:
1645: if l_OA_HTML is not null
1646: then
1647: icx_sec.g_OA_HTML := l_OA_HTML;
1648: end if;
1649:
1650: fnd_profile.get(name => 'ICX_OA_MEDIA',
1651: val => l_OA_MEDIA);
1651: val => l_OA_MEDIA);
1652:
1653: if l_OA_MEDIA is not null
1654: then
1655: icx_sec.g_OA_MEDIA := l_OA_MEDIA;
1656: end if;
1657:
1658: fnd_profile.get(name => 'ICX_STYLE_SHEET',
1659: val => l_style_sheet);
1659: val => l_style_sheet);
1660:
1661: if l_style_sheet is not null
1662: then
1663: icx_sec.g_style_sheet := l_style_sheet;
1664: end if;
1665: */
1666:
1667: fnd_profile.get(name => 'ICX_PREFIX',
1672: -- which causes jsps to fail.
1673: -- ie: http://ap814sun.us.oracle.com:7732//OA_HTML/....
1674: if (l_prefix IS NOT NULL) then
1675:
1676: icx_sec.g_OA_HTML := l_prefix||'/OA_HTML';
1677: icx_sec.g_OA_MEDIA := l_prefix||'/OA_MEDIA';
1678:
1679: else
1680:
1673: -- ie: http://ap814sun.us.oracle.com:7732//OA_HTML/....
1674: if (l_prefix IS NOT NULL) then
1675:
1676: icx_sec.g_OA_HTML := l_prefix||'/OA_HTML';
1677: icx_sec.g_OA_MEDIA := l_prefix||'/OA_MEDIA';
1678:
1679: else
1680:
1681: icx_sec.g_OA_HTML := 'OA_HTML';
1677: icx_sec.g_OA_MEDIA := l_prefix||'/OA_MEDIA';
1678:
1679: else
1680:
1681: icx_sec.g_OA_HTML := 'OA_HTML';
1682: icx_sec.g_OA_MEDIA := 'OA_MEDIA';
1683:
1684: end if;
1685:
1678:
1679: else
1680:
1681: icx_sec.g_OA_HTML := 'OA_HTML';
1682: icx_sec.g_OA_MEDIA := 'OA_MEDIA';
1683:
1684: end if;
1685:
1686:
1683:
1684: end if;
1685:
1686:
1687: if icx_sec.g_mode_code in ( '115J', '115P', '115X', 'SLAVE')
1688: then
1689: icx_cabo.g_base_href := FND_WEB_CONFIG.WEB_SERVER;
1690: icx_cabo.g_plsql_agent := icx_plug_utilities.getPLSQLagent;
1691: else
1692: icx_cabo.g_base_href := '';
1693: icx_cabo.g_plsql_agent := '';
1694: end if;
1695:
1696: if icx_sec.g_menu_id is null then
1697: icx_cabo.g_display_menu_icon := FALSE;
1698: else
1699: icx_cabo.g_display_menu_icon := TRUE;
1700: end if;
1700: end if;
1701:
1702: if c_org_id is not null
1703: then
1704: icx_sec.g_org_id := c_org_id;
1705: fnd_client_info.set_org_context(c_org_id);
1706: else
1707: select multi_org_flag
1708: into l_multi_org_flag
1713: then
1714: /* 3219471 nlbarlow replaced get_specific
1715: fnd_profile.get_specific(
1716: name_z => 'ORG_ID',
1717: responsibility_id_z => icx_sec.g_responsibility_id,
1718: application_id_z => icx_sec.g_resp_appl_id,
1719: val_z => icx_sec.g_org_id,
1720: defined_z => l_profile_defined);
1721: */
1714: /* 3219471 nlbarlow replaced get_specific
1715: fnd_profile.get_specific(
1716: name_z => 'ORG_ID',
1717: responsibility_id_z => icx_sec.g_responsibility_id,
1718: application_id_z => icx_sec.g_resp_appl_id,
1719: val_z => icx_sec.g_org_id,
1720: defined_z => l_profile_defined);
1721: */
1722: fnd_profile.get(name => 'ORG_ID',
1715: fnd_profile.get_specific(
1716: name_z => 'ORG_ID',
1717: responsibility_id_z => icx_sec.g_responsibility_id,
1718: application_id_z => icx_sec.g_resp_appl_id,
1719: val_z => icx_sec.g_org_id,
1720: defined_z => l_profile_defined);
1721: */
1722: fnd_profile.get(name => 'ORG_ID',
1723: val => icx_sec.g_org_id);
1719: val_z => icx_sec.g_org_id,
1720: defined_z => l_profile_defined);
1721: */
1722: fnd_profile.get(name => 'ORG_ID',
1723: val => icx_sec.g_org_id);
1724: end if;
1725: end if;
1726:
1727: if icx_sec.g_mode_code in ( 'WEBAPPS', '115J', '115P', '115X')
1723: val => icx_sec.g_org_id);
1724: end if;
1725: end if;
1726:
1727: if icx_sec.g_mode_code in ( 'WEBAPPS', '115J', '115P', '115X')
1728: then
1729:
1730: if (c_disabled_flag = 'Y') then
1731: raise e_session_invalid;
1743:
1744: /* 3219471 nlbarlow replaced get_specific
1745: fnd_profile.get_specific(name_z => 'ICX_SESSION_TIMEOUT',
1746: application_id_z => g_resp_appl_id,
1747: responsibility_id_z => icx_sec.g_responsibility_id, user_id_z => icx_sec.g_user_id,
1748: val_z => l_session_timeout ,
1749: defined_z => l_profile_defined);
1750: */
1751: fnd_profile.get(name => 'ICX_SESSION_TIMEOUT',
1761: END IF;
1762:
1763: end if; -- c_validate_mode_on = 'Y'
1764:
1765: end if; -- icx_sec.g_mode_code = 'WEBAPPS'
1766:
1767: if (c_pseudo_session = 'N')
1768: then
1769: if c_function_code is not null
1775:
1776: raise e_no_function_id;
1777: --END IF;
1778: end if;
1779: elsif icx_sec.g_function_id is not null
1780: then
1781: if (not FND_FUNCTION.TEST_ID(icx_sec.g_function_id))
1782: then
1783:
1777: --END IF;
1778: end if;
1779: elsif icx_sec.g_function_id is not null
1780: then
1781: if (not FND_FUNCTION.TEST_ID(icx_sec.g_function_id))
1782: then
1783:
1784: --IF (NOT anonFunctionTest(icx_sec.g_function_id)) THEN
1785: --SKAUSHIK
1780: then
1781: if (not FND_FUNCTION.TEST_ID(icx_sec.g_function_id))
1782: then
1783:
1784: --IF (NOT anonFunctionTest(icx_sec.g_function_id)) THEN
1785: --SKAUSHIK
1786: --NULL;
1787: raise e_no_function_id;
1788: -- END IF;
1795: then
1796: update icx_sessions
1797: set last_connect = sysdate,
1798: counter = counter + 1
1799: where session_id = icx_sec.g_session_id;
1800:
1801: if c_commit
1802: then
1803: commit;
1919: };');
1920:
1921:
1922: fnd_profile.get_specific(name_z => 'APPS_SSO',
1923: user_id_z => icx_sec.g_user_id,
1924: val_z => l_portal_url,
1925: defined_z => l_profile_defined);
1926: IF (nvl(l_portal_url,'SSWA') = 'PORTAL') OR
1927: (nvl(l_portal_url,'SSWA') = 'SSO_SDK') THEN
1970: WHEN no_data_found THEN
1971: l_user_id := -999;
1972: END;
1973:
1974: IF (l_user_id = icx_sec.g_user_id) THEN
1975: --this session needs conversion to authenticated
1976: OracleSSWA.convertSession;
1977:
1978: RETURN FALSE;
1995: l_user_id := -999;
1996: END;
1997:
1998:
1999: IF (l_user_id = icx_sec.g_user_id) THEN
2000: --this session needs conversion to authenticated
2001: OracleApps.convertSession(icx_call.encrypt(icx_sec.g_session_id||'*'||
2002: icx_sec.g_resp_appl_id||'*'||
2003: icx_sec.g_responsibility_id||'*'||
1997:
1998:
1999: IF (l_user_id = icx_sec.g_user_id) THEN
2000: --this session needs conversion to authenticated
2001: OracleApps.convertSession(icx_call.encrypt(icx_sec.g_session_id||'*'||
2002: icx_sec.g_resp_appl_id||'*'||
2003: icx_sec.g_responsibility_id||'*'||
2004: icx_sec.g_security_group_id||'*'||
2005: icx_sec.g_function_id||'**]'));
1998:
1999: IF (l_user_id = icx_sec.g_user_id) THEN
2000: --this session needs conversion to authenticated
2001: OracleApps.convertSession(icx_call.encrypt(icx_sec.g_session_id||'*'||
2002: icx_sec.g_resp_appl_id||'*'||
2003: icx_sec.g_responsibility_id||'*'||
2004: icx_sec.g_security_group_id||'*'||
2005: icx_sec.g_function_id||'**]'));
2006:
1999: IF (l_user_id = icx_sec.g_user_id) THEN
2000: --this session needs conversion to authenticated
2001: OracleApps.convertSession(icx_call.encrypt(icx_sec.g_session_id||'*'||
2002: icx_sec.g_resp_appl_id||'*'||
2003: icx_sec.g_responsibility_id||'*'||
2004: icx_sec.g_security_group_id||'*'||
2005: icx_sec.g_function_id||'**]'));
2006:
2007: RETURN FALSE;
2000: --this session needs conversion to authenticated
2001: OracleApps.convertSession(icx_call.encrypt(icx_sec.g_session_id||'*'||
2002: icx_sec.g_resp_appl_id||'*'||
2003: icx_sec.g_responsibility_id||'*'||
2004: icx_sec.g_security_group_id||'*'||
2005: icx_sec.g_function_id||'**]'));
2006:
2007: RETURN FALSE;
2008: END IF; -- an anonymous user
2001: OracleApps.convertSession(icx_call.encrypt(icx_sec.g_session_id||'*'||
2002: icx_sec.g_resp_appl_id||'*'||
2003: icx_sec.g_responsibility_id||'*'||
2004: icx_sec.g_security_group_id||'*'||
2005: icx_sec.g_function_id||'**]'));
2006:
2007: RETURN FALSE;
2008: END IF; -- an anonymous user
2009:
2125: transaction_id := l_transaction_id;
2126:
2127: if l_result
2128: then
2129: user_id := icx_sec.g_user_id;
2130: responsibility_id := icx_sec.g_responsibility_id;
2131: resp_appl_id := icx_sec.g_resp_appl_id;
2132: security_group_id := icx_sec.g_security_group_id;
2133: language_code := icx_sec.g_language_code;
2126:
2127: if l_result
2128: then
2129: user_id := icx_sec.g_user_id;
2130: responsibility_id := icx_sec.g_responsibility_id;
2131: resp_appl_id := icx_sec.g_resp_appl_id;
2132: security_group_id := icx_sec.g_security_group_id;
2133: language_code := icx_sec.g_language_code;
2134: nls_language := icx_sec.g_language;
2127: if l_result
2128: then
2129: user_id := icx_sec.g_user_id;
2130: responsibility_id := icx_sec.g_responsibility_id;
2131: resp_appl_id := icx_sec.g_resp_appl_id;
2132: security_group_id := icx_sec.g_security_group_id;
2133: language_code := icx_sec.g_language_code;
2134: nls_language := icx_sec.g_language;
2135: date_format_mask := icx_sec.g_date_format;
2128: then
2129: user_id := icx_sec.g_user_id;
2130: responsibility_id := icx_sec.g_responsibility_id;
2131: resp_appl_id := icx_sec.g_resp_appl_id;
2132: security_group_id := icx_sec.g_security_group_id;
2133: language_code := icx_sec.g_language_code;
2134: nls_language := icx_sec.g_language;
2135: date_format_mask := icx_sec.g_date_format;
2136: nls_date_language := icx_sec.g_date_language;
2129: user_id := icx_sec.g_user_id;
2130: responsibility_id := icx_sec.g_responsibility_id;
2131: resp_appl_id := icx_sec.g_resp_appl_id;
2132: security_group_id := icx_sec.g_security_group_id;
2133: language_code := icx_sec.g_language_code;
2134: nls_language := icx_sec.g_language;
2135: date_format_mask := icx_sec.g_date_format;
2136: nls_date_language := icx_sec.g_date_language;
2137: nls_numeric_characters := icx_sec.g_numeric_characters;
2130: responsibility_id := icx_sec.g_responsibility_id;
2131: resp_appl_id := icx_sec.g_resp_appl_id;
2132: security_group_id := icx_sec.g_security_group_id;
2133: language_code := icx_sec.g_language_code;
2134: nls_language := icx_sec.g_language;
2135: date_format_mask := icx_sec.g_date_format;
2136: nls_date_language := icx_sec.g_date_language;
2137: nls_numeric_characters := icx_sec.g_numeric_characters;
2138: nls_sort := icx_sec.g_nls_sort;
2131: resp_appl_id := icx_sec.g_resp_appl_id;
2132: security_group_id := icx_sec.g_security_group_id;
2133: language_code := icx_sec.g_language_code;
2134: nls_language := icx_sec.g_language;
2135: date_format_mask := icx_sec.g_date_format;
2136: nls_date_language := icx_sec.g_date_language;
2137: nls_numeric_characters := icx_sec.g_numeric_characters;
2138: nls_sort := icx_sec.g_nls_sort;
2139: nls_territory := icx_sec.g_nls_territory;
2132: security_group_id := icx_sec.g_security_group_id;
2133: language_code := icx_sec.g_language_code;
2134: nls_language := icx_sec.g_language;
2135: date_format_mask := icx_sec.g_date_format;
2136: nls_date_language := icx_sec.g_date_language;
2137: nls_numeric_characters := icx_sec.g_numeric_characters;
2138: nls_sort := icx_sec.g_nls_sort;
2139: nls_territory := icx_sec.g_nls_territory;
2140: else
2133: language_code := icx_sec.g_language_code;
2134: nls_language := icx_sec.g_language;
2135: date_format_mask := icx_sec.g_date_format;
2136: nls_date_language := icx_sec.g_date_language;
2137: nls_numeric_characters := icx_sec.g_numeric_characters;
2138: nls_sort := icx_sec.g_nls_sort;
2139: nls_territory := icx_sec.g_nls_territory;
2140: else
2141: user_id := '';
2134: nls_language := icx_sec.g_language;
2135: date_format_mask := icx_sec.g_date_format;
2136: nls_date_language := icx_sec.g_date_language;
2137: nls_numeric_characters := icx_sec.g_numeric_characters;
2138: nls_sort := icx_sec.g_nls_sort;
2139: nls_territory := icx_sec.g_nls_territory;
2140: else
2141: user_id := '';
2142: responsibility_id := '';
2135: date_format_mask := icx_sec.g_date_format;
2136: nls_date_language := icx_sec.g_date_language;
2137: nls_numeric_characters := icx_sec.g_numeric_characters;
2138: nls_sort := icx_sec.g_nls_sort;
2139: nls_territory := icx_sec.g_nls_territory;
2140: else
2141: user_id := '';
2142: responsibility_id := '';
2143: resp_appl_id := '';
2302:
2303: begin
2304: icx_util.error_page_setup; --clean out artifact errors -- mputman 1574527
2305: -- nlbarlow 1574527
2306: if icx_sec.g_validateSession_flag
2307: then
2308:
2309: --*** Get the cookie for this session.
2310: n_session_id := getsessioncookie;
2490: into c_audit_id
2491: from sys.dual;
2492:
2493: n_session_id := getsessioncookie;
2494: c_message := icx_sec.validateSession(n_session_id,c_web_user_id,c_language);
2495:
2496: */
2497: /*
2498: for i in 1..14 loop
2942: -- *** Find out the IP address of the client ***
2943:
2944: if n_param = PV_LANGUAGE_CODE --** LANGUAGE CODE (21) **
2945: then
2946: n_id := icx_sec.g_language_code; -- add to Java login.
2947:
2948: elsif n_param = PV_CUST_CONTACT_ID or
2949: n_param = PV_VEND_CONTACT_ID or
2950: n_param = PV_INT_CONTACT_ID
2953:
2954:
2955: elsif n_param = PV_RESPONSIBILITY_ID --** RESPONSIBILITY ID (25) **
2956: then
2957: n_id := icx_sec.g_responsibility_id;
2958:
2959: elsif n_param = PV_FUNCTION_ID --** FUNCTION ID (31) **
2960: then
2961: n_id := icx_sec.g_function_id;
2957: n_id := icx_sec.g_responsibility_id;
2958:
2959: elsif n_param = PV_FUNCTION_ID --** FUNCTION ID (31) **
2960: then
2961: n_id := icx_sec.g_function_id;
2962:
2963: elsif n_param = PV_FUNCTION_TYPE --** FUNCTION TYPE (32) **
2964: then
2965: n_id := icx_sec.g_function_type;
2961: n_id := icx_sec.g_function_id;
2962:
2963: elsif n_param = PV_FUNCTION_TYPE --** FUNCTION TYPE (32) **
2964: then
2965: n_id := icx_sec.g_function_type;
2966:
2967: elsif n_param = PV_USER_NAME --** USERNAME (99) **
2968: then
2969: select b.USER_NAME
2974: and a.session_id = n_session_id;
2975:
2976: elsif n_param = PV_USER_ID --** WEB USER ID (10) **
2977: then
2978: n_id := icx_sec.g_user_id;
2979:
2980: elsif n_param = PV_DATE_FORMAT --** DATE FORMAT MASK (22) **
2981: then
2982: n_id := icx_sec.g_date_format;
2978: n_id := icx_sec.g_user_id;
2979:
2980: elsif n_param = PV_DATE_FORMAT --** DATE FORMAT MASK (22) **
2981: then
2982: n_id := icx_sec.g_date_format;
2983:
2984: elsif n_param = PV_SESSION_ID -- ** SESSION_ID (23) **
2985: then
2986: n_id := n_session_id;
2986: n_id := n_session_id;
2987:
2988: elsif n_param = PV_ORG_ID -- ** ORG_ID (29) **
2989: then
2990: n_id := icx_sec.g_org_id;
2991:
2992: elsif n_param = PV_USER_REQ_TEMPLATE -- ** REQ DEFAULT TEMPLATE (25)
2993: then
2994:
2993: then
2994:
2995: fnd_profile.get_specific(
2996: name_z => 'ICX_REQ_DEFAULT_TEMPLATE',
2997: application_id_z => icx_sec.g_resp_appl_id,
2998: user_id_z => icx_sec.g_user_id,
2999: responsibility_id_z => icx_sec.g_responsibility_id,
3000: val_z => n_id,
3001: defined_z => l_profile_defined);
2994:
2995: fnd_profile.get_specific(
2996: name_z => 'ICX_REQ_DEFAULT_TEMPLATE',
2997: application_id_z => icx_sec.g_resp_appl_id,
2998: user_id_z => icx_sec.g_user_id,
2999: responsibility_id_z => icx_sec.g_responsibility_id,
3000: val_z => n_id,
3001: defined_z => l_profile_defined);
3002:
2995: fnd_profile.get_specific(
2996: name_z => 'ICX_REQ_DEFAULT_TEMPLATE',
2997: application_id_z => icx_sec.g_resp_appl_id,
2998: user_id_z => icx_sec.g_user_id,
2999: responsibility_id_z => icx_sec.g_responsibility_id,
3000: val_z => n_id,
3001: defined_z => l_profile_defined);
3002:
3003:
3005: then
3006:
3007: fnd_profile.get_specific(
3008: name_z => 'ICX_REQ_OVERRIDE_REQUESTOR_CODE',
3009: application_id_z => icx_sec.g_resp_appl_id,
3010: user_id_z => icx_sec.g_user_id,
3011: responsibility_id_z => icx_sec.g_responsibility_id,
3012: val_z => n_id,
3013: defined_z => l_profile_defined);
3006:
3007: fnd_profile.get_specific(
3008: name_z => 'ICX_REQ_OVERRIDE_REQUESTOR_CODE',
3009: application_id_z => icx_sec.g_resp_appl_id,
3010: user_id_z => icx_sec.g_user_id,
3011: responsibility_id_z => icx_sec.g_responsibility_id,
3012: val_z => n_id,
3013: defined_z => l_profile_defined);
3014:
3007: fnd_profile.get_specific(
3008: name_z => 'ICX_REQ_OVERRIDE_REQUESTOR_CODE',
3009: application_id_z => icx_sec.g_resp_appl_id,
3010: user_id_z => icx_sec.g_user_id,
3011: responsibility_id_z => icx_sec.g_responsibility_id,
3012: val_z => n_id,
3013: defined_z => l_profile_defined);
3014:
3015: elsif n_param = PV_USER_REQ_OVERRIDE_LOC_FLAG -- ** PV_USER_REQ_OVERRIDE_LOC_FLAG (27)
3016: then
3017:
3018: fnd_profile.get_specific(
3019: name_z => 'ICX_REQ_OVERRIDE_LOCATION_FLAG',
3020: application_id_z => icx_sec.g_resp_appl_id,
3021: user_id_z => icx_sec.g_user_id,
3022: responsibility_id_z => icx_sec.g_responsibility_id,
3023: val_z => n_id,
3024: defined_z => l_profile_defined);
3017:
3018: fnd_profile.get_specific(
3019: name_z => 'ICX_REQ_OVERRIDE_LOCATION_FLAG',
3020: application_id_z => icx_sec.g_resp_appl_id,
3021: user_id_z => icx_sec.g_user_id,
3022: responsibility_id_z => icx_sec.g_responsibility_id,
3023: val_z => n_id,
3024: defined_z => l_profile_defined);
3025:
3018: fnd_profile.get_specific(
3019: name_z => 'ICX_REQ_OVERRIDE_LOCATION_FLAG',
3020: application_id_z => icx_sec.g_resp_appl_id,
3021: user_id_z => icx_sec.g_user_id,
3022: responsibility_id_z => icx_sec.g_responsibility_id,
3023: val_z => n_id,
3024: defined_z => l_profile_defined);
3025:
3026: elsif n_param = PV_USER_REQ_DAYS_NEEDED_BY -- ** PV_USER_REQ_DAYS_NEEDED_BY (28)
3027: then
3028:
3029: fnd_profile.get_specific(
3030: name_z => 'ICX_DAYS_NEEDED_BY',
3031: application_id_z => icx_sec.g_resp_appl_id,
3032: user_id_z => icx_sec.g_user_id,
3033: responsibility_id_z => icx_sec.g_responsibility_id,
3034: val_z => n_id,
3035: defined_z => l_profile_defined);
3028:
3029: fnd_profile.get_specific(
3030: name_z => 'ICX_DAYS_NEEDED_BY',
3031: application_id_z => icx_sec.g_resp_appl_id,
3032: user_id_z => icx_sec.g_user_id,
3033: responsibility_id_z => icx_sec.g_responsibility_id,
3034: val_z => n_id,
3035: defined_z => l_profile_defined);
3036:
3029: fnd_profile.get_specific(
3030: name_z => 'ICX_DAYS_NEEDED_BY',
3031: application_id_z => icx_sec.g_resp_appl_id,
3032: user_id_z => icx_sec.g_user_id,
3033: responsibility_id_z => icx_sec.g_responsibility_id,
3034: val_z => n_id,
3035: defined_z => l_profile_defined);
3036:
3037:
3288: else
3289: l_encrypted_session_id := '-1';
3290: end if;
3291:
3292: IF icx_sec.g_query_set = -1 THEN
3293:
3294: select HOME_URL,
3295: WEBMASTER_EMAIL,
3296: QUERY_SET,
3298: SESSION_COOKIE_DOMAIN, --mputman added 1574527
3299: SESSION_COOKIE_NAME, --mputman added 1574527
3300: WINDOW_COOKIE_NAME
3301:
3302: into icx_sec.g_home_url,
3303: icx_sec.g_webmaster_email,
3304: icx_sec.g_query_set,
3305: icx_sec.g_max_rows,
3306: icx_sec.g_session_cookie_domain, --mputman added 1574527
3299: SESSION_COOKIE_NAME, --mputman added 1574527
3300: WINDOW_COOKIE_NAME
3301:
3302: into icx_sec.g_home_url,
3303: icx_sec.g_webmaster_email,
3304: icx_sec.g_query_set,
3305: icx_sec.g_max_rows,
3306: icx_sec.g_session_cookie_domain, --mputman added 1574527
3307: icx_sec.g_session_cookie_name, --mputman added 1574527
3300: WINDOW_COOKIE_NAME
3301:
3302: into icx_sec.g_home_url,
3303: icx_sec.g_webmaster_email,
3304: icx_sec.g_query_set,
3305: icx_sec.g_max_rows,
3306: icx_sec.g_session_cookie_domain, --mputman added 1574527
3307: icx_sec.g_session_cookie_name, --mputman added 1574527
3308: icx_sec.g_window_cookie_name
3301:
3302: into icx_sec.g_home_url,
3303: icx_sec.g_webmaster_email,
3304: icx_sec.g_query_set,
3305: icx_sec.g_max_rows,
3306: icx_sec.g_session_cookie_domain, --mputman added 1574527
3307: icx_sec.g_session_cookie_name, --mputman added 1574527
3308: icx_sec.g_window_cookie_name
3309: from ICX_PARAMETERS;
3302: into icx_sec.g_home_url,
3303: icx_sec.g_webmaster_email,
3304: icx_sec.g_query_set,
3305: icx_sec.g_max_rows,
3306: icx_sec.g_session_cookie_domain, --mputman added 1574527
3307: icx_sec.g_session_cookie_name, --mputman added 1574527
3308: icx_sec.g_window_cookie_name
3309: from ICX_PARAMETERS;
3310: END IF; --mputman added 1574527
3303: icx_sec.g_webmaster_email,
3304: icx_sec.g_query_set,
3305: icx_sec.g_max_rows,
3306: icx_sec.g_session_cookie_domain, --mputman added 1574527
3307: icx_sec.g_session_cookie_name, --mputman added 1574527
3308: icx_sec.g_window_cookie_name
3309: from ICX_PARAMETERS;
3310: END IF; --mputman added 1574527
3311:
3304: icx_sec.g_query_set,
3305: icx_sec.g_max_rows,
3306: icx_sec.g_session_cookie_domain, --mputman added 1574527
3307: icx_sec.g_session_cookie_name, --mputman added 1574527
3308: icx_sec.g_window_cookie_name
3309: from ICX_PARAMETERS;
3310: END IF; --mputman added 1574527
3311:
3312: --mputman added 1574527
3309: from ICX_PARAMETERS;
3310: END IF; --mputman added 1574527
3311:
3312: --mputman added 1574527
3313: -- icx_sec.g_session_cookie_name := icx_sec.getsessioncookiename;
3314:
3315: if (icx_sec.g_session_cookie_name is null) then
3316: icx_sec.g_session_cookie_name := FND_WEB_CONFIG.DATABASE_ID;
3317:
3311:
3312: --mputman added 1574527
3313: -- icx_sec.g_session_cookie_name := icx_sec.getsessioncookiename;
3314:
3315: if (icx_sec.g_session_cookie_name is null) then
3316: icx_sec.g_session_cookie_name := FND_WEB_CONFIG.DATABASE_ID;
3317:
3318: end if;
3319:
3312: --mputman added 1574527
3313: -- icx_sec.g_session_cookie_name := icx_sec.getsessioncookiename;
3314:
3315: if (icx_sec.g_session_cookie_name is null) then
3316: icx_sec.g_session_cookie_name := FND_WEB_CONFIG.DATABASE_ID;
3317:
3318: end if;
3319:
3320: -- mputman added 1574527
3320: -- mputman added 1574527
3321: --the below line was commented for performance reasons.
3322: --bcos getsessioncookiedomain also hits DB for finding icx_parameters.session_cookie_domain.
3323: --uncommenting again.
3324: icx_sec.g_session_cookie_domain := icx_sec.getsessioncookiedomain;
3325:
3326: --mputman modified to change default domain setting 1755300
3327: -- will remove first segment of CGI env for server
3328: -- then will test to see how many remaining segments
3356: end if;
3357: end if;
3358: -- end of bug 1688982
3359:
3360: if (icx_sec.g_session_cookie_domain = 'NODOMAIN')
3361: then
3362: owa_cookie.send(name => icx_sec.g_session_cookie_name,
3363: value => l_encrypted_session_id,
3364: expires => '',
3358: -- end of bug 1688982
3359:
3360: if (icx_sec.g_session_cookie_domain = 'NODOMAIN')
3361: then
3362: owa_cookie.send(name => icx_sec.g_session_cookie_name,
3363: value => l_encrypted_session_id,
3364: expires => '',
3365: path => '/',
3366: secure => l_secure);
3364: expires => '',
3365: path => '/',
3366: secure => l_secure);
3367: else
3368: owa_cookie.send(name => icx_sec.g_session_cookie_name,
3369: value => l_encrypted_session_id,
3370: expires => '',
3371: path => '/',
3372: domain => icx_sec.g_session_cookie_domain,
3368: owa_cookie.send(name => icx_sec.g_session_cookie_name,
3369: value => l_encrypted_session_id,
3370: expires => '',
3371: path => '/',
3372: domain => icx_sec.g_session_cookie_domain,
3373: secure => l_secure);
3374: end if;
3375:
3376: exception
3385: l_session_id number;
3386:
3387: begin
3388:
3389: IF icx_sec.g_query_set = -1 THEN
3390: select HOME_URL,
3391: WEBMASTER_EMAIL,
3392: QUERY_SET,
3393: MAX_ROWS,
3394: SESSION_COOKIE_DOMAIN, --mputman added 1574527
3395: SESSION_COOKIE_NAME, --mputman added 1574527
3396: WINDOW_COOKIE_NAME
3397:
3398: into icx_sec.g_home_url,
3399: icx_sec.g_webmaster_email,
3400: icx_sec.g_query_set,
3401: icx_sec.g_max_rows,
3402: icx_sec.g_session_cookie_domain, --mputman added 1574527
3395: SESSION_COOKIE_NAME, --mputman added 1574527
3396: WINDOW_COOKIE_NAME
3397:
3398: into icx_sec.g_home_url,
3399: icx_sec.g_webmaster_email,
3400: icx_sec.g_query_set,
3401: icx_sec.g_max_rows,
3402: icx_sec.g_session_cookie_domain, --mputman added 1574527
3403: icx_sec.g_session_cookie_name, --mputman added 1574527
3396: WINDOW_COOKIE_NAME
3397:
3398: into icx_sec.g_home_url,
3399: icx_sec.g_webmaster_email,
3400: icx_sec.g_query_set,
3401: icx_sec.g_max_rows,
3402: icx_sec.g_session_cookie_domain, --mputman added 1574527
3403: icx_sec.g_session_cookie_name, --mputman added 1574527
3404: icx_sec.g_window_cookie_name
3397:
3398: into icx_sec.g_home_url,
3399: icx_sec.g_webmaster_email,
3400: icx_sec.g_query_set,
3401: icx_sec.g_max_rows,
3402: icx_sec.g_session_cookie_domain, --mputman added 1574527
3403: icx_sec.g_session_cookie_name, --mputman added 1574527
3404: icx_sec.g_window_cookie_name
3405: from ICX_PARAMETERS;
3398: into icx_sec.g_home_url,
3399: icx_sec.g_webmaster_email,
3400: icx_sec.g_query_set,
3401: icx_sec.g_max_rows,
3402: icx_sec.g_session_cookie_domain, --mputman added 1574527
3403: icx_sec.g_session_cookie_name, --mputman added 1574527
3404: icx_sec.g_window_cookie_name
3405: from ICX_PARAMETERS;
3406: END IF; --mputman added 1574527
3399: icx_sec.g_webmaster_email,
3400: icx_sec.g_query_set,
3401: icx_sec.g_max_rows,
3402: icx_sec.g_session_cookie_domain, --mputman added 1574527
3403: icx_sec.g_session_cookie_name, --mputman added 1574527
3404: icx_sec.g_window_cookie_name
3405: from ICX_PARAMETERS;
3406: END IF; --mputman added 1574527
3407:
3400: icx_sec.g_query_set,
3401: icx_sec.g_max_rows,
3402: icx_sec.g_session_cookie_domain, --mputman added 1574527
3403: icx_sec.g_session_cookie_name, --mputman added 1574527
3404: icx_sec.g_window_cookie_name
3405: from ICX_PARAMETERS;
3406: END IF; --mputman added 1574527
3407:
3408: -- Bug 1491332: Moved the below 2 lines to the else section below
3405: from ICX_PARAMETERS;
3406: END IF; --mputman added 1574527
3407:
3408: -- Bug 1491332: Moved the below 2 lines to the else section below
3409: -- icx_sec.g_session_cookie_name := icx_sec.getsessioncookiename;
3410: -- icx_sec.g_session_cookie_domain := icx_sec.getsessioncookiedomain;
3411:
3412: if p_ticket is not null
3413: then
3406: END IF; --mputman added 1574527
3407:
3408: -- Bug 1491332: Moved the below 2 lines to the else section below
3409: -- icx_sec.g_session_cookie_name := icx_sec.getsessioncookiename;
3410: -- icx_sec.g_session_cookie_domain := icx_sec.getsessioncookiedomain;
3411:
3412: if p_ticket is not null
3413: then
3414: l_session_id := to_number(icx_call.decrypt3(p_ticket));
3414: l_session_id := to_number(icx_call.decrypt3(p_ticket));
3415: else
3416:
3417: -- mputman added 1574527
3418: -- icx_sec.g_session_cookie_name := icx_sec.getsessioncookiename;
3419:
3420: if (icx_sec.g_session_cookie_name is null) then
3421: icx_sec.g_session_cookie_name := FND_WEB_CONFIG.DATABASE_ID;
3422: end if;
3416:
3417: -- mputman added 1574527
3418: -- icx_sec.g_session_cookie_name := icx_sec.getsessioncookiename;
3419:
3420: if (icx_sec.g_session_cookie_name is null) then
3421: icx_sec.g_session_cookie_name := FND_WEB_CONFIG.DATABASE_ID;
3422: end if;
3423:
3424: -- mputman added 1574527, don't need domain
3417: -- mputman added 1574527
3418: -- icx_sec.g_session_cookie_name := icx_sec.getsessioncookiename;
3419:
3420: if (icx_sec.g_session_cookie_name is null) then
3421: icx_sec.g_session_cookie_name := FND_WEB_CONFIG.DATABASE_ID;
3422: end if;
3423:
3424: -- mputman added 1574527, don't need domain
3425: -- icx_sec.g_session_cookie_domain := icx_sec.getsessioncookiedomain;
3421: icx_sec.g_session_cookie_name := FND_WEB_CONFIG.DATABASE_ID;
3422: end if;
3423:
3424: -- mputman added 1574527, don't need domain
3425: -- icx_sec.g_session_cookie_domain := icx_sec.getsessioncookiedomain;
3426:
3427: l_cookie_session := owa_cookie.get(icx_sec.g_session_cookie_name);
3428:
3429: if (l_cookie_session.num_vals > 0) and (l_cookie_session.vals(l_cookie_session.num_vals) <> '-1')
3423:
3424: -- mputman added 1574527, don't need domain
3425: -- icx_sec.g_session_cookie_domain := icx_sec.getsessioncookiedomain;
3426:
3427: l_cookie_session := owa_cookie.get(icx_sec.g_session_cookie_name);
3428:
3429: if (l_cookie_session.num_vals > 0) and (l_cookie_session.vals(l_cookie_session.num_vals) <> '-1')
3430: then
3431: l_session_id := to_number(icx_call.decrypt3(l_cookie_session.vals(l_cookie_session.num_vals)));
3452: l_session_cookie_name varchar2(81);
3453:
3454: begin
3455:
3456: IF icx_sec.g_session_cookie_name IS NULL THEN
3457:
3458: select SESSION_COOKIE_NAME
3459: into l_session_cookie_name
3460: from ICX_PARAMETERS;
3458: select SESSION_COOKIE_NAME
3459: into l_session_cookie_name
3460: from ICX_PARAMETERS;
3461: ELSE
3462: l_session_cookie_name:=icx_sec.g_session_cookie_name;
3463: END IF; -- added mputman 1574527
3464:
3465: if (l_session_cookie_name is null) then
3466: l_session_cookie_name := FND_WEB_CONFIG.DATABASE_ID;
3574: l_function_id number;
3575:
3576: begin
3577:
3578: -- l_session_id := nvl(p_session_id, icx_sec.getID(icx_sec.pv_session_id));
3579:
3580: if p_function_id is null
3581: then
3582: select FUNCTION_ID
3657: p_link_name => p_text,
3658: p_url_only => 'N');
3659:
3660: /* --mputman convert to execute effort
3661: --l_session_id := icx_sec.getID(n_param => icx_sec.pv_session_id,
3662: -- p_session_id => p_session_id);
3663:
3664: l_RFLink := '
3665: icx_call.encrypt(p_application_id||'*'||
3706:
3707: IF p_session_id IS NOT NULL THEN
3708: l_session_id := p_session_id;
3709: ELSE
3710: l_session_id := icx_sec.getID(icx_sec.pv_session_id);
3711: END IF; --2482554
3712: --l_session_id := nvl(p_session_id, icx_sec.getID(icx_sec.pv_session_id));
3713:
3714: if p_function_id is null and p_function_name is not null
3708: l_session_id := p_session_id;
3709: ELSE
3710: l_session_id := icx_sec.getID(icx_sec.pv_session_id);
3711: END IF; --2482554
3712: --l_session_id := nvl(p_session_id, icx_sec.getID(icx_sec.pv_session_id));
3713:
3714: if p_function_id is null and p_function_name is not null
3715: then
3716: select FUNCTION_ID, TYPE
4258: l_errm:=SQLERRM;
4259: RETURN ('ERROR - '||l_errm);
4260: end;
4261:
4262: --newSessionRaiseEvent will raise the WF Business Event oracle.apps.icx.security.session.created
4263: --mputman 1513025
4264: procedure newSessionRaiseEvent (p_user_id in varchar2,
4265: p_session_id in varchar2) is
4266:
4284:
4285: --Raise the event
4286: --htp.p('####NSRE-5####');--debug mputman
4287:
4288: WF_EVENT.Raise(p_event_name=>'oracle.apps.icx.security.session.created',
4289: p_event_key=>to_char(sysdate, 'HH:MI:SS'),
4290: p_parameters=>l_parameterList);
4291: --htp.p('####NSRE-6####');--debug mputman
4292:
4316: FROM fnd_user
4317: WHERE user_id=l_user_id;
4318: EXCEPTION
4319: WHEN OTHERS THEN
4320: WF_CORE.CONTEXT('icx_sec', 'doNewSessionEvent',p_evtMsg.getEventName( ), p_guid);
4321: WF_EVENT.setErrorInfo(p_evtMsg, 'ERROR');
4322: return 'ERROR';
4323: END;
4324:
4332:
4333:
4334: EXCEPTION
4335: WHEN no_data_found THEN
4336: WF_CORE.CONTEXT('icx_sec', 'doNewSessionEvent',p_evtMsg.getEventName( ), p_guid);
4337: WF_EVENT.setErrorInfo(p_evtMsg, 'ERROR');
4338: return 'ERROR';
4339:
4340: END;
4351: COMMIT;
4352:
4353: EXCEPTION
4354: WHEN OTHERS THEN
4355: WF_CORE.CONTEXT('icx_sec', 'doNewSessionEvent',p_evtMsg.getEventName( ), p_guid);
4356: WF_EVENT.setErrorInfo(p_evtMsg, 'ERROR');
4357:
4358: return 'ERROR';
4359: END;
4726: END;--setUserNLS
4727:
4728:
4729:
4730: end icx_sec;