<?xml version="1.0" encoding="utf-8" ?>

<hibernate-mapping xmlns="urn:nhibernate-mapping-2.0">

  <class name="FleetManagement.BusinessLayer.Vehicle, FleetManagement.BusinessLayer" table="Vehicle">

    <id name="VehicleID" column="VehicleID" type="String" length="50">
      <generator class="assigned" />
    </id>

    <!--Mapp properties I'd like to be persist/fetch
        Assume colum = property name-->
    <property name="UnitID" />
    <property name="Body_Type" />
    <property name="Make" />
    <property name="Model" />
    <property name="Year" />
   
    <set name="Schedules" table="Vehicle_Schedule" lazy="false" cascade="save-update" >
      <key column="VehicleID" />
      <many-to-many class="FleetManagement.BusinessLayer.Schedule, FleetManagement.BusinessLayer"
                     column="InspectionID" outer-join="auto" />
     
    </set>
   
    <set name="Vehicle_Schedule" table="Vehicle_Schedule" lazy ="false" cascade="save-update" inverse ="true" >
      <key column="VehicleID" />

      <one-to-many class="FleetManagement.BusinessLayer.Vehicle_Schedule, FleetManagement.BusinessLayer" />
     
    </set>
   
    <set name="Mileages" table="FuelMileage" lazy="true" cascade="save-update" >
      <key column="MileageID" />
      <one-to-many class="FleetManagement.BusinessLayer.Mileage, FleetManagement.BusinessLayer" />
    </set>
   
    <!--Map the inherited Class Truck-->
    <joined-subclass name="FleetManagement.BusinessLayer.Truck, FleetManagement.BusinessLayer" table="Truck">
      <key column="TruckID" foreign-key="FK_VehicleID" />
      <property name="TireSize" />
      <property name="Weight" column="GrossWeight"/>

      <!--Join the SubClass Pickup-->
      <joined-subclass name="FleetManagement.BusinessLayer.Pickup, FleetManagement.BusinessLayer" table="PickUp">
        <key column="PickUpID" foreign-key="FK_TruckID" />
        <property name="IsDOT" />
      </joined-subclass>

   
    </joined-subclass>

    <joined-subclass name="FleetManagement.BusinessLayer.Forklift, FleetManagement.BusinessLayer" check="Forklift">
      <key column="ForkliftID" foreign-key="fk_VehicleID" />
      <property name="Category" />
      <property name="Manufacturer" />
    </joined-subclass>


  </class>
 
 
</hibernate-mapping>

<?xml version="1.0" encoding="utf-8" ?>


<hibernate-mapping xmlns="urn:nhibernate-mapping-2.0">

  <class name="FleetManagement.BusinessLayer.Vehicle_Schedule, FleetManagement.BusinessLayer" table="Vehicle_Schedule">

    <composite-id>
      <key-many-to-one name="Vehicle" class="FleetManagement.BusinessLayer.Vehicle, FleetManagement.BusinessLayer" column="VehicleID" />
      <key-many-to-one name="Schedule" class="FleetManagement.BusinessLayer.Schedule, FleetManagement.BusinessLayer" column="InspectionID" />
    </composite-id>

    <property name="LastChecked" />
   
   
  </class>
 
</hibernate-mapping>

Public Class Vehicle
       implements IVehicle

        Public Property VehicleID() As String _
                    Implements IVehicle.VehicleID
            Get
                Return _vehicleID
            End Get
            Set(ByVal value As String)
                _vehicleID = value
            End Set
        End Property

        Public Property UnitID() As Integer _
                Implements IVehicle.UnitID
            Get
                Return _unitId
            End Get
            Set(ByVal value As Integer)
                _unitId = value
            End Set
        End Property

        Public Property Body_Type() As String _
                Implements IVehicle.Body_Type
            Get
                Return _bodyType
            End Get
            Set(ByVal value As String)
                _bodyType = value
            End Set
        End Property

        Public Property Make() As String _
                Implements IVehicle.Make
            Get
                Return _make
            End Get
            Set(ByVal value As String)
                _make = value
            End Set
        End Property

        Public Property Model() As String _
                Implements IVehicle.Model
            Get
                Return _model
            End Get
            Set(ByVal value As String)
                _model = value
            End Set
        End Property

        Public Property Year() As String _
                Implements IVehicle.Year
            Get
                Return _year
            End Get
            Set(ByVal value As String)
                _year = value
            End Set
        End Property

        Public Property Schedules() As Iesi.Collections.ISet _
                Implements IVehicle.Schedules
            Get

                Return Me._schedules

            End Get
            Set(ByVal value As Iesi.Collections.ISet)
                _schedules = value
            End Set
        End Property

        Public Property Vehicle_Schedules() As Iesi.Collections.ISet _
                Implements IVehicle.Vehicle_Schedules
            Get
                Return _vehicle_schedules
            End Get
            Set(ByVal value As Iesi.Collections.ISet)
                _vehicle_schedules = value
            End Set
        End Property

        Public Property Mileages() As Iesi.Collections.ISet _
                    Implements IVehicle.Mileages
            Get
                  Return Me._mileages
            End Get
            Set(ByVal value As Iesi.Collections.ISet)
                _mileages = value
            End Set
        End Property

        Public Property Saving() As Boolean _
                Implements IVehicle.Saving
            Get
                Return _saving
            End Get
            Set(ByVal value As Boolean)
                _saving = value
            End Set
        End Property

        Public Property IsSaved() As Boolean _
                Implements IVehicle.IsSaved
            Get
                Return _isSaved
            End Get
            Set(ByVal value As Boolean)
                _isSaved = value
            End Set
        End Property
