ModuleMaster/app_code/catv.designer.vb - main - ivan/ModMas

ModuleMaster/app_code/catv.designer.vb
679 строк16 KB
i.krivokon
Initial commit
13 мар 2026, 13:49
13 мар 2026, 13:4900d9fb6
'------------------------------------------------------------------------------
' <auto-generated>
'     This code was generated by a tool.
'     Runtime Version:4.0.30319.42000
'
'     Changes to this file may cause incorrect behavior and will be lost if
'     the code is regenerated.
' </auto-generated>
'------------------------------------------------------------------------------

Option Strict On
Option Explicit On

Imports System
Imports System.Collections.Generic
Imports System.ComponentModel
Imports System.Data
Imports System.Data.Linq
Imports System.Data.Linq.Mapping
Imports System.Linq
Imports System.Linq.Expressions
Imports System.Reflection


<Global.System.Data.Linq.Mapping.DatabaseAttribute(Name:="CATV")>  _
Partial Public Class catvDataContext
	Inherits System.Data.Linq.DataContext
	
	Private Shared mappingSource As System.Data.Linq.Mapping.MappingSource = New AttributeMappingSource()
	
  #Region "Extensibility Method Definitions"
  Partial Private Sub OnCreated()
  End Sub
  #End Region
	
	Public Sub New()
		MyBase.New(Global.System.Configuration.ConfigurationManager.ConnectionStrings("CATVConnectionString").ConnectionString, mappingSource)
		OnCreated
	End Sub
	
	Public Sub New(ByVal connection As String)
		MyBase.New(connection, mappingSource)
		OnCreated
	End Sub
	
	Public Sub New(ByVal connection As System.Data.IDbConnection)
		MyBase.New(connection, mappingSource)
		OnCreated
	End Sub
	
	Public Sub New(ByVal connection As String, ByVal mappingSource As System.Data.Linq.Mapping.MappingSource)
		MyBase.New(connection, mappingSource)
		OnCreated
	End Sub
	
	Public Sub New(ByVal connection As System.Data.IDbConnection, ByVal mappingSource As System.Data.Linq.Mapping.MappingSource)
		MyBase.New(connection, mappingSource)
		OnCreated
	End Sub
	
	Public ReadOnly Property TB_COM_MAIN_LINEs() As System.Data.Linq.Table(Of TB_COM_MAIN_LINE)
		Get
			Return Me.GetTable(Of TB_COM_MAIN_LINE)
		End Get
	End Property
	
	Public ReadOnly Property TB_CATV_MAIN_LINE_DETAILs() As System.Data.Linq.Table(Of TB_CATV_MAIN_LINE_DETAIL)
		Get
			Return Me.GetTable(Of TB_CATV_MAIN_LINE_DETAIL)
		End Get
	End Property
	
	Public ReadOnly Property TB_CATV_WORKING_STATUS_MAINs() As System.Data.Linq.Table(Of TB_CATV_WORKING_STATUS_MAIN)
		Get
			Return Me.GetTable(Of TB_CATV_WORKING_STATUS_MAIN)
		End Get
	End Property
End Class

