FUNCTION get_role

(* SCHEMA dimensional_inspection_schema; *)

  FUNCTION get_role(
               obj: role_select
      ): object_role;

    LOCAL
      role_bag : BAG OF role_association := USEDIN(obj,(
                  'DIMENSIONAL_INSPECTION_SCHEMA.' + 'ROLE_ASSOCIATION.') +
                   'ITEM_WITH_ROLE');
    END_LOCAL;
    IF SIZEOF(role_bag) = 1 THEN
      RETURN(role_bag[1].role);
    ELSE
      RETURN(?);
    END_IF;

  END_FUNCTION; -- get_role

Referenced By

Defintion get_role is references by the following definitions:

Definition	Type
action_assignment	ENTITY
document_reference	ENTITY
effectivity_assignment	ENTITY
group_assignment	ENTITY
security_classification_assignment	ENTITY

[Top Level Definitions] [Exit]

Generated by STEP Tools® EXPRESS to HTML Converter
2012-03-27T17:17:17-04:00