初始化提交

仓库转移到Gitea,初始化提交,可能丢失以前的git版本日志
This commit is contained in:
2025-11-27 16:41:05 +08:00
commit 027d0f8024
663 changed files with 171319 additions and 0 deletions

View File

@@ -0,0 +1,24 @@
Namespace UTSModule.DbTableModel.Customer
''' <summary>
''' 生产流程签名表,待删除
''' </summary>
Public Class FlowCtrTable
Enum ColNamesEnum
ID
''' <summary>
''' 项目唯一标识
''' </summary>
ProjectID
''' <summary>
''' 产品序号唯一标识
''' </summary>
DUT_SN
''' <summary>
''' 流程签名
''' </summary>
ProcessRecord
End Enum
Public Shared Property TableName() As String = "TBL_FlowCtr"
End Class
End Namespace

View File

@@ -0,0 +1,59 @@
Imports System.Text
Imports UTS_Core.Database
Namespace UTSModule.DbTableModel.Customer
''' <summary>
''' Sn关联信息表
''' </summary>
Public Class ImportInfoTable
Enum ColNames
''' <summary>
''' 索引
''' </summary>
ID
''' <summary>
''' 项目唯一标识
''' </summary>
ProjectID
''' <summary>
''' 产品序号唯一标识
''' </summary>
Barcode
''' <summary>
''' 录入时间
''' </summary>
ImportDateTime
''' <summary>
''' 更新时间,用于同步下载
''' </summary>
UpdateTime
End Enum
Public Shared Property TableName() As String = "TBL_ImportInfo"
''' <summary>
''' 建表语句
''' </summary>
''' <returns>建表语句</returns>
Public Shared Function CreateTableString(dbName As String, Optional dbType As DbExecutor.DbTypeEnum = DbExecutor.DbTypeEnum.Mysql) As String
Dim builder As New StringBuilder
If dbType = DbExecutor.DbTypeEnum.Mysql Then
builder.Append($"CREATE TABLE If Not Exists `{dbName}`.`{TableName}` ")
builder.Append("(")
builder.Append($"`{ColNames.ID}` int(11) NOT NULL AUTO_INCREMENT,")
builder.Append($"`{ColNames.ProjectID}` int(11) NOT NULL DEFAULT -1 COMMENT '项目唯一标识',")
builder.Append($"`{ColNames.Barcode}` varchar(32) NOT NULL COMMENT '产品序号唯一标识',")
builder.Append($"`{ColNames.ImportDateTime}` datetime NOT NULL DEFAULT current_timestamp() COMMENT '录入时间',")
builder.Append($"`{ColNames.UpdateTime}` datetime NOT NULL DEFAULT current_timestamp() COMMENT '更新时间',")
builder.Append($"PRIMARY KEY (`{ColNames.ID}`) ")
builder.Append(")")
builder.Append("ENGINE=InnoDB AUTO_INCREMENT=1 DEFAULT CHARSET=utf8;")
Else
Throw New Exception($"{TableName}-Invalid db type :{dbType}")
End If
Return builder.ToString()
End Function
End Class
End Namespace

View File

@@ -0,0 +1,53 @@
Imports System.Text
Imports UTS_Core.Database
Namespace UTSModule.DbTableModel.Customer
''' <summary>
''' 用户操作记录总表
''' </summary>
Public Class LogTable
Enum ColNamesEnum
ID
''' <summary>
''' 操作者
''' </summary>
UserID
''' <summary>
''' 操作时间
''' </summary>
DateTime
''' <summary>
''' 操作内容说明
''' </summary>
Operation
End Enum
Public Shared Property TableName() As String = "TBL_Log"
''' <summary>
''' 建表语句
''' </summary>
''' <returns>建表语句</returns>
Public Shared Function CreateTableString(dbName As String, Optional dbType As DbExecutor.DbTypeEnum = DbExecutor.DbTypeEnum.Mysql) As String
Dim builder As New StringBuilder
If dbType = DbExecutor.DbTypeEnum.Mysql Then
builder.Append($"CREATE TABLE If Not Exists `{dbName}`.`{TableName}` ")
builder.Append("(")
builder.Append($"`{ColNamesEnum.ID}` int(11) Not NULL,")
builder.Append($"`{ColNamesEnum.UserID}` int(11) DEFAULT NULL COMMENT '用户索引',")
builder.Append($"`{ColNamesEnum.DateTime}` datetime DEFAULT NULL COMMENT '操作时间',")
builder.Append($"`{ColNamesEnum.Operation}` varchar(254) DEFAULT NULL COMMENT '操作内容说明',")
builder.Append($"PRIMARY KEY (`{ColNamesEnum.ID}`) ")
builder.Append(")")
builder.Append("ENGINE=InnoDB AUTO_INCREMENT=1 DEFAULT CHARSET=utf8;")
Else
Throw New Exception($"{TableName}-Invalid db type :{dbType}")
End If
Return builder.ToString()
End Function
End Class
End Namespace

View File

@@ -0,0 +1,116 @@
Imports System.Text
Imports UTS_Core.Database
Namespace UTSModule.DbTableModel.Customer
Public Class OrderInternalTable
Enum ColNames
''' <summary>
''' 内部订单索引
''' </summary>
ID
''' <summary>
''' 订单ID
''' </summary>
OrderID
''' <summary>
''' 内部单号
''' </summary>
InternalNo
''' <summary>
''' 订单所属公司索引
''' </summary>
CompanyID
''' <summary>
''' 产品索引
''' </summary>
ProductID
''' <summary>
''' 产品类型索引
''' </summary>
ProductTypeID
''' <summary>
''' 创建时间
''' </summary>
CreateTime
''' <summary>
''' 修改日期
''' </summary>
UpdateTime
''' <summary>
''' 目标产量
''' </summary>
ObjectiveYield
''' <summary>
''' 累计目标产量
''' </summary>
ObjectiveYieldTotal
''' <summary>
''' 订单状态
''' </summary>
OrderStatus
''' <summary>
''' 交货时间
''' </summary>
DeliveryTime
''' <summary>
''' 适用站位
''' </summary>
Station
''' <summary>
''' 条码范围
''' </summary>
BarCode
End Enum
Public Shared Property TableName() As String = "TBL_OrderInternal"
''' <summary>
''' 建表语句
''' </summary>
''' <returns>建表语句</returns>
Public Shared Function CreateTableString(dbName As String, Optional dbType As DbExecutor.DbTypeEnum = DbExecutor.DbTypeEnum.Mysql) As String
Dim builder As New StringBuilder
If dbType = DbExecutor.DbTypeEnum.Mysql Then
builder.Append($"CREATE TABLE If Not Exists `{dbName}`.`{TableName}` ")
builder.Append("(")
builder.Append($"`{ColNames.ID}` int(11) NOT NULL AUTO_INCREMENT,")
builder.Append($"`{ColNames.OrderID}` int(11) NOT NULL COMMENT '订单ID',")
builder.Append($"`{ColNames.CompanyID}` int(11) NOT NULL COMMENT '订单所属公司索引',")
builder.Append($"`{ColNames.ProductTypeID}` int(11) NOT NULL COMMENT '产品类型索引',")
builder.Append($"`{ColNames.ProductID}` int(11) NOT NULL COMMENT '产品索引',")
builder.Append($"`{ColNames.OrderStatus}` int(11) NOT NULL COMMENT '订单状态',")
builder.Append($"`{ColNames.InternalNo}` varchar(64) NOT NULL COMMENT '内部单号',")
builder.Append($"`{ColNames.CreateTime}` datetime NOT NULL DEFAULT current_timestamp() COMMENT '创建时间',")
builder.Append($"`{ColNames.UpdateTime}` datetime NOT NULL DEFAULT current_timestamp() COMMENT '更新时间',")
builder.Append($"`{ColNames.DeliveryTime}` datetime DEFAULT NULL COMMENT '交货时间',")
builder.Append($"`{ColNames.ObjectiveYield}` int(11) DEFAULT NULL COMMENT '目标产量',")
builder.Append($"`{ColNames.ObjectiveYieldTotal}` int(11) DEFAULT NULL COMMENT '累计目标产量',")
builder.Append($"`{ColNames.Station}` varchar(64) DEFAULT NULL ,")
builder.Append($"`{ColNames.BarCode}` varchar(254) DEFAULT NULL ,")
builder.Append($"PRIMARY KEY (`{ColNames.ID}`) ")
builder.Append(")")
builder.Append("ENGINE=InnoDB AUTO_INCREMENT=1 DEFAULT CHARSET=utf8;")
Else
Throw New Exception($"{TableName}-Invalid db type :{dbType}")
End If
Return builder.ToString()
End Function
End Class
End Namespace

View File

@@ -0,0 +1,98 @@
Imports System.Text
Imports UTS_Core.Database
Namespace UTSModule.DbTableModel.Customer
''' <summary>
''' 客户订单表
''' </summary>
Public Class OrdersTable
Enum ColNames
''' <summary>
''' 订单索引
''' </summary>
ID
''' <summary>
''' 公司索引
''' </summary>
CompanyID
''' <summary>
''' 订单生产产品索引
''' </summary>
ProductID
''' <summary>
''' 订单号
''' </summary>
OrderNo
''' <summary>
''' 生产数量
''' </summary>
OrderCount
''' <summary>
''' 交货日期
''' </summary>
DeliveryTime
''' <summary>
''' 订单生成日期
''' </summary>
CreateTime
''' <summary>
''' 修改日期
''' </summary>
UpdateTime
''' <summary>
''' 成本单价
''' </summary>
CostPrice
''' <summary>
''' 销售单价
''' </summary>
TransactPrice
''' <summary>
''' 订单状态
''' </summary>
OrderStatus
End Enum
Public Shared Property TableName() As String = "TBL_Orders"
''' <summary>
''' 建表语句
''' </summary>
''' <returns>建表语句</returns>
Public Shared Function CreateTableString(dbName As String, Optional dbType As DbExecutor.DbTypeEnum = DbExecutor.DbTypeEnum.Mysql) As String
Dim builder As New StringBuilder
If dbType = DbExecutor.DbTypeEnum.Mysql Then
builder.Append($"CREATE TABLE If Not Exists `{dbName}`.`{TableName}` ")
builder.Append("(")
builder.Append($"`{ColNames.ID}` int(11) NOT NULL AUTO_INCREMENT COMMENT '订单索引',")
builder.Append($"`{ColNames.CompanyID}` int(11) NOT NULL COMMENT '所属厂商索引',")
builder.Append($"`{ColNames.ProductID}` int(11) NOT NULL COMMENT '订单生产产品索引',")
builder.Append($"`{ColNames.OrderNo}` varchar(64) NOT NULL DEFAULT '' COMMENT '订单号',")
builder.Append($"`{ColNames.OrderCount}` int(11) NOT NULL DEFAULT 0 COMMENT '生产数量',")
builder.Append($"`{ColNames.DeliveryTime}` datetime DEFAULT NULL COMMENT '交货日期',")
builder.Append($"`{ColNames.CreateTime}` datetime NOT NULL DEFAULT current_timestamp() COMMENT '订单生成日期',")
builder.Append($"`{ColNames.UpdateTime}` datetime NOT NULL DEFAULT current_timestamp() COMMENT '更新时间',")
builder.Append($"`{ColNames.CostPrice}` float DEFAULT NULL COMMENT '成本单价',")
builder.Append($"`{ColNames.TransactPrice}` float DEFAULT NULL COMMENT '销售单价',")
builder.Append($"`{ColNames.OrderStatus}` int(11) DEFAULT NULL COMMENT '订单状态',")
builder.Append($"PRIMARY KEY (`{ColNames.ID}`) ")
builder.Append(")")
builder.Append("ENGINE=InnoDB AUTO_INCREMENT=1 DEFAULT CHARSET=utf8;")
Else
Throw New Exception($"{TableName}-Invalid db type :{dbType}")
End If
Return builder.ToString()
End Function
End Class
End NameSpace

View File

@@ -0,0 +1,52 @@
Imports System.Text
Imports UTS_Core.Database
Namespace UTSModule.DbTableModel.Customer
Public Class ProductTypesTable
Enum ColNames
ID
''' <summary>
''' 产品类型
''' </summary>
ProductType
''' <summary>
''' 修改日期
''' </summary>
UpdateTime
''' <summary>
''' 备注
''' </summary>
Remark
End Enum
Public Shared Property TableName() As String = "TBL_ProductTypes"
''' <summary>
''' 建表语句
''' </summary>
''' <returns>建表语句</returns>
Public Shared Function CreateTableString(dbName As String, Optional dbType As DbExecutor.DbTypeEnum = DbExecutor.DbTypeEnum.Mysql) As String
Dim builder As New StringBuilder
If dbType = DbExecutor.DbTypeEnum.Mysql Then
builder.Append($"CREATE TABLE If Not Exists `{dbName}`.`{TableName}` ")
builder.Append("(")
builder.Append($"`{ColNames.ID}` int(11) Not NULL AUTO_INCREMENT,")
builder.Append($"`{ColNames.ProductType}` varchar(255) Not NULL,")
builder.Append($"`{ColNames.UpdateTime}` datetime NOT NULL DEFAULT current_timestamp() COMMENT '更新时间',")
builder.Append($"`{ColNames.Remark}` varchar(255) DEFAULT NULL,")
builder.Append($"PRIMARY KEY (`{ColNames.ID}`) ")
builder.Append(")")
builder.Append("ENGINE=InnoDB AUTO_INCREMENT=1 DEFAULT CHARSET=utf8;")
Else
Throw New Exception($"{TableName}-Invalid db type :{dbType}")
End If
Return builder.ToString()
End Function
End Class
End Namespace

View File

@@ -0,0 +1,59 @@
Imports System.Text
Imports UTS_Core.Database
Namespace UTSModule.DbTableModel.Customer
Public Class ProductionLineTable
Enum ColNames
''' <summary>
''' 产线索引
''' </summary>
ID
''' <summary>
''' 产线名称
''' </summary>
Name
''' <summary>
''' 产线描述
''' </summary>
Description
''' <summary>
''' 修改日期
''' </summary>
UpdateTime
''' <summary>
''' 备注
''' </summary>
Remark
End Enum
Public Shared Property TableName() As String = "TBL_ProductionLine"
''' <summary>
''' 建表语句
''' </summary>
''' <returns>建表语句</returns>
Public Shared Function CreateTableString(dbName As String, Optional dbType As DbExecutor.DbTypeEnum = DbExecutor.DbTypeEnum.Mysql) As String
Dim builder As New StringBuilder
If dbType = DbExecutor.DbTypeEnum.Mysql Then
builder.Append($"CREATE TABLE If Not Exists `{dbName}`.`{TableName}` ")
builder.Append("(")
builder.Append($"`{ColNames.ID}` int(11) NOT NULL AUTO_INCREMENT,")
builder.Append($"`{ColNames.Name}` varchar(64) NOT NULL DEFAULT '' COMMENT '产线名',")
builder.Append($"`{ColNames.Description}` varchar(255) DEFAULT NULL COMMENT '工艺说明',")
builder.Append($"`{ColNames.UpdateTime}` datetime NOT NULL DEFAULT current_timestamp() COMMENT '更新时间',")
builder.Append($"`{ColNames.Remark}` varchar(255) DEFAULT NULL COMMENT '备注',")
builder.Append($"PRIMARY KEY (`{ColNames.ID}`) ")
builder.Append(")")
builder.Append("ENGINE=InnoDB AUTO_INCREMENT=1 DEFAULT CHARSET=utf8;")
Else
Throw New Exception($"{TableName}-Invalid db type :{dbType}")
End If
Return builder.ToString()
End Function
End Class
End NameSpace

