[Home] [Help]
971: TNS_ALIAS_DESCRIPTION_GUID
972: raw default null
973: )
974: as
975: l_rec fnd_tns_alias_descriptions%rowtype;
976: l_insert boolean := false;
977: l_tns_alias_set_name fnd_tns_alias_sets.tns_alias_set_name%type;
978: l_tns_alias_name fnd_tns_aliases.alias_name%type;
979:
1004: begin
1005:
1006: select a.TNS_ALIAS_DESCRIPTION_GUID
1007: into l_rec.TNS_ALIAS_DESCRIPTION_GUID
1008: from fnd_tns_alias_descriptions a
1009: where a.tns_alias_guid = l_rec.tns_alias_guid
1010: and a.Sequence_Number= l_rec.Sequence_Number;
1011:
1012: exception
1019: begin
1020:
1021: select a.TNS_ALIAS_DESCRIPTION_GUID
1022: into l_rec.TNS_ALIAS_DESCRIPTION_GUID
1023: from fnd_tns_alias_descriptions a
1024: where a.TNS_ALIAS_DESCRIPTION_GUID = l_rec.TNS_ALIAS_DESCRIPTION_GUID;
1025:
1026: exception
1027: when no_data_found then
1031:
1032: if ( l_insert )
1033: then
1034:
1035: insert into fnd_tns_alias_descriptions
1036: (TNS_ALIAS_GUID,TNS_ALIAS_DESCRIPTION_GUID,sequence_number,
1037: Failover,Load_Balance,
1038: DB_Service_GUID,DB_Instance_Guid,
1039: Service_Name,Instance_Name,
1048: l_rec.Service_Name,l_rec.Instance_Name,
1049: 1,sysdate,0,sysdate,1 );
1050: else
1051:
1052: update fnd_tns_alias_descriptions a
1053: set a.Failover = nvl(l_rec.Failover,a.Failover),
1054: a.Load_Balance=nvl(l_rec.Load_Balance,a.Load_Balance),
1055: a.DB_Service_GUID=l_rec.DB_Service_GUID,
1056: a.DB_Instance_Guid = l_rec.DB_Instance_Guid,