diff --git a/ggsn_tests/GGSN_Tests.ttcn b/ggsn_tests/GGSN_Tests.ttcn
index 28e34e9..634534f 100644
--- a/ggsn_tests/GGSN_Tests.ttcn
+++ b/ggsn_tests/GGSN_Tests.ttcn
@@ -84,7 +84,8 @@
 		OCT4		teid_remote,
 		/* TEI (Control) remote side */
 		OCT4		teic_remote,
-		OCT1		ratType optional
+		OCT1		ratType optional,
+		UserLocationInformation uli optional
 	}
 
 	type component GT_CT {
@@ -246,7 +247,15 @@
 		eua := eua,
 		teid := f_rnd_tei(),
 		teic := f_rnd_tei(),
-		ratType := ratType
+		ratType := ratType,
+		uli := {
+			type_gtpc := '98'O,
+			lengthf := 0 /* filled in by encoder */,
+			geographicLocationType := '00'O /* CGI */,
+			geographicLocation := {
+				geographicLocationCGI := ts_GeographicLocationCGI('262'H, '42F'H, '0001'O, '0002'O)
+			}
+		}
 	}
 
 	/* send GTP-C for a given context and increment sequence number */
@@ -318,7 +327,7 @@
 		log("sending CreatePDP");
 		f_send_gtpc(ts_GTPC_CreatePDP(g_peer_c, g_c_seq_nr, ctx.imsi, g_restart_ctr,
 						  ctx.teid, ctx.teic, ctx.nsapi, ctx.eua, ctx.apn,
-						  g_sgsn_ip_c, g_sgsn_ip_u, ctx.msisdn, ctx.pco_req, ctx.ratType));
+						  g_sgsn_ip_c, g_sgsn_ip_u, ctx.msisdn, ctx.pco_req, ctx.ratType, ctx.uli));
 		T_default.start;
 		d := activate(pingpong());
 		alt {