Source position: googlegan.pp line 550
protected procedure TEvent.SetcommissionableSales(
AIndex: Integer;
AValue: TMoney
); virtual;