Index: AAPClient/UI/UiContext.pas
===================================================================
diff -u -r304 -r380
--- AAPClient/UI/UiContext.pas	(.../UiContext.pas)	(revision 304)
+++ AAPClient/UI/UiContext.pas	(.../UiContext.pas)	(revision 380)
@@ -33,6 +33,7 @@
     fIsWegwerpPalletPopupGetoond: boolean;
     fServerName: string;
     fModus: integer;
+    fInternVhossId: string;
   public
     Property Initialen: String Read fInitialen Write fInitialen;
     Property LoginCode: String Read fLoginCode Write fLoginCode;
@@ -46,6 +47,7 @@
     Property IsWegwerpPalletPopupGetoond: boolean Read fIsWegwerpPalletPopupGetoond Write fIsWegwerpPalletPopupGetoond;
     Property ServerName: string Read fServerName Write fServerName;
     Property Modus: integer Read fModus Write fModus;
+    Property InternVhossId: string read fInternVhossId Write fInternVhossId;
   end;
 
 implementation