OneM2M_Testcases.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     oneM2M
 *  @version    $URL: https://forge.etsi.org/svn/oneM2M/trunk/ttcn/OneM2M_Testcases.ttcn $
 *              $Id: OneM2M_Testcases.ttcn 234 2017-03-20 16:37:29Z reinaortega $
 *  @desc       Module containing test cases for oneM2M
 *
 */
 //Test

module OneM2M_Testcases {

	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 OneM2M_Pics all;
	import from OneM2M_Functions all;
	import from LibCommon_Time 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_AE() runs on CseTester system CseSystem {
				
				timer t_ac := 5.0;
				map(self:mcaPort, system:mcaPort); 
		
				mcaPort.send(m_request(m_deleteRequest(PX_URI_CSE & PX_CSE_NAME & "/" & PX_RESOURCE_TO_BE_DELETED)));
				t_ac.start;
				alt {
					[] mcaPort.receive(mw_response(mw_responsePrimitiveOK)) {
						t_ac.stop;
						log("Postamble: Resource deleted");
						setverdict(pass);
					}
					[] mcaPort.receive(mw_response(mw_responsePrimitiveKO)) {
						t_ac.stop;
						log("Postamble: Error while deleting resource");
						setverdict(fail);
					}
					[] mcaPort.receive {
						t_ac.stop;
						log("Postamble: Unexpected message received");
						setverdict(inconc);
					}
					[] t_ac.timeout {
						log("Postamble: No answer while deleting resource");
						setverdict(inconc);
					}	
				}	
				
				unmap(self:mcaPort, system:mcaPort); 
				stop;
			}	
			
