RULE unique_land_physical_template FOR (land_physical_template_armx); LOCAL esi : BAG OF External_source_identification := []; iid : BAG OF STRING := []; itype : BAG OF STRING := []; END_LOCAL; REPEAT i := 1 TO SIZEOF(Land_physical_template_armx) BY 1; esi := esi + Land_physical_template_armx[i].pre_defined_classification_code[1]; iid := iid + Land_physical_template_armx[i].pre_defined_classification_code[1]\External_source_identification.source_id; itype := itype + Land_physical_template_armx[i].pre_defined_classification_code[1]\External_source_identification.source_type; END_REPEAT; WHERE wr1: (SIZEOF(esi) = SIZEOF(bag_to_set(esi))) AND (SIZEOF(iid) = SIZEOF(bag_to_set(iid))) AND (1 = SIZEOF(bag_to_set(itype))); END_RULE; -- unique_land_physical_template |
public class RUnique_land_physical_template public int rWr1(SdaiContext _context) public int run(SdaiContext _context, A_string violations) |