RULE plib_property_reference_requires_version FOR (externally_defined_general_property); LOCAL plib_properties : SET OF externally_defined_general_property := []; END_LOCAL; plib_properties := QUERY ( edgp <* externally_defined_general_property | ( 'EXTERNAL_PROPERTIES_MIM.' + 'KNOWN_SOURCE' IN TYPEOF ( edgp.source ) ) AND ( 'EXTERNAL_PROPERTIES_MIM.' + 'KNOWN_SOURCE' + '.NAME' = 'ISO 13584 library' ) ); WHERE wr1: SIZEOF( QUERY( edgp <* plib_properties | (SIZEOF( QUERY( edir <* USEDIN(edgp, 'EXTERNAL_ITEM_IDENTIFICATION_ASSIGNMENT_MIM.' + 'APPLIED_EXTERNAL_IDENTIFICATION_ASSIGNMENT.ITEMS') | (edir.role.name = 'version') )) <> 1) )) = 0; END_RULE; -- plib_property_reference_requires_version |
public class RPlib_property_reference_requires_version public int rWr1(SdaiContext _context) public int run(SdaiContext _context, A_string violations) |