Index: AAPClient/WS/DnaCodeService.pas
===================================================================
diff -u -r319 -r321
--- AAPClient/WS/DnaCodeService.pas	(.../DnaCodeService.pas)	(revision 319)
+++ AAPClient/WS/DnaCodeService.pas	(.../DnaCodeService.pas)	(revision 321)
@@ -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
-// (20/03/2020 17:13:18 - - $Rev: 45757 $)
+// (23/03/2020 12:12:38 - - $Rev: 45757 $)
 // ************************************************************************ //
 
 unit DnaCodeService;
@@ -470,12 +470,12 @@
   RondKaderdeurDagAfRequest = class(TRemotable)
   private
     FHeader: RequestHeader;
-    FDnaCode: DnaCode;
+    FDnaCode: String_;
   public
     destructor Destroy; override;
   published
     property Header:  RequestHeader  read FHeader write FHeader;
-    property DnaCode: DnaCode        read FDnaCode write FDnaCode;
+    property DnaCode: String_        read FDnaCode write FDnaCode;
   end;
 
 
@@ -1154,7 +1154,6 @@
 destructor RondKaderdeurDagAfRequest.Destroy;
 begin
   SysUtils.FreeAndNil(FHeader);
-  SysUtils.FreeAndNil(FDnaCode);
   inherited Destroy;
 end;