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     ETSI
 *  @version    $URL: https://forge.etsi.org/svn/oneM2M/trunk/ttcn/OneM2M_Testcases.ttcn $
 *              $Id: OneM2M_Testcases.ttcn 118 2016-09-16 13:02:32Z 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_Functions all;
	import from LibCommon_Time {modulepar 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; 
				map(self:mcaPort, system:mcaPort); 
					
				for (i:=0; i<lengthof(PX_RESOURCES_TO_BE_DELETED); i:= i+1) {  
					mcaPort.send(m_request(m_delete(PX_URI_CSE & "/" & PX_CSE_NAME & "/" & PX_RESOURCES_TO_BE_DELETED[i])));
					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 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();
                
				//Preambule
				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(omit, omit, "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();
					
			}
	  	  	
		}//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);//Container
				}

				testcase TC_CSE_DMR_BV_001_02() runs on CseTester system CseSystem {
					// Local variables
						
					f_CSE_DMR_BV_001(int9, m_createGroupBase);//Group
				}
					
				testcase TC_CSE_DMR_BV_001_03() runs on CseTester system CseSystem {
					// Local variables
	
					f_CSE_DMR_BV_001(int1, m_createAcpBase);//AccessControlPolicy
				}
				
				testcase TC_CSE_DMR_BV_001_04() runs on CseTester system CseSystem {
					// Local variables
	
					f_CSE_DMR_BV_001(int18, m_createScheduleBase);//Schedule
				}
					
				testcase TC_CSE_DMR_BV_001_05() runs on CseTester system CseSystem {
					// Local variables
	
					f_CSE_DMR_BV_001(int15, m_createPollingChannelBase);//PollingChannel
				}
					
				testcase TC_CSE_DMR_BV_001_06() runs on CseTester system CseSystem {
						// Local variables
	
					f_CSE_DMR_BV_001(int23, m_createSubscriptionBase);//Subscription
					}
				
				function f_CSE_DMR_BV_001(ResourceType p_resourceType, template RequestPrimitive p_requestPrimitive) 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)));
					v_request.resultContent := int0;//Nothing
					mcaPort.send(m_request(v_request));
					tc_ac.start;
					alt {
						[] mcaPort.receive(mw_response(mw_responsePrimitiveOK)) -> value v_response {
							tc_ac.stop;
							if(ispresent(v_response.primitive.responsePrimitive.primitiveContent)){
								setverdict(fail, testcasename() & ": Providing content when RC set to 0");
							} else {
								setverdict(pass, testcasename() & ": No content provided with RC set to 0");
							}
						}
						[] 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_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)));
					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].AnyURI := mw_contentContainer_rc2;
					                        
					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].AnyURI := mw_contentGroup_rc2;
					
					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].AnyURI := mw_contentAcp_rc2;
						
					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].AnyURI := mw_contentSchedule_rc2;
						
					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].AnyURI := mw_contentSubscription_rc2;

					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)));
					v_request.resultContent := int2;//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() & ": Only hierarchical address provided with RC set to 2");
						}
						[] mcaPort.receive(mw_response(mw_responsePrimitiveOK)) -> value v_response {
							tc_ac.stop;
							setverdict(fail, testcasename() & ": Not only hierarchical address provided with RC set to 2");
						}
						[] 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_rc3;
					                        
					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_rc3;
					
					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_rc3;
						
					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_rc3;
						
					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_rc3;

					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)));
					v_request.resultContent := int3;//Hierarchical address and 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_rc4;
					                        
					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_rc4;
					
					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_rc4;
						
					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_rc4;
						
					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_rc4;

					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)));
					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_005
    				
			} // end g_CSE_DMR_BV_005
			
			group g_CSE_DMR_BV_006 {
					
				testcase TC_CSE_DMR_BV_006_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_006(int3, m_createContainerBase, v_contentResponse);//Container
				}

				testcase TC_CSE_DMR_BV_006_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_006(int9, m_createGroupBase, v_contentResponse);//Group
				}
					
				testcase TC_CSE_DMR_BV_006_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_006(int1, m_createAcpBase,v_contentResponse);//AccessControlPolicy
				}
				
				testcase TC_CSE_DMR_BV_006_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_006(int18, m_createScheduleBase, v_contentResponse);//Schedule
				}
					
				testcase TC_CSE_DMR_BV_006_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_006(int15, m_createPollingChannelBase, v_contentResponse);//PollingChannel
				}
					
				testcase TC_CSE_DMR_BV_006_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_006(int23, m_createSubscriptionBase, v_contentResponse);//Subscription
				}
				
				function f_CSE_DMR_BV_006(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)));
					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_006
    				
			} // end g_CSE_DMR_BV_006
			
			group g_CSE_DMR_BV_007 {
					
				testcase TC_CSE_DMR_BV_007_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_007(int3, m_createContainerBase, v_contentResponse);//Container
				}

				testcase TC_CSE_DMR_BV_007_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_007(int9, m_createGroupBase, v_contentResponse);//Group
				}
					
				testcase TC_CSE_DMR_BV_007_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_007(int1, m_createAcpBase,v_contentResponse);//AccessControlPolicy
				}
				
				testcase TC_CSE_DMR_BV_007_04() runs on CseTester system CseSystem {
					// Local variables
					var template PrimitiveContent v_contentResponse;