eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.FND_APP_SERVER_PKG dependencies on FND_NODES

Line 15: svrid fnd_nodes.server_id%TYPE;

11: */
12: FUNCTION create_server_id
13: RETURN VARCHAR2
14: IS
15: svrid fnd_nodes.server_id%TYPE;
16: guid VARCHAR2(32);
17: rnd_dt VARCHAR2(32);
18: curs INTEGER;
19: sqlbuf VARCHAR2(2000);

Line 106: ** Check to see if the node_name already exists in FND_NODES

102: END;
103:
104: /* node_name_exists
105: **
106: ** Check to see if the node_name already exists in FND_NODES
107: */
108: FUNCTION node_name_exists(p_node_name IN VARCHAR2)
109: RETURN BOOLEAN
110: IS

Line 116: FROM fnd_nodes

112: l_node_name VARCHAR2(30) := UPPER(p_node_name);
113: BEGIN
114: SELECT COUNT(*)
115: INTO kount
116: FROM fnd_nodes
117: WHERE upper(node_name) = l_node_name;
118:
119: IF kount > 0 THEN
120: RETURN true;

Line 128: ** Check to see if the node_name already exists in FND_NODES where the

124: END;
125:
126: /* desktop_node_exists
127: **
128: ** Check to see if the node_name already exists in FND_NODES where the
129: ** support_* columns = 'N'.
130: */
131: FUNCTION desktop_node_exists(p_node_name IN OUT NOCOPY VARCHAR2)
132: RETURN BOOLEAN

Line 140: FROM fnd_nodes

136: BEGIN
137: -- Check if a node_name exists with support_* = 'N' and server_address <> '*'
138: SELECT COUNT(*)
139: INTO kount
140: FROM fnd_nodes
141: WHERE upper(node_name) = l_node_name
142: AND SUPPORT_CP = 'N'
143: AND SUPPORT_FORMS = 'N'
144: AND SUPPORT_WEB = 'N'

Line 161: ** Check to see if the server_address already exists in FND_NODES

157: END;
158:
159: /* server_address_exists
160: **
161: ** Check to see if the server_address already exists in FND_NODES
162: */
163: FUNCTION server_address_exists(p_address IN VARCHAR2)
164: RETURN BOOLEAN
165: IS

Line 170: FROM fnd_nodes

166: kount NUMBER := 0;
167: BEGIN
168: SELECT COUNT(*)
169: INTO kount
170: FROM fnd_nodes
171: WHERE server_address = p_address;
172:
173: IF kount > 0 THEN
174: RETURN true;

Line 193: l_server_id fnd_nodes.server_id%TYPE := NULL;

189: p_node_name IN VARCHAR2 DEFAULT NULL,
190: p_address IN VARCHAR2 DEFAULT NULL)
191: RETURN VARCHAR2
192: IS
193: l_server_id fnd_nodes.server_id%TYPE := NULL;
194: l_node_name VARCHAR2(30) := UPPER(p_node_name);
195: BEGIN
196: -- Node name is unique, so if node name is passed in, that is what the code
197: -- uses to obtain the server_id.

Line 201: FROM fnd_nodes

197: -- uses to obtain the server_id.
198: IF l_node_name IS NOT NULL AND node_name_exists(l_node_name) THEN
199: SELECT server_id
200: INTO l_server_id
201: FROM fnd_nodes
202: WHERE upper(node_name) = l_node_name;
203: -- Server address should be unique but since it is nullable in FND_NODES,
204: -- it may not be the best condition to use to derive a unique server_id.
205: -- However, if the server_address exists, return one of the server_ids.

Line 203: -- Server address should be unique but since it is nullable in FND_NODES,

199: SELECT server_id
200: INTO l_server_id
201: FROM fnd_nodes
202: WHERE upper(node_name) = l_node_name;
203: -- Server address should be unique but since it is nullable in FND_NODES,
204: -- it may not be the best condition to use to derive a unique server_id.
205: -- However, if the server_address exists, return one of the server_ids.
206: elsif p_address IS NOT NULL AND server_address_exists(p_address) THEN
207: SELECT server_id

Line 209: FROM fnd_nodes

