(* SCHEMA step_merged_ap_schema; *)
-- IN AP242 FUNCTION validate_measured_data_type (ei : shape_data_quality_criterion; type_string : STRING ) : LOGICAL; LOCAL sdqir : SET OF shape_data_quality_inspection_result := []; sdcr : SET OF shape_data_quality_inspection_criterion_report := []; sdir : SET OF shape_data_quality_inspection_instance_report := []; sdii : SET OF shape_data_quality_inspection_instance_report_item := []; sdei : BAG OF instance_report_item_with_extreme_instances := []; END_LOCAL; sdqir := QUERY (q <* bag_to_set(USEDIN(ei, 'STEP_MERGED_AP_SCHEMA.DATA_QUALITY_INSPECTION_RESULT.CRITERION_INSPECTED'))| 'STEP_MERGED_AP_SCHEMA.SHAPE_DATA_QUALITY_INSPECTION_RESULT' IN TYPEOF(q)); IF SIZEOF(sdqir) = 0 THEN RETURN (FALSE); END_IF; REPEAT i := 1 TO SIZEOF(sdqir); sdcr := sdcr + QUERY (q <* bag_to_set(USEDIN(sdqir[i], 'STEP_MERGED_AP_SCHEMA.DATA_QUALITY_INSPECTION_REPORT.INSPECTION_RESULT'))| ('STEP_MERGED_AP_SCHEMA.SHAPE_DATA_QUALITY_INSPECTION_CRITERION_REPORT' IN TYPEOF(q))); END_REPEAT; REPEAT i := 1 TO SIZEOF(sdqir); sdir := sdir + QUERY (q <* bag_to_set(USEDIN(sdqir[i], 'STEP_MERGED_AP_SCHEMA.DATA_QUALITY_INSPECTION_REPORT.INSPECTION_RESULT'))| ('STEP_MERGED_AP_SCHEMA.SHAPE_DATA_QUALITY_INSPECTION_INSTANCE_REPORT' IN TYPEOF(q))); END_REPEAT; IF (SIZEOF(sdcr) = 0) AND (SIZEOF(sdir) = 0) THEN RETURN (FALSE); END_IF; REPEAT i := 1 TO SIZEOF(sdir); sdii := sdii + QUERY (q <* sdir[i].inspected_instances| ('STEP_MERGED_AP_SCHEMA.SHAPE_DATA_QUALITY_INSPECTION_INSTANCE_REPORT_ITEM' IN TYPEOF(q))); END_REPEAT; REPEAT i := 1 TO SIZEOF(sdir); sdei := sdei + QUERY (q <* sdir[i].inspected_instances| ('STEP_MERGED_AP_SCHEMA.INSTANCE_REPORT_ITEM_WITH_EXTREME_INSTANCES' IN TYPEOF(q))); END_REPEAT; REPEAT i := 1 TO SIZEOF(sdcr); IF NOT (type_string IN TYPEOF(sdcr[i].representative_measured_value)) THEN RETURN (FALSE); END_IF; END_REPEAT; REPEAT i := 1 TO SIZEOF(sdii); IF NOT (type_string IN TYPEOF(sdii[i].measured_value)) THEN RETURN (FALSE); END_IF; END_REPEAT; REPEAT i := 1 TO SIZEOF(sdei); REPEAT j := 1 TO SIZEOF(sdei[i].extreme_instances); IF NOT (type_string IN TYPEOF(sdei[i].extreme_instances[j].measured_value)) THEN RETURN (FALSE); END_IF; END_REPEAT; END_REPEAT; RETURN (FALSE); END_FUNCTION;
Generated by STEP Tools® EXPRESS to HTML Converter
2020-07-28T17:02:20-04:00