			testcase TC_DELETE_RESOURCES() runs on CseTester 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_deleteRequest(v_resourceAddress));
    
    				mcaPort.send(m_request(v_request));
					
					t_ac.start;
					alt {
						[] mcaPort.receive(mw_response(mw_responsePrimitiveOK)) {
							t_ac.stop;
							log("Postamble: Resource deleted");
							setverdict(pass);
						}
						[] mcaPort.receive(mw_response(mw_responsePrimitiveKO)) {
							t_ac.stop;
							log("Postamble: Error while deleting resource");
							setverdict(fail);
						}
						[] mcaPort.receive {
							t_ac.stop;
							log("Postamble: Unexpected message received");
							setverdict(inconc);
						}
						[] t_ac.timeout {
							log("Postamble: No answer while deleting resource");
							setverdict(inconc);
						}	
					}	
				}
			
				unmap(self:mcaPort, system:mcaPort); 
				stop;
			}	
		
		}//end group helpingTestCases
	
	}//end group oneM2M_demos
	
	group CSE {
		
		group Registration {
	  	  	
			testcase TC_CSE_REG_BV_001() runs on CseTester system CseSystem {
	  	  	
				var MsgIn v_response;
				var RequestPrimitive v_request;
				var integer v_cseBaseIndex := -1;
				var integer v_resourceIndex := -1;
				var ResourceType v_resourceType := int2;
                
                // Test component configuration
				f_cf01Up();
                
				//Preamble
				v_cseBaseIndex := f_cse_preamble_createServiceSubscribedAppRule({"C-AE-ID-STEM"});//c_CRUDNDi);
				
				//Test Body
				v_request := valueof(m_createAe(PX_APP_ID, omit, omit));	
				
				v_request := f_getCreateRequestPrimitive(v_resourceType, v_request, v_cseBaseIndex);
				
				mcaPort.send(m_request(v_request));
				
				tc_ac.start;
				alt {
					[] mcaPort.receive(mw_response(mw_responsePrimitive(int2001))) {
						tc_ac.stop;
						setverdict(pass, testcasename() & ": AE successfuly created.");
					}
					[] mcaPort.receive(mw_response(mw_responsePrimitiveInverse(int2001))) -> value v_response{
						tc_ac.stop;
						setverdict(fail, testcasename() & ": Error while creating AE with status code " & int2str(enum2int(v_response.primitive.responsePrimitive.responseStatusCode)));
					}
					[] tc_ac.timeout {
						setverdict(inconc, testcasename() & ": No answer while creating AE");
					}
				}	
								
				// Postamble
				f_cse_postamble_deleteResources();
				
				// Tear down
				f_cf01Down();
					
			}
	  	  	
			testcase TC_CSE_REG_BV_002() runs on CseTester system CseSystem {
	  	  	
				var MsgIn v_response;
				var RequestPrimitive v_request;
				var integer v_cseBaseIndex := -1;
				var ResourceType v_resourceType := int2;
                
                // Test component configuration
				f_cf01Up();
	  	  	
				//Preambule
				v_cseBaseIndex := f_cse_preamble_createServiceSubscribedAppRule({"C-AE-ID-STEM"});//c_CRUDNDi);
				
				//Test Body
				v_request := valueof(m_createAe(PX_APP_ID, omit, "C-AE-ID-STEM"));				
    									
				v_request := f_getCreateRequestPrimitive(v_resourceType, v_request, v_cseBaseIndex);

				mcaPort.send(m_request(v_request));
				tc_ac.start;
				alt {
					[] mcaPort.receive(mw_response(mw_responsePrimitive(int2001))) {
						tc_ac.stop;
						setverdict(pass, testcasename() & ": AE successfuly created.");
					}
					[] mcaPort.receive(mw_response(mw_responsePrimitiveInverse(int2001))) -> value v_response{
						tc_ac.stop;
						setverdict(fail, testcasename() & ": Error while creating AE with status code " & int2str(enum2int(v_response.primitive.responsePrimitive.responseStatusCode)));
					}
					[] tc_ac.timeout {
						setverdict(inconc, testcasename() & ": No answer while creating AE");
					}
				}	
								
				// Postamble
				f_cse_postamble_deleteResources();
				
				// Tear down
				f_cf01Down();
					
			}
	  	  	
			testcase TC_CSE_REG_BV_003() runs on CseTester system CseSystem {
	  	  	
				var MsgIn v_response;
				var RequestPrimitive v_request;
				var integer v_cseBaseIndex := -1;
				var ResourceType v_resourceType := int2;
                
                // Test component configuration
				f_cf01Up();
				
				//Preambule
				v_cseBaseIndex := f_cse_preamble_createServiceSubscribedAppRule(omit);//c_CRUDNDi);				
    									
				// Test Body
				v_request := valueof(m_createAe(PX_APP_ID, omit, omit));				
    									
				v_request := f_getCreateRequestPrimitive(v_resourceType, v_request, v_cseBaseIndex);
				
				mcaPort.send(m_request(v_request));
				tc_ac.start;
				alt {
					[] mcaPort.receive(mw_response(mw_responsePrimitive(int4005))) {
						tc_ac.stop;
						setverdict(pass, testcasename() & ": AE creation rejected.");
					}
					[] mcaPort.receive(mw_response(mw_responsePrimitiveInverse(int4005))) -> value v_response{
						tc_ac.stop;
						setverdict(fail, testcasename() & ": Error while creating AE with status code " & int2str(enum2int(v_response.primitive.responsePrimitive.responseStatusCode)));
					}
					[] tc_ac.timeout {
						setverdict(inconc, testcasename() & ": No answer while creating AE");
					}
				}	
								
				// Postamble
				f_cse_postamble_deleteResources();
				
				// Tear down
				f_cf01Down();
					
			}
	  	  	
			testcase TC_CSE_REG_BV_004() runs on CseTester system CseSystem {
	  	  	
				var MsgIn v_response;
				var RequestPrimitive v_request;
				var integer v_cseBaseIndex := -1;
				var ResourceType v_resourceType := int2;
                
                // Test component configuration
				f_cf01Up();
	  	  	
				//Preambule
				v_cseBaseIndex := f_cse_preamble_createServiceSubscribedAppRule(omit);//c_CRUDNDi);
	
				//Test Body	
				v_request := valueof(m_createAe(PX_APP_ID, omit, "C-AE-ID-STEM"));				
    									
				v_request := f_getCreateRequestPrimitive(v_resourceType, v_request, v_cseBaseIndex);
		
				mcaPort.send(m_request(v_request));
				tc_ac.start;
				alt {
					[] mcaPort.receive(mw_response(mw_responsePrimitive(int4005))) {
						tc_ac.stop;
						setverdict(pass, testcasename() & ": AE creation rejected.");
					}
					[] mcaPort.receive(mw_response(mw_responsePrimitiveInverse(int4005))) -> value v_response{
						tc_ac.stop;
						setverdict(fail, testcasename() & ": Error while creating AE with status code " & int2str(enum2int(v_response.primitive.responsePrimitive.responseStatusCode)));
					}
					[] tc_ac.timeout {
						setverdict(inconc, testcasename() & ": No answer while creating AE");
					}
				}	
								
				// Postamble
				f_cse_postamble_deleteResources();
					
				// Tear down
				f_cf01Down();
					
			}
	  	  	
			testcase TC_CSE_REG_BV_005() runs on CseTester system CseSystem {
	  	  	
				var MsgIn v_response;
				var RequestPrimitive v_request;
				var integer v_cseBaseIndex := -1;
				var ResourceType v_resourceType := int2;
                
                // Test component configuration
				f_cf02Up();
	  	  	
				//Preambule
				v_cseBaseIndex := f_cse_preamble_createServiceSubscribedAppRule({"S"});//c_CRUDNDi);
	
				//Test Body
				v_request := valueof(m_createAe(PX_APP_ID, omit, "C-AE-ID-STEM"));				
    									
				v_request := f_getCreateRequestPrimitive(v_resourceType, v_request, v_cseBaseIndex);
	  	  		
				mcaPort.send(m_request(v_request));
				tc_ac.start;

				alt {
					[] mccPort.receive(mw_request(mw_createAEAnnc(-, -, -, "APP_ID", -))) {
						tc_ac.stop;
						setverdict(pass, testcasename() & ": AE creation redirected.");
					}
					[] mccPort.receive {
						tc_ac.stop;
						setverdict(fail, testcasename() & ": Error while creating AE");
					}
					[] tc_ac.timeout {
						setverdict(inconc, testcasename() & ": No answer while creating AE");
					}
				}	
								
				// Postamble
				f_cse_postamble_deleteResources();
				
				// Tear down
				f_cf01Down();
					
			}
			
			testcase TC_CSE_REG_BV_006() runs on CseTester system CseSystem {
			  
			   	var MsgIn v_response;
				var RequestPrimitive v_request;
				var integer v_aeIndex := -1;
				var ResourceType v_resourceType := int2;
				
				// Test control
    				
				// Test component configuration
				f_cf01Up();
    			
				// Test adapter configuration
    			
				// Preamble
				v_aeIndex := f_cse_preamble_registerAeWithId("C-AE-ID-STEM");//c_CRUDNDi);
				
				//Test Body	
				v_request := valueof(m_createAe(PX_APP_ID, omit, "C-AE-ID-STEM"));				
    									
				v_request := f_getCreateRequestPrimitive(v_resourceType, v_request, v_aeIndex);
				
				mcaPort.send(m_request(v_request));
				tc_ac.start;
				alt {
					[] mcaPort.receive(mw_response(mw_responsePrimitive(int4105))) {
						tc_ac.stop;
						setverdict(pass, testcasename() & ": AE creation rejected.");
					}
					[] mcaPort.receive(mw_response(mw_responsePrimitiveInverse(int4105))) -> value v_response{
						tc_ac.stop;
						setverdict(fail, testcasename() & ": Error while creating AE with status code " & int2str(enum2int(v_response.primitive.responsePrimitive.responseStatusCode)));
					}
					[] tc_ac.timeout {
						setverdict(inconc, testcasename() & ": No answer while creating AE");
					}
				}	
								
				// Postamble
				f_cse_postamble_deleteResources();
					
				// Tear down
				f_cf01Down();
			
			}
			
			testcase TC_CSE_REG_BV_007() runs on CseTester system CseSystem {
	  	  	
				var MsgIn v_response;
				var RequestPrimitive v_request;
				var integer v_cseBaseIndex := -1;
				var ResourceType v_resourceType := int2;
                
                // Test component configuration
				f_cf02Up();
	  	  	
				//Preambule
				v_cseBaseIndex := f_cse_preamble_createServiceSubscribedAppRule({"S"});//c_CRUDNDi);
	
				//Test Body
				v_request := valueof(m_createAe(PX_APP_ID, omit, "S-AE-ID-STEM"));				
    									
				v_request := f_getUpdateRequestPrimitive(v_resourceType,v_cseBaseIndex, v_request);
	  	  		
				mcaPort.send(m_request(v_request));
				tc_ac.start;

				alt {
					[] mccPort.receive(mw_request(mw_createAEAnnc(omit, "CSE_ID", "/S", "APP_ID", "S-AE-ID-STEM"))) {
						tc_ac.stop;
						setverdict(pass, testcasename() & ": AE creation redirected.");
					}
					[] mccPort.receive {
						tc_ac.stop;
						setverdict(fail, testcasename() & ": Error while creating AE");
					}
					[] tc_ac.timeout {
						setverdict(inconc, testcasename() & ": No answer while creating AE");
					}
				}	
								
				// Postamble
				f_cse_postamble_deleteResources();
				
				// Tear down
				f_cf02Down();
					
			}
	  	  	
			testcase TC_CSE_REG_BV_008() runs on CseTester system CseSystem {
	  	  	
				var MsgIn v_response;
				var RequestPrimitive v_request;
				var integer v_cseBaseIndex := -1;
				var ResourceType v_resourceType := int2;
                
                // Test component configuration
				f_cf02Up();
	  	  	
				//Preambule
				v_cseBaseIndex := f_cse_preamble_registerAe();
				f_cse_postamble_deleteResources(); //to deregister the AE, I don't know if it's correct like this?
	
				//Test Body
				v_request := valueof(m_createAEAnnc(-, "CSE_ID", "/S", "APP_ID", "S-AE-ID-STEM"));	//TODO to double check all parameters			
    									
				v_request := f_getUpdateRequestPrimitive(v_resourceType,v_cseBaseIndex, v_request);
	  	  		
				mccPort.send(m_request(v_request));
				tc_ac.start;

				alt {
					[] mccPort.receive(mw_response(mw_responsePrimitive(int2004))) -> value v_response {
						tc_ac.stop;
						setverdict(pass, testcasename() & ": AE creation redirected.");
						//continue to test the content
					}
					[] mccPort.receive {
						tc_ac.stop;
						setverdict(fail, testcasename() & ": Error while creating AE");
					}
					[] tc_ac.timeout {
						setverdict(inconc, testcasename() & ": No answer while creating AE");
					}
				}	
								
				// Postamble
				f_cse_postamble_deleteResources();
				
				// Tear down
				f_cf02Down();
					
			}
			
			testcase TC_CSE_REG_BV_009() runs on CseTester system CseSystem {
	  	  	
				var MsgIn v_response;
				var ResponsePrimitive v_request;
				var integer v_cseBaseIndex := -1;
				var ResourceType v_resourceType := int2;
                
                // Test component configuration
				f_cf02Up();
	  	  	
				//Preambule
				v_cseBaseIndex := f_cse_preamble_createServiceSubscribedAppRule({"S"});//c_CRUDNDi);
	
				//Test Body
				v_request := valueof(m_responsePrimitive(int2001, "To_be_defined", {any_1 := {{AEAnnc_optional := m_contentCreateAEAnnc({"Credential-ID:None"}, omit, PX_APP_ID, "/CSE_ID/S-AE-ID-STEM")}}}));				
	  	  		
				mccPort.send(m_response(v_request));
				tc_ac.start;

				alt {
					[] mcaPort.receive(mw_response(mw_responsePrimitive(int2001))) -> value v_response {
						tc_ac.stop;
						setverdict(pass, testcasename() & ": AE creation success.");
						//continue to test the content
					}
					[] mcaPort.receive {
						tc_ac.stop;
						setverdict(fail, testcasename() & ": Error while creating AE");
					}
					[] tc_ac.timeout {
						setverdict(inconc, testcasename() & ": No answer while creating AE");
					}
				}	
								
				// Postamble
				f_cse_postamble_deleteResources();
				
				// Tear down
				f_cf02Down();
					
			}
	  	  	
		}//end Registration
		
		group Data_Management_and_Repository {

			group g_CSE_DMR_BV_001 {
					
				testcase TC_CSE_DMR_BV_001_01() runs on CseTester system CseSystem {
					// Local variables
					f_CSE_DMR_BV_001(int3, m_createContainerBase, int0);//ResultContent = 0 (nothing)
				}
				
				testcase TC_CSE_DMR_BV_001_02() runs on CseTester system CseSystem {
					// Local variables
					f_CSE_DMR_BV_001(int3, m_createContainerBase, int2);//ResultContent = 2 (hierarchical address)
				}
				
				testcase TC_CSE_DMR_BV_001_03() runs on CseTester system CseSystem {
					// Local variables
					f_CSE_DMR_BV_001(int3, m_createContainerBase, int3);//ResultContent = 3 (attributes and hierarchichal address)
				}
				
				function f_CSE_DMR_BV_001(ResourceType p_resourceType, template RequestPrimitive p_requestPrimitive, ResultContent p_resultContent) runs on CseTester {
    				
					// Local variables
					var MsgIn v_response;
					var RequestPrimitive v_request;
					var integer v_aeIndex := -1;
					var integer v_resourceIndex := -1;
    										   
					// Test control
    				
					// Test component configuration
					f_cf01Up();
    				
					// Test adapter configuration
    				
					// Preamble
					v_aeIndex := f_cse_preamble_registerAe();//c_CRUDNDi);
					    					
					v_resourceIndex := f_cse_createResource(p_resourceType, p_requestPrimitive, v_aeIndex); 				
    									
					// Test Body
					v_request := valueof(m_retrieveResource(f_getResourceAddress(v_resourceIndex), f_getOriginator(v_resourceIndex)));
					v_request.resultContent := p_resultContent;
					mcaPort.send(m_request(v_request));
					tc_ac.start;
					alt {
						[] mcaPort.receive(mw_response(mw_responsePrimitive(int4000))) { //BAD REQUEST
							tc_ac.stop;
							setverdict(pass, testcasename() & ": Request successfully rejected");
						}
						[] mcaPort.receive(mw_response(mw_responsePrimitiveKO)) { 
							tc_ac.stop;
							setverdict(fail, testcasename() & ": Error while retrieving resource");
						}
						[] mcaPort.receive(mw_response(mw_responsePrimitiveOK)) -> value v_response {
							tc_ac.stop;
							setverdict(fail, testcasename() & ": Error, Result content set to 0 is impossible for a retrieve request ");
						}
						[] tc_ac.timeout {
							setverdict(inconc, testcasename() & ": No answer while retrieving resource");
						}
					}	
    								
					// Postamble
					f_cse_postamble_deleteResources();
					
					// Tear down
					f_cf01Down();
    				
				}//end f_CSE_DMR_BV_001
    				
			} // end g_CSE_DMR_BV_001
			
			group g_CSE_DMR_BV_002 {
					
				testcase TC_CSE_DMR_BV_002_01() runs on CseTester system CseSystem {
					// Local variables
					var template PrimitiveContent v_contentResponse;
					
					v_contentResponse.any_1[0].Container_optional := mw_contentContainer_rc1;
					                        
					f_CSE_DMR_BV_002(int3, m_createContainerBase, v_contentResponse);//Container
				}

				testcase TC_CSE_DMR_BV_002_02() runs on CseTester system CseSystem {
					// Local variables
					var template PrimitiveContent v_contentResponse;
					
					v_contentResponse.any_1[0].Group_optional := mw_contentGroup_rc1;
					
					f_CSE_DMR_BV_002(int9, m_createGroupBase, v_contentResponse);//Group
				}
					
				testcase TC_CSE_DMR_BV_002_03() runs on CseTester system CseSystem {
					// Local variables
					var template PrimitiveContent v_contentResponse;
					
					v_contentResponse.any_1[0].AccessControlPolicy_optional := mw_contentAcp_rc1;
						
					f_CSE_DMR_BV_002(int1, m_createAcpBase,v_contentResponse);//AccessControlPolicy
				}
				
				testcase TC_CSE_DMR_BV_002_04() runs on CseTester system CseSystem {
					// Local variables
					var template PrimitiveContent v_contentResponse;
					
					v_contentResponse.any_1[0].Schedule_optional := mw_contentSchedule_rc1;
						
					f_CSE_DMR_BV_002(int18, m_createScheduleBase, v_contentResponse);//Schedule
				}
					
				testcase TC_CSE_DMR_BV_002_05() runs on CseTester system CseSystem {
					// Local variables
					var template PrimitiveContent v_contentResponse;
					
					v_contentResponse.any_1[0].PollingChannel_optional := mw_contentPollingChannelBase;//FIXME
						
					f_CSE_DMR_BV_002(int15, m_createPollingChannelBase, v_contentResponse);//PollingChannel
				}
					
				testcase TC_CSE_DMR_BV_002_06() runs on CseTester system CseSystem {
					// Local variables
					var template PrimitiveContent v_contentResponse;
					
					v_contentResponse.any_1[0].Subscription_optional := mw_contentSubscription_rc1;

					f_CSE_DMR_BV_002(int23, m_createSubscriptionBase, v_contentResponse);//Subscription
				}
				
				function f_CSE_DMR_BV_002(ResourceType p_resourceType, template RequestPrimitive p_requestPrimitive, template PrimitiveContent p_contentResponse) runs on CseTester {
    				
					// Local variables
					var MsgIn v_response;
					var RequestPrimitive v_request;
					
					var integer v_aeIndex := -1;
					var integer v_resourceIndex := -1;
    										   
					// Test control
    				
					// Test component configuration
					f_cf01Up();
    				
					// Test adapter configuration
    				
					// Preamble
					v_aeIndex := f_cse_preamble_registerAe();//c_CRUDNDi);
					
					v_resourceIndex := f_cse_createResource(p_resourceType, p_requestPrimitive, v_aeIndex); 				
    									
					// Test Body
					v_request := valueof(m_retrieveResource(f_getResourceAddress(v_resourceIndex), f_getOriginator(v_resourceIndex)));
					v_request.resultContent := int1;//Attributes
					mcaPort.send(m_request(v_request));
					tc_ac.start;
					alt {
						[] mcaPort.receive(mw_response(mw_responsePrimitiveOK(p_contentResponse))) -> value v_response {
							tc_ac.stop;
							setverdict(pass, testcasename() & ": No child resources provided with RC set to 1");
						}
						[] mcaPort.receive(mw_response(mw_responsePrimitiveOK)) -> value v_response {
							tc_ac.stop;
							setverdict(fail, testcasename() & ": Child resources provided with RC set to 1");
						}
						[] mcaPort.receive(mw_response(mw_responsePrimitiveKO)) {
							tc_ac.stop;
							setverdict(fail, testcasename() & ": Error while retrieving resource");
						}
						[] tc_ac.timeout {
							setverdict(inconc, testcasename() & ": No answer while retrieving resource");
						}
					}	
    								
					// Postamble
					f_cse_postamble_deleteResources();
					
					// Tear down
					f_cf01Down();
    				
				}//end f_CSE_DMR_BV_002
    				
			} // end g_CSE_DMR_BV_002
			
			
			group g_CSE_DMR_BV_003 {
					
				testcase TC_CSE_DMR_BV_003_01() runs on CseTester system CseSystem {
					// Local variables
					var template PrimitiveContent v_contentResponse;
					
					v_contentResponse.any_1[0].Container_optional := mw_contentContainer_rc4;
					                        
					f_CSE_DMR_BV_003(int3, m_createContainerBase, v_contentResponse);//Container
				}

				testcase TC_CSE_DMR_BV_003_02() runs on CseTester system CseSystem {
					// Local variables
					var template PrimitiveContent v_contentResponse;
					
					v_contentResponse.any_1[0].Group_optional := mw_contentGroup_rc4;
					
					f_CSE_DMR_BV_003(int9, m_createGroupBase, v_contentResponse);//Group
				}
					
				testcase TC_CSE_DMR_BV_003_03() runs on CseTester system CseSystem {
					// Local variables
					var template PrimitiveContent v_contentResponse;
					
					v_contentResponse.any_1[0].AccessControlPolicy_optional := mw_contentAcp_rc4;
						
					f_CSE_DMR_BV_003(int1, m_createAcpBase,v_contentResponse);//AccessControlPolicy
				}
				
				testcase TC_CSE_DMR_BV_003_04() runs on CseTester system CseSystem {
					// Local variables
					var template PrimitiveContent v_contentResponse;
					
					v_contentResponse.any_1[0].Schedule_optional := mw_contentSchedule_rc4;
						
					f_CSE_DMR_BV_003(int18, m_createScheduleBase, v_contentResponse);//Schedule
				}
					
				testcase TC_CSE_DMR_BV_003_05() runs on CseTester system CseSystem {
					// Local variables
					var template PrimitiveContent v_contentResponse;
					
					v_contentResponse.any_1[0].PollingChannel_optional := mw_contentPollingChannelBase;//FIXME
						
					f_CSE_DMR_BV_003(int15, m_createPollingChannelBase, v_contentResponse);//PollingChannel
				}
					
				testcase TC_CSE_DMR_BV_003_06() runs on CseTester system CseSystem {
					// Local variables
					var template PrimitiveContent v_contentResponse;
					
					v_contentResponse.any_1[0].Subscription_optional := mw_contentSubscription_rc4;

					f_CSE_DMR_BV_003(int23, m_createSubscriptionBase, v_contentResponse);//Subscription
				}
				
				function f_CSE_DMR_BV_003(ResourceType p_resourceType, template RequestPrimitive p_requestPrimitive, template PrimitiveContent p_contentResponse) runs on CseTester {
    				
					// Local variables
					var MsgIn v_response;
					var RequestPrimitive v_request;
					
					var integer v_aeIndex := -1;
					var integer v_resourceIndex := -1;
    										   
					// Test control
    				
					// Test component configuration
					f_cf01Up();
    				
					// Test adapter configuration
    				
					// Preamble
					v_aeIndex := f_cse_preamble_registerAe();//c_CRUDNDi);
					
					v_resourceIndex := f_cse_createResource(p_resourceType, p_requestPrimitive, v_aeIndex); 				
    									
					// Test Body
					v_request := valueof(m_retrieveResource(f_getResourceAddress(v_resourceIndex), f_getOriginator(v_resourceIndex)));
					v_request.resultContent := int1;//Attributes
					mcaPort.send(m_request(v_request));
					tc_ac.start;
					alt {
						[] mcaPort.receive(mw_response(mw_responsePrimitiveOK(p_contentResponse))) -> value v_response {
							tc_ac.stop;
							setverdict(pass, testcasename() & ": No child resources provided with RC set to 1");
						}
						[] mcaPort.receive(mw_response(mw_responsePrimitiveOK)) -> value v_response {
							tc_ac.stop;
							setverdict(fail, testcasename() & ": Child resources provided with RC set to 1");
						}
						[] mcaPort.receive(mw_response(mw_responsePrimitiveKO)) {
							tc_ac.stop;
							setverdict(fail, testcasename() & ": Error while retrieving resource");
						}
						[] tc_ac.timeout {
							setverdict(inconc, testcasename() & ": No answer while retrieving resource");
						}
					}	
    								
					// Postamble
					f_cse_postamble_deleteResources();
					
					// Tear down
					f_cf01Down();
    				
				}//end f_CSE_DMR_BV_003
    				
			} // end g_CSE_DMR_BV_003
			
			group g_CSE_DMR_BV_004 {
					
				testcase TC_CSE_DMR_BV_004_01() runs on CseTester system CseSystem {
					// Local variables
					var template PrimitiveContent v_contentResponse;
					
					v_contentResponse.any_1[0].Container_optional := mw_contentContainer_rc5;
					                        
					f_CSE_DMR_BV_004(int3, m_createContainerBase, v_contentResponse);//Container
				}

				testcase TC_CSE_DMR_BV_004_02() runs on CseTester system CseSystem {
					// Local variables
					var template PrimitiveContent v_contentResponse;
					
					v_contentResponse.any_1[0].Group_optional := mw_contentGroup_rc5;
					
					f_CSE_DMR_BV_004(int9, m_createGroupBase, v_contentResponse);//Group
				}
					
				testcase TC_CSE_DMR_BV_004_03() runs on CseTester system CseSystem {
					// Local variables
					var template PrimitiveContent v_contentResponse;
					
					v_contentResponse.any_1[0].AccessControlPolicy_optional := mw_contentAcp_rc5;
						
					f_CSE_DMR_BV_004(int1, m_createAcpBase,v_contentResponse);//AccessControlPolicy
				}
				
				testcase TC_CSE_DMR_BV_004_04() runs on CseTester system CseSystem {
					// Local variables
					var template PrimitiveContent v_contentResponse;
					
					v_contentResponse.any_1[0].Schedule_optional := mw_contentSchedule_rc5;
						
					f_CSE_DMR_BV_004(int18, m_createScheduleBase, v_contentResponse);//Schedule
				}
					
				testcase TC_CSE_DMR_BV_004_05() runs on CseTester system CseSystem {
					// Local variables
					var template PrimitiveContent v_contentResponse;
					
					v_contentResponse.any_1[0].PollingChannel_optional := mw_contentPollingChannelBase;//FIXME
						
					f_CSE_DMR_BV_004(int15, m_createPollingChannelBase, v_contentResponse);//PollingChannel
				}
					
				testcase TC_CSE_DMR_BV_004_06() runs on CseTester system CseSystem {
					// Local variables
					var template PrimitiveContent v_contentResponse;
					
					v_contentResponse.any_1[0].Subscription_optional := mw_contentSubscription_rc5;

					f_CSE_DMR_BV_004(int23, m_createSubscriptionBase, v_contentResponse);//Subscription
				}
				
				function f_CSE_DMR_BV_004(ResourceType p_resourceType, template RequestPrimitive p_requestPrimitive, template PrimitiveContent p_contentResponse) runs on CseTester {
    				
					// Local variables
					var MsgIn v_response;
					var RequestPrimitive v_request;
					
					var integer v_aeIndex := -1;
					var integer v_resourceIndex := -1;
     										   
					// Test control
    				
					// Test component configuration
					f_cf01Up();
    				
					// Test adapter configuration
    				
					// Preamble
					v_aeIndex := f_cse_preamble_registerAe();//c_CRUDNDi);
					
					v_resourceIndex := f_cse_createResource(p_resourceType, p_requestPrimitive, v_aeIndex); 				
    									
					// Test Body
					v_request := valueof(m_retrieveResource(f_getResourceAddress(v_resourceIndex), f_getOriginator(v_resourceIndex)));
					v_request.resultContent := int1;//Attributes
					mcaPort.send(m_request(v_request));
					tc_ac.start;
					alt {
						[] mcaPort.receive(mw_response(mw_responsePrimitiveOK(p_contentResponse))) -> value v_response {
							tc_ac.stop;
							setverdict(pass, testcasename() & ": No child resources provided with RC set to 1");
						}
						[] mcaPort.receive(mw_response(mw_responsePrimitiveOK)) -> value v_response {
							tc_ac.stop;
							setverdict(fail, testcasename() & ": Child resources provided with RC set to 1");
						}
						[] mcaPort.receive(mw_response(mw_responsePrimitiveKO)) {
							tc_ac.stop;
							setverdict(fail, testcasename() & ": Error while retrieving resource");
						}
						[] tc_ac.timeout {
							setverdict(inconc, testcasename() & ": No answer while retrieving resource");
						}
					}	
    								
					// Postamble
					f_cse_postamble_deleteResources();
					
					// Tear down
					f_cf01Down();
    				
				}//end f_CSE_DMR_BV_004
    				
			} // end g_CSE_DMR_BV_004
			
			group g_CSE_DMR_BV_005 {
					
				testcase TC_CSE_DMR_BV_005_01() runs on CseTester system CseSystem {
					// Local variables
					var template PrimitiveContent v_contentResponse;
					
					v_contentResponse.any_1[0].Container_optional := mw_contentContainer_rc6;
					                        
					f_CSE_DMR_BV_005(int3, m_createContainerBase, v_contentResponse);//Container
				}

				testcase TC_CSE_DMR_BV_005_02() runs on CseTester system CseSystem {
					// Local variables
					var template PrimitiveContent v_contentResponse;
					
					v_contentResponse.any_1[0].Group_optional := mw_contentGroup_rc6;
					
					f_CSE_DMR_BV_005(int9, m_createGroupBase, v_contentResponse);//Group
				}
					
				testcase TC_CSE_DMR_BV_005_03() runs on CseTester system CseSystem {
					// Local variables
					var template PrimitiveContent v_contentResponse;
					
					v_contentResponse.any_1[0].AccessControlPolicy_optional := mw_contentAcp_rc6;
						
					f_CSE_DMR_BV_005(int1, m_createAcpBase,v_contentResponse);//AccessControlPolicy
				}
				
				testcase TC_CSE_DMR_BV_005_04() runs on CseTester system CseSystem {
					// Local variables
					var template PrimitiveContent v_contentResponse;
					
					v_contentResponse.any_1[0].Schedule_optional := mw_contentSchedule_rc6;
						
					f_CSE_DMR_BV_005(int18, m_createScheduleBase, v_contentResponse);//Schedule
				}
					
				testcase TC_CSE_DMR_BV_005_05() runs on CseTester system CseSystem {
					// Local variables
					var template PrimitiveContent v_contentResponse;
					
					v_contentResponse.any_1[0].PollingChannel_optional := mw_contentPollingChannelBase;//FIXME
						
					f_CSE_DMR_BV_005(int15, m_createPollingChannelBase, v_contentResponse);//PollingChannel
				}
					
				testcase TC_CSE_DMR_BV_005_06() runs on CseTester system CseSystem {
					// Local variables
					var template PrimitiveContent v_contentResponse;
					
					v_contentResponse.any_1[0].Subscription_optional := mw_contentSubscription_rc6;

					f_CSE_DMR_BV_005(int23, m_createSubscriptionBase, v_contentResponse);//Subscription
				}
				
				function f_CSE_DMR_BV_005(ResourceType p_resourceType, template RequestPrimitive p_requestPrimitive, template PrimitiveContent p_contentResponse) runs on CseTester {
    				
					// Local variables
					var MsgIn v_response;
					var RequestPrimitive v_request;
					
					var integer v_aeIndex := -1;
					var integer v_resourceIndex := -1;
    										   
					// Test control
    				
					// Test component configuration
					f_cf01Up();
    				
					// Test adapter configuration
    				
					// Preamble
					v_aeIndex := f_cse_preamble_registerAe();//c_CRUDNDi);
					
					v_resourceIndex := f_cse_createResource(p_resourceType, p_requestPrimitive, v_aeIndex); 				
    									
					// Test Body
					v_request := valueof(m_retrieveResource(f_getResourceAddress(v_resourceIndex), f_getOriginator(v_resourceIndex)));
					v_request.resultContent := int1;//Attributes
					mcaPort.send(m_request(v_request));
					tc_ac.start;
					alt {
						[] mcaPort.receive(mw_response(mw_responsePrimitiveOK(p_contentResponse))) -> value v_response {
							tc_ac.stop;
							setverdict(pass, testcasename() & ": No child resources provided with RC set to 1");
						}
						[] mcaPort.receive(mw_response(mw_responsePrimitiveOK)) -> value v_response {