205: -- However, if the server_address exists, return one of the server_ids.
206: elsif p_address IS NOT NULL AND server_address_exists(p_address) THEN
207: SELECT server_id
208: INTO l_server_id
209: FROM fnd_nodes
210: WHERE server_address = p_address
211: AND server_id IS NOT NULL
212: AND rownum < 2;
213: END IF;

Line 227: l_server_address fnd_nodes.server_address%TYPE := NULL;

223: */
224: FUNCTION get_server_address(p_node_name IN VARCHAR2)
225: RETURN VARCHAR2
226: IS
227: l_server_address fnd_nodes.server_address%TYPE := NULL;
228: l_node_name VARCHAR2(30) := UPPER(p_node_name);
229: BEGIN
230: IF node_name_exists(l_node_name)THEN
231: SELECT server_address

Line 233: FROM fnd_nodes

229: BEGIN
230: IF node_name_exists(l_node_name)THEN
231: SELECT server_address
232: INTO l_server_address
233: FROM fnd_nodes
234: WHERE upper(node_name) = l_node_name;
235: END IF;
236:
237: RETURN l_server_address;

Line 251: l_node_name fnd_nodes.node_name%TYPE := NULL;

247: */
248: FUNCTION get_node_name(p_address IN VARCHAR2)
249: RETURN VARCHAR2
250: IS
251: l_node_name fnd_nodes.node_name%TYPE := NULL;
252: BEGIN
253: IF server_address_exists(p_address)THEN
254: SELECT node_name
255: INTO l_node_name

Line 256: FROM fnd_nodes

252: BEGIN
253: IF server_address_exists(p_address)THEN
254: SELECT node_name
255: INTO l_node_name
256: FROM fnd_nodes
257: WHERE server_address = p_address
258: AND node_name IS NOT NULL
259: AND rownum < 2;
260: END IF;

Line 294: -- Bug 3736714: Platform Code is required by FND_NODES to register a

290: curr_node_name VARCHAR2(30) := NULL;
291: l_node_name VARCHAR2(30) := UPPER(p_node_name);
292: l_platform_code VARCHAR2(30);
293: BEGIN
294: -- Bug 3736714: Platform Code is required by FND_NODES to register a
295: -- node. AdminAppServer has been modified to support platform code.
296: l_platform_code := get_platform_code(p_platform_code);
297:
298: -- If a desktop node is being inserted using insert_server, then redirect to

Line 317: FROM fnd_nodes

313: -- Then, get the node_id and node_name of the existing node
314: -- entry.
315: SELECT node_id, node_name
316: INTO curr_node_id, curr_node_name
317: FROM fnd_nodes
318: WHERE server_address = p_address;
319:
320: -- If the current node_name is not a fully qualified hostname
321: IF INSTR(curr_node_name, '.') = 0 THEN

Line 338: UPDATE FND_NODES

334:
335: -- Update the old node with the correct platform and null
336: -- out server_id and server_address so that the node does
337: -- not get referenced again.
338: UPDATE FND_NODES
339: SET PLATFORM_CODE = '87',
340: SERVER_ADDRESS = NULL,
341: SERVER_ID = NULL
342: WHERE NODE_ID = curr_node_id;

Line 347: FROM fnd_nodes

343:
344: -- Added for Bug 3292353.
345: SELECT COUNT(*)
346: INTO kount
347: FROM fnd_nodes
348: WHERE UPPER(node_name) = l_node_name;
349:
350: -- Since fnd_concurrent.register_node() does not handle
351: -- the hostname at this time, it will be manually inserted

Line 372: -- FND_NODES.NODE_NAME should only have hostname if platform is not

368:
369: ELSE /* Node does not exist, the server will be inserted. */
370:
371: -- Check if p_node_name is a fully qualified hostname with domain.
372: -- FND_NODES.NODE_NAME should only have hostname if platform is not
373: -- UNIX Alpha.
374: IF (l_platform_code <> '87' AND INSTR(p_node_name, '.') <> 0) THEN
375: -- The hostname should be the beginning of the string up until
376: -- the first period. FND_NODES.NODE_NAME is stored in

Line 376: -- the first period. FND_NODES.NODE_NAME is stored in

