diff --git a/library/TRXC_Types.ttcn b/library/TRXC_Types.ttcn
index c12e5d2..1a37a8c 100644
--- a/library/TRXC_Types.ttcn
+++ b/library/TRXC_Types.ttcn
@@ -9,15 +9,17 @@
 type charstring TrxcVerb ("POWERON", "POWEROFF", "CLOCK",
 			  "RXTUNE", "TXTUNE", "SETSLOT", "SETTSC", "SETBSIC", "SETPOWER",
 			  "SETMAXDLY", "SETMAXDLYNB", "SETSLOT", "HANDOVER", "NOHANDOVER",
-			  "MEASURE", "FAKE_RSSI", "FAKE_TIMING" ) with {
+			  "MEASURE", "FAKE_RSSI", "FAKE_TOA" ) with {
 	variant "TEXT_CODING(,convert=upper_case,
-			'((POWERON)|(POWEROFF)|(CLOCK)|(RXTUNE)|(TXTUNE)|(SETSLOT)|(SETTSC)|(SETBSIC)|(SETPOWER)|(SETMAXDLY)|(SETMAXDLYNB)|(HANDOVER)|(NOHANDOVER)|(MEASURE)|(FAKE_RSSI)|(FAKE_TIMING))'
+			'((POWERON)|(POWEROFF)|(CLOCK)|(RXTUNE)|(TXTUNE)|(SETSLOT)|(SETTSC)|(SETBSIC)|(SETPOWER)|(SETMAXDLY)|(SETMAXDLYNB)|(HANDOVER)|(NOHANDOVER)|(MEASURE)|(FAKE_RSSI)|(FAKE_TOA))'
 			,case_insensitive)"
 }
 
 type integer TrxcStatus;
 type charstring TrxcParam;
-type record of TrxcParam TrxcParams;
+type record of TrxcParam TrxcParams with {
+	variant "SEPARATOR(' ', ' ')"
+}
 
 type record TrxcCommand {
 	TrxcVerb	verb,
@@ -63,10 +65,10 @@
 	}
 }
 
-template (value) TrxcMessage ts_TRXC_FAKE_TIMING(int16_t timing) := {
+template (value) TrxcMessage ts_TRXC_FAKE_TIMING(int16_t timing, int16_t thresh := 0) := {
 	cmd := {
-		verb := "FAKE_TIMING",
-		params := { int2str(timing) }
+		verb := "FAKE_TOA",
+		params := { int2str(timing), int2str(thresh) }
 	}
 }