Index: ProScan/WS/Agent.pas =================================================================== diff -u -r403 -r404 --- ProScan/WS/Agent.pas (.../Agent.pas) (revision 403) +++ ProScan/WS/Agent.pas (.../Agent.pas) (revision 404) @@ -6,13 +6,6 @@ DnaCodeService, GebruikerService, System.SysUtils, Vcl.Forms, UiContext, System.Classes; type -{$M+} - IAgent = interface(IInvokable) - ['{3bedb3a0-3f59-4586-b3a8-80ff61cf8b1c}'] - procedure GeefVolgendeTbpCodeprocedure(); - function GeefVolgendeTbpCode(): GeefVolgendeTbpCodeResponse; - end; - {$M-} TAgent = class private fUiContext: TUiContext; @@ -135,7 +128,6 @@ Request: GeefVolgendeTbpCodeRequest; Header: DnaCodeService.RequestHeader; begin - Result := GeefVolgendeTbpCodeResponse.Create; Request := GeefVolgendeTbpCodeRequest.Create; Header := DnaCodeService.RequestHeader.Create; try