I cannot see an issue when descending from the correct TWebDataModule instead of TDataModule:
type
TDataModule1 = class(TWebDataModule)
private
{ Private declarations }
public
{ Public declarations }
procedure setBearerHeaderr(requestRef: TWebClientConnection);
function GetCookiee(cookie_name: string): string;
end;