diff --git a/TCAP/src/tcap_components_sup.erl b/TCAP/src/tcap_components_sup.erl
index 13bb222..8197742 100644
--- a/TCAP/src/tcap_components_sup.erl
+++ b/TCAP/src/tcap_components_sup.erl
@@ -47,7 +47,7 @@
 -export([init/1]).
 
 init([USAP, ID, DHA]) ->
-	Name = list_to_atom("cco_" ++ integer_to_list(ID)),
+	Name = list_to_atom("tcap_cco_" ++ integer_to_list(ID)),
 	StartArgs = [tcap_cco_server, [self(), USAP, ID, DHA], [{debug, [trace]}]],
 	StartFunc = {gen_server, start_link, StartArgs},
 	ChildSpec = {Name, StartFunc, temporary, 4000, worker,
diff --git a/TCAP/src/tcap_invocation_sup.erl b/TCAP/src/tcap_invocation_sup.erl
index 2160f42..afb82b5 100644
--- a/TCAP/src/tcap_invocation_sup.erl
+++ b/TCAP/src/tcap_invocation_sup.erl
@@ -47,7 +47,7 @@
 -export([init/1]).
 
 init([USAP, InvokeID]) ->
-	Name = list_to_atom("ism_" ++ integer_to_list(InvokeID)),
+	Name = list_to_atom("tcap_ism_" ++ integer_to_list(InvokeID)),
 	StartArgs = [tcap_ism_fsm, [USAP, InvokeID], []],
 	StartFunc = {gen_fsm, start_link, StartArgs},
 	ChildSpec = {Name, StartFunc, temporary, 4000, worker,
diff --git a/TCAP/src/tcap_sap_sup.erl b/TCAP/src/tcap_sap_sup.erl
index 81a3ea5..bea4a4d 100644
--- a/TCAP/src/tcap_sap_sup.erl
+++ b/TCAP/src/tcap_sap_sup.erl
@@ -61,7 +61,7 @@
 %%
 init([Module, Args, Options]) when is_list(Args), is_list(Options) ->
 	SSN = hd(Args),
-	Name = list_to_atom("tcap_ssn" ++ integer_to_list(SSN)),
+	Name = list_to_atom("tcap_tco_ssn_" ++ integer_to_list(SSN)),
 	StartArgs = [{local, Name}, tcap_tco_server, [self(), Module, Args], Options],
 	StartFunc = {gen_server, start_link, StartArgs},
 	ChildSpec = {tco, StartFunc, permanent, 4000, worker, [Module, tcap_tco_server]},
diff --git a/TCAP/src/tcap_transaction_sup.erl b/TCAP/src/tcap_transaction_sup.erl
index c69b2bb..71e31b7 100644
--- a/TCAP/src/tcap_transaction_sup.erl
+++ b/TCAP/src/tcap_transaction_sup.erl
@@ -47,7 +47,7 @@
 -export([init/1]).
 
 init({NSAP, USAP, TID, SupRef}) ->
-	Name = list_to_atom("tsm_" ++ integer_to_list(TID)),
+	Name = list_to_atom("tcap_tsm_" ++ integer_to_list(TID)),
 	StartArgs = [tcap_tsm_fsm, [NSAP, USAP, TID, self(), SupRef], []],
 	StartFunc = {gen_fsm, start_link, StartArgs},
 	ChildSpec = {Name, StartFunc, permanent, 1000, worker, [tcap_tsm_fsm]},