FUNCTION get_id_value
(* SCHEMA ship_moulded_form_schema; *)
FUNCTION get_id_value(
obj: id_attribute_select
): identifier;
LOCAL
id_bag : BAG OF id_attribute := USEDIN(obj,
'SHIP_MOULDED_FORM_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:16:47-04:00