FUNCTION using_items
(* SCHEMA feature_based_process_planning; *)
FUNCTION using_items(
item: founded_item_select;
checked_items: SET OF founded_item_select
): SET OF founded_item_select;
LOCAL
next_items : SET OF founded_item_select;
new_check_items : SET OF founded_item_select;
result_items : SET OF founded_item_select;
END_LOCAL;
result_items := [];
new_check_items := checked_items + item;
next_items := QUERY ( z <* bag_to_set(USEDIN(item,'')) | ((
'FEATURE_BASED_PROCESS_PLANNING.REPRESENTATION_ITEM' IN TYPEOF(z))
OR ('FEATURE_BASED_PROCESS_PLANNING.FOUNDED_ITEM' IN TYPEOF(z))) );
IF SIZEOF(next_items) > 0 THEN
REPEAT i := 1 TO HIINDEX(next_items) BY 1;
IF NOT (next_items[i] IN new_check_items) THEN
result_items := (result_items + next_items[i]) + using_items(
next_items[i],new_check_items);
END_IF;
END_REPEAT;
END_IF;
RETURN(result_items);
END_FUNCTION; -- using_items
Referenced By
Defintion using_items is references by the following definitions:
[Top Level Definitions] [Exit]Generated by STEP Tools® EXPRESS to HTML Converter
2012-03-27T17:18:01-04:00