372: -- FND_NODES.NODE_NAME should only have hostname if platform is not
373: -- UNIX Alpha.
374: IF (l_platform_code <> '87' AND INSTR(p_node_name, '.') <> 0) THEN
375: -- The hostname should be the beginning of the string up until
376: -- the first period. FND_NODES.NODE_NAME is stored in
377: -- UPPERCASE.
378: l_node_name := UPPER(SUBSTR(p_node_name, 0,
379: INSTR(p_node_name, '.') - 1));
380: END IF;

Line 398: FROM fnd_nodes

394:
395: -- Added for Bug 3292353.
396: SELECT COUNT(*)
397: INTO kount
398: FROM fnd_nodes
399: WHERE UPPER(node_name) = l_node_name;
400:
401: -- Since fnd_concurrent.register_node() does not handle the hostname
402: -- at this time, it will be manually inserted using the

Line 428: ** Due to the migration of FND_APPLICATION_SERVERS to FND_NODES,

424:
425: /* delete_server
426: **
427: ** This procedure used to remove an Application Server row from the database.
428: ** Due to the migration of FND_APPLICATION_SERVERS to FND_NODES,
429: ** fnd_nodes.server_id is nulled out instead in order to preserve the
430: ** node_name and avoid dangling references to the node_name. This is called by
431: ** AdminAppServer.delSvrFromDB().
432: */

Line 429: ** fnd_nodes.server_id is nulled out instead in order to preserve the

425: /* delete_server
426: **
427: ** This procedure used to remove an Application Server row from the database.
428: ** Due to the migration of FND_APPLICATION_SERVERS to FND_NODES,
429: ** fnd_nodes.server_id is nulled out instead in order to preserve the
430: ** node_name and avoid dangling references to the node_name. This is called by
431: ** AdminAppServer.delSvrFromDB().
432: */
433: PROCEDURE delete_server(p_address IN VARCHAR2)

Line 436: UPDATE fnd_nodes

432: */
433: PROCEDURE delete_server(p_address IN VARCHAR2)
434: IS
435: BEGIN
436: UPDATE fnd_nodes
437: SET server_id = NULL
438: WHERE server_address = p_address;
439: EXCEPTION
440: WHEN no_data_found THEN

Line 488: FROM fnd_nodes

484: l_support_web,
485: l_support_admin,
486: l_support_db,
487: l_platform
488: FROM fnd_nodes
489: WHERE server_address = p_address;
490:
491: IF SQL%notfound THEN
492: RAISE no_data_found;

Line 504: UPDATE fnd_nodes

500: -- Bug 9688017: added for Authentication row
501: OR (p_address = '*')) THEN
502:
503: IF(l_node_name <> UPPER(l_node_name)) THEN
504: UPDATE fnd_nodes
505: SET node_name = UPPER(l_node_name)
506: WHERE server_address = p_address;
507: END IF;
508:

Line 510: UPDATE fnd_nodes

506: WHERE server_address = p_address;
507: END IF;
508:
509: IF(p_server_id IS NOT NULL) THEN
510: UPDATE fnd_nodes
511: SET server_id = p_server_id
512: WHERE server_address = p_address;
513: END IF;
514:

Line 516: UPDATE fnd_nodes

512: WHERE server_address = p_address;
513: END IF;
514:
515: IF(p_description IS NOT NULL) THEN
516: UPDATE fnd_nodes
517: SET description = p_description
518: WHERE server_address = p_address;
519: END IF;
520:

Line 521: -- Added for Bug 3292353. ICX code will be calling FND_NODES.WEBHOST so

517: SET description = p_description
518: WHERE server_address = p_address;
519: END IF;
520:
521: -- Added for Bug 3292353. ICX code will be calling FND_NODES.WEBHOST so
522: -- there needs to be a way to populate/update the column. This may
523: -- later be changed to use CP APIs.
524: IF(p_webhost IS NOT NULL) THEN
525: UPDATE fnd_nodes

Line 525: UPDATE fnd_nodes

521: -- Added for Bug 3292353. ICX code will be calling FND_NODES.WEBHOST so
522: -- there needs to be a way to populate/update the column. This may
523: -- later be changed to use CP APIs.
524: IF(p_webhost IS NOT NULL) THEN
525: UPDATE fnd_nodes
526: SET webhost = p_webhost
527: WHERE server_address = p_address;
528: END IF;
529:

