FUNCTION get_id_value
(* SCHEMA ship_structures_schema; *)
FUNCTION get_id_value(
obj: id_attribute_select
): identifier;
LOCAL
id_bag : BAG OF id_attribute := USEDIN(obj,'SHIP_STRUCTURES_SCHEMA.'
+ 'ID_ATTRIBUTE.' + 'IDENTIFIED_ITEM');
END_LOCAL;
IF SIZEOF(id_bag) = 1 THEN
RETURN(id_bag[1].attribute_value);
ELSE
RETURN(?);
END_IF;
END_FUNCTION; -- get_id_value
Referenced By
Defintion get_id_value is references by the following definitions:
[Top Level Definitions] [Exit]Generated by STEP Tools® EXPRESS to HTML Converter
2012-03-27T17:17:03-04:00