Update uRESTDWDatamodule.pas

- Correção de serialização de PATCH parâmetro
OpenSourceCommunityBrasil · Mar 29, 2024 · f1fcbd8 · f1fcbd8
1 parent 8a8bee8
commit f1fcbd8
Showing 1 changed file with 5 additions and 6 deletions.
diff --git a/CORE/Source/Plugins/DMDados/uRESTDWDatamodule.pas b/CORE/Source/Plugins/DMDados/uRESTDWDatamodule.pas
@@ -1,4 +1,4 @@
-unit uRESTDWDatamodule;
+unit uRESTDWDatamodule;
 
 {$I ..\..\Includes\uRESTDW.inc}
 
@@ -134,18 +134,17 @@ implementation
  Try
  ctempURI := ParamsURI;
  pAux1 := Pos('?', ctempURI);
+ vIsQuery := pAux1 > 0;
  // params com /
  If vIsQuery Then
  Begin
+ sAux2 := Copy(ctempURI, pAux1 + 1, Length(ctempURI));
+ Delete(ctempURI, pAux1, Length(ctempURI));
+
  If Pos('/', ctempURI) > 0 Then
  Begin
  sAux2 := Copy(ctempURI, pAux1 + 1, Pos('/', ctempURI) -2);
  Delete(ctempURI, pAux1, Pos('/', ctempURI));
- End
- Else
- Begin
- sAux2 := Copy(ctempURI, pAux1 + 1, Length(ctempURI));
- Delete(ctempURI, pAux1, Length(ctempURI));
  End;
  End
  Else