<Global.System.Data.Linq.Mapping.TableAttribute(Name:="dbo.TB_COM_MAIN_LINE")>  _
Partial Public Class TB_COM_MAIN_LINE
	
	Private _TYPE As String
	
	Private _LINE As String
	
	Private _SECT As String
	
	Private _SHOP_CODE As String
	
	Private _PLAN As String
	
	Private _TARGET As String
	
	Private _PROD As String
	
	Private _DIF As String
	
	Private _PDR As String
	
	Private _ON_TIME_RATIO As String
	
	Private _STUFFING As String
	
	Private _BALANCE As String
	
	Private _EPASS_RATE As String
	
	Private _UPP As String
	
	Private _MP As String
	
	Private _UPDATED As Date
	
	Public Sub New()
		MyBase.New
	End Sub
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_TYPE", DbType:="NVarChar(3)")>  _
	Public Property TYPE() As String
		Get
			Return Me._TYPE
		End Get
		Set
			If (String.Equals(Me._TYPE, value) = false) Then
				Me._TYPE = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_LINE", DbType:="NVarChar(500)")>  _
	Public Property LINE() As String
		Get
			Return Me._LINE
		End Get
		Set
			If (String.Equals(Me._LINE, value) = false) Then
				Me._LINE = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_SECT", DbType:="NVarChar(30)")>  _
	Public Property SECT() As String
		Get
			Return Me._SECT
		End Get
		Set
			If (String.Equals(Me._SECT, value) = false) Then
				Me._SECT = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_SHOP_CODE", DbType:="NVarChar(30)")>  _
	Public Property SHOP_CODE() As String
		Get
			Return Me._SHOP_CODE
		End Get
		Set
			If (String.Equals(Me._SHOP_CODE, value) = false) Then
				Me._SHOP_CODE = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Name:="[PLAN]", Storage:="_PLAN", DbType:="NVarChar(40)")>  _
	Public Property PLAN() As String
		Get
			Return Me._PLAN
		End Get
		Set
			If (String.Equals(Me._PLAN, value) = false) Then
				Me._PLAN = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_TARGET", DbType:="NVarChar(40)")>  _
	Public Property TARGET() As String
		Get
			Return Me._TARGET
		End Get
		Set
			If (String.Equals(Me._TARGET, value) = false) Then
				Me._TARGET = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_PROD", DbType:="NVarChar(40)")>  _
	Public Property PROD() As String
		Get
			Return Me._PROD
		End Get
		Set
			If (String.Equals(Me._PROD, value) = false) Then
				Me._PROD = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_DIF", DbType:="NVarChar(384)")>  _
	Public Property DIF() As String
		Get
			Return Me._DIF
		End Get
		Set
			If (String.Equals(Me._DIF, value) = false) Then
				Me._DIF = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_PDR", DbType:="NVarChar(8)")>  _
	Public Property PDR() As String
		Get
			Return Me._PDR
		End Get
		Set
			If (String.Equals(Me._PDR, value) = false) Then
				Me._PDR = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_ON_TIME_RATIO", DbType:="NVarChar(384)")>  _
	Public Property ON_TIME_RATIO() As String
		Get
			Return Me._ON_TIME_RATIO
		End Get
		Set
			If (String.Equals(Me._ON_TIME_RATIO, value) = false) Then
				Me._ON_TIME_RATIO = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_STUFFING", DbType:="NVarChar(384)")>  _
	Public Property STUFFING() As String
		Get
			Return Me._STUFFING
		End Get
		Set
			If (String.Equals(Me._STUFFING, value) = false) Then
				Me._STUFFING = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_BALANCE", DbType:="NVarChar(384)")>  _
	Public Property BALANCE() As String
		Get
			Return Me._BALANCE
		End Get
		Set
			If (String.Equals(Me._BALANCE, value) = false) Then
				Me._BALANCE = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_EPASS_RATE", DbType:="NVarChar(384) NOT NULL", CanBeNull:=false)>  _
	Public Property EPASS_RATE() As String
		Get
			Return Me._EPASS_RATE
		End Get
		Set
			If (String.Equals(Me._EPASS_RATE, value) = false) Then
				Me._EPASS_RATE = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_UPP", DbType:="NVarChar(384) NOT NULL", CanBeNull:=false)>  _
	Public Property UPP() As String
		Get
			Return Me._UPP
		End Get
		Set
			If (String.Equals(Me._UPP, value) = false) Then
				Me._UPP = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_MP", DbType:="NVarChar(384) NOT NULL", CanBeNull:=false)>  _
	Public Property MP() As String
		Get
			Return Me._MP
		End Get
		Set
			If (String.Equals(Me._MP, value) = false) Then
				Me._MP = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_UPDATED", DbType:="DateTime NOT NULL")>  _
	Public Property UPDATED() As Date
		Get
			Return Me._UPDATED
		End Get
		Set
			If ((Me._UPDATED = value)  _
						= false) Then
				Me._UPDATED = value
			End If
		End Set
	End Property
End Class