Line 536: UPDATE fnd_nodes

532: -- passed in, the platform_code is likely correct and the platform_code
533: -- for the node needs to be updated.
534: IF (p_platform IS NOT NULL) THEN
535: l_platform2 := get_platform_code(p_platform);
536: UPDATE fnd_nodes
537: SET PLATFORM_CODE = l_platform2
538: WHERE server_address = p_address;
539: END IF;
540:

Line 542: Bug 3773424:AUTHENTICATION NODE HAS NO VALUES FOR FND_NODES.SUPPORT_*

538: WHERE server_address = p_address;
539: END IF;
540:
541: /*
542: Bug 3773424:AUTHENTICATION NODE HAS NO VALUES FOR FND_NODES.SUPPORT_*
543: COLUMNS. A system alert is being logged stating that it "Could not
544: contact Service Manager FNDSM_AUTHENTICATION_*". It seems that the
545: ICM attempts to tnsping all remote Service Managers using the query:
546:

Line 548: FROM FND_NODES

544: contact Service Manager FNDSM_AUTHENTICATION_*". It seems that the
545: ICM attempts to tnsping all remote Service Managers using the query:
546:
547: SELECT NODE_NAME, STATUS, NODE_MODE
548: FROM FND_NODES
549: WHERE NOT (SUPPORT_CP = 'N' AND
550: SUPPORT_WEB = 'N' AND SUPPORT_FORMS = 'N' AND
551: SUPPORT_ADMIN = 'N' AND SUPPORT_CP is NOT NULL AND
552: SUPPORT_WEB is NOT NULL AND

Line 564: UPDATE fnd_nodes

560: */
561: IF (p_address = '*') THEN
562:
563: IF (l_support_cp IS NULL) THEN
564: UPDATE fnd_nodes
565: SET SUPPORT_CP = 'N'
566: WHERE server_address = p_address;
567: END IF;
568:

Line 570: UPDATE fnd_nodes

566: WHERE server_address = p_address;
567: END IF;
568:
569: IF (l_support_forms IS NULL) THEN
570: UPDATE fnd_nodes
571: SET SUPPORT_FORMS = 'N'
572: WHERE server_address = p_address;
573: END IF;
574:

Line 576: UPDATE fnd_nodes

572: WHERE server_address = p_address;
573: END IF;
574:
575: IF (l_support_web IS NULL) THEN
576: UPDATE fnd_nodes
577: SET SUPPORT_WEB = 'N'
578: WHERE server_address = p_address;
579: END IF;
580:

Line 582: UPDATE fnd_nodes

578: WHERE server_address = p_address;
579: END IF;
580:
581: IF (l_support_admin IS NULL) THEN
582: UPDATE fnd_nodes
583: SET SUPPORT_ADMIN = 'N'
584: WHERE server_address = p_address;
585: END IF;
586:

Line 588: UPDATE fnd_nodes

584: WHERE server_address = p_address;
585: END IF;
586:
587: IF (l_support_db IS NULL) THEN
588: UPDATE fnd_nodes
589: SET SUPPORT_DB = 'N'
590: WHERE server_address = p_address;
591: END IF;
592:

Line 599: UPDATE fnd_nodes

595: */
596: IF (p_platform IS NOT NULL) THEN
597: l_platform2 := get_platform_code(p_platform);
598: IF (l_platform <> l_platform2) THEN
599: UPDATE fnd_nodes
600: SET PLATFORM_CODE = l_platform2
601: WHERE server_address = p_address;
602: END IF;
603: END IF;

Line 644: Bug 3773424:AUTHENTICATION NODE HAS NO VALUES FOR FND_NODES.SUPPORT_*

