library/PCUIF_Types: add f_PCUIF_ver_INFO_PDCHMask_set()

Change-Id: I443bc99d35994dda14cdf9c41609d528368c401f
diff --git a/pcu/PCU_Tests.ttcn b/pcu/PCU_Tests.ttcn
index 411890c..8facde7 100644
--- a/pcu/PCU_Tests.ttcn
+++ b/pcu/PCU_Tests.ttcn
@@ -2192,19 +2192,10 @@
 	var BIT11 ra11;
 
 	info_ind := valueof(ts_PCUIF_INFO_default);
-	if (PCUIF_Types.mp_pcuif_version >= 10) {
-		/* Only the first TRX is enabled. */
-		for (var integer i := 0; i < lengthof(info_ind.trx.v10); i := i + 1) {
-			info_ind.trx.v10[i].pdch_mask := '00000000'B;
-		}
-		info_ind.trx.v10[0].pdch_mask := '00000001'B;
-	} else {
-		/* Only the first TRX is enabled. */
-		for (var integer i := 0; i < lengthof(info_ind.trx.v09); i := i + 1) {
-			info_ind.trx.v09[i].pdch_mask := '00000000'B;
-		}
-		info_ind.trx.v09[0].pdch_mask := '00000001'B;
-	}
+
+	/* Only the first TRX is enabled. */
+	f_PCUIF_ver_INFO_PDCHMask_set(info_ind, '00000000'B, (1 .. 7));
+	f_PCUIF_ver_INFO_PDCHMask_set(info_ind, '00000001'B, 0);
 
 	/* Initialize the PCU interface abstraction */
 	f_init_raw(testcasename(), info_ind);
@@ -2501,14 +2492,13 @@
 	f_init_gprs_ms(num_ms);
 
 	info_ind := valueof(ts_PCUIF_INFO_default);
+
 	/* Only the 3 first TRX are enabled. The enabled ones all have same
 	   amount of resources, hence same amount of initial resources. */
-	for (i := 0; i < lengthof(info_ind.trx.v10); i := i + 1) {
-		info_ind.trx.v10[i].pdch_mask := '00000000'B;
-	}
-	info_ind.trx.v10[0].pdch_mask := '00000011'B;
-	info_ind.trx.v10[1].pdch_mask := '00001100'B;
-	info_ind.trx.v10[2].pdch_mask := '11000000'B;
+	f_PCUIF_ver_INFO_PDCHMask_set(info_ind, '00000000'B, (3 .. 7));
+	f_PCUIF_ver_INFO_PDCHMask_set(info_ind, '00000011'B, 0);
+	f_PCUIF_ver_INFO_PDCHMask_set(info_ind, '00001100'B, 1);
+	f_PCUIF_ver_INFO_PDCHMask_set(info_ind, '11000000'B, 2);
 
 	/* Initialize the PCU interface abstraction */
 	f_init_raw(testcasename(), info_ind);