Index: AAPClient/WS/DnaCodeService.pas
===================================================================
diff -u -r321 -r332
--- AAPClient/WS/DnaCodeService.pas	(.../DnaCodeService.pas)	(revision 321)
+++ AAPClient/WS/DnaCodeService.pas	(.../DnaCodeService.pas)	(revision 332)
@@ -5,7 +5,7 @@
 //  >Import : http://tve-w10:57772/csp/dev1/WS.Halux.AAP.DnaCodeService.CLS?WSDL=1>0
 // Encoding : UTF-8
 // Version  : 1.0
-// (23/03/2020 12:12:38 - - $Rev: 45757 $)
+// (3/04/2020 10:30:14 - - $Rev: 45757 $)
 // ************************************************************************ //
 
 unit DnaCodeService;
@@ -52,12 +52,12 @@
   RequestHeader        = class;                 { "http://www.vanhoecke.be/Halux/AAP/DnaCode"[GblCplx] }
   ResponseHeader       = class;                 { "http://www.vanhoecke.be/Halux/AAP/DnaCode"[GblCplx] }
   GeefVolgendeTbpCodeResponse = class;          { "http://www.vanhoecke.be/Halux/AAP/DnaCode"[GblCplx] }
-  RondKaderdeurDagAfRequest = class;            { "http://www.vanhoecke.be/Halux/AAP/DnaCode"[GblCplx] }
+  RondAfKaderdeurDagRequest = class;            { "http://www.vanhoecke.be/Halux/AAP/DnaCode"[GblCplx] }
   ProboxEtiketAfdrukkenResponse = class;        { "http://www.vanhoecke.be/Halux/AAP/DnaCode"[GblCplx] }
   ToeleveringMetAantallen = class;              { "http://www.vanhoecke.be/Halux/AAP/DnaCode"[GblCplx] }
   ToeleveringBijwerkenResponse = class;         { "http://www.vanhoecke.be/Halux/AAP/DnaCode"[GblCplx] }
   ToeleveringBijwerkenRequest = class;          { "http://www.vanhoecke.be/Halux/AAP/DnaCode"[GblCplx] }
-  RondKaderdeurDagAfResponse = class;           { "http://www.vanhoecke.be/Halux/AAP/DnaCode"[GblCplx] }
+  RondAfKaderdeurDagResponse = class;           { "http://www.vanhoecke.be/Halux/AAP/DnaCode"[GblCplx] }
   DirecteLeveringRequest = class;               { "http://www.vanhoecke.be/Halux/AAP/DnaCode"[GblCplx] }
   HernoemPalletResponse = class;                { "http://www.vanhoecke.be/Halux/AAP/DnaCode"[GblCplx] }
   HernoemPalletRequest = class;                 { "http://www.vanhoecke.be/Halux/AAP/DnaCode"[GblCplx] }
@@ -464,10 +464,10 @@
 
 
   // ************************************************************************ //
-  // XML       : RondKaderdeurDagAfRequest, global, <complexType>
+  // XML       : RondAfKaderdeurDagRequest, global, <complexType>
   // Namespace : http://www.vanhoecke.be/Halux/AAP/DnaCode
   // ************************************************************************ //
-  RondKaderdeurDagAfRequest = class(TRemotable)
+  RondAfKaderdeurDagRequest = class(TRemotable)
   private
     FHeader: RequestHeader;
     FDnaCode: String_;
@@ -551,10 +551,10 @@
 
 
   // ************************************************************************ //
-  // XML       : RondKaderdeurDagAfResponse, global, <complexType>
+  // XML       : RondAfKaderdeurDagResponse, global, <complexType>
   // Namespace : http://www.vanhoecke.be/Halux/AAP/DnaCode
   // ************************************************************************ //
-  RondKaderdeurDagAfResponse = class(GeneriekeResponse)
+  RondAfKaderdeurDagResponse = class(GeneriekeResponse)
   private
     FToeleveringMetAantallen: ArrayOfToeleveringMetAantallenToeleveringMetAantallen;
     FToeleveringMetAantallen_Specified: boolean;
