|
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) |