View File

@@ -0,0 +1,99 @@
Imports System.Text
Imports UTS_Core.Database
Namespace UTSModule.DbTableModel.Customer
Public Class ProductionPlanTable
Enum ColNames
''' <summary>
''' 生产计划索引
''' </summary>
ID
''' <summary>
''' 订单索引
''' </summary>
OrderID
''' <summary>
''' 内部订单
''' </summary>
OrderInternalID
''' <summary>
''' 站位索引
''' </summary>
StationID
''' <summary>
''' 产线索引
''' </summary>
ProductionLineID
''' <summary>
''' 生产时间
''' </summary>
ProductionTime
''' <summary>
''' 修改日期
''' </summary>
UpdateTime
''' <summary>
''' 已完成产量
''' </summary>
ActualOutput
''' <summary>
''' 目标产量
''' </summary>
ObjectiveYield
''' <summary>
''' 累计目标产量
''' </summary>
ObjectiveYieldTotal
''' <summary>
''' 备注
''' </summary>
Remark
End Enum
Public Shared Property TableName() As String = "TBL_ProductionPlan"
''' <summary>
''' 建表语句
''' </summary>
''' <returns>建表语句</returns>
Public Shared Function CreateTableString(dbName As String, Optional dbType As DbExecutor.DbTypeEnum = DbExecutor.DbTypeEnum.Mysql) As String
Dim builder As New StringBuilder
If dbType = DbExecutor.DbTypeEnum.Mysql Then
builder.Append($"CREATE TABLE If Not Exists `{dbName}`.`{TableName}` ")
builder.Append("(")
builder.Append($"`{ColNames.ID}` int(11) NOT NULL AUTO_INCREMENT COMMENT '生产计划索引',")
builder.Append($"`{ColNames.OrderID}` int(11) NOT NULL COMMENT '订单索引',")
builder.Append($"`{ColNames.OrderInternalID}` int(11) NOT NULL COMMENT '内部单ID',")
builder.Append($"`{ColNames.StationID}` int(11) NOT NULL COMMENT '工艺站ID',")
builder.Append($"`{ColNames.ProductionLineID}` int(11) NOT NULL COMMENT '产线索引',")
builder.Append($"`{ColNames.ProductionTime}` datetime NOT NULL COMMENT '生产时间',")
builder.Append($"`{ColNames.UpdateTime}` datetime NOT NULL DEFAULT current_timestamp() COMMENT '更新时间',")
builder.Append($"`{ColNames.ActualOutput}` int(11) NOT NULL COMMENT '已完成产量',")
builder.Append($"`{ColNames.ObjectiveYield}` int(11) NOT NULL COMMENT '目标产量',")
builder.Append($"`{ColNames.ObjectiveYieldTotal}` int(11) NOT NULL COMMENT '累计目标产量',")
builder.Append($"`{ColNames.Remark}` varchar(255) DEFAULT NULL COMMENT '备注',")
builder.Append($"PRIMARY KEY (`{ColNames.ID}`) ")
builder.Append(")")
builder.Append("ENGINE=InnoDB AUTO_INCREMENT=1 DEFAULT CHARSET=utf8;")
Else
Throw New Exception($"{TableName}-Invalid db type :{dbType}")
End If
Return builder.ToString()
End Function
End Class
End Namespace

View File

@@ -0,0 +1,116 @@
Imports System.Text
Imports UTS_Core.Database
Namespace UTSModule.DbTableModel.Customer
''' <summary>
''' 项目总表
''' </summary>
Public Class ProjectTable
Enum ColNames
''' <summary>
''' 项目唯一标识
''' </summary>
ID
''' <summary>
''' 项目类型索引
''' </summary>
ProductTypeID
''' <summary>
''' 项目名称
''' </summary>
ProjectName
''' <summary>
''' 项目描述
''' </summary>
Description
''' <summary>
''' 创建人
''' </summary>
UserID
''' <summary>
''' 创建时间
''' </summary>
CreateTime
''' <summary>
''' 修改日期
''' </summary>
UpdateTime
''' <summary>
''' 备注
''' </summary>
Remark
''' <summary>
''' 预览图
''' </summary>
ImageName
''' <summary>
''' 预览图
''' </summary>
PreviewImage
''' <summary>
''' 单价
''' </summary>
Price
''' <summary>
''' 单价单位
''' </summary>
Currency
''' <summary>
''' 当前项目是否有效
''' </summary>
IsValid
''' <summary>
''' 最后有效日期
''' </summary>
EolDate
''' <summary>
''' 录入条码总表类型0无订单1有订单
''' </summary>
SnType
End Enum
Public Shared Property TableName() As String = "TBL_Project"
''' <summary>
''' 建表语句
''' </summary>
''' <returns>建表语句</returns>
Public Shared Function CreateTableString(dbName As String, Optional dbType As DbExecutor.DbTypeEnum = DbExecutor.DbTypeEnum.Mysql) As String
Dim builder As New StringBuilder
If dbType = DbExecutor.DbTypeEnum.Mysql Then
builder.Append($"CREATE TABLE If Not Exists `{dbName}`.`{TableName}` ")
builder.Append("(")
builder.Append($"`{ColNames.ID}` int(11) Not NULL AUTO_INCREMENT,")
builder.Append($"`{ColNames.ProductTypeID}` int(11) Not NULL,")
builder.Append($"`{ColNames.ProjectName}` varchar(64) Not NULL,")
builder.Append($"`{ColNames.Description}` varchar(64) DEFAULT NULL,")
builder.Append($"`{ColNames.UserID}` int(11) Not NULL,")
builder.Append($"`{ColNames.CreateTime}` datetime NOT NULL DEFAULT current_timestamp(),")
builder.Append($"`{ColNames.UpdateTime}` datetime NOT NULL DEFAULT current_timestamp() COMMENT '更新时间',")
builder.Append($"`{ColNames.EolDate}` datetime DEFAULT NULL,")
builder.Append($"`{ColNames.Remark}` varchar(255) DEFAULT NULL,")
builder.Append($"`{ColNames.ImageName}` varchar(255) DEFAULT NULL,")
builder.Append($"`{ColNames.PreviewImage}` mediumblob DEFAULT NULL,")
builder.Append($"`{ColNames.Price}` float(10,2) DEFAULT NULL,")
builder.Append($"`{ColNames.Currency}` varchar(10) DEFAULT NULL,")
builder.Append($"`{ColNames.IsValid}` tinyint(4) DEFAULT 1,")
builder.Append($"`{ColNames.SnType}` int(11) NOT NULL DEFAULT 1,")
builder.Append($"PRIMARY KEY (`{ColNames.ID}`) ")
builder.Append(")")
builder.Append("ENGINE=InnoDB AUTO_INCREMENT=1 DEFAULT CHARSET=utf8;")
Else
Throw New Exception($"{TableName}-Invalid db type :{dbType}")
End If
Return builder.ToString()
End Function
End Class
End Namespace

View File

@@ -0,0 +1,71 @@
Imports System.Text
Imports UTS_Core.Database
Namespace UTSModule.DbTableModel.Customer
''' <summary>
''' 不良代码类型表
''' </summary>
Public Class RejectsExplainTable
Enum ColNames
''' <summary>
''' 索引
''' </summary>
ID
''' <summary>
''' 所属维修分类索引
''' </summary>
Matlab
''' <summary>
''' 名称
''' </summary>
Introductions
''' <summary>
''' 创建日期
''' </summary>
CreateTime
''' <summary>
''' 更新时间
''' </summary>
UpdateTime
''' <summary>
''' 备注
''' </summary>
Remark
End Enum
Public Shared Property TableName() As String = "TBL_RejectsExplain"
''' <summary>
''' 建表语句
''' </summary>
''' <returns>建表语句</returns>
Public Shared Function CreateTableString(dbName As String, Optional dbType As DbExecutor.DbTypeEnum = DbExecutor.DbTypeEnum.Mysql) As String
Dim builder As New StringBuilder
If dbType = DbExecutor.DbTypeEnum.Mysql Then
builder.Append($"CREATE TABLE If Not Exists `{dbName}`.`{TableName}` ")
builder.Append("(")
builder.Append($"`{ColNames.ID}` int(11) NOT NULL AUTO_INCREMENT COMMENT '不良代码索引',")
builder.Append($"`{ColNames.Matlab}` varchar(255) NOT NULL COMMENT '不良品代码',")
builder.Append($"`{ColNames.Introductions}` varchar(255) NOT NULL COMMENT '不良品说明',")
builder.Append($"`{ColNames.CreateTime}` datetime NOT NULL DEFAULT current_timestamp() COMMENT '创建时间',")
builder.Append($"`{ColNames.UpdateTime}` datetime NOT NULL DEFAULT current_timestamp() COMMENT '更新时间',")
builder.Append($"`{ColNames.Remark}` varchar(254) DEFAULT NULL COMMENT '备注',")
builder.Append($"PRIMARY KEY (`{ColNames.ID}`) ")
builder.Append(")")
builder.Append("ENGINE=InnoDB AUTO_INCREMENT=1 DEFAULT CHARSET=utf8;")
Else
Throw New Exception($"{TableName}-Invalid db type :{dbType}")
End If
Return builder.ToString()
End Function
End Class
End Namespace

View File

@@ -0,0 +1,101 @@
Imports System.Text
Imports UTS_Core.Database
Namespace UTSModule.DbTableModel.Customer
Public Class RepairLogTable
Enum ColNamesEnum
''' <summary>
''' 维修日志索引
''' </summary>
ID
''' <summary>
''' 维修产品索引
''' </summary>
ProductID
''' <summary>
''' 维修产品条码
''' </summary>
DUT_SN
''' <summary>
''' 产品错误代码
''' </summary>
ErrCode
''' <summary>
''' 维修原因类型
''' </summary>
RepairType
''' <summary>
''' 维修人工注释
''' </summary>
RepairComment
''' <summary>
''' 维修产品日期
''' </summary>
RepairDate
''' <summary>
''' 维修产品结果
''' </summary>
RepairResult
''' <summary>
''' 产品图像文件名1
''' </summary>
ProductImg1
''' <summary>
''' 产品图像文件名2
''' </summary>
ProductImg2
''' <summary>
''' 产品图像文件名3
''' </summary>
ProductImg3
''' <summary>
''' 产品图像文件名4
''' </summary>
ProductImg4
End Enum
Public Shared Property TableName() As String = "TBL_RepairLog"
''' <summary>
''' 建表语句
''' </summary>
''' <returns>建表语句</returns>
Public Shared Function CreateTableString(dbName As String, Optional dbType As DbExecutor.DbTypeEnum = DbExecutor.DbTypeEnum.Mysql) As String
Dim builder As New StringBuilder
If dbType = DbExecutor.DbTypeEnum.Mysql Then
builder.Append($"CREATE TABLE If Not Exists `{dbName}`.`{TableName}` ")
builder.Append("(")
builder.Append($"`{ColNamesEnum.ID}` int(11) NOT NULL AUTO_INCREMENT COMMENT '维修日志索引',")
builder.Append($"`{ColNamesEnum.ProductID}` int(11) Not NULL COMMENT '维修产品索引',")
builder.Append($"`{ColNamesEnum.DUT_SN}` varchar(32) Not NULL COMMENT '维修产品条码',")
builder.Append($"`{ColNamesEnum.ErrCode}` varchar(32) DEFAULT NULL COMMENT '产品错误代码',")
builder.Append($"`{ColNamesEnum.RepairType}` int(11) DEFAULT NULL COMMENT '维修原因类型',")
builder.Append($"`{ColNamesEnum.RepairComment}` varchar(254) DEFAULT NULL COMMENT '维修人工注释',")
builder.Append($"`{ColNamesEnum.RepairDate}` datetime DEFAULT NULL COMMENT '维修产品日期',")
builder.Append($"`{ColNamesEnum.RepairResult}` bit(1) Not NULL DEFAULT 0 COMMENT '维修产品结果',")
builder.Append($"`{ColNamesEnum.ProductImg1}` varchar(64) DEFAULT NULL COMMENT '产品图像文件名1',")
builder.Append($"`{ColNamesEnum.ProductImg2}` varchar(64) DEFAULT NULL COMMENT '产品图像文件名2',")
builder.Append($"`{ColNamesEnum.ProductImg3}` varchar(64) DEFAULT NULL COMMENT '产品图像文件名3',")
builder.Append($"`{ColNamesEnum.ProductImg4}` varchar(64) DEFAULT NULL COMMENT '产品图像文件名4',")
builder.Append($"PRIMARY KEY (`{ColNamesEnum.ID}`) ")
builder.Append(")")
builder.Append("ENGINE=InnoDB AUTO_INCREMENT=1 DEFAULT CHARSET=utf8;")
Else
Throw New Exception($"{TableName}-Invalid db type :{dbType}")
End If
Return builder.ToString()
End Function
End Class
End NameSpace

View File

