OneM2M_Testcases_CSE_Release_2.ttcn

/**
 *  Copyright Notification
 *  No part of this document may be reproduced, in an electronic retrieval system or otherwise, except as authorized by written permission.
 *  The copyright and the foregoing restriction extend to reproduction in all media.
 *  © 2016, oneM2M Partners Type 1 (ARIB, ATIS, CCSA, ETSI, TIA, TSDSI, TTA, TTC).
 *  All rights reserved.
 *  
 *  @author     ETSI
 *  @version    $URL: https://oldforge.etsi.org/svn/oneM2M/branches/Release1/ttcn/OneM2M_Testcases.ttcn $
 *              $Id: OneM2M_Testcases.ttcn 347 2017-08-11 08:48:20Z reinaortega $
 *  @desc       Module containing test cases for oneM2M
 *
 */
module OneM2M_Testcases_CSE_Release_2 {

	import from OneM2M_TestSystem all;
	import from OneM2M_Templates all;
	import from OneM2M_Types all;//{type XSD.ID};
	import from OneM2M_TypesAndValues all;
	import from OneM2M_Pixits all;
	import from LibCommon_Time all;
	import from OneM2M_Pics all;
	import from OneM2M_Functions all;
	import from OneM2M_PermutationFunctions all;
	import from XSD all;
	
	//Demos used for validation purposes
	group oneM2M_demos {
	
		group helpingTestCases {//These are not part of the test suite, just for verification purposes
			
			testcase TC_DELETE_RESOURCES() runs on AeSimu system CseSystem {
				
				timer t_ac := 5.0;
				var integer i; 
				var XSD.ID v_resourceAddress;
				var RequestPrimitive v_request;
				map(self:mcaPort, system:mcaPort); 
					
				for (i:=0; i<lengthof(PX_RESOURCES_TO_BE_DELETED); i:= i+1) {  
					
					v_resourceAddress := f_getResourceAddress() & "/" & PX_RESOURCES_TO_BE_DELETED[i]; 
						
					v_request := valueof(m_delete(v_resourceAddress, PX_SUPER_AE_ID));
					    
					mcaPort.send(f_getMsgOutPrimitive(f_getMsgOutPrimitive(m_request(v_request))));
					
					t_ac.start;
					alt {
						[] mcaPort.receive(mw_response(mw_responsePrimitiveOK)) {
							t_ac.stop;
							log(__SCOPE__ & ":Resource deleted");
							setverdict(pass);
						}
						[] mcaPort.receive(mw_response(mw_responsePrimitiveKO)) {
							t_ac.stop;
							log(__SCOPE__ & ":Error while deleting resource");
							setverdict(fail);
						}
						[] mcaPort.receive {
							t_ac.stop;
							log(__SCOPE__ & ":Unexpected message received");
							setverdict(inconc);
						}
						[] t_ac.timeout {
							log(__SCOPE__ & ":No answer while deleting resource");
							setverdict(inconc);
						}	
					}	
				}
			
				unmap(self:mcaPort, system:mcaPort); 
				stop;
			}	
		
		}//end group helpingTestCases
	
	}//end group oneM2M_demos
	
