RULE representation_with_versionable_object_matches_pattern

(* SCHEMA ship_structures_schema; *)
  RULE representation_with_versionable_object_matches_pattern FOR (group, 
             applied_classification_assignment);

    LOCAL
      clfied_inst : SET OF classification_item := [];
    END_LOCAL;
    REPEAT i := 1 TO HIINDEX(applied_classification_assignment) BY 1;
      IF applied_classification_assignment[i].assigned_class.name = 
          'versionable object' THEN
        clfied_inst := clfied_inst + applied_classification_assignment[i].
            items;
      END_IF;
    END_REPEAT;

  WHERE
    wr1: (SIZEOF(QUERY ( i <* clfied_inst | (NOT (i.id LIKE '*.*')) )) = 0);

  END_RULE; -- representation_with_versionable_object_matches_pattern

[Top Level Definitions] [Exit]

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