@@ -0,0 +1,161 @@
Imports System.Text
Imports UTS_Core.Database
Namespace UTSModule.DbTableModel.Customer
Public Class RepairLogTable
Enum ColNames
''' <summary>
''' 维修日志索引
''' </summary>
ID
''' <summary>
''' 维修产品索引
''' </summary>
ProductID
''' <summary>
''' 所属站位索引
''' </summary>
StationID
''' <summary>
''' 所属订单索引
''' </summary>
OrderID
''' <summary>
''' 维修所属测试日志索引
''' </summary>
TestLogID
''' <summary>
''' 维修产品条码
''' </summary>
DUT_SN
''' <summary>
''' 测试日志所属测试流程名称
''' </summary>
TestPlan
''' <summary>
''' 产品测试日志失败步骤名
''' </summary>
FailSteps
''' <summary>
''' 产品测试日志失败信息
''' </summary>
FailMsg
''' <summary>
''' 产品测试日志错误代码
''' </summary>
ErrCode
''' <summary>
''' 维修产品日期
''' </summary>
RepairDate
''' <summary>
''' 当条记录更新时间
''' </summary>
UpdateTime
''' <summary>
''' 维修原因类型
''' </summary>
RepairType
''' <summary>
''' 维修原因
''' </summary>
RepairReason
''' <summary>
''' 维修来源
''' </summary>
RepairSource
''' <summary>
''' 维修来源订单号
''' </summary>
DocuNumber
''' <summary>
''' 维修人工注释
''' </summary>
RepairComment
''' <summary>
''' 维修产品结果索引
''' </summary>
RepairResult
''' <summary>
''' 产品图像文件名1
''' </summary>
ProductImg1
''' <summary>
''' 产品图像文件名2
''' </summary>
ProductImg2
''' <summary>
''' 产品图像文件名3
''' </summary>
ProductImg3
''' <summary>
''' 产品图像文件名4
''' </summary>
ProductImg4
End Enum
Public Shared Property TableName() As String = "TBL_RepairLog"
''' <summary>
''' 建表语句
''' </summary>
''' <returns>建表语句</returns>
Public Shared Function CreateTableString(dbName As String, Optional dbType As DbExecutor.DbTypeEnum = DbExecutor.DbTypeEnum.Mysql) As String
Dim builder As New StringBuilder
If dbType = DbExecutor.DbTypeEnum.Mysql Then
builder.Append($"CREATE TABLE If Not Exists `{dbName}`.`{TableName}` ")
builder.Append("(")
builder.Append($"`{ColNames.ID}` int(11) NOT NULL AUTO_INCREMENT COMMENT '维修日志索引',")
builder.Append($"`{ColNames.ProductID}` int(11) Not NULL COMMENT '维修产品索引',")
builder.Append($"`{ColNames.StationID}` int(11) Not NULL COMMENT '站位索引',")
builder.Append($"`{ColNames.OrderID}` int(11) Not NULL COMMENT '订单索引',")
builder.Append($"`{ColNames.TestLogID}` int(11) Not NULL COMMENT '测试记录索引',")
builder.Append($"`{ColNames.DUT_SN}` varchar(64) NOT NULL COMMENT '维修产品条码',")
builder.Append($"`{ColNames.TestPlan}` varchar(64) DEFAULT NULL COMMENT '测试流程名称',")
builder.Append($"`{ColNames.FailSteps}` varchar(254) DEFAULT NULL COMMENT '错误步骤',")
builder.Append($"`{ColNames.FailMsg}` varchar(254) DEFAULT NULL COMMENT '错误提示信息',")
builder.Append($"`{ColNames.ErrCode}` varchar(32) DEFAULT NULL COMMENT '产品错误代码',")
builder.Append($"`{ColNames.RepairDate}` datetime NOT NULL DEFAULT current_timestamp() COMMENT '维修产品日期',")
builder.Append($"`{ColNames.UpdateTime}` datetime NOT NULL DEFAULT current_timestamp() COMMENT '更新时间',")
builder.Append($"`{ColNames.RepairType}` int(11) NOT NULL COMMENT '维修类型索引',")
builder.Append($"`{ColNames.RepairReason}` int(11) NOT NULL COMMENT '维修原因索引',")
builder.Append($"`{ColNames.RepairSource}` int(11) NOT NULL COMMENT '维修来源索引',")
builder.Append($"`{ColNames.DocuNumber}` varchar(64) DEFAULT NULL COMMENT '返修来源订单号',")
builder.Append($"`{ColNames.RepairComment}` varchar(254) DEFAULT NULL COMMENT '维修人工注释',")
builder.Append($"`{ColNames.RepairResult}` int(11) NOT NULL DEFAULT 0 COMMENT '维修产品结果',")
builder.Append($"`{ColNames.ProductImg1}` varchar(64) DEFAULT NULL COMMENT '产品图像文件名1',")
builder.Append($"`{ColNames.ProductImg2}` varchar(64) DEFAULT NULL COMMENT '产品图像文件名2',")
builder.Append($"`{ColNames.ProductImg3}` varchar(64) DEFAULT NULL COMMENT '产品图像文件名3',")
builder.Append($"`{ColNames.ProductImg4}` varchar(64) DEFAULT NULL COMMENT '产品图像文件名4',")
builder.Append($"PRIMARY KEY (`{ColNames.ID}`) ")
builder.Append(")")
builder.Append("ENGINE=InnoDB AUTO_INCREMENT=1 DEFAULT CHARSET=utf8;")
Else
Throw New Exception($"{TableName}-Invalid db type :{dbType}")
End If
Return builder.ToString()
End Function
End Class
End NameSpace

View File

@@ -0,0 +1,70 @@
Imports System.Text
Imports UTS_Core.Database
Namespace UTSModule.DbTableModel.Customer
''' <summary>
''' 维修原因类型表
''' </summary>
Public Class RepairReasonTable
Enum ColNames
''' <summary>
''' 索引
''' </summary>
ID
''' <summary>
''' 所属维修分类索引
''' </summary>
RepairType
''' <summary>
''' 名称
''' </summary>
Name
''' <summary>
''' 创建日期
''' </summary>
CreateTime
''' <summary>
''' 更新时间
''' </summary>
UpdateTime
''' <summary>
''' 备注
''' </summary>
Remark
End Enum
Public Shared Property TableName() As String = "TBL_RepairReason"
''' <summary>
''' 建表语句
''' </summary>
''' <returns>建表语句</returns>
Public Shared Function CreateTableString(dbName As String, Optional dbType As DbExecutor.DbTypeEnum = DbExecutor.DbTypeEnum.Mysql) As String
Dim builder As New StringBuilder
If dbType = DbExecutor.DbTypeEnum.Mysql Then
builder.Append($"CREATE TABLE If Not Exists `{dbName}`.`{TableName}` ")
builder.Append("(")
builder.Append($"`{ColNames.ID}` int(11) NOT NULL AUTO_INCREMENT COMMENT '维修类型索引',")
builder.Append($"`{ColNames.RepairType}` int(11) NOT NULL COMMENT '所属维修分类索引',")
builder.Append($"`{ColNames.Name}` varchar(254) NOT NULL COMMENT '名称',")
builder.Append($"`{ColNames.CreateTime}` datetime NOT NULL DEFAULT current_timestamp() COMMENT '创建时间',")
builder.Append($"`{ColNames.UpdateTime}` datetime NOT NULL DEFAULT current_timestamp() COMMENT '更新时间',")
builder.Append($"`{ColNames.Remark}` varchar(254) DEFAULT NULL COMMENT '备注',")
builder.Append($"PRIMARY KEY (`{ColNames.ID}`) ")
builder.Append(")")
builder.Append("ENGINE=InnoDB AUTO_INCREMENT=1 DEFAULT CHARSET=utf8;")
Else
Throw New Exception($"{TableName}-Invalid db type :{dbType}")
End If
Return builder.ToString()
End Function
End Class
End Namespace

View File

@@ -0,0 +1,130 @@
Imports System.Text
Imports UTS_Core.Database
Namespace UTSModule.DbTableModel.Customer
''' <summary>
''' 维修原因类型表
''' </summary>
Public Class RepairRequestTable
Enum ColNames
''' <summary>
''' 索引
''' </summary>
ID
''' <summary>
''' 报修人员
''' </summary>
UserID
''' <summary>
''' 报修单号
''' </summary>
RepairRequestNum
''' <summary>
''' 产品类型
''' </summary>
ProductID
''' <summary>
''' 产品条码
''' </summary>
Barcode
''' <summary>
''' 产品图像
''' </summary>
ProductImage
''' <summary>
''' 不良品来源
''' </summary>
RejectSource
''' <summary>
''' 不良代码
''' </summary>
RejectCode
''' <summary>
''' 不良说明
''' </summary>
RejectDesc
''' <summary>
''' 创建日期
''' </summary>
CreateTime
''' <summary>
''' 更新时间
''' </summary>
UpdateTime
''' <summary>
''' 维修进度
''' </summary>
RepairProgress
''' <summary>
''' 维修结果
''' </summary>
RepairResult
''' <summary>
''' 维修记录索引
''' </summary>
RepairLogID
''' <summary>
''' 维修人员
''' </summary>
Repairier
''' <summary>
''' 备注
''' </summary>
Remark
End Enum
Public Shared Property TableName() As String = "TBL_RepairRequest"
''' <summary>
''' 建表语句
''' </summary>
''' <returns>建表语句</returns>
Public Shared Function CreateTableString(dbName As String, Optional dbType As DbExecutor.DbTypeEnum = DbExecutor.DbTypeEnum.Mysql) As String
Dim builder As New StringBuilder
If dbType = DbExecutor.DbTypeEnum.Mysql Then
builder.Append($"CREATE TABLE If Not Exists `{dbName}`.`{TableName}` ")
builder.Append("(")
builder.Append($"`{ColNames.ID}` int(11) NOT NULL AUTO_INCREMENT COMMENT '维修类型索引',")
builder.Append($"`{ColNames.UserID}` int(11) NOT NULL COMMENT '报修人员',")
builder.Append($"`{ColNames.RepairRequestNum}` varchar(254) NOT NULL COMMENT '报修单号',")
builder.Append($"`{ColNames.ProductID}` int(11) NOT NULL COMMENT '产品类型',")
builder.Append($"`{ColNames.Barcode}` varchar(64) NOT NULL COMMENT '产品条码',")
builder.Append($"`{ColNames.ProductImage}` varchar(254) DEFAULT NULL COMMENT '产品图像',")
builder.Append($"`{ColNames.RejectSource}` varchar(254) DEFAULT NULL COMMENT '不良品来源',")
builder.Append($"`{ColNames.RejectCode}` varchar(254) DEFAULT NULL COMMENT '不良代码',")
builder.Append($"`{ColNames.RejectDesc}` varchar(254) DEFAULT NULL COMMENT '不良说明',")
builder.Append($"`{ColNames.CreateTime}` datetime NOT NULL DEFAULT current_timestamp() COMMENT '创建时间',")
builder.Append($"`{ColNames.UpdateTime}` datetime NOT NULL DEFAULT current_timestamp() COMMENT '更新时间',")
builder.Append($"`{ColNames.RepairProgress}` varchar(64) DEFAULT NULL COMMENT '维修进度',")
builder.Append($"`{ColNames.RepairResult}` int(11) DEFAULT NULL COMMENT '维修结果',")
builder.Append($"`{ColNames.RepairLogID}` int(11) DEFAULT NULL COMMENT '维修记录索引',")
builder.Append($"`{ColNames.Repairier}` int(11) DEFAULT NULL COMMENT '维修人员',")
builder.Append($"`{ColNames.Remark}` varchar(254) DEFAULT NULL COMMENT '备注',")
builder.Append($"PRIMARY KEY (`{ColNames.ID}`) ")
builder.Append(")")
builder.Append("ENGINE=InnoDB AUTO_INCREMENT=1 DEFAULT CHARSET=utf8;")
Else
Throw New Exception($"{TableName}-Invalid db type :{dbType}")
End If
Return builder.ToString()
End Function
End Class
End Namespace

View File

@@ -0,0 +1,63 @@
Imports System.Text
Imports UTS_Core.Database
Namespace UTSModule.DbTableModel.Customer
Public Class RepairResultTable
Enum ColNames
''' <summary>
''' 索引
''' </summary>
ID
''' <summary>
''' 维修结果名称
''' </summary>
Name
''' <summary>
''' 创建时间
''' </summary>
CreateTime
''' <summary>
''' 修改日期
''' </summary>
UpdateTime
''' <summary>
''' 备注
''' </summary>
Remark
End Enum
Public Shared Property TableName() As String = "TBL_RepairResults"
''' <summary>
''' 建表语句
''' </summary>
''' <returns>建表语句</returns>
Public Shared Function CreateTableString(dbName As String, Optional dbType As DbExecutor.DbTypeEnum = DbExecutor.DbTypeEnum.Mysql) As String
Dim builder As New StringBuilder
If dbType = DbExecutor.DbTypeEnum.Mysql Then
builder.Append($"CREATE TABLE If Not Exists `{dbName}`.`{TableName}` ")
builder.Append("(")
builder.Append($"`{ColNames.ID}` int(11) NOT NULL AUTO_INCREMENT COMMENT '维修结果索引',")
builder.Append($"`{ColNames.Name}` varchar(254) NOT NULL COMMENT '维修结果名称',")
builder.Append($"`{ColNames.CreateTime}` datetime NOT NULL DEFAULT current_timestamp() COMMENT '创建时间',")
builder.Append($"`{ColNames.UpdateTime}` datetime NOT NULL DEFAULT current_timestamp() COMMENT '更新时间',")
builder.Append($"`{ColNames.Remark}` varchar(254) DEFAULT NULL COMMENT '备注',")
builder.Append($"PRIMARY KEY (`{ColNames.ID}`) ")
builder.Append(")")
builder.Append("ENGINE=InnoDB AUTO_INCREMENT=1 DEFAULT CHARSET=utf8;")
Else
Throw New Exception($"{TableName}-Invalid db type :{dbType}")
End If
Return builder.ToString()
End Function
End Class
End Namespace

View File

@@ -0,0 +1,60 @@
Imports System.Text
Imports UTS_Core.Database
Namespace UTSModule.DbTableModel.Customer
Public Class RepairSourceTable
Enum ColNames
''' <summary>
''' 维修来源索引
''' </summary>
ID
''' <summary>
''' 维修来源名称
''' </summary>
Name
''' <summary>
''' 创建时间
''' </summary>
CreateTime
''' <summary>
''' 修改日期
''' </summary>
UpdateTime
''' <summary>
''' 备注
''' </summary>
Remark
End Enum
Public Shared Property TableName() As String = "TBL_RepairSource"
''' <summary>
''' 建表语句
''' </summary>
''' <returns>建表语句</returns>
Public Shared Function CreateTableString(dbName As String, Optional dbType As DbExecutor.DbTypeEnum = DbExecutor.DbTypeEnum.Mysql) As String
Dim builder As New StringBuilder
If dbType = DbExecutor.DbTypeEnum.Mysql Then
builder.Append($"CREATE TABLE If Not Exists `{dbName}`.`{TableName}` ")
builder.Append("(")
builder.Append($"`{ColNames.ID}` int(11) NOT NULL AUTO_INCREMENT COMMENT '维修来源索引',")
builder.Append($"`{ColNames.Name}` varchar(254) NOT NULL COMMENT '维修来源名称',")
builder.Append($"`{ColNames.CreateTime}` datetime NOT NULL DEFAULT current_timestamp() COMMENT '创建时间',")
builder.Append($"`{ColNames.UpdateTime}` datetime NOT NULL DEFAULT current_timestamp() COMMENT '更新时间',")
builder.Append($"`{ColNames.Remark}` varchar(254) DEFAULT NULL COMMENT '备注',")
builder.Append($"PRIMARY KEY (`{ColNames.ID}`) ")
builder.Append(")")
builder.Append("ENGINE=InnoDB AUTO_INCREMENT=1 DEFAULT CHARSET=utf8;")
Else
Throw New Exception($"{TableName}-Invalid db type :{dbType}")
End If
Return builder.ToString()
End Function
End Class
End Namespace

View File

