First create solution

This commit is contained in:
2017-03-08 11:21:27 +01:00
commit a2fb86bacf
5508 changed files with 1082238 additions and 0 deletions
@@ -0,0 +1,90 @@
Imports System
Imports System.ComponentModel
Imports DevExpress.Xpo
Imports DevExpress.Data.Filtering
Imports DevExpress.ExpressApp
Imports DevExpress.Persistent.Base
Imports DevExpress.Persistent.BaseImpl
Imports DevExpress.Persistent.Validation
<DefaultClassOptions()> _
<NonPersistent()> _
<CreatableItem(False)> _
<NavigationItem(False)> _
Public Class ChangeFileAttachment_PopUp
Inherits BaseObject
Private _Status As eProductsDocumentationStatus
Private _ChangeStatus As Boolean
Private _RowGroup1 As String 'Szöveges csoportosítás (nem kötelezõ)
Private _ChangeRowGroup1 As Boolean
Private _RowGroup2 As String 'Szöveges másodlagos csoportosítás (nem kötelezõ)
Private _ChangeRowGroup2 As Boolean
Public Sub New(ByVal session As Session)
MyBase.New(session)
End Sub
Public Overrides Sub AfterConstruction()
MyBase.AfterConstruction()
' Place here your initialization code.
End Sub
Public Property Status() As eProductsDocumentationStatus
Get
Return _Status
End Get
Set(ByVal value As eProductsDocumentationStatus)
SetPropertyValue("Status", _Status, value)
End Set
End Property
Public Property RowGroup1() As String
Get
Return _RowGroup1
End Get
Set(ByVal value As String)
SetPropertyValue("RowGroup1", _RowGroup1, value)
End Set
End Property
Public Property RowGroup2() As String
Get
Return _RowGroup2
End Get
Set(ByVal value As String)
SetPropertyValue("RowGroup2", _RowGroup2, value)
End Set
End Property
Public Property ChangeStatus() As Boolean
Get
Return _ChangeStatus
End Get
Set(ByVal value As Boolean)
SetPropertyValue("Status", _ChangeStatus, value)
End Set
End Property
Public Property ChangeRowGroup1() As Boolean
Get
Return _ChangeRowGroup1
End Get
Set(ByVal value As Boolean)
SetPropertyValue("RowGroup1", _ChangeRowGroup1, value)
End Set
End Property
Public Property ChangeRowGroup2() As Boolean
Get
Return _ChangeRowGroup2
End Get
Set(ByVal value As Boolean)
SetPropertyValue("RowGroup2", _ChangeRowGroup2, value)
End Set
End Property
End Class
@@ -0,0 +1,32 @@
Imports System
Imports System.ComponentModel
Imports DevExpress.Xpo
Imports DevExpress.Data.Filtering
Imports DevExpress.ExpressApp
Imports DevExpress.Persistent.Base
Imports DevExpress.Persistent.BaseImpl
Imports DevExpress.Persistent.Validation
<DefaultClassOptions(), NavigationItem(False), CreatableItem(False), NonPersistent> _
Public Class CustomersMergePopup
Inherits BaseObject
Public Sub New(ByVal session As Session)
MyBase.New(session)
' This constructor is used when an object is loaded from a persistent storage.
' Do not place any code here or place it only when the IsLoading property is false:
' if (!IsLoading){
' It is now OK to place your initialization code here.
' }
' or as an alternative, move your initialization code into the AfterConstruction method.
End Sub
Public Overrides Sub AfterConstruction()
MyBase.AfterConstruction()
' Place here your initialization code.
End Sub
Property CustomersMain As Customers
Property Customers As XPCollection(Of Customers)
End Class
@@ -0,0 +1,243 @@
Imports System
Imports System.ComponentModel
Imports DevExpress.Xpo
Imports DevExpress.Data.Filtering
Imports DevExpress.ExpressApp
Imports DevExpress.Persistent.Base
Imports DevExpress.Persistent.BaseImpl
Imports DevExpress.Persistent.Validation
<DefaultClassOptions()> _
<NonPersistent()> _
<CreatableItem(False)> _
<NavigationItem(False)> _
Public Class Customers_Change_PopUP
Inherits BaseObject
Private _Change_PaymentOption As Boolean
Private _PaymentOption As PaymentOption
Private _Change_ShipmentOption As Boolean
Private _ShipmentOption As ShipmentOption
Private _Change_QualityOption As Boolean
Private _QualityOption As QualityOption
Private _Change_IsAssetsHandling As Boolean
Private _IsAssetsHandling As Boolean
Private _Change_LateChargesCountMode As Boolean
Private _LateChargesCountMode As LateChargesCountMode
Private _Change_CreditlineDay As Boolean
Private _CreditlineDay As Long
Private _Change_Pricing As Boolean 'Árképzés ha vevõ az ügyfél
Private _Pricing As Pricing
Private _Change_PricingIn As Boolean 'Árképzés ha vásárolunk tõle
Private _PricingIn As Pricing
Private _Change_CustomersGLParameters As Boolean 'Ügyfél fõkönyvi kategária
Private _CustomersGLParameters As CustomersGLParameters
Private _Change_Profile As Boolean
Private _Profile As String
Private _Change_Country1 As Boolean
Private _Country1 As Country
Private _Change_Country2 As Boolean
Private _Country2 As Country
Public Sub New(ByVal session As Session)
MyBase.New(session)
End Sub
Public Overrides Sub AfterConstruction()
MyBase.AfterConstruction()
End Sub
Property Change_PaymentOption As Boolean
Get
Return _Change_PaymentOption
End Get
Set(value As Boolean)
SetPropertyValue("Change_PaymentOption", _Change_PaymentOption, value)
End Set
End Property
Public Property PaymentOption() As PaymentOption
Get
Return _PaymentOption
End Get
Set(ByVal value As PaymentOption)
SetPropertyValue("PaymentOption", _PaymentOption, value)
End Set
End Property
Property Change_ShipmentOption As Boolean
Get
Return _Change_ShipmentOption
End Get
Set(value As Boolean)
SetPropertyValue("Change_ShipmentOption", _Change_ShipmentOption, value)
End Set
End Property
Public Property ShipmentOption() As ShipmentOption
Get
Return _ShipmentOption
End Get
Set(ByVal value As ShipmentOption)
SetPropertyValue("ShipmentOption", _ShipmentOption, value)
End Set
End Property
Property Change_QualityOption As Boolean
Get
Return _Change_QualityOption
End Get
Set(value As Boolean)
SetPropertyValue("Change_QualityOption", _Change_QualityOption, value)
End Set
End Property
Public Property QualityOption() As QualityOption
Get
Return _QualityOption
End Get
Set(ByVal value As QualityOption)
SetPropertyValue("QualityOption", _QualityOption, value)
End Set
End Property
Property Change_IsAssetsHandling As Boolean
Get
Return _Change_IsAssetsHandling
End Get
Set(value As Boolean)
SetPropertyValue("Change_IsAssetsHandling", _Change_IsAssetsHandling, value)
End Set
End Property
Property IsAssetsHandling As Boolean
Get
Return _IsAssetsHandling
End Get
Set(value As Boolean)
SetPropertyValue("IsAssetsHandling", _IsAssetsHandling, value)
End Set
End Property
Property Change_LateChargesCountMode As Boolean
Get
Return _Change_LateChargesCountMode
End Get
Set(value As Boolean)
SetPropertyValue("Change_LateChargesCountMode", _Change_LateChargesCountMode, value)
End Set
End Property
Property LateChargesCountMode As LateChargesCountMode
Get
Return _LateChargesCountMode
End Get
Set(value As LateChargesCountMode)
SetPropertyValue("LateChargesCountMode", _LateChargesCountMode, value)
End Set
End Property
Property Change_CreditlineDay As Boolean
Get
Return _Change_CreditlineDay
End Get
Set(value As Boolean)
SetPropertyValue("Change_CreditlineDay", _Change_CreditlineDay, value)
End Set
End Property
Property CreditlineDay As Long
Get
Return _CreditlineDay
End Get
Set(value As Long)
SetPropertyValue("CreditlineDay", _CreditlineDay, value)
End Set
End Property
Property Change_Pricing As Boolean
Get
Return _Change_Pricing
End Get
Set(value As Boolean)
SetPropertyValue("Change_Pricing", _Change_Pricing, value)
End Set
End Property
Property Pricing As Pricing
Get
Return _Pricing
End Get
Set(ByVal value As Pricing)
SetPropertyValue("Pricing", _Pricing, value)
End Set
End Property
Property Change_PricingIn As Boolean
Get
Return _Change_PricingIn
End Get
Set(value As Boolean)
SetPropertyValue("Change_PricingIn", _Change_PricingIn, value)
End Set
End Property
Property PricingIn As Pricing
Get
Return _PricingIn
End Get
Set(ByVal value As Pricing)
SetPropertyValue("PricingIn", _PricingIn, value)
End Set
End Property
Property Change_CustomersGLParameters As Boolean
Get
Return _Change_CustomersGLParameters
End Get
Set(value As Boolean)
SetPropertyValue("Change_CustomersGLParameters", _Change_CustomersGLParameters, value)
End Set
End Property
Property CustomersGLParameters() As CustomersGLParameters
Get
Return _CustomersGLParameters
End Get
Set(ByVal value As CustomersGLParameters)
SetPropertyValue("CustomersGLParameters", _CustomersGLParameters, value)
End Set
End Property
Property Change_Profile As Boolean
Get
Return _Change_Profile
End Get
Set(value As Boolean)
SetPropertyValue("Change_Profile", _Change_Profile, value)
End Set
End Property
Property Profile As String
Get
Return _Profile
End Get
Set(value As String)
SetPropertyValue("Profile", _Profile, value)
End Set
End Property
Property Change_Country1 As Boolean
Get
Return _Change_Country1
End Get
Set(value As Boolean)
SetPropertyValue("Change_Country1", _Change_Country1, value)
End Set
End Property
Property Country1 As Country
Get
Return _Country1
End Get
Set(value As Country)
SetPropertyValue("Country1", _Country1, value)
End Set
End Property
Property Change_Country2 As Boolean
Get
Return _Change_Country2
End Get
Set(value As Boolean)
SetPropertyValue("Change_Country2", _Change_Country2, value)
End Set
End Property
Property Country2 As Country
Get
Return _Country2
End Get
Set(value As Country)
SetPropertyValue("Country2", _Country2, value)
End Set
End Property
End Class