<Global.System.Data.Linq.Mapping.TableAttribute(Name:="dbo.TB_CATV_MAIN_LINE_DETAILS")>  _
Partial Public Class TB_CATV_MAIN_LINE_DETAIL
	
	Private _Line As String
	
	Private _Po As String
	
	Private _Model As String
	
	Private _Plan As String
	
	Private _Target As String
	
	Private _Plan_start As String
	
	Private _Plan_end As String
	
	Private _Prod As String
	
	Private _Actual_start As String
	
	Private _Actual_end As String
	
	Private _DIF As String
	
	Private _DEFECT As String
	
	Private _Def__rate__ As String
	
	Private _TT As String
	
	Private _CURRENT_PROD As String
	
	Private _WORK_DATE As String
	
	Private _LAST_SCAN_DT As String
	
	Private _LAST_SCAN_PAST_MIN As String
	
	Private _UPDATED As Date
	
	Public Sub New()
		MyBase.New
	End Sub
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_Line", DbType:="NVarChar(500)")>  _
	Public Property Line() As String
		Get
			Return Me._Line
		End Get
		Set
			If (String.Equals(Me._Line, value) = false) Then
				Me._Line = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_Po", DbType:="NVarChar(50) NOT NULL", CanBeNull:=false)>  _
	Public Property Po() As String
		Get
			Return Me._Po
		End Get
		Set
			If (String.Equals(Me._Po, value) = false) Then
				Me._Po = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_Model", DbType:="NVarChar(20)")>  _
	Public Property Model() As String
		Get
			Return Me._Model
		End Get
		Set
			If (String.Equals(Me._Model, value) = false) Then
				Me._Model = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Name:="[Plan]", Storage:="_Plan", DbType:="NVarChar(40)")>  _
	Public Property Plan() As String
		Get
			Return Me._Plan
		End Get
		Set
			If (String.Equals(Me._Plan, value) = false) Then
				Me._Plan = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_Target", DbType:="NVarChar(40)")>  _
	Public Property Target() As String
		Get
			Return Me._Target
		End Get
		Set
			If (String.Equals(Me._Target, value) = false) Then
				Me._Target = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Name:="[Plan start]", Storage:="_Plan_start", DbType:="NVarChar(16)")>  _
	Public Property Plan_start() As String
		Get
			Return Me._Plan_start
		End Get
		Set
			If (String.Equals(Me._Plan_start, value) = false) Then
				Me._Plan_start = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Name:="[Plan end]", Storage:="_Plan_end", DbType:="NVarChar(16)")>  _
	Public Property Plan_end() As String
		Get
			Return Me._Plan_end
		End Get
		Set
			If (String.Equals(Me._Plan_end, value) = false) Then
				Me._Plan_end = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_Prod", DbType:="NVarChar(40)")>  _
	Public Property Prod() As String
		Get
			Return Me._Prod
		End Get
		Set
			If (String.Equals(Me._Prod, value) = false) Then
				Me._Prod = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Name:="[Actual start]", Storage:="_Actual_start", DbType:="NVarChar(16)")>  _
	Public Property Actual_start() As String
		Get
			Return Me._Actual_start
		End Get
		Set
			If (String.Equals(Me._Actual_start, value) = false) Then
				Me._Actual_start = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Name:="[Actual end]", Storage:="_Actual_end", DbType:="NVarChar(16)")>  _
	Public Property Actual_end() As String
		Get
			Return Me._Actual_end
		End Get
		Set
			If (String.Equals(Me._Actual_end, value) = false) Then
				Me._Actual_end = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_DIF", DbType:="NVarChar(384)")>  _
	Public Property DIF() As String
		Get
			Return Me._DIF
		End Get
		Set
			If (String.Equals(Me._DIF, value) = false) Then
				Me._DIF = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_DEFECT", DbType:="NVarChar(384)")>  _
	Public Property DEFECT() As String
		Get
			Return Me._DEFECT
		End Get
		Set
			If (String.Equals(Me._DEFECT, value) = false) Then
				Me._DEFECT = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Name:="[Def. rate,%]", Storage:="_Def__rate__", DbType:="NVarChar(384)")>  _
	Public Property Def__rate__() As String
		Get
			Return Me._Def__rate__
		End Get
		Set
			If (String.Equals(Me._Def__rate__, value) = false) Then
				Me._Def__rate__ = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_TT", DbType:="NVarChar(384)")>  _
	Public Property TT() As String
		Get
			Return Me._TT
		End Get
		Set
			If (String.Equals(Me._TT, value) = false) Then
				Me._TT = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_CURRENT_PROD", DbType:="NVarChar(1)")>  _
	Public Property CURRENT_PROD() As String
		Get
			Return Me._CURRENT_PROD
		End Get
		Set
			If (String.Equals(Me._CURRENT_PROD, value) = false) Then
				Me._CURRENT_PROD = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_WORK_DATE", DbType:="NVarChar(8) NOT NULL", CanBeNull:=false)>  _
	Public Property WORK_DATE() As String
		Get
			Return Me._WORK_DATE
		End Get
		Set
			If (String.Equals(Me._WORK_DATE, value) = false) Then
				Me._WORK_DATE = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_LAST_SCAN_DT", DbType:="NVarChar(14)")>  _
	Public Property LAST_SCAN_DT() As String
		Get
			Return Me._LAST_SCAN_DT
		End Get
		Set
			If (String.Equals(Me._LAST_SCAN_DT, value) = false) Then
				Me._LAST_SCAN_DT = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_LAST_SCAN_PAST_MIN", DbType:="NVarChar(384)")>  _
	Public Property LAST_SCAN_PAST_MIN() As String
		Get
			Return Me._LAST_SCAN_PAST_MIN
		End Get
		Set
			If (String.Equals(Me._LAST_SCAN_PAST_MIN, value) = false) Then
				Me._LAST_SCAN_PAST_MIN = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_UPDATED", DbType:="DateTime NOT NULL")>  _
	Public Property UPDATED() As Date
		Get
			Return Me._UPDATED
		End Get
		Set
			If ((Me._UPDATED = value)  _
						= false) Then
				Me._UPDATED = value
			End If
		End Set
	End Property