@@ -0,0 +1,62 @@
Imports System.Text
Imports UTS_Core.Database
Namespace UTSModule.DbTableModel.Customer
''' <summary>
''' 维修原因类型表
''' </summary>
Public Class RepairTypesTable
Enum ColNames
''' <summary>
''' 维修类型索引
''' </summary>
ID
''' <summary>
''' 维修类型说明
''' </summary>
Name
''' <summary>
''' 创建时间
''' </summary>
CreateTime
''' <summary>
''' 修改日期
''' </summary>
UpdateTime
''' <summary>
''' 备注
''' </summary>
Remark
End Enum
Public Shared Property TableName() As String = "TBL_RepairTypes"
''' <summary>
''' 建表语句
''' </summary>
''' <returns>建表语句</returns>
Public Shared Function CreateTableString(dbName As String, Optional dbType As DbExecutor.DbTypeEnum = DbExecutor.DbTypeEnum.Mysql) As String
Dim builder As New StringBuilder
If dbType = DbExecutor.DbTypeEnum.Mysql Then
builder.Append($"CREATE TABLE If Not Exists `{dbName}`.`{TableName}` ")
builder.Append("(")
builder.Append($"`{ColNames.ID}` int(11) NOT NULL AUTO_INCREMENT COMMENT '维修类型索引',")
builder.Append($"`{ColNames.Name}` varchar(254) NOT NULL COMMENT '维修类型名称',")
builder.Append($"`{ColNames.CreateTime}` datetime NOT NULL DEFAULT current_timestamp() COMMENT '创建时间',")
builder.Append($"`{ColNames.UpdateTime}` datetime NOT NULL DEFAULT current_timestamp() COMMENT '更新时间',")
builder.Append($"`{ColNames.Remark}` varchar(254) DEFAULT NULL COMMENT '备注',")
builder.Append($"PRIMARY KEY (`{ColNames.ID}`) ")
builder.Append(")")
builder.Append("ENGINE=InnoDB AUTO_INCREMENT=1 DEFAULT CHARSET=utf8;")
Else
Throw New Exception($"{TableName}-Invalid db type :{dbType}")
End If
Return builder.ToString()
End Function
End Class
End Namespace

View File

@@ -0,0 +1,211 @@
Imports System.Text
Imports UTS_Core.Database
Namespace UTSModule.DbTableModel.Customer
Public Class SnListTable
Enum ColNames
''' <summary>
''' 索引
''' </summary>
ID
''' <summary>
''' 订单ID
''' </summary>
OrderID
''' <summary>
''' 内部单ID
''' </summary>
OrderInternalID
''' <summary>
''' 机型ID
''' </summary>
ProductID
''' <summary>
''' 条码
''' </summary>
BarCode
''' <summary>
''' 创建时间
''' </summary>
CreateTime
''' <summary>
''' 更新时间
''' </summary>
UpdateTime
''' <summary>
''' 条码生成类型
''' </summary>
SnType
''' <summary>
''' 参与组装条码
''' </summary>
AssemblySn
''' <summary>
''' 被组装的时间
''' </summary>
AssemblyTime
''' <summary>
''' 第1站测试时间
''' </summary>
S1
''' <summary>
''' 第2站测试时间
''' </summary>
S2
''' <summary>
''' 第3站测试时间
''' </summary>
S3
''' <summary>
''' 第4站测试时间
''' </summary>
S4
''' <summary>
''' 第5站测试时间
''' </summary>
S5
''' <summary>
''' 第6站测试时间
''' </summary>
S6
''' <summary>
''' 第7站测试时间
''' </summary>
S7
''' <summary>
''' 第8站测试时间
''' </summary>
S8
''' <summary>
''' 第9站测试时间
''' </summary>
S9
''' <summary>
''' 第10站测试时间
''' </summary>
S10
''' <summary>
''' 第11站测试时间
''' </summary>
S11
''' <summary>
''' 第12站测试时间
''' </summary>
S12
''' <summary>
''' 第1站测试结果
''' </summary>
Result1
''' <summary>
''' 第2站测试结果
''' </summary>
Result2
''' <summary>
''' 第3站测试结果
''' </summary>
Result3
''' <summary>
''' 第4站测试结果
''' </summary>
Result4
''' <summary>
''' 第5站测试结果
''' </summary>
Result5
''' <summary>
''' 第6站测试结果
''' </summary>
Result6
''' <summary>
''' 第7站测试结果
''' </summary>
Result7
''' <summary>
''' 第8站测试结果
''' </summary>
Result8
''' <summary>
''' 第9站测试结果
''' </summary>
Result9
''' <summary>
''' 第10站测试结果
''' </summary>
Result10
''' <summary>
''' 第11站测试结果
''' </summary>
Result11
''' <summary>
''' 第12站测试结果
''' </summary>
Result12
End Enum
Public Shared Property TableName() As String = "TBL_SnList"
''' <summary>
''' 建表语句
''' </summary>
''' <returns>建表语句</returns>
Public Shared Function CreateTableString(dbName As String, Optional dbType As DbExecutor.DbTypeEnum = DbExecutor.DbTypeEnum.Mysql) As String
Dim builder As New StringBuilder
If dbType = DbExecutor.DbTypeEnum.Mysql Then
builder.Append($"CREATE TABLE If Not Exists `{dbName}`.`{TableName}` ")
builder.Append("(")
builder.Append($"`{ColNames.ID}` int(11) NOT NULL AUTO_INCREMENT COMMENT 'ID',")
builder.Append($"`{ColNames.OrderID}` int(11) NOT NULL COMMENT '订单ID',")
builder.Append($"`{ColNames.OrderInternalID}` int(11) NOT NULL COMMENT '内部单ID',")
builder.Append($"`{ColNames.ProductID}` int(11) NOT NULL COMMENT '机型ID',")
builder.Append($"`{ColNames.BarCode}` varchar(64) NOT NULL COMMENT '机型ID',")
builder.Append($"`{ColNames.CreateTime}` datetime NOT NULL DEFAULT current_timestamp() COMMENT '创建时间',")
builder.Append($"`{ColNames.UpdateTime}` datetime NOT NULL DEFAULT current_timestamp() COMMENT '更新时间',")
builder.Append($"`{ColNames.SnType}` int(11) NOT NULL DEFAULT 1 COMMENT '条码生成类型',")
builder.Append($"`{ColNames.AssemblySn}` varchar(254) DEFAULT NULL COMMENT '被组装的条码集合',")
builder.Append($"`{ColNames.AssemblyTime}` datetime DEFAULT NULL COMMENT '被组装的时间',")
builder.Append($"`{ColNames.S1}` datetime DEFAULT NULL COMMENT '第1站测试时间',")
builder.Append($"`{ColNames.S2}` datetime DEFAULT NULL COMMENT '第2站测试时间',")
builder.Append($"`{ColNames.S3}` datetime DEFAULT NULL COMMENT '第3站测试时间',")
builder.Append($"`{ColNames.S4}` datetime DEFAULT NULL COMMENT '第4站测试时间',")
builder.Append($"`{ColNames.S5}` datetime DEFAULT NULL COMMENT '第5站测试时间',")
builder.Append($"`{ColNames.S6}` datetime DEFAULT NULL COMMENT '第6站测试时间',")
builder.Append($"`{ColNames.S7}` datetime DEFAULT NULL COMMENT '第7站测试时间',")
builder.Append($"`{ColNames.S8}` datetime DEFAULT NULL COMMENT '第8站测试时间',")
builder.Append($"`{ColNames.S9}` datetime DEFAULT NULL COMMENT '第9站测试时间',")
builder.Append($"`{ColNames.S10}` datetime DEFAULT NULL COMMENT '第10站测试时间',")
builder.Append($"`{ColNames.S11}` datetime DEFAULT NULL COMMENT '第11站测试时间',")
builder.Append($"`{ColNames.S12}` datetime DEFAULT NULL COMMENT '第12站测试时间',")
builder.Append($"`{ColNames.Result1}` tinyint(4) DEFAULT NULL COMMENT '第1站测试结果',")
builder.Append($"`{ColNames.Result2}` tinyint(4) DEFAULT NULL COMMENT '第2站测试结果',")
builder.Append($"`{ColNames.Result3}` tinyint(4) DEFAULT NULL COMMENT '第3站测试结果',")
builder.Append($"`{ColNames.Result4}` tinyint(4) DEFAULT NULL COMMENT '第4站测试结果',")
builder.Append($"`{ColNames.Result5}` tinyint(4) DEFAULT NULL COMMENT '第5站测试结果',")
builder.Append($"`{ColNames.Result6}` tinyint(4) DEFAULT NULL COMMENT '第6站测试结果',")
builder.Append($"`{ColNames.Result7}` tinyint(4) DEFAULT NULL COMMENT '第7站测试结果',")
builder.Append($"`{ColNames.Result8}` tinyint(4) DEFAULT NULL COMMENT '第8站测试结果',")
builder.Append($"`{ColNames.Result9}` tinyint(4) DEFAULT NULL COMMENT '第9站测试结果',")
builder.Append($"`{ColNames.Result10}` tinyint(4) DEFAULT NULL COMMENT '第10站测试结果',")
builder.Append($"`{ColNames.Result11}` tinyint(4) DEFAULT NULL COMMENT '第11站测试结果',")
builder.Append($"`{ColNames.Result12}` tinyint(4) DEFAULT NULL COMMENT '第12站测试结果',")
builder.Append($"PRIMARY KEY (`{ColNames.ID}`) ")
builder.Append(")")
builder.Append("ENGINE=InnoDB AUTO_INCREMENT=1 DEFAULT CHARSET=utf8;")
Else
Throw New Exception($"{TableName}-Invalid db type :{dbType}")
End If
Return builder.ToString()
End Function
End Class
End Namespace

View File

@@ -0,0 +1,61 @@
Namespace UTSModule.DbTableModel.Customer
''' <summary>
''' 产品需要索引客户订单号表
''' </summary>
Public Class SnRulesTable
Enum ColNamesEnum
''' <summary>
''' 索引,暂无作用
''' </summary>
ID
''' <summary>
''' 客户订单索引
''' </summary>
OrderID
''' <summary>
''' 内部订单号
''' </summary>
OrderInternalID
''' <summary>
''' 产品索引
''' </summary>
ProductID
''' <summary>
''' 工作站索引集合以,分割
''' </summary>
StationIDs
''' <summary>
''' 创建时间
''' </summary>
CreateTime
''' <summary>
''' SN前缀
''' </summary>
Sn_Prefix
''' <summary>
''' SN起始号
''' </summary>
Sn_Start
''' <summary>
''' SN结束号
''' </summary>
Sn_End
End Enum
Public Shared Property TableName() As String = "TBL_SnRules"
End Class
End NameSpace

View File

@@ -0,0 +1,134 @@
Imports System.Text
Imports UTS_Core.Database
Namespace UTSModule.DbTableModel.Customer
''' <summary>
''' 产品工艺站总表
''' </summary>
Public Class StationListTable
Enum ColNames
''' <summary>
''' 工艺站索引
''' </summary>
ID
''' <summary>
''' 项目索引
''' </summary>
ProjectID
''' <summary>
''' 工艺站名称
''' </summary>
StationName
''' <summary>
''' 工艺站类型
''' </summary>
StationType
''' <summary>
''' 工艺站序号,从1开始
''' </summary>
ArtworkOrder
''' <summary>
''' Sn总表序号
''' </summary>
SnListOrder
''' <summary>
''' 工艺站描述
''' </summary>
StationDesc
''' <summary>
''' 最后更新日期(重复字段等待删除)
''' </summary>
LastUpdateDate
''' <summary>
''' 修改日期
''' </summary>
UpdateTime
''' <summary>
''' 测试记录表名
''' </summary>
LogTableName
''' <summary>
''' 预览图片
''' </summary>
PreviewImage
''' <summary>
''' 备注
''' </summary>
Remark
''' <summary>
''' 最新测试包名
''' </summary>
PacketName
''' <summary>
''' 最新包MD5
''' </summary>
PacketMd5
''' <summary>
''' 当前站位是否有效
''' </summary>
Isvalid
''' <summary>
''' 站位条码生成规则1系统生成2客户录入
''' </summary>
SnType
''' <summary>
''' 编辑密码
''' </summary>
EditPwd
''' <summary>
''' 发布密码
''' </summary>
ReleasePwd
End Enum
Public Shared Property TableName() As String = "TBL_StationList"
''' <summary>
''' 建表语句
''' </summary>
''' <returns>建表语句</returns>
Public Shared Function CreateTableString(dbName As String, Optional dbType As DbExecutor.DbTypeEnum = DbExecutor.DbTypeEnum.Mysql) As String
Dim builder As New StringBuilder
If dbType = DbExecutor.DbTypeEnum.Mysql Then
builder.Append($"CREATE TABLE If Not Exists `{dbName}`.`{TableName}` ")
builder.Append("(")
builder.Append($"`{ColNames.ID}` int(11) NOT NULL AUTO_INCREMENT COMMENT '工艺站索引',")
builder.Append($"`{ColNames.ProjectID}` int(11) NOT NULL COMMENT '项目ID',")
builder.Append($"`{ColNames.StationName}` varchar(128) NOT NULL COMMENT '工艺站名',")
builder.Append($"`{ColNames.StationType}` varchar(128) NOT NULL COMMENT '工艺站类型',")
builder.Append($"`{ColNames.ArtworkOrder}` int(11) NOT NULL COMMENT '测试站位序号',")
builder.Append($"`{ColNames.SnListOrder}` int(11) NOT NULL COMMENT 'SN总表序号',")
builder.Append($"`{ColNames.StationDesc}` varchar(128) DEFAULT NULL COMMENT '站位描述',")
builder.Append($"`{ColNames.LastUpdateDate}` datetime DEFAULT NULL COMMENT '最后一次更新日期时间',")
builder.Append($"`{ColNames.UpdateTime}` datetime NOT NULL DEFAULT current_timestamp() COMMENT '更新时间',")
builder.Append($"`{ColNames.LogTableName}` varchar(128) DEFAULT NULL COMMENT '测试记录表名',")
builder.Append($"`{ColNames.PreviewImage}` mediumblob DEFAULT NULL COMMENT '预览图片',")
builder.Append($"`{ColNames.Remark}` varchar(128) DEFAULT NULL COMMENT ' 备注',")
builder.Append($"`{ColNames.PacketName}` varchar(128) DEFAULT NULL COMMENT '最新测试包名',")
builder.Append($"`{ColNames.PacketMd5}` varchar(32) DEFAULT NULL COMMENT '测试站包MD5值',")
builder.Append($"`{ColNames.Isvalid}` tinyint(4) not NULL DEFAULT 1 COMMENT '是否有效',")
builder.Append($"`{ColNames.SnType}` int(11) not NULL DEFAULT 1,")
builder.Append($"`{ColNames.EditPwd}` varchar(32) DEFAULT NULL COMMENT '编辑密码',")
builder.Append($"`{ColNames.ReleasePwd}` varchar(32) DEFAULT NULL COMMENT '发布密码',")
builder.Append($"PRIMARY KEY (`{ColNames.ID}`) ")
builder.Append(")")
builder.Append("ENGINE=InnoDB AUTO_INCREMENT=1 DEFAULT CHARSET=utf8;")
Else
Throw New Exception($"{TableName}-Invalid db type :{dbType}")
End If
Return builder.ToString()
End Function
End Class
End Namespace

View File

@@ -0,0 +1,132 @@

Imports System.Text
Imports UTS_Core.Database
Namespace UTSModule.DbTableModel.Customer
Public Class StationPacketReleaseLogTable
Enum ColNames
''' <summary>
''' 工艺站包索引
''' </summary>
ID
''' <summary>
''' 项目索引
''' </summary>
ProjectID
''' <summary>
''' 站位索引
''' </summary>
StationID
''' <summary>
''' 创建时间
''' </summary>
CreateTime
''' <summary>
''' 更新时间
''' </summary>
UpdateTime
''' <summary>
''' 当前包名
''' </summary>
PacketName
''' <summary>
''' 当前包MD5值
''' </summary>
PacketMd5
''' <summary>
''' 记录本版本更改内容
''' </summary>
Description
''' <summary>
''' 当前包是否有效
''' </summary>
IsValid
''' <summary>
''' 登录用户索引
''' </summary>
UserID
''' <summary>
''' 登录用户名称
''' </summary>
UserName
''' <summary>
''' 发布电脑的公网IP
''' </summary>
PublicIP
''' <summary>
''' 发布电脑用户名
''' </summary>
ComputerName
''' <summary>
''' 发布电脑的SID
''' </summary>
SID
''' <summary>
''' 备注
''' </summary>
Remark
End Enum
Public Shared Property TableName() As String = "TBL_TP_Release_Log"
''' <summary>
''' 建表语句
''' </summary>
''' <returns>建表语句</returns>
Public Shared Function CreateTableString(dbName As String, Optional dbType As DbExecutor.DbTypeEnum = DbExecutor.DbTypeEnum.Mysql) As String
Dim builder As New StringBuilder
If dbType = DbExecutor.DbTypeEnum.Mysql Then
builder.Append($"CREATE TABLE If Not Exists `{dbName}`.`{TableName}` ")
builder.Append("(")
builder.Append($"`{ColNames.ID}` int(11) NOT NULL AUTO_INCREMENT COMMENT '工艺站包索引',")
builder.Append($"`{ColNames.ProjectID}` int(11) NOT NULL COMMENT '项目ID',")
builder.Append($"`{ColNames.StationID}` int(11) NOT NULL COMMENT '站位索引',")
builder.Append($"`{ColNames.CreateTime}` datetime NOT NULL DEFAULT current_timestamp() COMMENT '创建时间',")
builder.Append($"`{ColNames.UpdateTime}` datetime NOT NULL DEFAULT current_timestamp() COMMENT '更新时间',")
builder.Append($"`{ColNames.Description}` text NOT NULL COMMENT '版本说明',")
builder.Append($"`{ColNames.Remark}` varchar(128) DEFAULT NULL COMMENT ' 备注',")
builder.Append($"`{ColNames.PacketName}` varchar(128) NOT NULL COMMENT '工艺站包包名',")
builder.Append($"`{ColNames.PacketMd5}` varchar(32) NOT NULL COMMENT '工艺站包MD5值',")
builder.Append($"`{ColNames.IsValid}` tinyint(4) NOT NULL DEFAULT 1 COMMENT '是否有效',")
builder.Append($"`{ColNames.UserID}` int(11) NOT NULL COMMENT '登录用户索引',")
builder.Append($"`{ColNames.UserName}` varchar(254) NOT NULL COMMENT '登录用户名称',")
builder.Append($"`{ColNames.PublicIP}` varchar(64) NOT NULL COMMENT '发布电脑的公网IP',")
builder.Append($"`{ColNames.ComputerName}` varchar(254) NOT NULL COMMENT '发布电脑用户名',")
builder.Append($"`{ColNames.SID}` varchar(64) NOT NULL COMMENT '发布电脑的SID',")
builder.Append($"PRIMARY KEY (`{ColNames.ID}`) ")
builder.Append(")")
builder.Append("ENGINE=InnoDB AUTO_INCREMENT=1 DEFAULT CHARSET=utf8;")
Else
Throw New Exception($"{TableName}-Invalid db type :{dbType}")
End If
Return builder.ToString()
End Function
End Class
End Namespace

