(* SCHEMA step_merged_ap_schema; *)
-- IN AP203e2 RULE stock_material_reference FOR (percentage_ply_definition, make_from_usage_option, product_related_product_category ); LOCAL i : INTEGER; j : INTEGER; k : INTEGER; dkuhr : LOGICAL; nmfuo : INTEGER; nprpc : INTEGER; rp : product; END_LOCAL; dkuhr := TRUE; REPEAT i := LOINDEX(percentage_ply_definition) TO HIINDEX(percentage_ply_definition); nmfuo := 0; REPEAT j := LOINDEX(make_from_usage_option) TO HIINDEX(make_from_usage_option); IF percentage_ply_definition[i] = make_from_usage_option[j].relating_product_definition THEN rp := make_from_usage_option[j].related_product_definition.formation.of_product; nprpc := 0; REPEAT k := LOINDEX(product_related_product_category) TO HIINDEX(product_related_product_category); IF (rp IN product_related_product_category[k].products) AND (product_related_product_category[k].name IN [ 'anisotropic material', 'isotropic material', 'stock core', 'filament assembly', 'discontinuous fiber assembly' ]) THEN nprpc := nprpc + 1; END_IF; END_REPEAT; IF nprpc = 1 THEN nmfuo := nmfuo + 1; ELSE dkuhr := FALSE; ESCAPE; END_IF; END_IF; END_REPEAT; IF dkuhr = FALSE THEN ESCAPE; END_IF; IF nmfuo = 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