ds_cailiaofukuan.vb

本软件设计为在"采购部""工程部""财务部""总经理"等部门之间的采购审核流转等事宜

                Try 
                    Return CType(Me(Me.tablefk_cailiao_shenqingdan.已付金额Column),Double)
                Catch e As InvalidCastException
                    Throw New StrongTypingException("无法获取值，因为它是 DBNull。", e)
                End Try
            End Get
            Set
                Me(Me.tablefk_cailiao_shenqingdan.已付金额Column) = value
            End Set
        End Property
        
        Public Property 本次申请金额 As Double
            Get
                Try 
                    Return CType(Me(Me.tablefk_cailiao_shenqingdan.本次申请金额Column),Double)
                Catch e As InvalidCastException
                    Throw New StrongTypingException("无法获取值，因为它是 DBNull。", e)
                End Try
            End Get
            Set
                Me(Me.tablefk_cailiao_shenqingdan.本次申请金额Column) = value
            End Set
        End Property
        
        Public Property 余额 As Double
            Get
                Try 
                    Return CType(Me(Me.tablefk_cailiao_shenqingdan.余额Column),Double)
                Catch e As InvalidCastException
                    Throw New StrongTypingException("无法获取值，因为它是 DBNull。", e)
                End Try
            End Get
            Set
                Me(Me.tablefk_cailiao_shenqingdan.余额Column) = value
            End Set
        End Property
        
        Public Property 付款说明 As String
            Get
                Try 
                    Return CType(Me(Me.tablefk_cailiao_shenqingdan.付款说明Column),String)
                Catch e As InvalidCastException
                    Throw New StrongTypingException("无法获取值，因为它是 DBNull。", e)
                End Try
            End Get
            Set
                Me(Me.tablefk_cailiao_shenqingdan.付款说明Column) = value
            End Set
        End Property
        
        Public Property 备注 As String
            Get
                Try 
                    Return CType(Me(Me.tablefk_cailiao_shenqingdan.备注Column),String)
                Catch e As InvalidCastException
                    Throw New StrongTypingException("无法获取值，因为它是 DBNull。", e)
                End Try
            End Get
            Set
                Me(Me.tablefk_cailiao_shenqingdan.备注Column) = value
            End Set
        End Property
        
        Public Property 采购文员 As String
            Get
                Try 
                    Return CType(Me(Me.tablefk_cailiao_shenqingdan.采购文员Column),String)
                Catch e As InvalidCastException
                    Throw New StrongTypingException("无法获取值，因为它是 DBNull。", e)
                End Try
            End Get
            Set
                Me(Me.tablefk_cailiao_shenqingdan.采购文员Column) = value
            End Set
        End Property
        
        Public Property 录入时间 As Date
            Get
                Try 
                    Return CType(Me(Me.tablefk_cailiao_shenqingdan.录入时间Column),Date)
                Catch e As InvalidCastException
                    Throw New StrongTypingException("无法获取值，因为它是 DBNull。", e)
                End Try
            End Get
            Set
                Me(Me.tablefk_cailiao_shenqingdan.录入时间Column) = value
            End Set
        End Property
        
        Public Property 采购经理 As String
            Get
                Try 
                    Return CType(Me(Me.tablefk_cailiao_shenqingdan.采购经理Column),String)
                Catch e As InvalidCastException
                    Throw New StrongTypingException("无法获取值，因为它是 DBNull。", e)
                End Try
            End Get
            Set
                Me(Me.tablefk_cailiao_shenqingdan.采购经理Column) = value
            End Set
        End Property
        
        Public Property 采购经理审批意见 As String
            Get
                Try 
                    Return CType(Me(Me.tablefk_cailiao_shenqingdan.采购经理审批意见Column),String)
                Catch e As InvalidCastException
                    Throw New StrongTypingException("无法获取值，因为它是 DBNull。", e)
                End Try
            End Get
            Set
                Me(Me.tablefk_cailiao_shenqingdan.采购经理审批意见Column) = value
            End Set
        End Property
        
        Public Property 采购经理审批结果 As String
            Get
                Try 
                    Return CType(Me(Me.tablefk_cailiao_shenqingdan.采购经理审批结果Column),String)
                Catch e As InvalidCastException
                    Throw New StrongTypingException("无法获取值，因为它是 DBNull。", e)
                End Try
            End Get
            Set
                Me(Me.tablefk_cailiao_shenqingdan.采购经理审批结果Column) = value
            End Set
        End Property
        
        Public Property 采购经理审批时间 As Date
            Get
                Try 
                    Return CType(Me(Me.tablefk_cailiao_shenqingdan.采购经理审批时间Column),Date)
                Catch e As InvalidCastException
                    Throw New StrongTypingException("无法获取值，因为它是 DBNull。", e)
                End Try
            End Get
            Set
                Me(Me.tablefk_cailiao_shenqingdan.采购经理审批时间Column) = value
            End Set
        End Property
        
        Public Property 财务经理 As String
            Get
                Try 
                    Return CType(Me(Me.tablefk_cailiao_shenqingdan.财务经理Column),String)
                Catch e As InvalidCastException
                    Throw New StrongTypingException("无法获取值，因为它是 DBNull。", e)
                End Try
            End Get
            Set
                Me(Me.tablefk_cailiao_shenqingdan.财务经理Column) = value
            End Set
        End Property
        
        Public Property 财务经理审批意见 As String
            Get
                Try 
                    Return CType(Me(Me.tablefk_cailiao_shenqingdan.财务经理审批意见Column),String)
                Catch e As InvalidCastException
                    Throw New StrongTypingException("无法获取值，因为它是 DBNull。", e)
                End Try
            End Get
            Set
                Me(Me.tablefk_cailiao_shenqingdan.财务经理审批意见Column) = value
            End Set
        End Property
        
        Public Property 财务经理审批结果 As String
            Get
                Try 
                    Return CType(Me(Me.tablefk_cailiao_shenqingdan.财务经理审批结果Column),String)
                Catch e As InvalidCastException
                    Throw New StrongTypingException("无法获取值，因为它是 DBNull。", e)
                End Try
            End Get
            Set
                Me(Me.tablefk_cailiao_shenqingdan.财务经理审批结果Column) = value
            End Set
        End Property
        
        Public Property 财务经理审批日期 As Date
            Get
                Try 
                    Return CType(Me(Me.tablefk_cailiao_shenqingdan.财务经理审批日期Column),Date)
                Catch e As InvalidCastException
                    Throw New StrongTypingException("无法获取值，因为它是 DBNull。", e)
                End Try
            End Get
            Set
                Me(Me.tablefk_cailiao_shenqingdan.财务经理审批日期Column) = value
            End Set
        End Property
        
        Public Property 总经理 As String
            Get
                Try 
                    Return CType(Me(Me.tablefk_cailiao_shenqingdan.总经理Column),String)
                Catch e As InvalidCastException
                    Throw New StrongTypingException("无法获取值，因为它是 DBNull。", e)
                End Try
            End Get
            Set
                Me(Me.tablefk_cailiao_shenqingdan.总经理Column) = value
            End Set
        End Property
        
        Public Property 总经理审批意见 As String
            Get
                Try 
                    Return CType(Me(Me.tablefk_cailiao_shenqingdan.总经理审批意见Column),String)
                Catch e As InvalidCastException
                    Throw New StrongTypingException("无法获取值，因为它是 DBNull。", e)
                End Try
            End Get
            Set
                Me(Me.tablefk_cailiao_shenqingdan.总经理审批意见Column) = value
            End Set
        End Property
        
        Public Property 总经理审批结果 As String
            Get
                Try 
                    Return CType(Me(Me.tablefk_cailiao_shenqingdan.总经理审批结果Column),String)
                Catch e As InvalidCastException
                    Throw New StrongTypingException("无法获取值，因为它是 DBNull。", e)
                End Try
            End Get
            Set
                Me(Me.tablefk_cailiao_shenqingdan.总经理审批结果Column) = value
            End Set
        End Property
        
        Public Property 总经理审批日期 As Date
            Get
                Try 
                    Return CType(Me(Me.tablefk_cailiao_shenqingdan.总经理审批日期Column),Date)
                Catch e As InvalidCastException
                    Throw New StrongTypingException("无法获取值，因为它是 DBNull。", e)
                End Try
            End Get
            Set
                Me(Me.tablefk_cailiao_shenqingdan.总经理审批日期Column) = value
            End Set
        End Property
        
        Public Property 标志 As String
            Get
                Try 
                    Return CType(Me(Me.tablefk_cailiao_shenqingdan.标志Column),String)
                Catch e As InvalidCastException
                    Throw New StrongTypingException("无法获取值，因为它是 DBNull。", e)
                End Try
            End Get
            Set
                Me(Me.tablefk_cailiao_shenqingdan.标志Column) = value
            End Set
        End Property
        
        Public Property 是否为退回 As String
            Get
                Try 
                    Return CType(Me(Me.tablefk_cailiao_shenqingdan.是否为退回Column),String)
                Catch e As InvalidCastException
                    Throw New StrongTypingException("无法获取值，因为它是 DBNull。", e)
                End Try
            End Get
            Set
                Me(Me.tablefk_cailiao_shenqingdan.是否为退回Column) = value
            End Set
        End Property
        
        Public Property 是否为变更 As String
            Get
                Try 
                    Return CType(Me(Me.tablefk_cailiao_shenqingdan.是否为变更Column),String)
                Catch e As InvalidCastException
                    Throw New StrongTypingException("无法获取值，因为它是 DBNull。", e)
                End Try
            End Get
            Set
                Me(Me.tablefk_cailiao_shenqingdan.是否为变更Column) = value
            End Set
        End Property
        
        Public Function Is订购单编号Null() As Boolean
            Return Me.IsNull(Me.tablefk_cailiao_shenqingdan.订购单编号Column)
        End Function
        
        Public Sub Set订购单编号Null()
            Me(Me.tablefk_cailiao_shenqingdan.订购单编号Column) = System.Convert.DBNull
        End Sub
        
        Public Function Is收货单编号Null() As Boolean
            Return Me.IsNull(Me.tablefk_cailiao_shenqingdan.收货单编号Column)
        End Function
        
        Public Sub Set收货单编号Null()