View File

@@ -0,0 +1,212 @@
Imports System.Text
Imports UTS_Core.Database
Namespace UTSModule.DbTableModel.Customer
''' <summary>
''' 用户数据库同步总表
''' </summary>
Public Class SyncListTable
Enum ColNamesEnum
ID
''' <summary>
''' 需要同步的数据表名
''' </summary>
TableName
''' <summary>
''' 数据表版本编号
''' </summary>
RevisionID
''' <summary>
''' 最近同步的本地时间
''' </summary>
SyncTime
''' <summary>
''' 同步类型,如全表下载(all),或是增量下载new
''' </summary>
SyncType
''' <summary>
''' 同步时需要更新的数据列
''' </summary>
SyncCols
End Enum
Public Shared Property TableName() As String = "TBL_SyncList"
''' <summary>
''' 根据数据库类型,返回建表语句
''' </summary>
''' <param name="dbType">数据库类型</param>
''' <returns></returns>
Public Shared Function CreateTableString(dbType As DbExecutor.DbTypeEnum) As String
Dim createStr As New StringBuilder
Select Case dbType
Case DbExecutor.DbTypeEnum.Sqlite
createStr.Append($"Create Table If Not Exists `{TableName}`")
createStr.Append(" (")
createStr.Append($"`{ColNamesEnum.ID}` INTEGER PRIMARY KEY AUTOINCREMENT NOT NULL ,")
createStr.Append($"`{ColNamesEnum.TableName}` varchar(254) NOT NULL ,")
createStr.Append($"`{ColNamesEnum.RevisionID}` integer NOT NULL Default 0 ,")
createStr.Append($"`{ColNamesEnum.SyncTime}` dateTime NOT NULL DEFAULT '2000-01-01 00:00:00' ,")
createStr.Append($"`{ColNamesEnum.SyncType}` varchar(254) NOT NULL DEFAULT 'ALL' ,")
createStr.Append($"`{ColNamesEnum.SyncCols}` varchar(254) NOT NULL DEFAULT '*' ")
createStr.Append(" );")
Case DbExecutor.DbTypeEnum.Mysql
createStr.Append($"Create Table If Not Exists `{TableName}`")
createStr.Append(" (")
createStr.Append($"`{ColNamesEnum.ID}` int(11) Not NULL AUTO_INCREMENT,")
createStr.Append($"`{ColNamesEnum.TableName}` varchar(254) Not NULL COMMENT '需同步的表名',")
createStr.Append($"`{ColNamesEnum.RevisionID}` int(11) Not NULL DEFAULT 0 COMMENT '表版本编号',")
createStr.Append($"`{ColNamesEnum.SyncType}` varchar(254) NOT NULL DEFAULT 'ALL' COMMENT '同步类型',")
createStr.Append($"`{ColNamesEnum.SyncCols}` varchar(254) NOT NULL DEFAULT '*' COMMENT '同步列名',")
createStr.Append($"PRIMARY KEY (`ID`)")
createStr.Append(" );")
Case Else
Throw New Exception($"Invalid db type:{dbType}")
End Select
Return createStr.ToString()
End Function
Public Shared Function CreateTableString(dbName As String, Optional dbType As DbExecutor.DbTypeEnum = DbExecutor.DbTypeEnum.Mysql) As String
Dim createStr As New StringBuilder
Select Case dbType
Case DbExecutor.DbTypeEnum.Sqlite
createStr.Append($"Create Table If Not Exists `{TableName}`")
createStr.Append(" (")
createStr.Append($"`{ColNamesEnum.ID}` INTEGER PRIMARY KEY AUTOINCREMENT NOT NULL ,")
createStr.Append($"`{ColNamesEnum.TableName}` varchar(254) NOT NULL ,")
createStr.Append($"`{ColNamesEnum.RevisionID}` integer NOT NULL Default 0 ,")
createStr.Append($"`{ColNamesEnum.SyncTime}` dateTime NOT NULL DEFAULT '2000-01-01 00:00:00' ,")
createStr.Append($"`{ColNamesEnum.SyncType}` varchar(254) NOT NULL DEFAULT 'ALL' ,")
createStr.Append($"`{ColNamesEnum.SyncCols}` varchar(254) NOT NULL DEFAULT '*' ")
createStr.Append(" );")
Case DbExecutor.DbTypeEnum.Mysql
createStr.Append($"Create Table If Not Exists `{dbName}`.`{TableName}`")
createStr.Append(" (")
createStr.Append($"`{ColNamesEnum.ID}` int(11) Not NULL AUTO_INCREMENT,")
createStr.Append($"`{ColNamesEnum.TableName}` varchar(254) Not NULL COMMENT '需同步的表名',")
createStr.Append($"`{ColNamesEnum.RevisionID}` int(11) Not NULL DEFAULT 0 COMMENT '表版本编号',")
createStr.Append($"`{ColNamesEnum.SyncType}` varchar(254) NOT NULL DEFAULT 'ALL' COMMENT '同步类型',")
createStr.Append($"`{ColNamesEnum.SyncCols}` varchar(254) NOT NULL DEFAULT '*' COMMENT '同步列名',")
createStr.Append($"PRIMARY KEY (`ID`)")
createStr.Append(" );")
Case Else
Throw New Exception($"Invalid db type:{dbType}")
End Select
Return createStr.ToString()
End Function
Public Shared Function SyncTrigger(dbName As String, tbName As String) As String
Dim builder As New StringBuilder
builder.Append(DbAfterDeleteDataTrigger(dbName, tbName))
builder.Append(DbAfterInsertDataTrigger(dbName, tbName))
' builder.Append(DbAfterUpdateDataTrigger(dbName, tbName))
builder.Append(DbBeforUpdateDataTrigger(dbName, tbName))
Return builder.ToString()
End Function
''' <summary>
''' 添加需要同步的数据表名至同步表中
''' </summary>
''' <param name="dbName">数据库名</param>
''' <param name="tbName">需要同步的数据表名</param>
''' <param name="syncType">同步类型,all为全表下载,new为增量下载</param>
''' <param name="syncCols">同步时下载的字段,默认为*全字段下载</param>
''' <returns></returns>
Public Shared Function AddSyncTableString(dbName As String, tbName As String,Optional syncType As String = "all",Optional syncCols As String = "*") As String
Dim builder As New StringBuilder
builder.Append($"Delete from `{dbName}`.`{TableName}` where `{ColNamesEnum.TableName}` = '{tbName}';")
builder.Append($"Insert Into `{dbName}`.`{TableName}` (`{ColNamesEnum.TableName}`,`{ColNamesEnum.SyncType}`,`{ColNamesEnum.SyncCols}`) values ('{tbName}','{syncType}','{syncCols}');")
Return builder.ToString()
End Function
''' <summary>
''' 数据库连接涉及多库操作时,新增数据后更新触发器
''' </summary>
''' <param name="dbName">数据库名</param>
''' <param name="tbName">数据表名</param>
''' <returns></returns>
Public Shared Function DbAfterInsertDataTrigger(dbName As String, tbName As String) As String
Dim triggerString As New StringBuilder
triggerString.Append($"Create Trigger If Not Exists `{dbName}`.`{tbName}_AfterInsert` ")
triggerString.Append($"After Insert On `{dbName}`.`{tbName}` ")
triggerString.Append($"For Each Row ")
triggerString.Append($"Begin ")
triggerString.Append($"UPDATE `{dbName}`.`{TableName}` SET `{ColNamesEnum.RevisionID}` = (`{ColNamesEnum.RevisionID}` + 1) where `{ColNamesEnum.TableName}` = '{tbName}';")
triggerString.Append($"End;")
Return triggerString.ToString()
End Function
''' <summary>
''' 数据库连接涉及多库操作时,更新数据后更新触发器
''' </summary>
''' <param name="dbName">数据库名</param>
''' <param name="tbName">数据表名</param>
''' <returns></returns>
Public Shared Function DbAfterUpdateDataTrigger(dbName As String, tbName As String) As String
Dim triggerString As New StringBuilder
triggerString.Append($"Create Trigger If Not Exists `{dbName}`.`{tbName}_AfterUpdate` ")
triggerString.Append($"After Update On `{dbName}`.`{tbName}` ")
triggerString.Append($"For Each Row ")
triggerString.Append($"Begin ")
triggerString.Append($"Set NEW.UpdateTime = NOW();")
triggerString.Append($"UPDATE `{dbName}`.`{TableName}` SET `{ColNamesEnum.RevisionID}` = (`{ColNamesEnum.RevisionID}` + 1) where `{ColNamesEnum.TableName}` = '{tbName}';")
triggerString.Append($"End;")
Return triggerString.ToString()
End Function
''' <summary>
''' 数据库连接涉及多库操作时,更新数据后更新触发器
''' </summary>
''' <param name="dbName">数据库名</param>
''' <param name="tbName">数据表名</param>
''' <returns></returns>
Public Shared Function DbBeforUpdateDataTrigger(dbName As String, tbName As String) As String
Dim triggerString As New StringBuilder
triggerString.Append($"Create Trigger If Not Exists `{dbName}`.`{tbName}_BeforeUpdate` ")
triggerString.Append($"Before Update On `{dbName}`.`{tbName}` ")
triggerString.Append($"For Each Row ")
triggerString.Append($"Begin ")
triggerString.Append($"Set NEW.UpdateTime = NOW();")
triggerString.Append($"UPDATE `{dbName}`.`{TableName}` SET `{ColNamesEnum.RevisionID}` = (`{ColNamesEnum.RevisionID}` + 1) where `{ColNamesEnum.TableName}` = '{tbName}';")
triggerString.Append($"End;")
Return triggerString.ToString()
End Function
''' <summary>
''' 数据库连接涉及多库操作时,删除后更新触发器
''' </summary>
''' <param name="dbName">数据库名</param>
''' <param name="tbName">数据表名</param>
''' <returns></returns>
Public Shared Function DbAfterDeleteDataTrigger(dbName As String, tbName As String) As String
Dim triggerString As New StringBuilder
triggerString.Append($"Create Trigger If Not Exists `{dbName}`.`{tbName}_AfterDelete` ")
triggerString.Append($"After Delete On `{dbName}`.`{tbName}` ")
triggerString.Append($"For Each Row ")
triggerString.Append($"Begin ")
triggerString.Append($"UPDATE `{dbName}`.`{TableName}` SET `{ColNamesEnum.RevisionID}` = (`{ColNamesEnum.RevisionID}` + 1) where `{ColNamesEnum.TableName}` = '{tbName}';")
triggerString.Append($"End;")
Return triggerString.ToString()
End Function
End Class
End Namespace

View File

@@ -0,0 +1,146 @@
Imports System.Text
Imports UTS_Core.Database
Namespace UTSModule.DbTableModel.Customer
''' <summary>
''' 测试记录表,不同项目不同站表名不同
''' </summary>
Public Class TestLogTable
Enum ColNames
ID
''' <summary>
''' 用户唯一标识
''' </summary>
UserID
''' <summary>
''' 设备唯一索引
''' </summary>
ServiceID
''' <summary>
''' 生产线索引
''' </summary>
ProductionLineID
''' <summary>
''' 内部订单索引
''' </summary>
OrderID
''' <summary>
''' 应用程序名
''' </summary>
AppName
''' <summary>
''' 测试流程名
''' </summary>
TestPlan
''' <summary>
''' 产品SN唯一索引
''' </summary>
DUT_SN
''' <summary>
''' 测试起始时间
''' </summary>
StartTime
''' <summary>
''' 测试耗时
''' </summary>
UsedTime
''' <summary>
''' 测试结果
''' </summary>
TestResult
''' <summary>
''' 错误代码
''' </summary>
ErrCode
''' <summary>
''' 失败步骤集合
''' </summary>
FailSteps
''' <summary>
''' 失败步骤集合
''' </summary>
FailMsg
''' <summary>
''' 自定义字段,由实际使用中添加字段
''' </summary>
CustomFiled
End Enum
''' <summary>
''' 数据表名
''' </summary>
''' <param name="projectIndex">项目索引</param>
''' <param name="stationIndex">工艺站索引</param>
''' <returns></returns>
Public Shared Function TableName(projectIndex As Integer, stationIndex As Integer) As String
Return $"TBL_{projectIndex}_{stationIndex}_TestLog"
End Function
Public Shared ReadOnly CustomFiledType As String = $"varchar(16)"
''' <summary>
''' 建表语句
''' </summary>
''' <returns>建表语句</returns>
Public Shared Function CreateTableString(dbName As String, tableName As String, Optional dbType As DbExecutor.DbTypeEnum = DbExecutor.DbTypeEnum.Mysql) As String
Dim createStr As New StringBuilder
If dbType = DbExecutor.DbTypeEnum.Sqlite Then
createStr.Append($"Create Table If Not Exists `{tableName}`")
createStr.Append(" (")
createStr.Append($"`{ColNames.ID}` INTEGER PRIMARY KEY AUTOINCREMENT NOT NULL ,")
createStr.Append($"`{ColNames.UserID}` INTEGER,")
createStr.Append($"`{ColNames.ServiceID}` INTEGER,")
createStr.Append($"`{ColNames.AppName}` varchar(64) DEFAULT NULL,")
createStr.Append($"`{ColNames.TestPlan}` varchar(128) DEFAULT NULL,")
createStr.Append($"`{ColNames.DUT_SN}` varchar(32) DEFAULT NULL,")
createStr.Append($"`{ColNames.StartTime}` datetime DEFAULT NULL,")
createStr.Append($"`{ColNames.UsedTime}` double DEFAULT NULL,")
createStr.Append($"`{ColNames.TestResult}` int DEFAULT NULL,")
createStr.Append($"`{ColNames.ErrCode}` varchar(16) DEFAULT NULL,")
createStr.Append($"`{ColNames.FailSteps}` varchar(128) DEFAULT NULL,")
createStr.Append($"`{ColNames.ProductionLineID}` int DEFAULT NULL,")
createStr.Append($"`{ColNames.OrderID}` int DEFAULT NULL,")
createStr.Append($"`{ColNames.FailMsg}` varchar(254) DEFAULT NULL")
createStr.Append(" );")
ElseIf dbType = DbExecutor.DbTypeEnum.Mysql Then
createStr.Append($"Create Table If Not Exists `{dbName}`.`{tableName}`")
createStr.Append(" (")
createStr.Append($"`{ColNames.ID}` int(11) NOT NULL AUTO_INCREMENT ,")
createStr.Append($"`{ColNames.UserID}` int,")
createStr.Append($"`{ColNames.ServiceID}` int,")
createStr.Append($"`{ColNames.AppName}` varchar(64) DEFAULT NULL,")
createStr.Append($"`{ColNames.TestPlan}` varchar(128) DEFAULT NULL,")
createStr.Append($"`{ColNames.DUT_SN}` varchar(32) DEFAULT NULL,")
createStr.Append($"`{ColNames.StartTime}` datetime DEFAULT NULL,")
createStr.Append($"`{ColNames.UsedTime}` double DEFAULT NULL,")
createStr.Append($"`{ColNames.TestResult}` tinyint(1) DEFAULT NULL,")
createStr.Append($"`{ColNames.ErrCode}` varchar(16) DEFAULT NULL,")
createStr.Append($"`{ColNames.FailSteps}` varchar(128) DEFAULT NULL,")
createStr.Append($"`{ColNames.ProductionLineID}` int DEFAULT NULL,")
createStr.Append($"`{ColNames.OrderID}` int DEFAULT NULL,")
createStr.Append($"`{ColNames.FailMsg}` varchar(254) DEFAULT NULL,")
createStr.Append($"PRIMARY KEY (`{ColNames.ID}`)")
createStr.Append(" );")
Else
Throw New Exception($"Unknown Type{dbType}!")
End If
Return createStr.ToString()
End Function
End Class
End Namespace

