jj
This commit is contained in:
@@ -13,22 +13,6 @@ Public Class Database
|
||||
_Config = ConfigManager
|
||||
End Sub
|
||||
|
||||
Public Function LoadVendors() As DataTable
|
||||
Return GetDatatable("SELECT C229, C003 FROM V050 WHERE C229 IS NOT NULL")
|
||||
End Function
|
||||
|
||||
Public Function LoadVendorIdByCode(VendorCode As String) As String
|
||||
Return GetScalarValue($"SELECT SUBSTRING(C000,0,6) C999 FROM T309 WHERE C001 = '{VendorCode}' AND C002 = 1")
|
||||
End Function
|
||||
|
||||
Public Function LoadGroupsByVendor(VendorId As String) As DataTable
|
||||
Return GetDatatable($"SELECT C001, SUBSTRING(C000,7,5) C999 FROM T309 WHERE C000 LIKE '{VendorId}%' AND C002 = 2 AND C001 LIKE '__ | %'")
|
||||
End Function
|
||||
|
||||
Public Function LoadVersionsByVendorAndGroup(VendorId As String, GroupId As String) As DataTable
|
||||
Return GetDatatable($"SELECT C001 FROM T309 WHERE C000 LIKE '{VendorId}-{GroupId}-%' AND C002 = 3 AND C001 LIKE '__ | %'")
|
||||
End Function
|
||||
|
||||
#Region "Database-Access"
|
||||
Private Function GetSQLConnection() As SqlConnection
|
||||
Return GetSQLConnection(_Config.Config.ConnectionString)
|
||||
|
||||
Reference in New Issue
Block a user