[Home] [Help]
853: BEGIN
854: fnd_profile.get('POS_EXTERNAL_URL', l_value);
855: l_web_agent := l_value;
856: l_fwk_agent := l_value;
857: owa_pattern.change(l_fwk_agent, '/pls.*', NULL);
858: l_servlet_agent := l_fwk_agent || '/OA_HTML/';
859:
860: l_flag := NULL;
861: IF l_web_agent IS NOT NULL AND owa_pattern.match(l_web_agent,'/pls/', l_flag) THEN
857: owa_pattern.change(l_fwk_agent, '/pls.*', NULL);
858: l_servlet_agent := l_fwk_agent || '/OA_HTML/';
859:
860: l_flag := NULL;
861: IF l_web_agent IS NOT NULL AND owa_pattern.match(l_web_agent,'/pls/', l_flag) THEN
862: -- The value of POS_EXTERNAL_URL still points to icx web site.
863: l_saved := fnd_profile.save( x_name => 'APPS_WEB_AGENT',
864: x_value => l_web_agent,
865: x_level_name => 'USER',
1586: IF ( lv_external_web_agent IS NOT NULL ) THEN
1587:
1588: lv_pattern := '/pls';
1589: lv_flag := ''; -- we want it to be case sensitive for now.
1590: If (owa_pattern.match(lv_external_web_agent,lv_pattern, lv_flag)) then
1591: -- The external profile still points to icx web site.
1592:
1593: IF ( fnd_log.level_procedure >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1594: fnd_log.string(fnd_log.level_procedure, g_log_module_name || '.' || lv_proc_name, 'Setting user level APPS_WEB_AGENT profile option value');
1610: END IF;
1611:
1612: END IF;
1613:
1614: owa_pattern.change(lv_ext_servlet_agent, '/pls.*', '/OA_HTML');
1615: IF ( fnd_profile.save( x_name => 'APPS_SERVLET_AGENT',
1616: x_value => lv_ext_servlet_agent,
1617: x_level_name => 'USER',
1618: x_level_value => p_userid ) ) THEN
1628: END IF;
1629:
1630: END IF;
1631:
1632: owa_pattern.change(lv_ext_servlet_agent, '/OA_HTML.*', '');
1633: IF ( fnd_profile.save( x_name => 'APPS_FRAMEWORK_AGENT',
1634: x_value => lv_ext_servlet_agent,
1635: x_level_name => 'USER',
1636: x_level_value => p_userid ) ) THEN