第一次提交至Git

This commit is contained in:
2024-03-11 16:32:52 +08:00
commit 3f6c4d62b9
2865 changed files with 2172317 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,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