640: WHEN no_data_found THEN
641: /*
642: insert_server(p_value,'*','AUTHENTICATION','Authentication value');
643:
644: Bug 3773424:AUTHENTICATION NODE HAS NO VALUES FOR FND_NODES.SUPPORT_*
645: COLUMNS. A system alert is being logged stating that it "Could not
646: contact Service Manager FNDSM_AUTHENTICATION_*". It seems that the
647: ICM attempts to tnsping all remote Service Managers using the query:
648:

Line 650: FROM FND_NODES

646: contact Service Manager FNDSM_AUTHENTICATION_*". It seems that the
647: ICM attempts to tnsping all remote Service Managers using the query:
648:
649: SELECT NODE_NAME, STATUS, NODE_MODE
650: FROM FND_NODES
651: WHERE NOT (SUPPORT_CP = 'N' AND
652: SUPPORT_WEB = 'N' AND SUPPORT_FORMS = 'N' AND
653: SUPPORT_ADMIN = 'N' AND SUPPORT_CP is NOT NULL AND
654: SUPPORT_WEB is NOT NULL AND

Line 691: l_node_name fnd_nodes.node_name%TYPE := UPPER(p_node_name);

687: p_server_id IN OUT NOCOPY VARCHAR2,
688: p_address IN VARCHAR2 DEFAULT NULL,
689: p_description IN VARCHAR2 DEFAULT NULL)
690: IS
691: l_node_name fnd_nodes.node_name%TYPE := UPPER(p_node_name);
692: l_node_name_from_address fnd_nodes.node_name%TYPE := NULL;
693: l_server_id fnd_nodes.server_id%TYPE := NULL;
694: l_server_address fnd_nodes.server_address%TYPE;
695: BEGIN

Line 692: l_node_name_from_address fnd_nodes.node_name%TYPE := NULL;

688: p_address IN VARCHAR2 DEFAULT NULL,
689: p_description IN VARCHAR2 DEFAULT NULL)
690: IS
691: l_node_name fnd_nodes.node_name%TYPE := UPPER(p_node_name);
692: l_node_name_from_address fnd_nodes.node_name%TYPE := NULL;
693: l_server_id fnd_nodes.server_id%TYPE := NULL;
694: l_server_address fnd_nodes.server_address%TYPE;
695: BEGIN
696: /* Bug 5279502: DESKTOP NODE SUPPORT IN FND_APP_SERVER_PKG */

Line 693: l_server_id fnd_nodes.server_id%TYPE := NULL;

689: p_description IN VARCHAR2 DEFAULT NULL)
690: IS
691: l_node_name fnd_nodes.node_name%TYPE := UPPER(p_node_name);
692: l_node_name_from_address fnd_nodes.node_name%TYPE := NULL;
693: l_server_id fnd_nodes.server_id%TYPE := NULL;
694: l_server_address fnd_nodes.server_address%TYPE;
695: BEGIN
696: /* Bug 5279502: DESKTOP NODE SUPPORT IN FND_APP_SERVER_PKG */
697: /*===============+

Line 694: l_server_address fnd_nodes.server_address%TYPE;

690: IS
691: l_node_name fnd_nodes.node_name%TYPE := UPPER(p_node_name);
692: l_node_name_from_address fnd_nodes.node_name%TYPE := NULL;
693: l_server_id fnd_nodes.server_id%TYPE := NULL;
694: l_server_address fnd_nodes.server_address%TYPE;
695: BEGIN
696: /* Bug 5279502: DESKTOP NODE SUPPORT IN FND_APP_SERVER_PKG */
697: /*===============+
698: | Desktop Node |

Line 706: -- Case 1. node_name does not exist in FND_NODES

702: IF desktop_node_exists(l_node_name) THEN
703: update_desktop_server(l_node_name, p_server_id, p_address, p_description);
704: ELSE
705:
706: -- Case 1. node_name does not exist in FND_NODES
707: -- and server_address does not exist or is null.
708: -- Action: register desktop_node using FND_CONCURRENT.REGISTER_NODE
709: IF (NOT node_name_exists(l_node_name) AND ((p_address IS NOT NULL AND
710: NOT server_address_exists(p_address)) OR p_address IS NULL)) THEN

Line 726: -- Case 2. node_name exists in FND_NODES

722: p_description => NVL(insert_desktop_server.p_description,
723: 'Desktop Node'),
724: db_tier => 'N');
725:
726: -- Case 2. node_name exists in FND_NODES
727: -- Action: return server_id of node. if server_id is null, then:
728: -- a. use server_id passed in,
729: -- b. update record and convert node into desktop_node
730: -- c. return server_id of node.

Line 743: UPDATE fnd_nodes

739: -- Use the server_id passed in and convert the deleted server node into
740: -- a desktop node. Note that the server address provided is not updated
741: -- for the desktop node, primarily because the server_node usually has
742: -- the right server_address and there's no need to change.
743: UPDATE fnd_nodes
744: SET server_id = insert_desktop_server.p_server_id,
745: support_forms = 'N',
746: support_cp = 'N',
747: support_web = 'N',

Line 785: UPDATE fnd_nodes

781: l_node_name_from_address := get_node_name(p_address);
782:
783: -- Use the server_id passed in and convert the deleted server node into
784: -- a desktop node.
785: UPDATE fnd_nodes
786: SET server_id = insert_desktop_server.p_server_id,
787: support_forms = 'N',
788: support_cp = 'N',
789: support_web = 'N',

Line 808: ** Update the FND_NODES row associated with p_node_name with the specified

804:
805: /* update_desktop_server
806: **
807: ** This API is used for Desktop Nodes only.
808: ** Update the FND_NODES row associated with p_node_name with the specified
809: ** values for server_id, address, and description. If NULLs are passed, do not
810: ** update. update_server cannot be used here because it uses p_address as the
811: ** where condition.
812: */

Line 821: l_node_name fnd_nodes.node_name%TYPE := UPPER(p_node_name);

817: p_address IN VARCHAR2 DEFAULT NULL,
818: p_description IN VARCHAR2 DEFAULT NULL)
819: IS
820: kount NUMBER := 0;
821: l_node_name fnd_nodes.node_name%TYPE := UPPER(p_node_name);
822: BEGIN
823: -- If desktop node exists, proceed to update the desktop node.
824: -- If not a desktop node, do nothing. A desktop node maybe using the
825: -- server_id of a server node. A desktop node cannot update a server node's

Line 830: UPDATE fnd_nodes

826: -- data.
827: IF desktop_node_exists(l_node_name) THEN
828: -- If server_id is provided, update using the node_name as condition.
829: IF(p_server_id IS NOT NULL) THEN
830: UPDATE fnd_nodes
831: SET server_id = p_server_id
832: WHERE upper(node_name) = l_node_name
833: AND support_cp = 'N'
834: AND support_forms = 'N'

Line 849: UPDATE fnd_nodes

845: -- condition. server_address cannot be equal to '*' for a desktop node.
846: -- The (p_address <> '*') condition is intentionally left redundant.
847: IF (p_address IS NOT NULL) AND (p_address <> '*')
848: AND NOT (server_address_exists(p_address)) THEN
849: UPDATE fnd_nodes
850: SET server_address = p_address
851: WHERE upper(node_name) = l_node_name
852: AND support_cp = 'N'
853: AND support_forms = 'N'

Line 866: UPDATE fnd_nodes

862:
863: -- If a description is given, update using the node_name as condition.
864: -- Default value is 'Desktop Node', per insert_desktop_server().
865: IF(p_description IS NOT NULL) THEN
866: UPDATE fnd_nodes
867: SET description = p_description
868: WHERE upper(node_name) = l_node_name
869: AND support_cp = 'N'
870: AND support_forms = 'N'

Line 890: l_node_name fnd_nodes.node_name%TYPE := UPPER(p_node_name);

886: ** deleted.
887: */
888: PROCEDURE delete_desktop_server(p_node_name IN VARCHAR2)
889: IS
890: l_node_name fnd_nodes.node_name%TYPE := UPPER(p_node_name);
891: BEGIN
892: -- If desktop node exists, proceed
893: -- If not a desktop node, do nothing. A desktop node maybe using the
894: -- server_id of a server node. A desktop node cannot update a server node's

Line 897: UPDATE fnd_nodes

893: -- If not a desktop node, do nothing. A desktop node maybe using the
894: -- server_id of a server node. A desktop node cannot update a server node's
895: -- data.
896: IF desktop_node_exists(l_node_name) THEN
897: UPDATE fnd_nodes
898: SET server_id = NULL
899: WHERE node_name = l_node_name
900: AND support_cp = 'N'
901: AND support_forms = 'N'