diff --git a/fr/FR_Tests.ttcn b/fr/FR_Tests.ttcn
index b7a56c3..65029c1 100644
--- a/fr/FR_Tests.ttcn
+++ b/fr/FR_Tests.ttcn
@@ -276,7 +276,7 @@
 		var integer ran_index := 0;
 		var template (value) PDU_LLC llc_tx;
 		var template (present) PDU_LLC llc_rx_exp;
-		var octetstring llc_payload := f_rnd_octstring(f_rnd_int(max_llc_payload_len));
+		var octetstring llc_payload := f_rnd_octstring_rnd_len(max_llc_payload_len);
 		var PDU_LLC llc_rx;
 		timer T := 5.0;