TomBuzin/HDCApi
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Po hlavnich upravach sdileni sponeni a uvolnovani connection poolu

Browse Source
This commit is contained in:
TomBuz
2026-04-13 12:20:09 +02:00
parent a62b608cfd
commit 1258a27a4e
16 changed files with 2006 additions and 1324 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
uCtrlObehZbozi.pas
View File

@ -246,7 +246,7 @@ uses
try
Render(ObjectDict().Add('data', GetStavSkladuService.GetByParams(params))); // viz uSvc_ObehZbozi.pas
Render(ObjectDict().Add('data', GetStavSkladuService.GetByParams(params, FDM.sqlConn))); // viz uSvc_ObehZbozi.pas
except
{$IFDEF NORENDER400}
RenderStatusMessage (200);
@ -343,7 +343,7 @@ uses
try
Render(ObjectDict().Add('data', GetDokladOZService.GetByParams (params))); // viz uSvc_ObehZbozi.pas
Render(ObjectDict().Add('data', GetDokladOZService.GetByParams (params, FDM.sqlConn))); // viz uSvc_ObehZbozi.pas
except
{$IFDEF NORENDER400}
RenderStatusMessage (200);
@ -410,7 +410,7 @@ uses
begin
params.Add('id', iId.ToString);
try
Render(ObjectDict().Add('data', GetDokladOZService.GetByParams (params))); // viz uSvc_ObehZbozi.pas
Render(ObjectDict().Add('data', GetDokladOZService.GetByParams (params, FDM.sqlConn))); // viz uSvc_ObehZbozi.pas
except
{$IFDEF NORENDER400}
RenderStatusMessage (200);
@ -550,7 +550,7 @@ uses
params.Add('iddoklad', iIdDoklad.ToString);
try
Render(ObjectDict().Add('data', GetPolozkaOZService.GetByParams(params))); // viz uSvc_ObehZbozi.pas
Render(ObjectDict().Add('data', GetPolozkaOZService.GetByParams(params, FDM.sqlConn))); // viz uSvc_ObehZbozi.pas
except
{$IFDEF NORENDER400}
RenderStatusMessage (200);