Source position: sqldbrestschema.pp line 191
type TSQLDBRestAllowRecordEvent = procedure(
aSender: TObject;
aContext: TBaseRestContext;
aDataSet: TDataset;
var allowRecord: Boolean
) of object;