|
FUNCTION get_role (obj : role_select) : object_role; LOCAL role_bag : BAG OF role_association := ( USEDIN ( obj , 'basic_attribute_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 |
|
public class FGet_role public static Value run(SdaiContext _context, Value obj) |