Skip to content

Commit f1fcbd8

Browse files
author
ronierys2@hotmail.com
committed
Update uRESTDWDatamodule.pas
- Correção de serialização de PATCH parâmetro
1 parent 8a8bee8 commit f1fcbd8

1 file changed

Lines changed: 5 additions & 6 deletions

File tree

CORE/Source/Plugins/DMDados/uRESTDWDatamodule.pas

Lines changed: 5 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -1,4 +1,4 @@
1-
unit uRESTDWDatamodule;
1+
unit uRESTDWDatamodule;
22

33
{$I ..\..\Includes\uRESTDW.inc}
44

@@ -134,18 +134,17 @@ implementation
134134
Try
135135
ctempURI := ParamsURI;
136136
pAux1 := Pos('?', ctempURI);
137+
vIsQuery := pAux1 > 0;
137138
// params com /
138139
If vIsQuery Then
139140
Begin
141+
sAux2 := Copy(ctempURI, pAux1 + 1, Length(ctempURI));
142+
Delete(ctempURI, pAux1, Length(ctempURI));
143+
140144
If Pos('/', ctempURI) > 0 Then
141145
Begin
142146
sAux2 := Copy(ctempURI, pAux1 + 1, Pos('/', ctempURI) -2);
143147
Delete(ctempURI, pAux1, Pos('/', ctempURI));
144-
End
145-
Else
146-
Begin
147-
sAux2 := Copy(ctempURI, pAux1 + 1, Length(ctempURI));
148-
Delete(ctempURI, pAux1, Length(ctempURI));
149148
End;
150149
End
151150
Else

0 commit comments

Comments
 (0)