APPS.FND_WEB_CONFIG dependencies on FND_WEB_CONFIG

Line 1: package body FND_WEB_CONFIG as

1: package body FND_WEB_CONFIG as
2: /* $Header: AFWBCFGB.pls 115.26 2003/04/29 01:24:00 sdstratt ship $ */
3:
4:
5: /* PLSQL_AGENT- get the name of the PLSQL web agent

Line 42: return FND_WEB_CONFIG.TRAIL_SLASH(agent_url);

38: FND_MESSAGE.SET_NAME('FND', 'PROFILES-CANNOT READ');
39: FND_MESSAGE.SET_TOKEN('OPTION', help_mode||'_WEB_AGENT');
40: return NULL;
41: else
42: return FND_WEB_CONFIG.TRAIL_SLASH(agent_url);
43: end if;
44:
45: end PLSQL_AGENT;
46:

Line 75: ws_url := FND_WEB_CONFIG.PLSQL_AGENT(help_mode);

71: index1 number;
72: index2 number;
73: begin
74:
75: ws_url := FND_WEB_CONFIG.PLSQL_AGENT(help_mode);
76:
77: if(ws_url is null) then
78: return NULL;
79: end if;

Line 88: return FND_WEB_CONFIG.TRAIL_SLASH(SUBSTRB(ws_url, 1, index2-1));

84: index2 := INSTRB(ws_url, '/', index1); /* get to 'http://serv:port/' */
85:
86: if(index1 <> index2) AND (index1 <> 2) AND (index2 > 2)
87: AND (index1 is not NULL) AND (index2 is not NULL) then
88: return FND_WEB_CONFIG.TRAIL_SLASH(SUBSTRB(ws_url, 1, index2-1));
89: else
90: /* Incorrect format; give an error message */
91: FND_MESSAGE.SET_NAME('FND', 'AF_WCFG_BAD_AGENT_URL_FORMAT');
92: FND_MESSAGE.SET_TOKEN('URL', ws_url);

Line 131: dad_url := FND_WEB_CONFIG.PLSQL_AGENT(help_mode);

127: index2 number;
128: index3 number;
129: begin
130:
131: dad_url := FND_WEB_CONFIG.PLSQL_AGENT(help_mode);
132:
133: if(dad_url is null) then
134: return NULL;
135: end if;

Line 143: return FND_WEB_CONFIG.TRAIL_SLASH(SUBSTRB(dad_url, index2,

139: index2 := INSTRB(dad_url, '/', index1)+1; /* get to 'http://serv:port/' */
140: index3 := INSTRB(dad_url, '/', index2);/* get to 'http://serv:port/dad/' */
141:
142: if(index2 <> index3) AND (index1 > 2) AND (index2 > 4) AND (index3 > 5) then
143: return FND_WEB_CONFIG.TRAIL_SLASH(SUBSTRB(dad_url, index2,
144: index3-index2));
145: else
146: /* Incorrect format; give an error message */
147: FND_MESSAGE.SET_NAME('FND', 'AF_WCFG_BAD_AGENT_URL_FORMAT');

Line 163: ** to calling fnd_web_config.plsql_agent

159: ** Returns the value of the Generic File Manager agent by parsing
160: ** the APPS_WEB_AGENT. Has a guaranteed trailing slash.
161: **
162: ** Note: Now that we are using webdb, calling this routine is equivalent
163: ** to calling fnd_web_config.plsql_agent
164: **
165: ** Note: if this routine fails, it will return NULL, and
166: ** there will be an error message on the message stack.
167: ** The caller is responsible for either displaying the message

Line 179: return fnd_web_config.plsql_agent(help_mode);

175: function GFM_AGENT (help_mode in varchar2 default 'APPS')
176: return VARCHAR2
177: is
178: begin
179: return fnd_web_config.plsql_agent(help_mode);
180: end GFM_AGENT;
181:
182:
183: /* PROTOCOL- get the protocol identifier

Line 214: proto_url := FND_WEB_CONFIG.PLSQL_AGENT(help_mode);

210: proto_url varchar2(2000) := NULL;
211: index1 number;
212: begin
213:
214: proto_url := FND_WEB_CONFIG.PLSQL_AGENT(help_mode);
215:
216: if(proto_url is null) then
217: FND_MESSAGE.CLEAR; /* Get rid of "Profile not found" error message */
218: return 'http:';

Line 315: agent_url := FND_WEB_CONFIG.TRAIL_SLASH(agent_url);

311: FND_MESSAGE.SET_TOKEN('OPTION','APPS_SERVLET_AGENT');
312: return NULL;
313: end if;
314:
315: agent_url := FND_WEB_CONFIG.TRAIL_SLASH(agent_url);
316:
317: index1 := INSTRB(agent_url, '//', 1) + 2; /* skip 'http://' */
318:
319: index2 := INSTRB(agent_url, '/', index1); /* get to 'http://serv:port/' */

Line 323: return FND_WEB_CONFIG.TRAIL_SLASH(SUBSTRB(agent_url, 1, index2-1)) ||

319: index2 := INSTRB(agent_url, '/', index1); /* get to 'http://serv:port/' */
320:
321: if(index1 <> index2) AND (index1 <> 2) AND (index2 > 2)
322: AND (index1 is not NULL) AND (index2 is not NULL) then
323: return FND_WEB_CONFIG.TRAIL_SLASH(SUBSTRB(agent_url, 1, index2-1)) ||
324: 'OA_HTML/';
325: else
326: /* Incorrect format; give an error message */
327: FND_MESSAGE.SET_NAME('FND', 'AF_WCFG_BAD_AGENT_URL_FORMAT');

Line 411: l_local_server := fnd_web_config.protocol || '//' ||

407: curproc := upper(proc);
408:
409: dot_location := instr(curproc, '.');
410:
411: l_local_server := fnd_web_config.protocol || '//' ||
412: fnd_web_config.server_name || ':' || fnd_web_config.server_port;
413:
414: FND_PROFILE.GET_SPECIFIC (
415: NAME_Z => 'EXTERNAL_SERVERS' ,

Line 412: fnd_web_config.server_name || ':' || fnd_web_config.server_port;

408:
409: dot_location := instr(curproc, '.');
410:
411: l_local_server := fnd_web_config.protocol || '//' ||
412: fnd_web_config.server_name || ':' || fnd_web_config.server_port;
413:
414: FND_PROFILE.GET_SPECIFIC (
415: NAME_Z => 'EXTERNAL_SERVERS' ,
416: USER_ID_Z => NULL ,

Line 463: END FND_WEB_CONFIG;

459: return (retval);
460:
461: end check_enabled;
462:
463: END FND_WEB_CONFIG;
464: