DBA Data[Home] [Help]

APPS.FND_NET_SERVICES dependencies on FND_TNS_ALIAS_DESCRIPTIONS

Line 119: procedure do_descriptor_resolve ( p_descRec fnd_tns_alias_descriptions%rowtype,

115: end;
116:
117: /*==========================================================================*/
118:
119: procedure do_descriptor_resolve ( p_descRec fnd_tns_alias_descriptions%rowtype,
120: p_alias_name varchar2,
121: p_alias_set_name varchar2,
122: p_Service_Name varchar2,
123: p_Instance_Name varchar2

Line 126: l_root_desc fnd_tns_alias_descriptions%rowtype;

122: p_Service_Name varchar2,
123: p_Instance_Name varchar2
124: )
125: as
126: l_root_desc fnd_tns_alias_descriptions%rowtype;
127: l_descRec fnd_tns_alias_descriptions%rowtype := p_descRec;
128: l_sourceDesc fnd_tns_alias_descriptions%rowtype;
129:
130: l_valid_service number;

Line 127: l_descRec fnd_tns_alias_descriptions%rowtype := p_descRec;

123: p_Instance_Name varchar2
124: )
125: as
126: l_root_desc fnd_tns_alias_descriptions%rowtype;
127: l_descRec fnd_tns_alias_descriptions%rowtype := p_descRec;
128: l_sourceDesc fnd_tns_alias_descriptions%rowtype;
129:
130: l_valid_service number;
131: l_valid_instance number;

Line 128: l_sourceDesc fnd_tns_alias_descriptions%rowtype;

124: )
125: as
126: l_root_desc fnd_tns_alias_descriptions%rowtype;
127: l_descRec fnd_tns_alias_descriptions%rowtype := p_descRec;
128: l_sourceDesc fnd_tns_alias_descriptions%rowtype;
129:
130: l_valid_service number;
131: l_valid_instance number;
132: l_db_guid raw(16);

Line 158: from fnd_tns_alias_descriptions a

154: -- Get the root descriptor for Service/Instance_Guid.
155:
156: select a.*
157: into l_root_desc
158: from fnd_tns_alias_descriptions a
159: where a.tns_alias_guid = l_descRec.tns_alias_guid
160: and a.sequence_number = 0;
161:
162: -- Get db_guid

Line 246: from fnd_tns_alias_descriptions a, fnd_databases b,

242: then
243:
244: select a.*
245: into l_sourceDesc
246: from fnd_tns_alias_descriptions a, fnd_databases b,
247: fnd_tns_aliases c
248: where b.db_guid = l_db_guid
249: and b.Default_Tns_Alias_Guid = c.tns_alias_guid
250: and c.tns_alias_guid = a.tns_alias_guid

Line 257: from fnd_tns_alias_descriptions a, fnd_database_instances b,

253: else
254:
255: select a.*
256: into l_sourceDesc
257: from fnd_tns_alias_descriptions a, fnd_database_instances b,
258: fnd_tns_aliases c
259: where b.db_guid = l_db_guid
260: and b.Instance_Name = p_instance_name
261: and b.Default_Tns_Alias_Guid = c.tns_alias_guid

Line 358: l_descRec fnd_tns_alias_descriptions%rowtype;

354: as
355:
356: alt_instance_table alt_instance_type := p_alt_instance_table;
357:
358: l_descRec fnd_tns_alias_descriptions%rowtype;
359:
360: l_tns_alias_guid raw(16) := p_tns_alias_guid;
361:
362: cursor c1 (p_desc_guid raw)

Line 375: l_service_name fnd_tns_alias_descriptions.service_name%type;

371:
372: l_alt_table_entries number;
373: l_actual_alt_count number;
374:
375: l_service_name fnd_tns_alias_descriptions.service_name%type;
376: l_instance_name fnd_tns_alias_descriptions.instance_name%type;
377:
378: type l_alt_inst_record is record
379: ( service_name fnd_tns_alias_descriptions.service_name%type,

Line 376: l_instance_name fnd_tns_alias_descriptions.instance_name%type;

372: l_alt_table_entries number;
373: l_actual_alt_count number;
374:
375: l_service_name fnd_tns_alias_descriptions.service_name%type;
376: l_instance_name fnd_tns_alias_descriptions.instance_name%type;
377:
378: type l_alt_inst_record is record
379: ( service_name fnd_tns_alias_descriptions.service_name%type,
380: instance_name fnd_tns_alias_descriptions.instance_name%type

Line 379: ( service_name fnd_tns_alias_descriptions.service_name%type,

375: l_service_name fnd_tns_alias_descriptions.service_name%type;
376: l_instance_name fnd_tns_alias_descriptions.instance_name%type;
377:
378: type l_alt_inst_record is record
379: ( service_name fnd_tns_alias_descriptions.service_name%type,
380: instance_name fnd_tns_alias_descriptions.instance_name%type
381: );
382:
383: type l_alt_inst_array is table of l_alt_inst_record index by binary_integer;

Line 380: instance_name fnd_tns_alias_descriptions.instance_name%type

376: l_instance_name fnd_tns_alias_descriptions.instance_name%type;
377:
378: type l_alt_inst_record is record
379: ( service_name fnd_tns_alias_descriptions.service_name%type,
380: instance_name fnd_tns_alias_descriptions.instance_name%type
381: );
382:
383: type l_alt_inst_array is table of l_alt_inst_record index by binary_integer;
384: l_alt_inst_data l_alt_inst_array;

Line 391: from fnd_tns_alias_descriptions a

387:
388: cursor c2(p_tns_alias_guid_parm raw)
389: is select a.Tns_Alias_Description_Guid,a.Sequence_Number,
390: abs(a.Sequence_Number) abs_sequence_number
391: from fnd_tns_alias_descriptions a
392: where a.tns_alias_guid = p_tns_alias_guid_parm
393: and a.Sequence_Number <> 0
394: order by abs(a.Sequence_Number);
395:

Line 398: from fnd_tns_alias_descriptions a

394: order by abs(a.Sequence_Number);
395:
396: cursor c3(p_tns_alias_guid_parm raw,p_actual_count number)
397: is select a.Tns_Alias_Description_Guid,a.Sequence_Number
398: from fnd_tns_alias_descriptions a
399: where a.tns_alias_guid = p_tns_alias_guid_parm
400: and a.Sequence_Number <> 0
401: and abs(a.Sequence_Number) > p_actual_count;
402:

Line 443: from fnd_tns_alias_descriptions a

439: );
440:
441: select a.*
442: into l_descRec
443: from fnd_tns_alias_descriptions a
444: where a.Tns_Alias_Guid = l_tns_alias_guid
445: and a.Sequence_Number = 0;
446:
447: -- Currently there is no way for autoconfig to tell the api about

Line 526: -- current records in fnd_tns_alias_descriptions. Since this can lead to

522:
523: -- Description records are ordered by sequence, to ensure alt entries
524: -- are generated correctly. But the order from the context file
525: -- could have been changed, and be completely different to the
526: -- current records in fnd_tns_alias_descriptions. Since this can lead to
527: -- all sorts of f/key issues, we check that the order in the alt_inst_data
528: -- matches the current records. If there is any mis-match, we delete all
529: -- the descriptors and start with an empty list.
530:

Line 533: from fnd_tns_alias_descriptions a

529: -- the descriptors and start with an empty list.
530:
531: select count(*)
532: into l_actual_alt_count
533: from fnd_tns_alias_descriptions a
534: where a.tns_alias_guid = l_tns_alias_guid
535: and a.sequence_number <> 0 ;
536:
537: if ( l_actual_alt_count <> l_alt_inst_data.count )

Line 549: from fnd_tns_alias_descriptions a

545:
546: begin
547: select a.*
548: into l_descRec
549: from fnd_tns_alias_descriptions a
550: where a.tns_alias_guid = l_tns_alias_guid
551: and abs(a.sequence_number) = i;
552:
553: if not ( l_descRec.Service_Name = l_alt_inst_data(i).service_name

Line 578: delete from fnd_tns_alias_descriptions a

574: then
575:
576: for f_unused in c3(l_tns_alias_guid,0) loop
577:
578: delete from fnd_tns_alias_descriptions a
579: where a.Tns_Alias_Description_Guid =
580: f_unused.Tns_Alias_Description_Guid;
581:
582: -- Is this a resolved descriptor ?

Line 614: from fnd_tns_alias_descriptions a

610:
611: begin
612: select a.*
613: into l_descRec
614: from fnd_tns_alias_descriptions a
615: where a.tns_alias_guid = l_tns_alias_guid
616: and abs(a.sequence_number) = i;
617:
618: exception

Line 643: from fnd_tns_alias_descriptions a

639: );
640:
641: select a.*
642: into l_descRec
643: from fnd_tns_alias_descriptions a
644: where a.tns_alias_guid = l_tns_alias_guid
645: and abs(a.sequence_number) = i;
646:
647: end if;

Line 758: l_resolveDescRec fnd_tns_alias_descriptions%rowtype;

754: empty_instance_table alt_instance_type;
755: alt_index number;
756: is_alt_duplicate boolean;
757:
758: l_resolveDescRec fnd_tns_alias_descriptions%rowtype;
759:
760: l_db_alias_exists number;
761:
762: cursor c2(p_db_guid raw)

Line 777: -- FND_TNS_ALIASES and FND_TNS_ALIAS_DESCRIPTIONS we can remove this

773: -- Cursor c4 was originally designed just to fetch unresolved descriptors
774: -- (seq_no < 0 ). But because we clone alt descriptors we need to rebuild
775: -- every alt descriptor on each call. So we look for all non-zero
776: -- sequence_numbers. When we add a detail table to sit in between
777: -- FND_TNS_ALIASES and FND_TNS_ALIAS_DESCRIPTIONS we can remove this
778: -- restriction.
779:
780: cursor c4(p_system_guid raw)
781: is select f.Tns_Alias_Description_Guid,

Line 785: fnd_tns_aliases e, fnd_tns_alias_descriptions f

781: is select f.Tns_Alias_Description_Guid,
782: e.alias_name,d.tns_alias_set_name
783: from fnd_system_server_map a, fnd_app_servers b,
784: fnd_tns_alias_set_usage c,fnd_tns_alias_sets d,
785: fnd_tns_aliases e, fnd_tns_alias_descriptions f
786: where a.System_GUID = p_System_Guid
787: and a.Server_GUID = b.Server_GUID
788: and b.server_type = fnd_app_system.C_DB_SERVER_TYPE
789: and a.Server_GUID = c.Server_GUID

Line 1327: -- between FND_TNS_ALIASES and FND_TNS_ALIAS_DESCRIPTIONS.

1323:
1324: -- Now've registered, see if this instance fixes any unresolved
1325: -- descriptors. Note c4 fetches all alt descriptors not just unresolved
1326: -- descriptors. This is due to the model not having a detail table
1327: -- between FND_TNS_ALIASES and FND_TNS_ALIAS_DESCRIPTIONS.
1328:
1329: for f_resolve in c4(l_system_guid) loop
1330:
1331: select a.*

Line 1333: from fnd_tns_alias_descriptions a

1329: for f_resolve in c4(l_system_guid) loop
1330:
1331: select a.*
1332: into l_resolveDescRec
1333: from fnd_tns_alias_descriptions a
1334: where a.Tns_Alias_Description_Guid = f_resolve.Tns_Alias_Description_Guid;
1335:
1336: do_descriptor_resolve( p_descRec => l_resolveDescRec,
1337: p_alias_name => f_resolve.alias_name,

Line 1367: l_tns_descriptions_rec fnd_tns_alias_descriptions%rowtype;

1363: l_port_list_tns_guid raw(16);
1364: l_system_name varchar2(100);
1365:
1366: l_tns_aliases_rec fnd_tns_aliases%rowtype;
1367: l_tns_descriptions_rec fnd_tns_alias_descriptions%rowtype;
1368:
1369: l_db_alias_exists boolean;
1370: l_app_alias_exists boolean;
1371:

Line 1400: from fnd_tns_alias_descriptions a, fnd_tns_alias_address_lists b,

1396: or a.alias_type = fnd_app_system.C_DB_INST_TNS_ALIAS_TYPE );
1397:
1398: cursor c4(p_tns_alias_guid raw) is
1399: select c.listener_port_guid
1400: from fnd_tns_alias_descriptions a, fnd_tns_alias_address_lists b,
1401: fnd_tns_alias_addresses c
1402: where a.tns_alias_guid = p_tns_alias_guid
1403: and a.sequence_number= 0
1404: and b.Tns_Alias_Description_Guid = a.Tns_Alias_Description_Guid

Line 1425: from fnd_tns_alias_descriptions a

1421: or e.alias_type = fnd_app_system.C_DB_INST_TNS_ALIAS_TYPE );
1422:
1423: cursor c6(p_tns_alias_guid raw) is
1424: select a.Tns_Alias_Description_Guid
1425: from fnd_tns_alias_descriptions a
1426: where a.Tns_Alias_Guid = p_tns_alias_guid
1427: and a.sequence_number >= 0
1428: order by a.sequence_number;
1429:

Line 1459: from fnd_tns_alias_descriptions a

1455: for f_desc in c6(f_valid.Tns_Alias_Guid) loop
1456:
1457: select a.*
1458: into l_tns_descriptions_rec
1459: from fnd_tns_alias_descriptions a
1460: where a.Tns_Alias_Description_Guid = f_desc.Tns_Alias_Description_Guid;
1461:
1462: exit;
1463:

Line 1502: from fnd_tns_alias_descriptions a

1498: for f_desc in c6(l_tns_aliases_rec.Tns_Alias_Guid) loop
1499:
1500: select a.*
1501: into l_tns_descriptions_rec
1502: from fnd_tns_alias_descriptions a
1503: where a.Tns_Alias_Description_Guid = f_desc.Tns_Alias_Description_Guid;
1504:
1505: exit;
1506:

Line 2121: from fnd_tns_alias_descriptions c

2117: c.DB_Service_GUID,c.DB_Instance_Guid,
2118: c.Service_Name,c.Instance_Name,
2119: c.Failover,c.Load_Balance,
2120: c.sequence_number
2121: from fnd_tns_alias_descriptions c
2122: where c.tns_alias_guid = p_tns_alias_guid
2123: order by c.sequence_number;
2124:
2125: begin

Line 2692: -- Note on delete of : fnd_tns_aliases and fnd_tns_alias_descriptions

2688: from fnd_tns_alias_addresses c
2689: where c.Tns_Alias_Address_List_Guid
2690: = a.Tns_Alias_Address_List_Guid );
2691:
2692: -- Note on delete of : fnd_tns_aliases and fnd_tns_alias_descriptions
2693: -- The deletes remove all dangling references, not just the
2694: -- current db node. Since the only dangling references should be
2695: -- this node this seems ok.
2696:

Line 2702: delete from fnd_tns_alias_descriptions a

2698: -- an address list, in which case we can't just delete dangling
2699: -- references. So unresolved descriptors can only be deleted at the
2700: -- server level.
2701:
2702: delete from fnd_tns_alias_descriptions a
2703: where not exists ( select 1
2704: from fnd_tns_alias_address_lists b
2705: where b.Tns_Alias_Description_Guid
2706: = a.Tns_Alias_Description_Guid )

Line 2713: from fnd_tns_alias_descriptions b

2709: -- An alias will always have a descriptor, so ok.
2710:
2711: delete from fnd_tns_aliases a
2712: where not exists ( select 1
2713: from fnd_tns_alias_descriptions b
2714: where b.Tns_Alias_Guid = a.Tns_Alias_Guid );
2715:
2716: delete from fnd_tns_alias_addresses b
2717: where b.Listener_port_GUID

Line 2855: -- Note on delete of : fnd_tns_aliases and fnd_tns_alias_descriptions

2851: from fnd_tns_alias_addresses c
2852: where c.Tns_Alias_Address_List_Guid
2853: = a.Tns_Alias_Address_List_Guid );
2854:
2855: -- Note on delete of : fnd_tns_aliases and fnd_tns_alias_descriptions
2856: -- The deletes remove all dangling references, not just the
2857: -- current db node. Since the only dangling references should be
2858: -- this node this seems ok.
2859:

Line 2865: delete from fnd_tns_alias_descriptions a

2861: -- an address list, in which case we can't just delete dangling
2862: -- references. So unresolved descriptors can only be deleted at the
2863: -- server level.
2864:
2865: delete from fnd_tns_alias_descriptions a
2866: where not exists ( select 1
2867: from fnd_tns_alias_address_lists b
2868: where b.Tns_Alias_Description_Guid
2869: = a.Tns_Alias_Description_Guid )

Line 2876: from fnd_tns_alias_descriptions b

2872: -- An alias will always have a descriptor, so ok.
2873:
2874: delete from fnd_tns_aliases a
2875: where not exists ( select 1
2876: from fnd_tns_alias_descriptions b
2877: where b.Tns_Alias_Guid = a.Tns_Alias_Guid );
2878:
2879: delete from fnd_tns_alias_addresses b
2880: where b.Listener_port_GUID

Line 2930: from fnd_tns_aliases a,fnd_tns_alias_descriptions b,

2926:
2927: cursor c4(p_Server_GUID raw) is
2928: select a.tns_alias_guid,b.Tns_Alias_Description_Guid,
2929: c.Tns_Alias_Address_List_Guid
2930: from fnd_tns_aliases a,fnd_tns_alias_descriptions b,
2931: fnd_tns_alias_address_lists c,fnd_tns_alias_set_usage d
2932: where d.server_guid = p_server_guid
2933: and d.tns_alias_set_guid = a.alias_set_guid
2934: and a.tns_alias_guid = b.tns_alias_guid

Line 2964: delete from fnd_tns_alias_descriptions a

2960: -- Remove any remaining aliases assigned to set.
2961:
2962: for f_alias in c4(f_server.Server_GUID) loop
2963:
2964: delete from fnd_tns_alias_descriptions a
2965: where a.Tns_Alias_Description_Guid =
2966: f_alias.Tns_Alias_Description_Guid;
2967:
2968: if ( f_alias.Tns_Alias_Address_List_Guid is not null )