End Class

<Global.System.Data.Linq.Mapping.TableAttribute(Name:="dbo.TB_CATV_WORKING_STATUS_MAIN")>  _
Partial Public Class TB_CATV_WORKING_STATUS_MAIN
	
	Private _LINE As String
	
	Private _SHOP_CODE As String
	
	Private _WORK_SEC As String
	
	Private _LINE_IS_WORKING As String
	
	Private _LINE_HAS_LUNCH As String
	
	Private _UPDATED As Date
	
	Public Sub New()
		MyBase.New
	End Sub
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_LINE", DbType:="NVarChar(500)")>  _
	Public Property LINE() As String
		Get
			Return Me._LINE
		End Get
		Set
			If (String.Equals(Me._LINE, value) = false) Then
				Me._LINE = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_SHOP_CODE", DbType:="NVarChar(30) NOT NULL", CanBeNull:=false)>  _
	Public Property SHOP_CODE() As String
		Get
			Return Me._SHOP_CODE
		End Get
		Set
			If (String.Equals(Me._SHOP_CODE, value) = false) Then
				Me._SHOP_CODE = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_WORK_SEC", DbType:="NVarChar(384)")>  _
	Public Property WORK_SEC() As String
		Get
			Return Me._WORK_SEC
		End Get
		Set
			If (String.Equals(Me._WORK_SEC, value) = false) Then
				Me._WORK_SEC = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_LINE_IS_WORKING", DbType:="NVarChar(1)")>  _
	Public Property LINE_IS_WORKING() As String
		Get
			Return Me._LINE_IS_WORKING
		End Get
		Set
			If (String.Equals(Me._LINE_IS_WORKING, value) = false) Then
				Me._LINE_IS_WORKING = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_LINE_HAS_LUNCH", DbType:="NVarChar(1)")>  _
	Public Property LINE_HAS_LUNCH() As String
		Get
			Return Me._LINE_HAS_LUNCH
		End Get
		Set
			If (String.Equals(Me._LINE_HAS_LUNCH, value) = false) Then
				Me._LINE_HAS_LUNCH = value
			End If
		End Set
	End Property
	
	<Global.System.Data.Linq.Mapping.ColumnAttribute(Storage:="_UPDATED", DbType:="DateTime NOT NULL")>  _
	Public Property UPDATED() As Date
		Get
			Return Me._UPDATED
		End Get
		Set
			If ((Me._UPDATED = value)  _
						= false) Then
				Me._UPDATED = value
			End If
		End Set
	End Property
End Class