diff --git a/library/MNCC_Types.ttcn b/library/MNCC_Types.ttcn
index e5d6af9..46159b7 100644
--- a/library/MNCC_Types.ttcn
+++ b/library/MNCC_Types.ttcn
@@ -274,6 +274,18 @@
 	variant (coding) "FIELDLENGTH(32)";
 }
 
+template MNCC_cause ts_MNCC_cause(int val,
+				  GSM48_cause_loc loc := GSM48_CAUSE_LOC_PUN_S_LU,
+				  GSM48_cause_coding coding := GSM48_CAUSE_CS_GSM,
+				  octetstring diag := ''O) := {
+	location := loc,
+	coding := coding,
+	rec := 0,
+	rec_val := 0,
+	val := val,
+	diag := diag
+}
+
 type record MNCC_useruser {
 	int		proto,
 	charstring	info