correct compiling errors generated by Eclipse Titan v6.1.0

LibOneM2M/OneM2M_Functions.ttcn

@@ -868,30 +868,34 @@ module OneM2M_Functions {
var integer v_resourceIndex;
// AE TODO To review the code (use of indexes, generation of value for certain attributes, etc..)
-				if(p_resourceType == int2 and ischosen(p_resource.any_1[0].AE_optional)) {
-					var AE_optional v_ae := p_resource.any_1[0].AE_optional;
-					var AE_optional v_aeModified;					
-					
-					v_resourceIndex := lengthof(vc_resourcesList) - 1;
-					v_ae.resourceType := p_resourceType;
-					
-					v_ae.parentID := int2str(p_parentIndex);
-					v_ae.creationTime := fx_generateTimestamp();
-					v_ae.lastModifiedTime := v_ae.creationTime;											
-					v_ae.resourceID := "ae" & int2char(v_resourceIndex);
-					v_ae.aE_ID := "ae" & int2char(v_resourceIndex);
-					v_ae.resourceName := "ae" & int2char(v_resourceIndex);
-
-					v_aeModified.parentID := v_ae.parentID;
-					v_aeModified.creationTime := v_ae.creationTime;
-					v_aeModified.lastModifiedTime := v_ae.lastModifiedTime;											
-					v_aeModified.resourceID := v_ae.resourceID;
-					v_aeModified.aE_ID := v_ae.aE_ID;
-					v_aeModified.resourceName := v_ae.resourceName;
-					
-					p_resource.any_1[0].AE_optional := v_ae;
-					p_modifiedResource.AE_optional := v_aeModified;
-					return f_setResource(p_resource, p_parentIndex);					
+				if(p_resourceType == int2 and ispresent(p_resource)) {
+				  	if(ischosen(p_resource.any_1[0].AE_optional)){
+				      	var AE_optional v_ae := p_resource.any_1[0].AE_optional;
+      					var AE_optional v_aeModified;					
+      					
+      					v_resourceIndex := lengthof(vc_resourcesList) - 1;
+      					v_ae.resourceType := p_resourceType;
+      					
+      					v_ae.parentID := int2str(p_parentIndex);
+      					v_ae.creationTime := fx_generateTimestamp();
+      					v_ae.lastModifiedTime := v_ae.creationTime;											
+      					v_ae.resourceID := "ae" & int2char(v_resourceIndex);
+      					v_ae.aE_ID := "ae" & int2char(v_resourceIndex);
+      					v_ae.resourceName := "ae" & int2char(v_resourceIndex);
+      
+      					v_aeModified.parentID := v_ae.parentID;
+      					v_aeModified.creationTime := v_ae.creationTime;
+      					v_aeModified.lastModifiedTime := v_ae.lastModifiedTime;											
+      					v_aeModified.resourceID := v_ae.resourceID;
+      					v_aeModified.aE_ID := v_ae.aE_ID;
+      					v_aeModified.resourceName := v_ae.resourceName;
+      					
+      					p_resource.any_1[0].AE_optional := v_ae;
+      					p_modifiedResource.AE_optional := v_aeModified;
+      					return f_setResource(p_resource, p_parentIndex);			   
+				    
+				    }
+										
}
// TODO: implement other resource types