View File

@@ -0,0 +1,54 @@
Imports System.Text
Imports UTS_Core.Database
Namespace UTSModule.DbTableModel.Customer
''' <summary>
''' 产商的客户总表
''' </summary>
Public Class VendorCustomerTable
Enum ColNames
ID
CustomerAbbr
CustomerName
CreateTime
''' <summary>
''' 修改日期
''' </summary>
UpdateTime
End Enum
Public Shared Property TableName() As String = "TBL_Customer"
''' <summary>
''' 建表语句
''' </summary>
''' <returns>建表语句</returns>
Public Shared Function CreateTableString(dbName As String, Optional dbType As DbExecutor.DbTypeEnum = DbExecutor.DbTypeEnum.Mysql) As String
Dim builder As New StringBuilder
If dbType = DbExecutor.DbTypeEnum.Mysql Then
builder.Append($"CREATE TABLE If Not Exists `{dbName}`.`{TableName}` ")
builder.Append("(")
builder.Append($"`{ColNames.ID}` int(11) NOT NULL AUTO_INCREMENT COMMENT 'ID',")
builder.Append($"`{ColNames.CustomerAbbr}` varchar(64) NOT NULL COMMENT '客户缩写',")
builder.Append($"`{ColNames.CustomerName}` varchar(64) NOT NULL DEFAULT '' COMMENT '客户名称',")
builder.Append($"`{ColNames.CreateTime}` datetime NOT NULL DEFAULT current_timestamp() COMMENT '创建时间',")
builder.Append($"`{ColNames.UpdateTime}` datetime NOT NULL DEFAULT current_timestamp() COMMENT '更新时间',")
builder.Append($"PRIMARY KEY (`{ColNames.ID}`) ")
builder.Append(")")
builder.Append("ENGINE=InnoDB AUTO_INCREMENT=1 DEFAULT CHARSET=utf8;")
Else
Throw New Exception($"{TableName}-Invalid db type :{dbType}")
End If
Return builder.ToString()
End Function
End Class
End NameSpace

View File

@@ -0,0 +1,59 @@
Imports System.Text
Namespace UTSModule.DbTableModel.LocalPrivate
''' <summary>
''' 本地未上传记录缓存表
''' </summary>
Public Class CacheTable
''' <summary>数据库操作记录表枚举值</summary>
Enum ColNamesEnum
''' <summary>序列号</summary>
ID
''' <summary>用户名</summary>
[Operator]
''' <summary>日期时间</summary>
DateTime
''' <summary>数据库语句</summary>
SqlCmd
''' <summary>是否已经同步到远程数据库</summary>
IsUpload
''' <summary>同步出错编码</summary>
ErrorCode
''' <summary>同步出错提示</summary>
ErrorMessage
''' <summary>备注</summary>
Remark
End Enum
Public Shared ReadOnly TableName As String = "TBL_Table_CaChe"
''' <summary>
''' Sqlite数据库建表语句
''' </summary>
''' <returns>建表语句</returns>
Public Shared Function CreateTableString() As String
Dim createStr As New StringBuilder
createStr.Append($"Create Table If Not Exists `{TableName}`")
createStr.Append(" (")
createStr.Append($"`{ColNamesEnum.ID}` INTEGER PRIMARY KEY AUTOINCREMENT NOT NULL ,")
createStr.Append($"`{ColNamesEnum.DateTime}` DateTime NOT NULL ,")
createStr.Append($"`{ColNamesEnum.Operator }` integer,")
createStr.Append($"`{ColNamesEnum.SqlCmd}` text NOT NULL ,")
createStr.Append($"`{ColNamesEnum.IsUpload }` bit NOT NULL ,")
createStr.Append($"`{ColNamesEnum.ErrorCode }` varchar(64) ,")
createStr.Append($"`{ColNamesEnum.ErrorMessage }` varchar(255) ,")
createStr.Append($"`{ColNamesEnum.Remark}` varchar(255)")
createStr.Append(" );")
Return createStr.ToString()
End Function
End Class
End Namespace

View File

@@ -0,0 +1,85 @@
Imports System.Text
Imports UTS_Core.Database
Namespace UTSModule.DbTableModel.Manage
Public Class AppListTable
Enum ColNamesEnum
''' <summary>
'''索引
''' </summary>
ID
''' <summary>
''' 数据服务索引
''' </summary>
ServiceID
''' <summary>
''' 软件名
''' </summary>
AppName
''' <summary>
''' 软件版本
''' </summary>
AppVersion
''' <summary>
''' 注册日期与时间
''' </summary>
RegisterDateTime
''' <summary>
''' 最后活动日期与时间
''' </summary>
LastActiveDateTime
''' <summary>
''' 最后活动信息
''' </summary>
LastInfomation
''' <summary>
''' 备注
''' </summary>
Remark
End Enum
Public Shared Property TableName() As String = "TBL_UTS_Manage_AppList"
Public Shared Function CreateTableString(dbName As String, Optional dbType As DbExecutor.DbTypeEnum = DbExecutor.DbTypeEnum.Mysql) As String
Dim createStr As New StringBuilder
If dbType = DbExecutor.DbTypeEnum.Sqlite Then
createStr.Append($"Create Table If Not Exists `{TableName}`")
createStr.Append(" (")
createStr.Append($"`{ColNamesEnum.ID}` INTEGER PRIMARY KEY AUTOINCREMENT NOT NULL ,")
createStr.Append($"`{ColNamesEnum.ServiceID}` int(11) DEFAULT NULL ,")
createStr.Append($"`{ColNamesEnum.AppName}` varchar(254) DEFAULT NULL ,")
createStr.Append($"`{ColNamesEnum.AppVersion}` varchar(64) DEFAULT NULL ,")
createStr.Append($"`{ColNamesEnum.LastInfomation}` varchar(254) DEFAULT NULL ,")
createStr.Append($"`{ColNamesEnum.RegisterDateTime}` DateTime DEFAULT NULL ,")
createStr.Append($"`{ColNamesEnum.LastActiveDateTime}` DateTime DEFAULT NULL ,")
createStr.Append($"`{ColNamesEnum.Remark}` text DEFAULT NULL ")
createStr.Append(" );")
ElseIf dbType = DbExecutor.DbTypeEnum.Mysql Then
createStr.Append($"Create Table If Not Exists `{dbName}`.`{TableName}`")
createStr.Append(" (")
createStr.Append($"`{ColNamesEnum.ID}` INTEGER PRIMARY KEY AUTOINCREMENT NOT NULL ,")
createStr.Append($"`{ColNamesEnum.ServiceID}` int(11) DEFAULT NULL ,")
createStr.Append($"`{ColNamesEnum.AppName}` varchar(254) DEFAULT NULL ,")
createStr.Append($"`{ColNamesEnum.AppVersion}` varchar(64) DEFAULT NULL ,")
createStr.Append($"`{ColNamesEnum.LastInfomation}` varchar(254) DEFAULT NULL ,")
createStr.Append($"`{ColNamesEnum.RegisterDateTime}` DateTime DEFAULT NULL ,")
createStr.Append($"`{ColNamesEnum.LastActiveDateTime}` DateTime DEFAULT NULL ,")
createStr.Append($"`{ColNamesEnum.Remark}` text DEFAULT NULL ,")
createStr.Append($"PRIMARY KEY (`{ColNamesEnum.ID}`)")
createStr.Append(" );")
Else
Throw New Exception($"Unknown Type{dbType}!")
End If
Return createStr.ToString()
End Function
End Class
End Namespace

View File

@@ -0,0 +1,106 @@
Imports System.Text
Imports UTS_Core.Database
Namespace UTSModule.DbTableModel.Manage
Public Class AppLogTable
Enum ColNamesEnum
''' <summary>
''' 索引
''' </summary>
ID
''' <summary>
''' 数据服务索引
''' </summary>
ServiceID
''' <summary>
''' 软件名称
''' </summary>
AppName
''' <summary>
''' App版本
''' </summary>
AppVersion
''' <summary>
''' 测试项目名
''' </summary>
ProjectName
''' <summary>
''' 测试站名
''' </summary>
StationName
''' <summary>
''' 测试流程名
''' </summary>
TestPlan
''' <summary>
''' 生成日期
''' </summary>
DateTime
''' <summary>
''' 日志类型
''' </summary>
LogType
''' <summary>
''' 日志内容
''' </summary>
LogText
End Enum
Public Shared Property TableName() As String = "TBL_UTS_Manage_AppLog"
''' <summary>
''' 建表语句
''' </summary>
''' <returns>建表语句</returns>
Public Shared Function CreateTableString(dbName As String, Optional dbType As DbExecutor.DbTypeEnum = DbExecutor.DbTypeEnum.Mysql) As String
Dim createStr As New StringBuilder
If dbType = DbExecutor.DbTypeEnum.Sqlite Then
createStr.Append($"Create Table If Not Exists `{TableName}`")
createStr.Append(" (")
createStr.Append($"`{ColNamesEnum.ID}` INTEGER PRIMARY KEY AUTOINCREMENT NOT NULL ,")
createStr.Append($"`{ColNamesEnum.ServiceID}` int(11) DEFAULT NULL ,")
createStr.Append($"`{ColNamesEnum.AppName}` varchar(254) DEFAULT NULL ,")
createStr.Append($"`{ColNamesEnum.AppVersion}` varchar(64) DEFAULT NULL ,")
createStr.Append($"`{ColNamesEnum.ProjectName}` varchar(64) DEFAULT NULL ,")
createStr.Append($"`{ColNamesEnum.StationName}` varchar(64) DEFAULT NULL ,")
createStr.Append($"`{ColNamesEnum.TestPlan}` varchar(254) DEFAULT NULL ,")
createStr.Append($"`{ColNamesEnum.DateTime}` DateTime DEFAULT NULL ,")
createStr.Append($"`{ColNamesEnum.LogType}` varchar(32) DEFAULT NULL ,")
createStr.Append($"`{ColNamesEnum.LogText}` text DEFAULT NULL ")
createStr.Append(" );")
ElseIf dbType = DbExecutor.DbTypeEnum.Mysql Then
createStr.Append($"Create Table If Not Exists `{dbName}`.`{TableName}`")
createStr.Append(" (")
createStr.Append($"`{ColNamesEnum.ID}` int(11) NOT NULL AUTO_INCREMENT ,")
createStr.Append($"`{ColNamesEnum.ServiceID}` int(11) DEFAULT NULL ,")
createStr.Append($"`{ColNamesEnum.AppName}` varchar(254) DEFAULT NULL ,")
createStr.Append($"`{ColNamesEnum.AppVersion}` varchar(64) DEFAULT NULL ,")
createStr.Append($"`{ColNamesEnum.ProjectName}` varchar(64) DEFAULT NULL ,")
createStr.Append($"`{ColNamesEnum.StationName}` varchar(64) DEFAULT NULL ,")
createStr.Append($"`{ColNamesEnum.TestPlan}` varchar(254) DEFAULT NULL ,")
createStr.Append($"`{ColNamesEnum.DateTime}` DateTime DEFAULT NULL ,")
createStr.Append($"`{ColNamesEnum.LogType}` varchar(32) DEFAULT NULL ,")
createStr.Append($"`{ColNamesEnum.LogText}` text DEFAULT NULL ,")
createStr.Append($"`{ColNamesEnum.ID}` int(11) NOT NULL AUTO_INCREMENT ,")
createStr.Append($"PRIMARY KEY (`{ColNamesEnum.ID}`)")
createStr.Append(" );")
Else
Throw New Exception($"Unknown Type{dbType}!")
End If
Return createStr.ToString()
End Function
End Class
End Namespace

