Source position: googlecontent.pp line 3642
protected procedure TProduct.SetunitPricingMeasure(
AIndex: Integer;
const AValue: TProductUnitPricingMeasure
); virtual;