FUNCTION get_specific_requirement_type_for_primary_rvd_relationship
(input : requirement_view_definition, id : STRING, reqtype : STRING) : SET [0:?] OF predefined_requirement_view_definition_armx;
LOCAL rvdr : SET[0:?] OF Requirement_view_definition_relationship := []; rdp : SET[0:?] OF Predefined_requirement_view_definition_armx := []; --this gives us access TO the information base END_LOCAL; rvdr := bag_to_set(QUERY(rvdre <* USEDIN (input, 'REQUIREMENT_DECOMPOSITION_XIM.'+ 'REQUIREMENT_VIEW_DEFINITION_RELATIONSHIP.PRIMARY')| ((rvdre.relation_type = id) AND (reqType IN TYPEOF(rvdre.secondary))) )); -- iterate over rvdr REPEAT i := 1 TO SIZEOF(rvdr) BY 1; rdp := rdp + rvdr[i].secondary; END_REPEAT;
RETURN(rdp); END_FUNCTION; -- get_specific_requirement_type_for_primary_rvd_relationship
|