View File

@@ -0,0 +1,32 @@
Namespace UTSModule.DbTableModel.Manage
''' <summary>
''' 客户总表
''' </summary>
Public Class CustomerListTable
Enum ColNamesEnum
''' <summary>
''' 客户唯一标识
''' </summary>
ID
''' <summary>
''' 客户公司名
''' </summary>
CustomerName
''' <summary>
''' 创建日期
''' </summary>
CreateTime
''' <summary>
''' 修改日期
''' </summary>
UpdateTime
End Enum
Public Shared Property TableName() As String = "TBL_UTS_Manage_Company"
End Class
End NameSpace

View File

@@ -0,0 +1,133 @@
Namespace UTSModule.DbTableModel.Manage
Public Class DataServiceListTable
Enum ColNames
''' <summary>
''' 服务索引唯一值
''' </summary>
ID
''' <summary>
''' 鉴权文件索引
''' </summary>
LicenseID
''' <summary>
''' 鉴权文件有效日期
''' </summary>
LicenseValidDateTime
''' <summary>
''' 公司名
''' </summary>
CompanyName
''' <summary>
''' 服务终端内核
''' </summary>
TerminalOS
''' <summary>
''' 服务终端类型
''' </summary>
TerminalType
''' <summary>
''' 服务终端名称
''' </summary>
TerminalName
''' <summary>
''' 服务自定义标识名称
''' </summary>
TerminalAlias
''' <summary>
''' 服务MAC地址
''' </summary>
TerminalMAC
''' <summary>
''' CPU序列号
''' </summary>
ProcessorId
''' <summary>
''' 服务版本
''' </summary>
ServiceVersion
''' <summary>
''' 服务注册日期
''' </summary>
ServiceRegisterDateTime
''' <summary>
'''服务最后活动日期
''' </summary>
ServiceLastActiveDateTime
''' <summary>
''' 服务是否有效,注册默认有效
''' </summary>
ServiceValid
''' <summary>
''' 数据服务在线
''' </summary>
IsOnline
''' <summary>
''' 数据服务在线时间
''' </summary>
ServiceOnlineDateTime
''' <summary>
''' 数据服务需要人工处理错误信息
''' </summary>
ErrMsg
''' <summary>
''' 更新服务版本
''' </summary>
USVer
''' <summary>
''' 更新服务是否在线
''' </summary>
USIsOnline
''' <summary>
''' 更新服务需要人工处理错误信息
''' </summary>
USErrMsg
''' <summary>
''' 子网名称
''' </summary>
BarnchNet
''' <summary>
''' 设备角色
''' </summary>
Roles
''' <summary>
''' 与子网服务连接状态
''' </summary>
IsDBProxyConn
''' <summary>
''' 缓存表数量
''' </summary>
CacheCount
''' <summary>
''' 网上邻居
''' </summary>
NetworkNeiborhood
End Enum
Public Shared Property TableName() As String = "TBL_UTS_Manage_DataServiceList"
End Class
End NameSpace

View File

@@ -0,0 +1,112 @@
Imports System.Text
Imports UTS_Core.Database
Namespace UTSModule.DbTableModel.Manage
Public Class DataServiceLogTable
Enum ColNames
''' <summary>
''' 索引
''' </summary>
ID
''' <summary>
''' 数据服务索引
''' </summary>
ServiceID
''' <summary>
''' 数据服务版本
''' </summary>
ServiceVersion
''' <summary>
''' 更新服务版本
''' </summary>
UpdateServiceVersion
''' <summary>
''' 厂商名称
''' </summary>
VendorName
''' <summary>
''' 生成日期与时间
''' </summary>
DateTime
''' <summary>
''' 公网IP
''' </summary>
PublicIp
''' <summary>
''' 私网IP
''' </summary>
PrivateIp
''' <summary>
''' Mac地址
''' </summary>
Mac
''' <summary>
''' 日志类型
''' </summary>
LogType
''' <summary>
''' 日志内容
''' </summary>
LogText
End Enum
Public Shared Property TableName() As String = "TBL_UTS_Manage_DataServiceLog"
''' <summary>
''' 建表语句
''' </summary>
''' <returns>建表语句</returns>
Public Shared Function CreateTableString(dbName As String, Optional dbType As DbExecutor.DbTypeEnum = DbExecutor.DbTypeEnum.Mysql) As String
Dim createStr As New StringBuilder
If dbType = DbExecutor.DbTypeEnum.Sqlite Then
createStr.Append($"Create Table If Not Exists `{TableName}`")
createStr.Append(" (")
createStr.Append($"`{ColNames.ID}` INTEGER PRIMARY KEY AUTOINCREMENT NOT NULL ,")
createStr.Append($"`{ColNames.ServiceID}` int(11) DEFAULT NULL ,")
createStr.Append($"`{ColNames.ServiceVersion}` varchar(64) DEFAULT NULL ,")
createStr.Append($"`{ColNames.UpdateServiceVersion}` varchar(64) DEFAULT NULL ,")
createStr.Append($"`{ColNames.VendorName}` varchar(254) DEFAULT NULL ,")
createStr.Append($"`{ColNames.PrivateIp}` varchar(64) DEFAULT NULL ,")
createStr.Append($"`{ColNames.PublicIp}` varchar(64) DEFAULT NULL ,")
createStr.Append($"`{ColNames.DateTime}` DateTime DEFAULT NULL ,")
createStr.Append($"`{ColNames.LogType}` varchar(32) DEFAULT NULL ,")
createStr.Append($"`{ColNames.LogText}` text DEFAULT NULL ")
createStr.Append(" );")
ElseIf dbType = DbExecutor.DbTypeEnum.Mysql Then
createStr.Append($"Create Table If Not Exists `{dbName}`.`{TableName}`")
createStr.Append(" (")
createStr.Append($"`{ColNames.ID}` int(11) NOT NULL AUTO_INCREMENT ,")
createStr.Append($"`{ColNames.ServiceID}` int(11) DEFAULT NULL ,")
createStr.Append($"`{ColNames.ServiceVersion}` varchar(64) DEFAULT NULL ,")
createStr.Append($"`{ColNames.UpdateServiceVersion}` varchar(64) DEFAULT NULL ,")
createStr.Append($"`{ColNames.VendorName}` varchar(254) DEFAULT NULL ,")
createStr.Append($"`{ColNames.PrivateIp}` varchar(64) DEFAULT NULL ,")
createStr.Append($"`{ColNames.PublicIp}` varchar(64) DEFAULT NULL ,")
createStr.Append($"`{ColNames.DateTime}` DateTime DEFAULT NULL ,")
createStr.Append($"`{ColNames.LogType}` varchar(32) DEFAULT NULL ,")
createStr.Append($"`{ColNames.LogText}` text DEFAULT NULL ,")
createStr.Append($"`{ColNames.ID}` int(11) NOT NULL AUTO_INCREMENT ,")
createStr.Append($"PRIMARY KEY (`{ColNames.ID}`)")
createStr.Append(" );")
Else
Throw New Exception($"Unknown Type{dbType}!")
End If
Return createStr.ToString()
End Function
End Class
End Namespace

View File

@@ -0,0 +1,39 @@
Namespace UTSModule.DbTableModel.Manage
''' <summary>
''' 数据库总表
''' </summary>
Public Class DbListTable
Enum ColNamesEnum
''' <summary>
''' 数据库唯一标识
''' </summary>
ID
''' <summary>
''' 所属公司索引
''' </summary>
CompanyID
''' <summary>
''' 数据库名
''' </summary>
DatabaseName
''' <summary>
''' 数据库用户名
''' </summary>
DatabaseUser
''' <summary>
''' 数据库密码
''' </summary>
DatabasePassword
''' <summary>
''' 数据库说明
''' </summary>
DatabaseDesc
''' <summary>
''' 修改日期
''' </summary>
UpdateTime
End Enum
Public Shared Property TableName() As String = "TBL_UTS_Manage_DBList"
End Class
End NameSpace

View File

@@ -0,0 +1,48 @@
Namespace UTSModule.DbTableModel.Manage
''' <summary>
''' 设备总表
''' </summary>
Public Class DevListTable
Enum ColNamesEnum
''' <summary>
''' 设备唯一索引
''' </summary>
ID
''' <summary>
''' 设备名称
''' </summary>
DevName
''' <summary>
''' 设备类型
''' </summary>
DevType
''' <summary>
''' 设备MAC地址
''' </summary>
MAC
''' <summary>
''' 首次登陆时间
''' </summary>
FirstLoginDate
''' <summary>
''' 末次在线时间
''' </summary>
LastOnlineDate
''' <summary>
''' 修改日期
''' </summary>
UpdateTime
''' <summary>
''' 设备在线状态
''' </summary>
OnlineStatus
''' <summary>
''' 是被是否有效
''' </summary>
Valid
End Enum
Public Shared Property TableName() As String = "TBL_UTS_Manage_DevList"
End Class
End NameSpace

View File

@@ -0,0 +1,52 @@
Namespace UTSModule.DbTableModel.Manage
''' <summary>
''' 设备日志总表
''' </summary>
Public Class DevLogTable
Enum ColNamesEnum
ID
''' <summary>
''' 设备唯一标识
''' </summary>
DevID
''' <summary>
''' 操作时间
''' </summary>
DateTime
''' <summary>
''' 公网IP
''' </summary>
Public_IP
''' <summary>
''' 内网IP
''' </summary>
Private_IP
''' <summary>
''' License文件名
''' </summary>
LicFileName
''' <summary>
''' 产生日志的APP名
''' </summary>
AppName
''' <summary>
''' App版本号
''' </summary>
AppVersion
''' <summary>
''' 测试配置文件名称
''' </summary>
TestPlan
''' <summary>
''' 用户唯一标识
''' </summary>
UserID
''' <summary>
''' 操作内容
''' </summary>
Operation
End Enum
Public Shared Property TableName() As String = "TBL_UTS_Manage_DevLog"
End Class
End NameSpace

View File

@@ -0,0 +1,28 @@
Namespace UTSModule.DbTableModel.Manage
''' <summary>
''' 错误代码总表
''' </summary>
Public Class ErrCodeTable
Enum ColNamesEnum
''' <summary>
''' 错误代码唯一标识
''' </summary>
ErrCode
''' <summary>
''' 错误提示信息
''' </summary>
ErrMsg
''' <summary>
''' 统计图中提示颜色
''' </summary>
ErrColor
''' <summary>
''' 修改日期
''' </summary>
UpdateTime
End Enum
Public Shared Property TableName() As String = "TBL_UTS_Manage_ErrCode"
End Class
End NameSpace

View File

@@ -0,0 +1,34 @@
Namespace UTSModule.DbTableModel.Manage
Public Class FtpUserTable
Enum ColNamesEnum
''' <summary>
'''索引
''' </summary>
ID
''' <summary>
''' 数据服务索引
''' </summary>
FtpService
''' <summary>
''' 软件名
''' </summary>
FtpPort
''' <summary>
''' 软件版本
''' </summary>
FtpUser
''' <summary>
''' 注册日期与时间
''' </summary>
FtpPassword
End Enum
Public Shared Property TableName() As String = "TBL_UTS_Manage_FtpList"
End Class
End NameSpace

View File

@@ -0,0 +1,33 @@
Namespace UTSModule.DbTableModel.Manage
Public Class LicenseListTable
Enum ColNamesEnum
''' <summary>
''' 索引
''' </summary>
ID
''' <summary>
''' 公司名称
''' </summary>
CompanyName
''' <summary>
''' 发布日期
''' </summary>
ReleaseDate
''' <summary>
''' 有效日期
''' </summary>
ValidDateTime
''' <summary>
''' 备注
''' </summary>
Remark
End Enum
Public Shared Property TableName() As String = "TBL_UTS_Manage_LicenseList"
End Class
End NameSpace

View File

@@ -0,0 +1,27 @@
Namespace UTSModule.DbTableModel.Manage
''' <summary>
''' 操作日志表,对公共库的操作记录
''' </summary>
Public Class LogTable
Enum ColNamesEnum
''' <summary>
''' 索引,无作用
''' </summary>
ID
''' <summary>
''' 用户唯一标识
''' </summary>
UserID
''' <summary>
''' 操作时间
''' </summary>
DateTime
''' <summary>
''' 具体操作内容
''' </summary>
Operation
End Enum
Public Shared Property TableName() As String = "TBL_UTS_Manage_Log"
End Class
End NameSpace

View File

@@ -0,0 +1,36 @@
Namespace UTSModule.DbTableModel.Manage
''' <summary>
''' 功能模块总表
''' </summary>
Public Class OperationListTable
Enum ColNamesEnum
''' <summary>
''' 功能模块唯一索引
''' </summary>
ID
''' <summary>
''' 功能模块名称
''' </summary>
OperationName
''' <summary>
''' 功能模块详细说明
''' </summary>
OperationDesc
''' <summary>
''' 操作级别,读为0,写为1
''' </summary>
OperationLevel
''' <summary>
''' 修改日期
''' </summary>
UpdateTime
End Enum
Public Shared Property TableName() As String = "TBL_UTS_Manage_OperationList"
End Class
End Namespace

View File

@@ -0,0 +1,11 @@
Namespace UTSModule.DbTableModel.Manage
Public Class OrderStatusTable
Enum ColNames
ID
StatusName
Remark
End Enum
Public Shared Property TableName() As String = "TBL_UTS_Manage_OrderStatus"
End Class
End Namespace

View File

