(* SCHEMA step_merged_ap_schema; *)
-- IN AP203e2/AP242 RULE ply_reference FOR (ply_laminate_sequence_definition, next_assembly_usage_occurrence, product_related_product_category ); LOCAL i : INTEGER; j : INTEGER; k : INTEGER; dkuhr : LOGICAL := TRUE; nnauo : INTEGER; nprpc : INTEGER := 0; rp : product; END_LOCAL; REPEAT i := LOINDEX(ply_laminate_sequence_definition) TO HIINDEX(ply_laminate_sequence_definition); nnauo := 0; REPEAT j := LOINDEX(next_assembly_usage_occurrence) TO HIINDEX(next_assembly_usage_occurrence); IF ply_laminate_sequence_definition[i] = next_assembly_usage_occurrence[j].relating_product_definition THEN rp := next_assembly_usage_occurrence[j].related_product_definition.formation.of_product; nprpc := 0; REPEAT k := LOINDEX(product_related_product_category) TO HIINDEX(product_related_product_category); IF (product_related_product_category[k].name = 'ply') AND (rp IN product_related_product_category[k].products) THEN nprpc := nprpc + 1; END_IF; END_REPEAT; IF nprpc = 1 THEN nnauo := nnauo + 1; ELSE dkuhr := FALSE; ESCAPE; END_IF; END_IF; END_REPEAT; IF dkuhr = FALSE THEN ESCAPE; END_IF; IF nnauo = 0 THEN dkuhr := FALSE; ESCAPE; END_IF; END_REPEAT; WHERE WR1: dkuhr; END_RULE;
Generated by STEP Tools® EXPRESS to HTML Converter
2024-09-06T14:00:33-04:00