Merge pull request #330 from GuilhermeDischer/dev

Retornar StatusCode 200 em Requisições Options no GetToken
OpenSourceCommunityBrasil · Apr 24, 2023 · c2d9e5b · c2d9e5b
2 parents 931d860 + 1874dce
commit c2d9e5b
Showing 1 changed file with 7 additions and 0 deletions.
diff --git a/CORE/Source/Basic/uRESTDWBasic.pas b/CORE/Source/Basic/uRESTDWBasic.pas
@@ -2913,6 +2913,13 @@ procedure TRESTClientPoolerBase.SetIpVersion(IpV: TRESTDWClientIpVersions);
  TServerMethodDatamodule(vTempServerMethods).OnGetToken(vWelcomeMessage, vAccessTag, DWParams,
  TRESTDWAuthToken(vAuthTokenParam),
  vErrorCode, vErrorMessage, vToken, vAcceptAuth);
+
+ If (CORS) And (RequestType = rtOption) Then
+ Begin
+ vErrorCode := 200;
+ vErrorMessage := '';
+ End;
+
  If Not vAcceptAuth Then
  Begin
  WriteError;