	group CSE {
		
		group Generic {
			
			group Create {
				
			} // end of group Create
			
			group Retrieve {
			} // end of group Retrieve
			
			group Update {
			} // end of group Update
			
			group Delete {
			} // end of group Delete
		
		} // end of group Generic
		
		group Registration {
			
			group Create{
				
				/**
				  * @desc Check that the IUT accepts an AE registration with the optional attribute OPTIONAL_ATTRIBUTE provided   
				  * 
				 */
				group g_CSE_REG_CRE_012 {
					
					testcase TC_CSE_REG_CRE_012_AE_NL() runs on Tester system CseSystem {
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						var template RequestPrimitive v_create := m_createAe(PX_APP_ID, omit, omit);
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
						v_create.primitiveContent.aE.nodeLink := "http://127.0.0.1/";
						v_ae1.start(f_CSE_REG_CRE_012(v_create));
						v_ae1.done;
					}
					
					testcase TC_CSE_REG_CRE_012_AE_OR() runs on Tester system CseSystem {
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						var template RequestPrimitive v_create := m_createAe(PX_APP_ID, omit, omit);
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
						v_create.primitiveContent.aE.ontologyRef := "MyOntologyRef";
						v_ae1.start(f_CSE_REG_CRE_012(v_create));
						v_ae1.done;
					}
				
				}
				
				
				
				
				/*testcase TC_CSE_REG_CRE_029() runs on CseSimu system CseSystem {
  
					var MsgIn v_response;
					
					var RequestPrimitive v_request;
					var RequestPrimitive v_createRequestPrimitive := valueof(m_createRemoteCSEBase);
					var ResourceType v_resourceType := int16;
	
					// Test control
	
					// Test component configuration
					f_cf04Up();
	
					// Test adapter configuration
	
					// Preamble
					v_request := f_getCreateRequestPrimitive(v_resourceType, v_createRequestPrimitive, -1);
	
					tc_ac.start;
					alt {
						[] mccPort.receive(mw_request(mw_createRemoteCSE(PX_CSE_ID,f_getResourceAddress(-1)))) -> value v_response {
							tc_ac.stop;
							setverdict(pass, __SCOPE__ & ": Resource type remoteCSE created successfully");
						}
						[] mccPort.receive {
							tc_ac.stop;
							setverdict(fail, __SCOPE__ & ": Error while creating resource type remoteCSE");
						}
						[] tc_ac.timeout {
							setverdict(fail, __SCOPE__ & ": No answer while creating resource type remoteCSE");
						}
					}	
	
					// Postamble
					f_cse_postamble_deleteResourcesCSE();
	
					// Tear down
					f_cf04Down();
	
				}*/
				
								/**
				 * @desc Check that the IUT rejects the create request of <CSEBase> resource.
				 * 
				 
				testcase TC_CSE_REG_CRE_027() runs on AeSimu system CseSystem {
	
					// Local variables
					var RequestPrimitive v_request;
					var integer v_cseBaseIndex := -1;
					var ResourceType v_resourceType := int2;
		   
					// Test control

					// Test component configuration
					f_cf02Up();

					// Test adapter configuration

					// Preamble
					vc_cse1.start(f_cse_registrationRemoteCse(mw_createRemoteCSE));

					// Test Body
					f_cse_createResource(int2, m_createAe(PX_APP_ID, omit, omit));
	
					tc_ac.start;
					alt {
						[] mcaPort.receive(mw_response(mw_responsePrimitive(int2001))) {
							tc_ac.stop;
							setverdict(pass, __SCOPE__ & ": AE creation successful.");
						}
						[] mcaPort.receive {
							tc_ac.stop;
							setverdict(fail, __SCOPE__ & ": Error while creating AE");
						}
						[] tc_ac.timeout {
							setverdict(fail, __SCOPE__ & ": No answer while creating AE");
						}
					}	

					// Postamble
					f_cse_postamble_deleteResources();

					// Tear down
					f_cf02Down();

				}end TC_CSE_REG_CRE_027*/
				
				
				
				
				/**
				 * @desc Check that IUT accepts  a CSE registration request with OPTIONAL_ATTRIBUTE attribute
				 * 
				 */
				group g_CSE_REG_CRE_028 {
				
					testcase TC_CSE_REG_CRE_028_RN() runs on Tester system CseSystem {
						 //Local variables
						 var CseSimu v_cse1 := CseSimu.create("CSE1") alive;
						
						 var RequestPrimitive v_request;
						 var template PrimitiveContent v_contentResponse;
						 v_cse1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_CSE1));
						v_cse1.done;
						 v_request := valueof(m_createRemoteCSEBase);
						 v_request.primitiveContent.remoteCSE.cseType := int2;	//MN_CSE
						 v_request.primitiveContent.remoteCSE.resourceName := c_defaultRemoteCSEResourceName;
	
						 v_contentResponse.remoteCSE := mw_contentRemoteCSEBase;
						 v_contentResponse.remoteCSE.cseType := int2;	//MN_CSE
					     v_contentResponse.remoteCSE.resourceName := c_defaultRemoteCSEResourceName;
	
						 v_cse1.start(f_CSE_REG_CRE_028(v_request, v_contentResponse));
						 v_cse1.done;
						
					}
					
					testcase TC_CSE_REG_CRE_028_ET() runs on Tester system CseSystem {
						 //Local variables
						 var CseSimu v_cse1 := CseSimu.create("CSE1") alive;
						
						 var RequestPrimitive v_request;
						 var template PrimitiveContent v_contentResponse;
						 v_cse1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_CSE1));
						v_cse1.done;
						 v_request := valueof(m_createRemoteCSEBase);
						 v_request.primitiveContent.remoteCSE.cseType := int2;	//MN_CSE
						 v_request.primitiveContent.remoteCSE.expirationTime := "20301231T012345";
	
						 v_contentResponse.remoteCSE := mw_contentRemoteCSEBase;
						 v_contentResponse.remoteCSE.cseType := int2;	//MN_CSE
						 v_contentResponse.remoteCSE.expirationTime := "20301231T012345";
	
						 v_cse1.start(f_CSE_REG_CRE_028(v_request, v_contentResponse));
						 v_cse1.done;
		
					}
					
				}//end g_CSE_REG_CRE_028
			
			}	//end group Create
			
			group Retrieve{
				
				
				/**
				 * @desc Check that the IUT accepts a retrieval request of <AE> resource with optional ATTRIBUTE
				 * 
				 */
				 
				group g_CSE_REG_RET_004 {
					
					testcase TC_CSE_REG_RET_004_NL() runs on Tester system CseSystem {
						//Local variables
						 var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						
						 var template RequestPrimitive v_createRequest := m_createAe(PX_APP_ID);
						 var template PrimitiveContent v_contentResponse;
						 v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
						 v_createRequest.primitiveContent.aE.nodeLink := "http://127.0.0.1/";

						 v_contentResponse.aE := mw_contentAeBase;
						 v_contentResponse.aE.nodeLink := ?;

						 v_ae1.start(f_CSE_REG_RET_004(v_createRequest,v_contentResponse));
						 v_ae1.done;
					}
					
					testcase TC_CSE_REG_RET_004_CSZ() runs on Tester system CseSystem {
						//Local variables
						 var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						
						 var template RequestPrimitive v_createRequest := m_createAe(PX_APP_ID);
						 var template PrimitiveContent v_contentResponse;
						 v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
						 v_createRequest.primitiveContent.aE.contentSerialization := {applicationxml};

						 v_contentResponse.aE := mw_contentAeBase;
						 v_contentResponse.aE.contentSerialization := ?; 

						 v_ae1.start(f_CSE_REG_RET_004(v_createRequest,v_contentResponse));
						 v_ae1.done;
					}
	
				} //end g_CSE_REG_RET_004
				
			}//end group Retrieve
			
			group Update{
			
				
				/**
				 * @desc Check that the IUT accepts an update request of <remoteCSE> resource with OPTIONAL_ATTRIBUTE.
				 * 
				 */
				 
				group g_CSE_REG_UPD_002 {
					
					testcase TC_CSE_REG_UPD_002_ET() runs on Tester system CseSystem {
						// Local variables
						var template RequestPrimitive v_updateRequest := m_updateRemoteCSEBase;	
						var CseSimu v_cse1 := CseSimu.create("CSE1") alive;
						v_cse1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_CSE1));
						v_cse1.done;
    						
						v_updateRequest.primitiveContent.remoteCSE.expirationTime := "20301231T012345";
	
						v_cse1.start(f_CSE_REG_UPD_002(v_updateRequest));
						v_cse1.done;
						
					}
					
					testcase TC_CSE_REG_UPD_002_RR() runs on Tester system CseSystem {
						// Local variables
						var template RequestPrimitive v_updateRequest := m_updateRemoteCSEBase;	
						var CseSimu v_cse1 := CseSimu.create("CSE1") alive;
						v_cse1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_CSE1));
						v_cse1.done;

						v_updateRequest.primitiveContent.remoteCSE.requestReachability := true;

						v_cse1.start(f_CSE_REG_UPD_002(v_updateRequest));
						v_cse1.done;

					}
							
				} //end g_CSE_REG_UPD_002
			    
			    
			}// end group Update
			
			group Delete{
			
				
				
			
			}// end group Delete
	  	  	
		}//end Registration
		
		group Data_Management_and_Repository {
						
			group Create {
				
				group g_CSE_DMR_CRE_001 {
					
					/**
					 * @desc Check that the IUT accepts the creation of a RESOURCE_TYPE resource on the TARGET_RESOURCE_ADDRESS of type PARENT_RESOURCE_TYPE with resource name not provided
					 * 
					 */
					testcase TC_CSE_DMR_CRE_001_SCH_CB() runs on Tester system CseSystem {
						// Local variables
						var template RequestPrimitive v_createRequest := m_createScheduleBase;
						var ResponsePrimitive v_responsePrimitive;
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
						
						v_createRequest.primitiveContent.schedule.resourceName := omit;
						v_ae1.start(f_CSE_DMR_CRE_001(int18, v_createRequest, -));//Schedule
						v_ae1.done;
						
						 
																	
						if(getverdict == pass){ v_responsePrimitive := f_getResponsePrimitive(v_ae1);
							if(not ispresent(v_responsePrimitive.primitiveContent.schedule.resourceName)){
								setverdict(fail, __SCOPE__ & ": Error, resourceName attribute not provided");
							}
						}
						
					}
					
					testcase TC_CSE_DMR_CRE_001_SCH_AE() runs on Tester system CseSystem {
						// Local variables
						var template RequestPrimitive v_createRequest := m_createScheduleBase;
						var ResponsePrimitive v_responsePrimitive;
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
						
						v_createRequest.primitiveContent.schedule.resourceName := omit;
						v_ae1.start(f_CSE_DMR_CRE_001(int18, v_createRequest, m_createAeAux(omit,omit)));//Schedule
						v_ae1.done;
						
						 
											
						if(getverdict == pass){ v_responsePrimitive := f_getResponsePrimitive(v_ae1);
							if(not ispresent(v_responsePrimitive.primitiveContent.schedule.resourceName)){
								setverdict(fail, __SCOPE__ & ": Error, resourceName attribute not provided");
							}
						}
						
					}
				
					testcase TC_CSE_DMR_CRE_001_SCH_SUB() runs on Tester system CseSystem {
						// Local variables
						var template RequestPrimitive v_createRequest := m_createScheduleBase;
						var ResponsePrimitive v_responsePrimitive;
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
						
						v_createRequest.primitiveContent.schedule.resourceName := omit;
						v_ae1.start(f_CSE_DMR_CRE_001(int18, v_createRequest, m_createSubscriptionBase));//Schedule
						v_ae1.done;
						
						 
																		
						if(getverdict == pass){ v_responsePrimitive := f_getResponsePrimitive(v_ae1);
							if(not ispresent(v_responsePrimitive.primitiveContent.schedule.resourceName)){
								setverdict(fail, __SCOPE__ & ": Error, resourceName attribute not provided");
							}
						}
					
					}
					
					testcase TC_CSE_DMR_CRE_001_PCH_AE() runs on Tester system CseSystem {
						// Local variables
						var template RequestPrimitive v_createRequest := m_createPollingChannelBase;
						var ResponsePrimitive v_responsePrimitive;
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
						
						
						v_createRequest.primitiveContent.pollingChannel.resourceName := omit;

						v_ae1.start(f_CSE_DMR_CRE_001(int15, v_createRequest, m_createAeAux(omit,omit)));//PollingChannel
						v_ae1.done;
						
						 
												
						if(getverdict == pass){ v_responsePrimitive := f_getResponsePrimitive(v_ae1);
							if(not ispresent(v_responsePrimitive.primitiveContent.pollingChannel.resourceName)){
								setverdict(fail, __SCOPE__ & ": Error, resourceName attribute not provided");
							}
						}
						
					}
					
					testcase TC_CSE_DMR_CRE_001_SUB_SCH() runs on Tester system CseSystem {
						// Local variables
						var template RequestPrimitive v_createRequest := m_createSubscriptionBase;
						var ResponsePrimitive v_responsePrimitive;
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
						
						v_createRequest.primitiveContent.subscription.resourceName := omit;
						v_ae1.start(f_CSE_DMR_CRE_001(int23, v_createRequest, m_createScheduleBase));//Subscription
						v_ae1.done;
						
						 
												
						if(getverdict == pass){ v_responsePrimitive := f_getResponsePrimitive(v_ae1);
							if(not ispresent(v_responsePrimitive.primitiveContent.subscription.resourceName)){
								setverdict(fail, __SCOPE__ & ": Error, resourceName attribute not provided");
							}
						}		
					}
					
					testcase TC_CSE_DMR_CRE_001_SUB_GRP() runs on Tester system CseSystem {
						// Local variables
						var template RequestPrimitive v_createRequest := m_createSubscriptionBase;
						var ResponsePrimitive v_responsePrimitive;
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
						
						v_createRequest.primitiveContent.subscription.resourceName := omit;
						v_ae1.start(f_CSE_DMR_CRE_001(int23, v_createRequest, m_createGroupBase));//Subscription
						v_ae1.done;
						
						 
												
						if(getverdict == pass){ v_responsePrimitive := f_getResponsePrimitive(v_ae1);
							if(not ispresent(v_responsePrimitive.primitiveContent.subscription.resourceName)){
								setverdict(fail, __SCOPE__ & ": Error, resourceName attribute not provided");
							}
						}		
					}
					
					testcase TC_CSE_DMR_CRE_001_NOD_CB() runs on Tester system CseSystem {
						// Local variables
						var template RequestPrimitive v_createRequest := m_createNodeBase;
						var ResponsePrimitive v_responsePrimitive;
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
						 
						v_createRequest.primitiveContent.node.resourceName := omit;

						v_ae1.start(f_CSE_DMR_CRE_001(int14, v_createRequest, -));//Node
						v_ae1.done;
						
						 
												
						if(getverdict == pass){ v_responsePrimitive := f_getResponsePrimitive(v_ae1);
							if(not ispresent(v_responsePrimitive.primitiveContent.node.resourceName)){
								setverdict(fail, __SCOPE__ & ": Error, resourceName attribute not provided");
							}
						}
						
					}
					
					testcase TC_CSE_DMR_CRE_001_MGC_CB() runs on Tester system CseSystem {
						// Local variables
						var template RequestPrimitive v_createRequest := m_createMgmtCmdBase;
						var ResponsePrimitive v_responsePrimitive;
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
						
						v_createRequest.primitiveContent.mgmtCmd.resourceName := omit;
						v_ae1.start(f_CSE_DMR_CRE_001(int12, v_createRequest, -));//Management Command
						v_ae1.done;
						
						 
												
						if(getverdict == pass){ v_responsePrimitive := f_getResponsePrimitive(v_ae1);
							if(not ispresent(v_responsePrimitive.primitiveContent.mgmtCmd.resourceName)){
								setverdict(fail, __SCOPE__ & ": Error, resourceName attribute not provided");
							}
						}
						
					}
					
					testcase TC_CSE_DMR_CRE_001_LCP_CB() runs on Tester system CseSystem {
						// Local variables
						var template RequestPrimitive v_createRequest := m_createLocationPolicyBase;
						var ResponsePrimitive v_responsePrimitive;
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
						
						v_createRequest.primitiveContent.locationPolicy.resourceName := omit;
						v_ae1.start(f_CSE_DMR_CRE_001(int10, v_createRequest, -));//Location Policy
						v_ae1.done;
						
						 
												
						if(getverdict == pass){ v_responsePrimitive := f_getResponsePrimitive(v_ae1);
							if(not ispresent(v_responsePrimitive.primitiveContent.locationPolicy.resourceName)){
								setverdict(fail, __SCOPE__ & ": Error, resourceName attribute not provided");
							}
						}
						
					}
					
					testcase TC_CSE_DMR_CRE_001_STCG_CB() runs on Tester system CseSystem {
						// Local variables
						var template RequestPrimitive v_createRequest := m_createStatsConfigBase;
						var ResponsePrimitive v_responsePrimitive;
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
						
						v_createRequest.primitiveContent.statsConfig.resourceName := omit;
						v_ae1.start(f_CSE_DMR_CRE_001(int22, v_createRequest, -));//Stats Config
						v_ae1.done;
						
						 
												
						if(getverdict == pass){ v_responsePrimitive := f_getResponsePrimitive(v_ae1);
							if(not ispresent(v_responsePrimitive.primitiveContent.statsConfig.resourceName)){
								setverdict(fail, __SCOPE__ & ": Error, resourceName attribute not provided");
							}
						}
					}
					
					testcase TC_CSE_DMR_CRE_001_STCL_CB() runs on Tester system CseSystem {
						// Local variables
						var template RequestPrimitive v_createRequest := m_createStatsCollectBase;
						var ResponsePrimitive v_responsePrimitive;
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
						 
						v_createRequest.primitiveContent.statsCollect.resourceName := omit;
						
						v_ae1.start(f_CSE_DMR_CRE_001(int21, v_createRequest, -));//Stats Collect
						v_ae1.done;
						
						 
												
						if(getverdict == pass){ v_responsePrimitive := f_getResponsePrimitive(v_ae1);
							if(not ispresent(v_responsePrimitive.primitiveContent.statsCollect.resourceName)){
								setverdict(fail, __SCOPE__ & ": Error, resourceName attribute not provided");
							}
						}
						
					}
					
					testcase TC_CSE_DMR_CRE_001_MSSP_CB() runs on Tester system CseSystem {
						// Local variables
						var template RequestPrimitive v_createRequest := m_createM2mServiceSubscriptionProfileBase;
						var ResponsePrimitive v_responsePrimitive;
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
						
						v_createRequest.primitiveContent.m2mServiceSubscriptionProfile.resourceName := omit;
						v_ae1.start(f_CSE_DMR_CRE_001(int11, v_createRequest, -));//Subscription Profile
						v_ae1.done;
						
						 
												
						if(getverdict == pass){ v_responsePrimitive := f_getResponsePrimitive(v_ae1);
							if(not ispresent(v_responsePrimitive.primitiveContent.m2mServiceSubscriptionProfile.resourceName)){
								setverdict(fail, __SCOPE__ & ": Error, resourceName attribute not provided");
							}
						}
						
					}
					
					testcase TC_CSE_DMR_CRE_001_ASAR_CB() runs on Tester system CseSystem {
						// Local variables
						var template RequestPrimitive v_createRequest := m_createServiceSubscribedAppRuleBase;
						var ResponsePrimitive v_responsePrimitive;
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
						 
						v_createRequest.primitiveContent.serviceSubscribedAppRule.resourceName := omit;
						v_ae1.start(f_CSE_DMR_CRE_001(int19, v_createRequest, -));//Service Subscribed App
						v_ae1.done;
						
						 
												
						if(getverdict == pass){ v_responsePrimitive := f_getResponsePrimitive(v_ae1);
							if(not ispresent(v_responsePrimitive.primitiveContent.serviceSubscribedAppRule.resourceName)){
								setverdict(fail, __SCOPE__ & ": Error, resourceName attribute not provided");
							}
						}
						
					}
					
				} // end g_CSE_DMR_CRE_001
								
				group g_CSE_DMR_CRE_002 {
					
					/**
					 * @desc Check that the IUT accepts the creation of a RESOURCE_TYPE resource with a non-existing resource name provided by AE
					 * 
					 */
					testcase TC_CSE_DMR_CRE_002_SCH() runs on Tester system CseSystem {
						// Local variables
						var ResponsePrimitive v_responsePrimitive;
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
			
						v_ae1.start(f_CSE_DMR_CRE_002(int18, m_createScheduleBase));//Schedule
						v_ae1.done;
						
						 
																		
						if(getverdict == pass){ v_responsePrimitive := f_getResponsePrimitive(v_ae1);
							if(not ispresent(v_responsePrimitive.primitiveContent.schedule.resourceName)){
								setverdict(fail, __SCOPE__ & ": Error, resourceName attribute not provided");
							} else {
								if(v_responsePrimitive.primitiveContent.schedule.resourceName != c_defaultScheduleResourceName){
									setverdict(fail, __SCOPE__ & ": Error, resourceName attribute not correct");
								}
							}
						}
					}
					testcase TC_CSE_DMR_CRE_002_PCH() runs on Tester system CseSystem {
						// Local variables
						var ResponsePrimitive v_responsePrimitive;
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
			
						v_ae1.start(f_CSE_DMR_CRE_002(int15, m_createPollingChannelBase));//Pollingchannel
						v_ae1.done;
						
						 
												
						if(getverdict == pass){ v_responsePrimitive := f_getResponsePrimitive(v_ae1);
							if(not ispresent(v_responsePrimitive.primitiveContent.pollingChannel.resourceName)){
								setverdict(fail, __SCOPE__ & ": Error, resourceName attribute not provided");
							} else {
								if(v_responsePrimitive.primitiveContent.pollingChannel.resourceName != c_defaultPollingChannelResourceName){
									setverdict(fail, __SCOPE__ & ": Error, resourceName attribute not correct");
								}
							}
						}
					}
					
				}// end group g_CSE_DMR_CRE_002
				
				group g_CSE_DMR_CRE_003 {
					
					/**
					 * @desc Check that the IUT rejects the creation of a RESOURCE_TYPE resource with an existing resource name provided by AE
					 * 
					 */
					testcase TC_CSE_DMR_CRE_003_SCH() runs on Tester system CseSystem {
						// Local variables
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;

						v_ae1.start(f_CSE_DMR_CRE_003(int18, m_createScheduleBase));//Schedule
						v_ae1.done;
					}
					testcase TC_CSE_DMR_CRE_003_PCH() runs on Tester system CseSystem {
						// Local variables
                        
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;

						v_ae1.start(f_CSE_DMR_CRE_003(int15, m_createPollingChannelBase));//Pollingchannel
						v_ae1.done;
					}
					
				}// end group g_CSE_DMR_CRE_003
				
				group g_CSE_DMR_CRE_004 {
					
					/**
					 * @desc Check that the IUT rejects the creation of a RESOURCE_TYPE resource when AE has no privileges
					 * 
					 */
					testcase TC_CSE_DMR_CRE_004_SCH() runs on Tester system CseSystem {
						// Local variables
						
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;

						v_ae1.start(f_CSE_DMR_CRE_004(int18, m_createScheduleBase));//Schedule
						v_ae1.done;
					}
					testcase TC_CSE_DMR_CRE_004_PCH() runs on Tester system CseSystem {
						// Local variables
                        
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;

						v_ae1.start(f_CSE_DMR_CRE_004(int15, m_createPollingChannelBase));//Pollingchannel
						v_ae1.done;
					}
					
				}// end group g_CSE_DMR_CRE_004
				
				group g_CSE_DMR_CRE_012 {
					
					/**
					 * @desc Check that the IUT accepts the creation of a RESOURCE_TYPE resource with the optional attribute OPTIONAL_ATTRIBUTE provided
					 * 
					 */
					testcase TC_CSE_DMR_CRE_012_CNT_ET() runs on Tester system CseSystem {
						// Local variables
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						
						var template RequestPrimitive v_createRequest := m_createContainerBase;
						const AttributeList c_optionalAttribute := {"expirationTime"};
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
						v_createRequest.primitiveContent.container.expirationTime := "20301231T012345";
						
						v_ae1.start(f_CSE_DMR_CRE_012(int3, v_createRequest, c_optionalAttribute));
						v_ae1.done;
						  
					}
					
					testcase TC_CSE_DMR_CRE_012_CIN_ET() runs on Tester system CseSystem {//TODO
						// Local variables
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						
						var template RequestPrimitive v_createRequest := m_createContentInstanceBase;
						const AttributeList c_optionalAttribute := {"expirationTime"};
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
						v_createRequest.primitiveContent.contentInstance.expirationTime := "20301231T012345";
						
						v_ae1.start(f_CSE_DMR_CRE_012(int4, v_createRequest, c_optionalAttribute));			
						v_ae1.done;
					}
					
					testcase TC_CSE_DMR_CRE_012_CIN_OR() runs on Tester system CseSystem {//TODO
						// Local variables
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
					
						var template RequestPrimitive v_createRequest := m_createContentInstanceBase;
						const AttributeList c_optionalAttribute := {"ontologyRef"};
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
						v_createRequest.primitiveContent.contentInstance.ontologyRef := "MyOntologyRef";
						
						v_ae1.start(f_CSE_DMR_CRE_012(int4, v_createRequest, c_optionalAttribute));
						v_ae1.done;
						
					}
					
					testcase TC_CSE_DMR_CRE_012_ACP_ET() runs on Tester system CseSystem {
						// Local variables
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						
						var template RequestPrimitive v_createRequest := m_createAcpBase;
						const AttributeList c_optionalAttribute := {"expirationTime"};
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
						v_createRequest.primitiveContent.accessControlPolicy.expirationTime := "20301231T012345";
						
						v_ae1.start(f_CSE_DMR_CRE_012(int1, v_createRequest, c_optionalAttribute));
						v_ae1.done;
						
					}
					
					testcase TC_CSE_DMR_CRE_012_SUB_ET() runs on Tester system CseSystem {
						// Local variables
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						
						var template RequestPrimitive v_createRequest := m_createSubscriptionBase;
						const AttributeList c_optionalAttribute := {"expirationTime"};
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
						v_createRequest.primitiveContent.subscription.expirationTime := "20301231T012345";
						
						v_ae1.start(f_CSE_DMR_CRE_012(int23, v_createRequest, c_optionalAttribute));
						v_ae1.done;
						  
					}
					
					testcase TC_CSE_DMR_CRE_012_SUB_ENC() runs on Tester system CseSystem {
						// Local variables
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						
						var template RequestPrimitive v_createRequest := m_createSubscriptionBase;
						const AttributeList c_optionalAttribute := {"eventNotificationCriteria"};
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
						v_createRequest.primitiveContent.subscription.eventNotificationCriteria := valueof(m_eventNotificationCriteria({int1}, -));
						
						v_ae1.start(f_CSE_DMR_CRE_012(int23, v_createRequest, c_optionalAttribute));
						v_ae1.done;
						
					}
					
					testcase TC_CSE_DMR_CRE_012_SUB_EXC() runs on Tester system CseSystem {
						// Local variables
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						
						var template RequestPrimitive v_createRequest := m_createSubscriptionBase;
						const AttributeList c_optionalAttribute := {"expirationCounter"};
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
						v_createRequest.primitiveContent.subscription.expirationCounter := 1;
						
						v_ae1.start(f_CSE_DMR_CRE_012(int23, v_createRequest, c_optionalAttribute));
						v_ae1.done;
						
					}
					
					testcase TC_CSE_DMR_CRE_012_SUB_GPI() runs on Tester system CseSystem {
						// Local variables
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						
						var template RequestPrimitive v_createRequest := m_createSubscriptionBase;
						const AttributeList c_optionalAttribute := {"groupID"};
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
						v_createRequest.primitiveContent.subscription.groupID := "MyGroupID";
						
						v_ae1.start(f_CSE_DMR_CRE_012(int23, v_createRequest, c_optionalAttribute));
						v_ae1.done;
						
					}
					
					testcase TC_CSE_DMR_CRE_012_SUB_NFU() runs on Tester system CseSystem {
						// Local variables
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						
						var template RequestPrimitive v_createRequest := m_createSubscriptionBase;
						const AttributeList c_optionalAttribute := {"notificationForwardingURI"};
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
						v_createRequest.primitiveContent.subscription.notificationForwardingURI := "MyForwardingURI";
						
						v_ae1.start(f_CSE_DMR_CRE_012(int23, v_createRequest, c_optionalAttribute));
						v_ae1.done;
						
					}
					
					testcase TC_CSE_DMR_CRE_012_SUB_BN() runs on Tester system CseSystem {
						// Local variables
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						
						var template RequestPrimitive v_createRequest := m_createSubscriptionBase;
						const AttributeList c_optionalAttribute := {"batchNotify"};
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
						v_createRequest.primitiveContent.subscription.batchNotify := {0, "PT1S"};
						
						v_ae1.start(f_CSE_DMR_CRE_012(int23, v_createRequest, c_optionalAttribute));
						v_ae1.done;
					}
					
					testcase TC_CSE_DMR_CRE_012_SUB_RL() runs on Tester system CseSystem {
						// Local variables
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						
						var template RequestPrimitive v_createRequest := m_createSubscriptionBase;
						const AttributeList c_optionalAttribute := {"rateLimit"};
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
						v_createRequest.primitiveContent.subscription.rateLimit := {0, omit};
						
						v_ae1.start(f_CSE_DMR_CRE_012(int23, v_createRequest, c_optionalAttribute));
						v_ae1.done;
						
					}
					
					testcase TC_CSE_DMR_CRE_012_SUB_PSN() runs on Tester system CseSystem {
						// Local variables
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						
						var template RequestPrimitive v_createRequest := m_createSubscriptionBase;
						const AttributeList c_optionalAttribute := {"preSubscriptionNotify"};
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
						v_createRequest.primitiveContent.subscription.preSubscriptionNotify := 1;
						
						v_ae1.start(f_CSE_DMR_CRE_012(int23, v_createRequest, c_optionalAttribute));
						v_ae1.done;
						
					}
					
					testcase TC_CSE_DMR_CRE_012_SUB_PN() runs on Tester system CseSystem {
						// Local variables
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						
						var template RequestPrimitive v_createRequest := m_createSubscriptionBase;
						const AttributeList c_optionalAttribute := {"pendingNotification"};
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
						v_createRequest.primitiveContent.subscription.pendingNotification := int1;
						
						v_ae1.start(f_CSE_DMR_CRE_012(int23, v_createRequest, c_optionalAttribute));			
						v_ae1.done;
					}
					
					testcase TC_CSE_DMR_CRE_012_SUB_NSP() runs on Tester system CseSystem {
						// Local variables
						var AeSimu v_ae1 := AeSimu.create("AE1") alive;
						
						var template RequestPrimitive v_createRequest := m_createSubscriptionBase;
						const AttributeList c_optionalAttribute := {"notificationStoragePriority"};
						v_ae1.start(f_setProtocolBinding(PX_PROTOCOL_BINDING_AE1));
						v_ae1.done;
						v_createRequest.primitiveContent.subscription.notificationStoragePriority := 1;
						
						v_ae1.start(f_CSE_DMR_CRE_012(int23, v_createRequest, c_optionalAttribute));
						v_ae1.done;
						  
					}
					
					testcase TC_CSE_DMR_CRE_012_SUB_LN() runs on Tester system CseSystem {
						// Local variables