Other

SISBusiness.Module/BusinessObjects/GeneralObjects/Customers/CustomersFrom.vb

@@ -31,6 +31,11 @@ Public Class CustomersFrom '-- Ezek azok a cégek akik használják a programot
     Private _RabbitMQServerPassword As String
     Private _RabbitMQBodyEncryptCode As String
 
+    Private _NAV_login As String
+    Private _NAV_xmlSignkey As String
+    Private _NAV_password As String
+    Private _NAV_exchangeKey As String
+
     Public Overrides Sub AfterConstruction()
         MyBase.AfterConstruction()
         IsDefault = False
@@ -116,7 +121,54 @@ Public Class CustomersFrom '-- Ezek azok a cégek akik használják a programot
             SetPropertyValue("RabbitMQBodyEncryptCode", _RabbitMQBodyEncryptCode, value)
         End Set
     End Property
-
+    ''' <summary>
+    ''' NAV felhasználó az Online számlához
+    ''' </summary>
+    ''' <returns></returns>
+    Property NAV_login As String
+        Get
+            Return _NAV_login
+        End Get
+        Set(value As String)
+            SetPropertyValue("NAV_login", _NAV_login, value)
+        End Set
+    End Property
+    ''' <summary>
+    ''' NAV aláírókulcs az Online számlához
+    ''' </summary>
+    ''' <returns></returns>
+    Property NAV_xmlSignkey As String
+        Get
+            Return _NAV_xmlSignkey
+        End Get
+        Set(value As String)
+            SetPropertyValue("NAV_xmlSignkey", _NAV_xmlSignkey, value)
+        End Set
+    End Property
+    ''' <summary>
+    ''' NAV jelszó az Online számlához
+    ''' </summary>
+    ''' <returns></returns>
+    Property NAV_password As String
+        Get
+            Return _NAV_password
+        End Get
+        Set(value As String)
+            SetPropertyValue("NAV_password", _NAV_password, value)
+        End Set
+    End Property
+    ''' <summary>
+    ''' NAV cserekulcs az Online számlához
+    ''' </summary>
+    ''' <returns></returns>
+    Property NAV_exchangeKey As String
+        Get
+            Return _NAV_exchangeKey
+        End Get
+        Set(value As String)
+            SetPropertyValue("NAV_exchangeKey", _NAV_exchangeKey, value)
+        End Set
+    End Property
     ReadOnly Property DefaultCustomerBankAccounts As CustomerBankAccounts
         Get
             Dim _CustomerBankAccounts As CustomerBankAccounts = Nothing