KCI-KANBAN/app/models/POBO_boards.asp

<%
Class POBO_boards
    Public Properties

    Private p_id
    Private p_name
    Private p_slug
    Private p_import_from_printstream
    Private p_printstream_job_name
    Private p_created_at
    Private p_created_by
    Private p_updated_at
    Private p_updated_by

    Private Sub Class_Initialize()
        p_id                       = 0
        p_name                     = ""
        p_slug                     = ""
        p_import_from_printstream  = False
        p_printstream_job_name     = ""
        p_created_at               = #1/1/1970#
        p_created_by               = ""
        p_updated_at               = #1/1/1970#
        p_updated_by               = ""
        Properties = Array("id","name","slug","import_from_printstream","printstream_job_name","created_at","created_by","updated_at","updated_by")
    End Sub

    Public Property Get PrimaryKey() : PrimaryKey = "id"     : End Property
    Public Property Get TableName()  : TableName  = "boards" : End Property

    Public Property Get id()    : id    = p_id             : End Property
    Public Property Let id(v)   : p_id  = CDbl(v)          : End Property

    Public Property Get name()  : name   = p_name          : End Property
    Public Property Let name(v) : p_name = CStr(v)         : End Property

    Public Property Get slug()  : slug   = p_slug          : End Property
    Public Property Let slug(v) : p_slug = CStr(v)         : End Property

    Public Property Get import_from_printstream()  : import_from_printstream   = p_import_from_printstream : End Property
    Public Property Let import_from_printstream(v) : p_import_from_printstream = CBool(v)                  : End Property

    Public Property Get printstream_job_name()  : printstream_job_name   = p_printstream_job_name : End Property
    Public Property Let printstream_job_name(v) : p_printstream_job_name = CStr(v)                : End Property

    Public Property Get created_at()  : created_at   = p_created_at  : End Property
    Public Property Let created_at(v) : p_created_at = CDate(v)      : End Property

    Public Property Get created_by()  : created_by   = p_created_by  : End Property
    Public Property Let created_by(v) : p_created_by = CStr(v)       : End Property

    Public Property Get updated_at()  : updated_at   = p_updated_at  : End Property
    Public Property Let updated_at(v) : p_updated_at = CDate(v)      : End Property

    Public Property Get updated_by()  : updated_by   = p_updated_by  : End Property
    Public Property Let updated_by(v) : p_updated_by = CStr(v)       : End Property
End Class
%>