@@ -0,0 +1,107 @@
Imports System.Text
Imports UTS_Core.Database
Namespace UTSModule.DbTableModel.Manage
Public Class ServiceLogTable
''' <summary>数据库操作记录表枚举值</summary>
Enum ColNamesEnum
''' <summary>日志索引</summary>
ID
''' <summary>厂商名称</summary>
CompanyName
''' <summary>应用名称</summary>
AppName
''' <summary>应用版本</summary>
AppVersion
''' <summary>日志生成日期与时间</summary>
DateTime
''' <summary>设备公网IP</summary>
DevPublicIP
''' <summary>设备内网IP地址</summary>
DevPrivateIP
''' <summary>设备MAC</summary>
DevMac
''' <summary>设备系统版本</summary>
DevOS
''' <summary>设备名称</summary>
DevName
''' <summary>设备用户名</summary>
DevUserName
''' <summary>设备网络状态</summary>
DevOnline
''' <summary>日志类型</summary>
LogType
''' <summary>日志内容</summary>
LogText
End Enum
Public Shared ReadOnly TableName As String = "TBL_UTS_Manage_ServiceLog"
''' <summary>
''' Sqlite数据库建表语句
''' </summary>
''' <returns>建表语句</returns>
Public Shared Function CreateTableString(Optional dbType As DbExecutor.DbTypeEnum = DbExecutor.DbTypeEnum.Mysql) As String
Dim createStr As New StringBuilder
If dbType = DbExecutor.DbTypeEnum.Mysql Then
createStr.Append($"Create Table If Not Exists `{TableName}`")
createStr.Append(" (")
createStr.Append($"`{ColNamesEnum.ID}` NOT NULL AUTO_INCREMENT ,")
createStr.Append($"`{ColNamesEnum.CompanyName}` varchar(254),")
createStr.Append($"`{ColNamesEnum.AppName}` varchar(254),")
createStr.Append($"`{ColNamesEnum.AppVersion}` varchar(254),")
createStr.Append($"`{ColNamesEnum.DateTime}` DateTime NOT NULL ,")
createStr.Append($"`{ColNamesEnum.DevPublicIP}` varchar(254),")
createStr.Append($"`{ColNamesEnum.DevPrivateIP}` varchar(254),")
createStr.Append($"`{ColNamesEnum.DevMac}` varchar(254),")
createStr.Append($"`{ColNamesEnum.DevOS}` varchar(254),")
createStr.Append($"`{ColNamesEnum.DevName}` varchar(254),")
createStr.Append($"`{ColNamesEnum.DevUserName}` varchar(254),")
createStr.Append($"`{ColNamesEnum.DevOnline}` varchar(254),")
createStr.Append($"`{ColNamesEnum.LogType}` varchar(254),")
createStr.Append($"`{ColNamesEnum.LogText}` text,")
createStr.Append($"PRIMARY KEY (`ID`)")
createStr.Append(" );")
ElseIf dbType = DbExecutor.DbTypeEnum.Sqlite Then
createStr.Append($"Create Table If Not Exists `{TableName}`")
createStr.Append(" (")
createStr.Append($"`{ColNamesEnum.ID}` INTEGER PRIMARY KEY AUTOINCREMENT NOT NULL ,")
createStr.Append($"`{ColNamesEnum.CompanyName}` varchar(254),")
createStr.Append($"`{ColNamesEnum.AppName}` varchar(254),")
createStr.Append($"`{ColNamesEnum.AppVersion}` varchar(254),")
createStr.Append($"`{ColNamesEnum.DateTime}` DateTime NOT NULL ,")
createStr.Append($"`{ColNamesEnum.DevPublicIP}` varchar(254),")
createStr.Append($"`{ColNamesEnum.DevPrivateIP}` varchar(254),")
createStr.Append($"`{ColNamesEnum.DevMac}` varchar(254),")
createStr.Append($"`{ColNamesEnum.DevOS}` varchar(254),")
createStr.Append($"`{ColNamesEnum.DevName}` varchar(254),")
createStr.Append($"`{ColNamesEnum.DevUserName}` varchar(254),")
createStr.Append($"`{ColNamesEnum.DevOnline}` varchar(254),")
createStr.Append($"`{ColNamesEnum.LogType}` varchar(254),")
createStr.Append($"`{ColNamesEnum.LogText}` text")
createStr.Append(" );")
End If
Return createStr.ToString()
End Function
End Class
End Namespace

View File

@@ -0,0 +1,33 @@
Namespace UTSModule.DbTableModel.Manage
Public Class SwReleaseLogTable
Enum ColNamesEnum
''' <summary>
''' 应用程序索引
''' </summary>
ID
''' <summary>
''' 应用程序名
''' </summary>
SoftwareName
''' <summary>
''' 发布版本号
''' </summary>
ReleaseVersion
''' <summary>
''' 发布日期
''' </summary>
ReleaseDate
''' <summary>
''' 发布用户索引
''' </summary>
UserID
''' <summary>
''' 发布说明
''' </summary>
Remark
End Enum
End Class
End NameSpace

View File

@@ -0,0 +1,40 @@
Namespace UTSModule.DbTableModel.Manage
''' <summary>
''' 程序更新软件表
''' </summary>
Public Class SwUpdateTable
Enum ColNamesEnum
''' <summary>
''' 应用程序索引
''' </summary>
ID
''' <summary>
''' 应用程序名
''' </summary>
SoftwareName
''' <summary>
''' 最新版本号
''' </summary>
LastVersion
''' <summary>
''' 发布日期
''' </summary>
ReleaseDate
''' <summary>
''' 二进制文件
''' </summary>
BinPackage
''' <summary>
''' MD5校验码
''' </summary>
BinPackageMd5
''' <summary>
''' FTP包名
''' </summary>
PackageName
End Enum
Public Shared Property TableName() As String = "TBL_UTS_Manage_SwUpdate"
End Class
End Namespace

View File

@@ -0,0 +1,54 @@
Imports System.Text
Imports UTS_Core.Database
Namespace UTSModule.DbTableModel.Manage
''' <summary>
''' 需要同步下载表名总表
''' </summary>
Public Class SyncListTable
Enum ColNamesEnum
ID
''' <summary>
''' 表名
''' </summary>
TableName
''' <summary>
''' 表版本编号
''' </summary>
RevisionID
''' <summary>
''' 同步类型
''' </summary>
SyncType
End Enum
Public Shared Property TableName() As String = "TBL_UTS_Manage_SyncList"
''' <summary>
''' 根据数据库类型,返回建表语句
''' </summary>
''' <param name="type">数据库类型</param>
''' <returns></returns>
Public Shared Function CreateString(type As DbExecutor.DbTypeEnum) As String
Dim createStr As New StringBuilder
Select Case type
Case DbExecutor.DbTypeEnum.Sqlite
createStr.Append($"Create Table If Not Exists {TableName}")
createStr.Append(" (")
createStr.Append($"{Customer.SyncListTable.ColNamesEnum.ID} INTEGER PRIMARY KEY AUTOINCREMENT NOT NULL ,")
createStr.Append($"{Customer.SyncListTable.ColNamesEnum.TableName} varchar(254) NOT NULL ,")
createStr.Append($"{Customer.SyncListTable.ColNamesEnum.RevisionID} integer NOT NULL ,")
createStr.Append($"{Customer.SyncListTable.ColNamesEnum.SyncType} varchar(254)")
createStr.Append(" );")
Case DbExecutor.DbTypeEnum.Mysql
Case Else
End Select
Return createStr.ToString()
End Function
End Class
End Namespace

View File

@@ -0,0 +1,32 @@
Namespace UTSModule.DbTableModel.Manage
''' <summary>
''' 测试计划编辑信息提示
''' </summary>
Public Class TestPlanTipsTable
Enum ColNamesEnum
ID
''' <summary>
''' 列名
''' </summary>
ColName
''' <summary>
''' 列类型
''' </summary>
ColType
''' <summary>
''' 列描述
''' </summary>
ColDesc
''' <summary>
''' 列默认值
''' </summary>
ColValue
''' <summary>
''' 修改日期
''' </summary>
UpdateTime
End Enum
Public Shared Property TableName() As String = "TBL_UTS_Manage_TestPlanTips"
End Class
End NameSpace

View File

@@ -0,0 +1,52 @@
Namespace UTSModule.DbTableModel.Manage
''' <summary>
''' 用户总表
''' </summary>
Public Class UserListTable
Enum ColNamesEnum
''' <summary>
''' 用户ID唯一索引
''' </summary>
ID
''' <summary>
''' 用户登陆账号
''' </summary>
UserName
''' <summary>
''' 用户密码
''' </summary>
Password
''' <summary>
''' 公司索引ID
''' </summary>
CompanyID
''' <summary>
''' 创建日期
''' </summary>
CreateTime
''' <summary>
''' 修改日期
''' </summary>
UpdateTime
''' <summary>
''' 手机号码
''' </summary>
Mobile
''' <summary>
''' 微信号
''' </summary>
WeiXin
''' <summary>
''' 邮箱地址
''' </summary>
Email
''' <summary>
''' 是否有效
''' </summary>
IsValid
End Enum
Public Shared Property TableName() As String = "TBL_UTS_Manage_User"
End Class
End NameSpace

View File

@@ -0,0 +1,32 @@
Namespace UTSModule.DbTableModel.Manage
''' <summary>
''' 用户操作功能权限总表
''' </summary>
Public Class UserOperationAuthTable
Enum ColNamesEnum
ID
''' <summary>
''' 用户唯一标识
''' </summary>
UserID
''' <summary>
''' 数据库唯一标识
''' </summary>
DatabaseID
''' <summary>
''' 拥有完整权限的功能唯一标识,用,分割
''' </summary>
FullAccess
''' <summary>
''' 拥有读写权限的功能唯一标识,用,分割
''' </summary>
ReadWriteAccess
''' <summary>
''' 拥有只读权限的功能唯一标识,用,分割
''' </summary>
ReadOnlyAccess
End Enum
Public Shared Property TableName() As String = "TBL_UTS_Manage_UserAuth_Operation"
End Class
End NameSpace

View File

@@ -0,0 +1,122 @@
Imports System.Text
Namespace UTSModule.DbTableModel.Manage
''' <summary>
''' 用户测试命令总表
''' </summary>
Public Class UtsCmdListTable
Enum ColNamesEnum
ID
CmdType
CmdName
CmdDesc
''' <summary>
''' 修改日期
''' </summary>
UpdateTime
ParamCount
ParamDesc1
ParamType1
ParamLower1
ParamUpper1
ParamValue1
ParamDesc2
ParamType2
ParamLower2
ParamUpper2
ParamValue2
ParamDesc3
ParamType3
ParamLower3
ParamUpper3
ParamValue3
ParamDesc4
ParamType4
ParamLower4
ParamUpper4
ParamValue4
ParamDesc5
ParamType5
ParamLower5
ParamUpper5
ParamValue5
ParamDesc6
ParamType6
ParamLower6
ParamUpper6
ParamValue6
End Enum
Shared ReadOnly Property TableName() As String = "TBL_UTS_Manage_UtsCmdList"
''' <summary>
''' 建表语句
''' </summary>
''' <returns>建表语句</returns>
Public Shared Function CreateTableString() As String
Dim createStr As New StringBuilder
createStr.Append($"Create Table If Not Exists `{TableName}`")
createStr.Append(" (")
createStr.Append($"`{ColNamesEnum.ID}` int(11) NOT NULL AUTO_INCREMENT,")
createStr.Append($"`{ColNamesEnum.CmdType}` varchar(254) NOT NULL,")
createStr.Append($"`{ColNamesEnum.CmdName}` varchar(254) NOT NULL,")
createStr.Append($"`{ColNamesEnum.CmdDesc}` varchar(254) DEFAULT NULL,")
' createStr.Append($"{ColNamesEnum.ParamName1} varchar(64) DEFAULT NULL,")
createStr.Append($"`{ColNamesEnum.ParamDesc1}` varchar(254) DEFAULT NULL,")
createStr.Append($"`{ColNamesEnum.ParamType1}` varchar(254) DEFAULT NULL,")
createStr.Append($"`{ColNamesEnum.ParamLower1}` varchar(254) DEFAULT NULL,")
createStr.Append($"`{ColNamesEnum.ParamUpper1}` varchar(254) DEFAULT NULL,")
createStr.Append($"`{ColNamesEnum.ParamValue1}` varchar(254) DEFAULT NULL,")
' createStr.Append($"{ColNamesEnum.ParamName2} varchar(64) DEFAULT NULL,")
createStr.Append($"`{ColNamesEnum.ParamDesc2}` varchar(254) DEFAULT NULL,")
createStr.Append($"`{ColNamesEnum.ParamType2}` varchar(254) DEFAULT NULL,")
createStr.Append($"`{ColNamesEnum.ParamLower2}` varchar(254) DEFAULT NULL,")
createStr.Append($"`{ColNamesEnum.ParamUpper2}` varchar(254) DEFAULT NULL,")
createStr.Append($"`{ColNamesEnum.ParamValue2}` varchar(254) DEFAULT NULL,")
' createStr.Append($"{ColNamesEnum.ParamName3} varchar(64) DEFAULT NULL,")
createStr.Append($"`{ColNamesEnum.ParamDesc3}` varchar(254) DEFAULT NULL,")
createStr.Append($"`{ColNamesEnum.ParamType3}` varchar(254) DEFAULT NULL,")
createStr.Append($"`{ColNamesEnum.ParamLower3}` varchar(254) DEFAULT NULL,")
createStr.Append($"`{ColNamesEnum.ParamUpper3}` varchar(254) DEFAULT NULL,")
createStr.Append($"`{ColNamesEnum.ParamValue3}` varchar(254) DEFAULT NULL,")
' createStr.Append($"{ColNamesEnum.ParamName4} varchar(64) DEFAULT NULL,")
createStr.Append($"`{ColNamesEnum.ParamDesc4}` varchar(254) DEFAULT NULL,")
createStr.Append($"`{ColNamesEnum.ParamType4}` varchar(254) DEFAULT NULL,")
createStr.Append($"`{ColNamesEnum.ParamLower4}` varchar(254) DEFAULT NULL,")
createStr.Append($"`{ColNamesEnum.ParamUpper4}` varchar(254) DEFAULT NULL,")
createStr.Append($"`{ColNamesEnum.ParamValue4}` varchar(254) DEFAULT NULL,")
' createStr.Append($"{ColNamesEnum.ParamName5} varchar(64) DEFAULT NULL,")
createStr.Append($"`{ColNamesEnum.ParamDesc5}` varchar(254) DEFAULT NULL,")
createStr.Append($"`{ColNamesEnum.ParamType5}` varchar(254) DEFAULT NULL,")
createStr.Append($"`{ColNamesEnum.ParamLower5}` varchar(254) DEFAULT NULL,")
createStr.Append($"`{ColNamesEnum.ParamUpper5}` varchar(254) DEFAULT NULL,")
createStr.Append($"`{ColNamesEnum.ParamValue5}` varchar(254) DEFAULT NULL,")
' createStr.Append($"{ColNamesEnum.ParamName6} varchar(64) DEFAULT NULL,")
createStr.Append($"`{ColNamesEnum.ParamDesc6}` varchar(254) DEFAULT NULL,")
createStr.Append($"`{ColNamesEnum.ParamType6}` varchar(254) DEFAULT NULL,")
createStr.Append($"`{ColNamesEnum.ParamLower6}` varchar(254) DEFAULT NULL,")
createStr.Append($"`{ColNamesEnum.ParamUpper6}` varchar(254) DEFAULT NULL,")
createStr.Append($"`{ColNamesEnum.ParamValue6}` varchar(254) DEFAULT NULL,")
createStr.Append($"PRIMARY KEY (`{ColNamesEnum.ID}`)")
createStr.Append(" );")
Return createStr.ToString()
End Function
End Class
End Namespace

View File

@@ -0,0 +1,9 @@
Imports UTS_Core.Database.DbExecutor
Namespace UTSModule.DbTableModel
MustInherit Class UtsDataTable
Public Property TableName() As String
MustOverride Function CreateTableString(Optional dbName As String = "",Optional type As DbTypeEnum = DbTypeEnum.Mysql) As String
End Class
End Namespace