@@ -708,7 +708,7 @@
     function  IsDirecteLevering(const DirecteLeveringRequest: DirecteLeveringRequest): DirecteLeveringResponse; stdcall;
     function  PalletBijwerken(const PalletBijwerkenRequest: PalletBijwerkenRequest): PalletBijwerkenResponse; stdcall;
     function  ProboxEtiketAfdrukken(const ProboxEtiketAfdrukkenRequest: ProboxEtiketAfdrukkenRequest): ProboxEtiketAfdrukkenResponse; stdcall;
-    function  RondKaderdeurDagAf(const RondKaderdeurDagAfRequest: RondKaderdeurDagAfRequest): RondKaderdeurDagAfResponse; stdcall;
+    function  RondAfKaderdeurDag(const RondAfKaderdeurDagRequest: RondAfKaderdeurDagRequest): RondAfKaderdeurDagResponse; stdcall;
     function  ToeleveringBijwerken(const ToeleveringBijwerkenRequest: ToeleveringBijwerkenRequest): ToeleveringBijwerkenResponse; stdcall;
     function  ValideerPalletCode(const ValideerPalletCodeRequest: ValideerPalletCodeRequest): ValideerPalletCodeResponse; stdcall;
     function  ZoekViaDnaCode(const ZoekViaDnaCodeRequest: ZoekViaDnaCodeRequest): ZoekViaDnaCodeResponse; stdcall;
@@ -1151,7 +1151,7 @@
   Result := FDnaCodes_Specified;
 end;
 
-destructor RondKaderdeurDagAfRequest.Destroy;
+destructor RondAfKaderdeurDagRequest.Destroy;
 begin
   SysUtils.FreeAndNil(FHeader);
   inherited Destroy;
@@ -1196,7 +1196,7 @@
   inherited Destroy;
 end;
 
-destructor RondKaderdeurDagAfResponse.Destroy;
+destructor RondAfKaderdeurDagResponse.Destroy;
 var
   I: Integer;
 begin
@@ -1206,13 +1206,13 @@
   inherited Destroy;
 end;
 
-procedure RondKaderdeurDagAfResponse.SetToeleveringMetAantallen(Index: Integer; const AArrayOfToeleveringMetAantallenToeleveringMetAantallen: ArrayOfToeleveringMetAantallenToeleveringMetAantallen);
+procedure RondAfKaderdeurDagResponse.SetToeleveringMetAantallen(Index: Integer; const AArrayOfToeleveringMetAantallenToeleveringMetAantallen: ArrayOfToeleveringMetAantallenToeleveringMetAantallen);
 begin
   FToeleveringMetAantallen := AArrayOfToeleveringMetAantallenToeleveringMetAantallen;
   FToeleveringMetAantallen_Specified := True;
 end;
 
-function RondKaderdeurDagAfResponse.ToeleveringMetAantallen_Specified(Index: Integer): boolean;
+function RondAfKaderdeurDagResponse.ToeleveringMetAantallen_Specified(Index: Integer): boolean;
 begin
   Result := FToeleveringMetAantallen_Specified;
 end;
@@ -1296,9 +1296,9 @@
   { DnaCodeServiceSoap.ProboxEtiketAfdrukken }
   InvRegistry.RegisterMethodInfo(TypeInfo(DnaCodeServiceSoap), 'ProboxEtiketAfdrukken', '',
                                  '[ReturnName="ProboxEtiketAfdrukkenResult"]');
-  { DnaCodeServiceSoap.RondKaderdeurDagAf }
-  InvRegistry.RegisterMethodInfo(TypeInfo(DnaCodeServiceSoap), 'RondKaderdeurDagAf', '',
-                                 '[ReturnName="RondKaderdeurDagAfResult"]');
+  { DnaCodeServiceSoap.RondAfKaderdeurDag }
+  InvRegistry.RegisterMethodInfo(TypeInfo(DnaCodeServiceSoap), 'RondAfKaderdeurDag', '',
+                                 '[ReturnName="RondAfKaderdeurDagResult"]');
   { DnaCodeServiceSoap.ToeleveringBijwerken }
   InvRegistry.RegisterMethodInfo(TypeInfo(DnaCodeServiceSoap), 'ToeleveringBijwerken', '',
                                  '[ReturnName="ToeleveringBijwerkenResult"]');
