procedure SetDateTimeParam

procedure setDateTimeParam(key: string; value: TDateTime);