[Home] [Help]
132:
133: cursor c1(p_tns_description_guid raw) is
134: select a.Tns_Alias_Address_List_Guid,a.sequence_number,
135: a.failover,a.load_balance
136: from fnd_tns_alias_address_lists a
137: where a.Tns_Alias_Description_Guid = p_tns_description_guid
138: and a.sequence_number >= 0
139: order by a.sequence_number;
140:
205:
206: delete from fnd_tns_alias_addresses a
207: where a.Tns_Alias_Address_List_Guid
208: in ( select b.Tns_Alias_Address_List_Guid
209: from fnd_tns_alias_address_lists b
210: where b.Tns_Alias_Description_Guid
211: = l_descRec.Tns_Alias_Description_Guid );
212:
213: delete from fnd_tns_alias_address_lists a
209: from fnd_tns_alias_address_lists b
210: where b.Tns_Alias_Description_Guid
211: = l_descRec.Tns_Alias_Description_Guid );
212:
213: delete from fnd_tns_alias_address_lists a
214: where a.Tns_Alias_Description_Guid
215: = l_descRec.Tns_Alias_Description_Guid ;
216:
217: fnd_app_system.register_tns_description
296:
297: delete from fnd_tns_alias_addresses a
298: where a.Tns_Alias_Address_List_Guid
299: in ( select b.Tns_Alias_Address_List_Guid
300: from fnd_tns_alias_address_lists b
301: where b.Tns_Alias_Description_Guid
302: = l_descRec.Tns_Alias_Description_Guid );
303:
304: delete from fnd_tns_alias_address_lists a
300: from fnd_tns_alias_address_lists b
301: where b.Tns_Alias_Description_Guid
302: = l_descRec.Tns_Alias_Description_Guid );
303:
304: delete from fnd_tns_alias_address_lists a
305: where a.Tns_Alias_Description_Guid
306: = l_descRec.Tns_Alias_Description_Guid ;
307:
308: for f_addrlist in c1(l_sourceDesc.Tns_Alias_Description_Guid) loop
358: l_tns_alias_guid raw(16) := p_tns_alias_guid;
359:
360: cursor c1 (p_desc_guid raw)
361: is select a.Tns_Alias_Address_List_Guid,a.sequence_number
362: from fnd_tns_alias_address_lists a
363: where a.Tns_Alias_Description_Guid = p_desc_guid
364: and a.sequence_number >= 0
365: order by a.sequence_number;
366:
586:
587: delete from fnd_tns_alias_addresses a
588: where a.Tns_Alias_Address_List_Guid
589: in ( select b.Tns_Alias_Address_List_Guid
590: from fnd_tns_alias_address_lists b
591: where b.Tns_Alias_Description_Guid
592: = f_unused.Tns_Alias_Description_Guid );
593:
594: delete from fnd_tns_alias_address_lists a
590: from fnd_tns_alias_address_lists b
591: where b.Tns_Alias_Description_Guid
592: = f_unused.Tns_Alias_Description_Guid );
593:
594: delete from fnd_tns_alias_address_lists a
595: where a.Tns_Alias_Description_Guid
596: = f_unused.Tns_Alias_Description_Guid ;
597: end if;
598:
1394: or a.alias_type = fnd_app_system.C_DB_INST_TNS_ALIAS_TYPE );
1395:
1396: cursor c4(p_tns_alias_guid raw) is
1397: select c.listener_port_guid
1398: from fnd_tns_alias_descriptions a, fnd_tns_alias_address_lists b,
1399: fnd_tns_alias_addresses c
1400: where a.tns_alias_guid = p_tns_alias_guid
1401: and a.sequence_number= 0
1402: and b.Tns_Alias_Description_Guid = a.Tns_Alias_Description_Guid
2012: procedure show_tns_addresses(p_Tns_Alias_Description_Guid raw)
2013: as
2014: cursor c1 is select d.listener_name,c.port,
2015: a.sequence_number,a.failover,a.load_balance
2016: from fnd_tns_alias_address_lists a, fnd_tns_alias_addresses b,
2017: fnd_tns_listener_ports c, fnd_tns_listeners d
2018: where a.Tns_Alias_Description_Guid = p_Tns_Alias_Description_Guid
2019: and a.Tns_Alias_Address_List_Guid =
2020: b.Tns_Alias_Address_List_Guid
2675:
2676: if ( f_server.Listener_GUID is not null )
2677: then
2678:
2679: delete from fnd_tns_alias_address_lists a
2680: where a.Tns_Alias_Address_List_Guid
2681: in ( select b.Tns_Alias_Address_List_Guid
2682: from fnd_tns_alias_addresses b,fnd_tns_listener_ports c
2683: where b.listener_port_guid = c.listener_port_guid
2698: -- server level.
2699:
2700: delete from fnd_tns_alias_descriptions a
2701: where not exists ( select 1
2702: from fnd_tns_alias_address_lists b
2703: where b.Tns_Alias_Description_Guid
2704: = a.Tns_Alias_Description_Guid )
2705: and a.sequence_number >= 0;
2706:
2838:
2839: if ( f_server.Listener_GUID is not null )
2840: then
2841:
2842: delete from fnd_tns_alias_address_lists a
2843: where a.Tns_Alias_Address_List_Guid
2844: in ( select b.Tns_Alias_Address_List_Guid
2845: from fnd_tns_alias_addresses b,fnd_tns_listener_ports c
2846: where b.listener_port_guid = c.listener_port_guid
2861: -- server level.
2862:
2863: delete from fnd_tns_alias_descriptions a
2864: where not exists ( select 1
2865: from fnd_tns_alias_address_lists b
2866: where b.Tns_Alias_Description_Guid
2867: = a.Tns_Alias_Description_Guid )
2868: and a.sequence_number >= 0;
2869:
2925: cursor c4(p_Server_GUID raw) is
2926: select a.tns_alias_guid,b.Tns_Alias_Description_Guid,
2927: c.Tns_Alias_Address_List_Guid
2928: from fnd_tns_aliases a,fnd_tns_alias_descriptions b,
2929: fnd_tns_alias_address_lists c,fnd_tns_alias_set_usage d
2930: where d.server_guid = p_server_guid
2931: and d.tns_alias_set_guid = a.alias_set_guid
2932: and a.tns_alias_guid = b.tns_alias_guid
2933: and b.Tns_Alias_Description_Guid = c.Tns_Alias_Description_Guid(+);
2965:
2966: if ( f_alias.Tns_Alias_Address_List_Guid is not null )
2967: then
2968:
2969: delete from fnd_tns_alias_address_lists a
2970: where a.Tns_Alias_Address_List_Guid =
2971: f_alias.Tns_Alias_Address_List_Guid;
2972:
2973: delete from fnd_tns_alias_addresses a