@@ -1337,14 +1337,14 @@
   RemClassRegistry.RegisterXSClass(RequestHeader, 'http://www.vanhoecke.be/Halux/AAP/DnaCode', 'RequestHeader');
   RemClassRegistry.RegisterXSClass(ResponseHeader, 'http://www.vanhoecke.be/Halux/AAP/DnaCode', 'ResponseHeader');
   RemClassRegistry.RegisterXSClass(GeefVolgendeTbpCodeResponse, 'http://www.vanhoecke.be/Halux/AAP/DnaCode', 'GeefVolgendeTbpCodeResponse');
-  RemClassRegistry.RegisterXSClass(RondKaderdeurDagAfRequest, 'http://www.vanhoecke.be/Halux/AAP/DnaCode', 'RondKaderdeurDagAfRequest');
+  RemClassRegistry.RegisterXSClass(RondAfKaderdeurDagRequest, 'http://www.vanhoecke.be/Halux/AAP/DnaCode', 'RondAfKaderdeurDagRequest');
   RemClassRegistry.RegisterXSClass(ProboxEtiketAfdrukkenResponse, 'http://www.vanhoecke.be/Halux/AAP/DnaCode', 'ProboxEtiketAfdrukkenResponse');
   RemClassRegistry.RegisterXSClass(ToeleveringMetAantallen, 'http://www.vanhoecke.be/Halux/AAP/DnaCode', 'ToeleveringMetAantallen');
   RemClassRegistry.RegisterXSClass(ToeleveringBijwerkenResponse, 'http://www.vanhoecke.be/Halux/AAP/DnaCode', 'ToeleveringBijwerkenResponse');
   RemClassRegistry.RegisterXSClass(ToeleveringBijwerkenRequest, 'http://www.vanhoecke.be/Halux/AAP/DnaCode', 'ToeleveringBijwerkenRequest');
   RemClassRegistry.RegisterXSInfo(TypeInfo(ArrayOfToeleveringMetAantallenToeleveringMetAantallen), 'http://www.vanhoecke.be/Halux/AAP/DnaCode', 'ArrayOfToeleveringMetAantallenToeleveringMetAantallen');
-  RemClassRegistry.RegisterXSClass(RondKaderdeurDagAfResponse, 'http://www.vanhoecke.be/Halux/AAP/DnaCode', 'RondKaderdeurDagAfResponse');
-  RemClassRegistry.RegisterExternalPropName(TypeInfo(RondKaderdeurDagAfResponse), 'ToeleveringMetAantallen', '[ArrayItemName="ToeleveringMetAantallen"]');
+  RemClassRegistry.RegisterXSClass(RondAfKaderdeurDagResponse, 'http://www.vanhoecke.be/Halux/AAP/DnaCode', 'RondAfKaderdeurDagResponse');
+  RemClassRegistry.RegisterExternalPropName(TypeInfo(RondAfKaderdeurDagResponse), 'ToeleveringMetAantallen', '[ArrayItemName="ToeleveringMetAantallen"]');
   RemClassRegistry.RegisterXSInfo(TypeInfo(ArrayOfStringString), 'http://www.vanhoecke.be/Halux/AAP/DnaCode', 'ArrayOfStringString');
   RemClassRegistry.RegisterXSClass(DirecteLeveringRequest, 'http://www.vanhoecke.be/Halux/AAP/DnaCode', 'DirecteLeveringRequest');
   RemClassRegistry.RegisterXSClass(HernoemPalletResponse, 'http://www.vanhoecke.be/Halux/AAP/DnaCode', 'HernoemPalletResponse');