[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',
1561: IF ( lv_external_web_agent IS NOT NULL ) THEN
1562:
1563: lv_pattern := '/pls';
1564: lv_flag := ''; -- we want it to be case sensitive for now.
1565: If (owa_pattern.match(lv_external_web_agent,lv_pattern, lv_flag)) then
1566: -- The external profile still points to icx web site.
1567:
1568: IF ( fnd_log.level_procedure >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1569: fnd_log.string(fnd_log.level_procedure, g_log_module_name || '.' || lv_proc_name, 'Setting user level APPS_WEB_AGENT profile option value');
1585: END IF;
1586:
1587: END IF;
1588:
1589: owa_pattern.change(lv_ext_servlet_agent, '/pls.*', '/OA_HTML');
1590: IF ( fnd_profile.save( x_name => 'APPS_SERVLET_AGENT',
1591: x_value => lv_ext_servlet_agent,
1592: x_level_name => 'USER',
1593: x_level_value => p_userid ) ) THEN
1603: END IF;
1604:
1605: END IF;
1606:
1607: owa_pattern.change(lv_ext_servlet_agent, '/OA_HTML.*', '');
1608: IF ( fnd_profile.save( x_name => 'APPS_FRAMEWORK_AGENT',
1609: x_value => lv_ext_servlet_agent,
1610: x_level_name => 'USER',
1611: x_level_value => p_userid ) ) THEN