New dmr test cases

OneM2M_Testcases.ttcn

@@ -4272,7 +4272,7 @@ module OneM2M_Testcases {
 								setverdict(fail, testcasename() & ": Accepted creation of contentInstance exceding maximum byte size");
 							}
 							[] tc_ac.timeout {
-								setverdict(inconc, testcasename() & ": No answer while creating resource type 4");
+								setverdict(fail, testcasename() & ": No answer while creating resource type 4");
 							}
 						}	
 				
@@ -4317,11 +4317,33 @@ module OneM2M_Testcases {
 				
 						v_containerIndex := f_cse_createResource(int3, v_createRequest, v_aeIndex);
 						
-						v_createRequest := m_createContentInstanceBase;
 						
-						v_contentInstanceIndex := f_cse_createResource(int4, v_createRequest, v_containerIndex);	//Default content: "AnyValue" (8 bytes length)
+						v_contentInstanceIndex := f_cse_createResource(int4, v_createRequest, v_containerIndex);	
 
 						// Test Body
+						v_request := f_getCreateRequestPrimitive(int4, m_createContentInstanceBase, v_containerIndex); //Default content: "AnyValue" (8 bytes length)
+	
+						mcaPort.send(m_request(v_request));
+						tc_ac.start;
+						alt {
+							[] mcaPort.receive(mw_response(mw_responsePrimitive(int2001))) -> value v_response {
+								tc_ac.stop;
+								setverdict(pass, testcasename() & ": ContentInstance resource created");
+							}
+							[] mcaPort.receive(mw_response(mw_responsePrimitiveOK)) -> value v_response {
+								tc_ac.stop;
+								setverdict(fail, testcasename() & ": Wrong response status code");
+							}
+							[] mcaPort.receive(mw_response(mw_responsePrimitiveKO)) -> value v_response {
+								tc_ac.stop;
+								setverdict(fail, testcasename() & ": Error when creating contentInstance resource");
+							}
+							[] tc_ac.timeout {
+								setverdict(fail, testcasename() & ": No answer while creating resource type 4");
+							}
+						}	
+						
+						//Check currentByteSize
 						mcaPort.send(m_request(m_retrieveResource(f_getResourceAddress(v_containerIndex), f_getOriginator(v_containerIndex))));
 
 						tc_ac.start;
@@ -4340,7 +4362,7 @@ module OneM2M_Testcases {
 								setverdict(fail, testcasename() & ": Error while retrieving resource");
 							}
 							[] tc_ac.timeout {
-								setverdict(inconc, testcasename() & ": No answer while retrieving resource");
+								setverdict(fail, testcasename() & ": No answer while retrieving resource");
 							}
 						}