FUNCTION inspected_product_definition
(dqir : data_quality_inspection_result_representation) : BAG [0:?] OF product_definition;
LOCAL dqdr :BAG OF data_quality_definition_representation_relationship:= []; pdqdr :BAG OF product_data_and_data_quality_relationship:= []; pd :BAG OF product_definition:= []; END_LOCAL; dqdr := USEDIN(dqir,'PRODUCT_DATA_QUALITY_DEFINITION_SCHEMA.' +'DATA_QUALITY_DEFINITION_REPRESENTATION_RELATIONSHIP.' +'USED_REPRESENTATION'); REPEAT i:= 1 TO SIZEOF(dqdr); pdqdr := USEDIN(dqdr[i].definition, 'PRODUCT_DATA_QUALITY_DEFINITION_SCHEMA.' +'PRODUCT_DATA_AND_DATA_QUALITY_RELATIONSHIP.' +'DATA_QUALITY'); REPEAT j:= 1 TO SIZEOF(pdqdr); pd := pd + pdqdr[j].product_data; END_REPEAT; END_REPEAT; RETURN(pd); END_FUNCTION; -- inspected_product_definition
|