End Class

Public Class Vehicle_Schedule

       Public Property VehicleID() As String
            Get
                Return _vehicleID
            End Get
            Set(ByVal value As String)
                _vehicleID = value
            End Set
        End Property

        Public Property ScheduleID() As String
            Get
                Return _scheduleID
            End Get
            Set(ByVal value As String)
                _scheduleID = value
            End Set
        End Property

        Public Property LastChecked() As Date
            Get
                Return _lastChecked
            End Get
            Set(ByVal value As Date)
                _lastChecked = value
            End Set
        End Property

        Public Property Vehicle() As Iesi.Collections.ISet
            Get
                Return _vehicles
            End Get
            Set(ByVal value As Iesi.Collections.ISet)
                _vehicles = value
            End Set
        End Property

        Public Property Schedule() As Iesi.Collections.ISet
            Get
                Return _schedules
            End Get
            Set(ByVal value As Iesi.Collections.ISet)
                _schedules = value
            End Set
        End Property

        Public Overloads Function Equals(ByVal obj As Object) As Boolean

            Return MyBase.Equals(obj)


        End Function

        Public Overloads Function GetHashCode() As Integer

            Return MyBase.GetHashCode()

        End Function
End Class

Public Class Truck
        Public Property TruckID() As String _
                Implements ITruck.TruckID
            Get
                Return _truckID
            End Get
            Set(ByVal value As String)
                _truckID = value
            End Set
        End Property

        Public Property TireSize() As Double _
            Implements ITruck.TireSize
            Get
                Return _tireSize
            End Get
            Set(ByVal value As Double)
                _tireSize = value
            End Set
        End Property

        Public Property Weight() As Integer _
            Implements ITruck.Weight
            Get
                Return _weight
            End Get
            Set(ByVal value As Integer)
                _weight = value
            End Set
        End Property
End Class

    Public Class Schedule
        Implements ISchedule

       Public Property ScheduleID() As String Implements ISchedule.ScheduleID
            Get
                'Return _InspectionID
                Return _scheduleID
            End Get
            Set(ByVal value As String)
                _scheduleID = value
            End Set
        End Property

        Public Property RegulatoryBody() As String Implements ISchedule.RegulatoryBody
            Get
                Return _regulatoryBody
            End Get
            Set(ByVal value As String)
                _regulatoryBody = value
            End Set
        End Property

        Public Property NameOfInspection() As String Implements ISchedule.NameOfInspection
            Get
                Return _nameOfInspection
            End Get
            Set(ByVal value As String)
                _nameOfInspection = value
            End Set
        End Property

        Public Property TypeOfSchedule() As String Implements ISchedule.TypeOfSchedule
            Get
                Return _typeOfSchedule
            End Get
            Set(ByVal value As String)
                _typeOfSchedule = value
            End Set
        End Property

        Public Property Period() As Integer Implements ISchedule.Period
            Get
                Return _period
            End Get
            Set(ByVal value As Integer)
                _period = value
            End Set
        End Property

        Public Property IsSaved() As Boolean Implements ISchedule.IsSaved
            Get
                Return _isSaved
            End Get
            Set(ByVal value As Boolean)
                _isSaved = value
            End Set
        End Property

        Public Property Vehicles() As Iesi.Collections.ISet Implements ISchedule.Vehicles
            Get
                Return _vehicles
            End Get
            Set(ByVal value As Iesi.Collections.ISet)
                _vehicles = value
            End Set
        End Property
#End Region

    End Class

<set name="Schedules" table="Vehicle_Schedule" lazy="false" cascade="save-update" >
    <key column="VehicleID" />
    <many-to-many class="FleetManagement.BusinessLayer.Schedule, FleetManagement.BusinessLayer" column="InspectionID" outer-join="auto" />
</set>
   
<set name="Vehicle_Schedule" table="Vehicle_Schedule" lazy ="false" cascade="save-update" inverse ="true" >
    <key column="VehicleID" />

    <one-to-many class="FleetManagement.BusinessLayer.Vehicle_Schedule, FleetManagement.BusinessLayer" />
</set>