• ActivityRecord
• ActivityRecords
• ActivityTimer
• ActivityTimers
• Application
• AppRecord
• AppRecords
• CategoryRecord
• CategoryRecords
• Client
• Clients

• ContactBlock
• ContactInfo
• DeliveryInfo
• DocRecord
• DocRecords
• ExpenseRecord
• ExpenseRecords
• FinishingInfo
• InputMediaInfo
• IPlugin
• OrderInfo

• OutputMediaInfo
• Preset
• PresetAppRecord
• PresetAppRecords
• Presets
• Project
• ProjectDataRecord
• ProjectDataRecords
• ProjectInfo
• ProjectRecord
• ProjectRecords

• Projects
• RateRecord
• RateRecords
• Report
• Reports
• TimeRecord
• TimeRecords
• TimeTable
• WorkTime
• WorkTimeRecord

Class ActivityRecord

Properties:

• Property Active As Boolean [r/o]
• Property ActivityTimer As ActivityTimer [r/o]
• Property Application As Application [r/o]
• Property Category As CategoryRecord [r/w]
• Property Cost As Long [r/o]
• Property Description As String [r/w]
• Property EndDate As Date [r/o]
• Property Index As Long [r/o]
• Property Parent As ActivityRecords [r/o]
• Property StartDate As Date [r/o]
• Property Time As Long [r/o]
• Property TimeTable As TimeTable [r/o]
• Property Type As VptActivityType [r/o]

Methods:

• Sub Delete()
• Sub Fill(ByVal StartDate As Date, ByVal EndDate As Date, [ByVal UseWorkTime As Boolean = False], [ByVal Reset As Boolean = True])

Class ActivityRecords

Properties:

• Property Application As Application [r/o]
• Property Count As Long [r/o]
• Property Item(ByVal Index As Long) As ActivityRecord [r/o] [default]
• Property Parent As Object [r/o]

Methods:

• Function Add(ByVal StartDate As Date, ByVal EndDate As Date, [ByVal Description As String = ""], [ByVal UseWorkTime As Boolean = False]) As ActivityRecord
• Function GetTimeLimits(ByRef StartHour As Long, ByRef EndHour As Long) As Boolean
• Function Track([ByVal Description As String = ""], [ByVal Visible As Boolean = True], [ByVal Master As Boolean = False]) As ActivityRecord

Class ActivityTimer

Properties:

• Property Active As Boolean [r/o]
• Property ActivityRecord As ActivityRecord [r/o]
• Property Application As Application [r/o]
• Property Index As Long [r/o]
• Property Master As Boolean [r/w]
• Property Parent As ActivityTimers [r/o]
• Property Paused As Boolean [r/w]
• Property Visible As Boolean [r/w]

Methods:

• Sub Activate()
• Sub Close()
• Sub Discard()

Class ActivityTimers

Properties:

• Property Application As Application [r/o]
• Property Count As Long [r/o]
• Property Item(ByVal Index As Long) As ActivityTimer [r/o] [default]
• Property Parent As Object [r/o]

Class Application

Properties:

• Property ActiveProject As Project [r/o]
• Property ActivityTimers As ActivityTimers [r/o]
• Property Application As Application [r/o]
• Property BackupPath As String [r/o]
• Property Clients As Clients [r/o]
• Property DefaultWorkTime As WorkTime [r/o]
• Property FullName As String [r/o]
• Property IsDialogOpen As Boolean [r/o]
• Property Locked As Boolean [r/w]
• Property Minimized As Boolean [r/w]
• Property Name As String [r/o] [default]
• Property OpenProjectLimit As Long [r/o]
• Property Parent As Application [r/o]
• Property Path As String [r/o]
• Property PluginPath As String [r/o]
• Property Presets As Presets [r/o]
• Property ProjectPath As String [r/o]
• Property ProjectRecords As ProjectRecords [r/o]
• Property Projects As Projects [r/o]
• Property ReportPath As String [r/o]
• Property Reports As Reports [r/o]
• Property SelectedActivity As ActivityRecord [r/o]
• Property SelectedApplication As AppRecord [r/o]
• Property SelectedDocument As DocRecord [r/o]
• Property SelectedProject As Project [r/o]
• Property SelectionType As VptSelectionType [r/o]
• Property SessionUnattendedTime As TimeTable [r/o]
• Property SessionUpTime As TimeTable [r/o]
• Property TALPath As String [r/o]
• Property TotalUnattendedTime As TimeTable [r/o]
• Property TotalUpTime As TimeTable [r/o]
• Property Unattended As Boolean [r/w]
• Property UnattendedTime As Long [r/o]
• Property Version As String [r/o]
• Property VersionBuild As Long [r/o]
• Property VersionMajor As Long [r/o]
• Property VersionMinor As Long [r/o]
• Property Visible As Boolean [r/w]

Methods:

• Function DateToHour(ByVal Date As Date) As Long
• Function FormatTime(ByVal Time As Long, [ByVal Signed As Boolean = False]) As String
• Function HourToDate(ByVal Hour As Long) As Date
• Function MakeHour(ByVal Hour As Long, ByVal Day As Long, ByVal Month As Long, ByVal Year As Long) As Long
• Sub Quit()

Class AppRecord

Properties:

• Property ActiveDocRecords As DocRecords [r/o]
• Property Application As Application [r/o]
• Property BaseRate As Long [r/w]
• Property Category As String [r/o]
• Property Cost As Long [r/o]
• Property DisableUnattended As Boolean [r/w]
• Property DocLevelRate As Boolean [r/w]
• Property DocRecords As DocRecords [r/o]
• Property InactiveDocRecords As DocRecords [r/o]
• Property Index As Long [r/o]
• Property Name As String [r/o] [default]
• Property Parent As Project [r/o]
• Property Rates As RateRecords [r/o]
• Property Time As Long [r/o]
• Property Tracked As Boolean [r/w]

Methods:

• Function CalculateCost(ByVal Time As Long) As Long
• Function CostForInterval(ByVal StartHour As Long, ByVal EndHour As Long) As Long
• Function GetRate(ByVal Time As Long) As Long
• Function GetTimeLimits(ByRef StartHour As Long, ByRef EndHour As Long) As Boolean
• Function TimeForInterval(ByVal StartHour As Long, ByVal EndHour As Long) As Long

Class AppRecords

Properties:

• Property Application As Application [r/o]
• Property Count As Long [r/o]
• Property Item(ByVal Index As Long) As AppRecord [r/o] [default]
• Property Parent As Project [r/o]

Methods:

• Function Find(ByVal Name As String) As AppRecord

Class CategoryRecord

Properties:

• Property Active As Boolean [r/w]
• Property Activities As ActivityRecords [r/o]
• Property Application As Application [r/o]
• Property Cost As Long [r/o]
• Property Icon As Long [r/w]
• Property Index As Long [r/o]
• Property Name As String [r/w] [default]
• Property Parent As CategoryRecords [r/o]
• Property Rate As Long [r/w]
• Property Time As Long [r/o]

Methods:

• Sub Delete([ByVal ReplaceWith As CategoryRecord = 0])

Class CategoryRecords

Properties:

• Property Application As Application [r/o]
• Property Count As Long [r/o]
• Property Item(ByVal Index As Long) As CategoryRecord [r/o] [default]
• Property Parent As Project [r/o]

Methods:

• Function Add(ByVal Name As String, [ByVal Rate As Long = 0], [ByVal Icon As Long = 0], [ByVal Active As Boolean = True]) As CategoryRecord

Class Client

Properties:

• Property Application As Application [r/o]
• Property Contact As ContactInfo [r/o]
• Property Index As Long [r/o]
• Property Name As String [r/w] [default]
• Property Parent As Clients [r/o]

Methods:

• Sub Delete()
• Sub UpdateFromProject(ByVal Project As Project)

Class Clients

Properties:

• Property Application As Application [r/o]
• Property Count As Long [r/o]
• Property Item(ByVal Index As Long) As Client [r/o] [default]
• Property Parent As Application [r/o]

Methods:

• Function Add(ByVal Name As String) As Client
• Function AddFromProject(ByVal Name As String, ByVal Project As Project) As Client

Class ContactBlock

Properties:

• Property Address As String [r/w]
• Property Application As Application [r/o]
• Property Cellular As String [r/w]
• Property City As String [r/w]
• Property Company As String [r/w]
• Property Country As String [r/w]
• Property Email As String [r/w]
• Property EveningPhone As String [r/w]
• Property Fax As String [r/w]
• Property Name As String [r/w] [default]
• Property Parent As ContactInfo [r/o]
• Property Phone As String [r/w]
• Property State As String [r/w]
• Property URL As String [r/w]
• Property ZipCode As String [r/w]

Methods:

• Sub Apply(ByVal ContactBlock As ContactBlock)
• Sub Clear()
• Sub PartialApply(ByVal ContactBlock As ContactBlock)

Class ContactInfo

Properties:

• Property Application As Application [r/o]
• Property Billing As ContactBlock [r/o]
• Property Page As VptContactPage [r/w]
• Property Parent As Object [r/o]
• Property Primary As ContactBlock [r/o]
• Property Shipping As ContactBlock [r/o]

Methods:

• Sub Apply(ByVal Contact As ContactInfo)
• Sub Clear()
• Sub PartialApply(ByVal Contact As ContactInfo)

Class DeliveryInfo

Properties:

• Property Application As Application [r/o]
• Property LocalCourierAccount As String [r/w]
• Property LocalCourierName As String [r/w]
• Property LocalCourierPhone As String [r/w]
• Property Parent As ProjectInfo [r/o]
• Property PrivateCourierAccount As String [r/w]
• Property PrivateCourierName As String [r/w]
• Property Term As VptDeliveryTerm [r/w]
• Property Type As VptDeliveryType [r/w]

Methods:

• Sub Clear()

Class DocRecord

Properties:

• Property Accesses As Long [r/o]
• Property Active As Boolean [r/o]
• Property Application As Application [r/o]
• Property Cost As Long [r/o]
• Property Created As Date [r/o]
• Property Excluded As Boolean [r/w]
• Property Index As Long [r/o]
• Property IsCostAccurate As Boolean [r/o]
• Property LastAccessed As Date [r/o]
• Property Name As String [r/o] [default]
• Property Parent As DocRecords [r/o]
• Property Time As Long [r/o]
• Property TimeTable As TimeTable [r/o]

Methods:

• Function CostForInterval(ByVal StartHour As Long, ByVal EndHour As Long) As Long
• Sub Delete()
• Function IsCostForIntervalAccurate(ByVal StartHour As Long, ByVal EndHour As Long) As Boolean
• Function MoveInterval(ByVal AppRecord As AppRecord, [ByVal StartHour As Long = 0], [ByVal EndHour As Long = 0]) As DocRecord
• Function MoveTo(ByVal AppRecord As AppRecord) As DocRecord
• Function TimeForInterval(ByVal StartHour As Long, ByVal EndHour As Long) As Long

Class DocRecords

Properties:

• Property Application As Application [r/o]
• Property Count As Long [r/o]
• Property Item(ByVal Index As Long) As DocRecord [r/o] [default]
• Property Parent As AppRecord [r/o]

Methods:

• Function Add(ByVal Name As String) As DocRecord
• Function Find(ByVal Name As String, [ByVal CaseSensitive As Boolean = True]) As DocRecord

Class ExpenseRecord

Properties:

• Property Application As Application [r/o]
• Property Cost As Long [r/w]
• Property Created As Date [r/w]
• Property Index As Long [r/o]
• Property Name As String [r/w] [default]
• Property Parent As ExpenseRecords [r/o]

Methods:

• Sub Delete()

Class ExpenseRecords

Properties:

• Property Application As Application [r/o]
• Property Count As Long [r/o]
• Property Item(ByVal Index As Long) As ExpenseRecord [r/o] [default]
• Property Parent As Project [r/o]

Methods:

• Function Add(ByVal Name As String, ByVal Cost As Long, [ByVal Created As Date = 12:00:00 AM]) As ExpenseRecord
• Function GetTimeLimits(ByRef StartHour As Long, ByRef EndHour As Long) As Boolean

Class FinishingInfo

Properties:

• Property Application As Application [r/o]
• Property Caption(ByVal Index As Long) As String [r/o]
• Property Parent As ProjectInfo [r/o]
• Property Value(ByVal Index As Long) As Boolean [r/w] [default]

Methods:

• Sub Clear()

Class InputMediaInfo

Properties:

• Property Application As Application [r/o]
• Property Bernoulli As Boolean [r/w]
• Property ColorProofs As Boolean [r/w]
• Property Floppy As Boolean [r/w]
• Property FPOs As Boolean [r/w]
• Property Internet As Boolean [r/w]
• Property Jaz As Boolean [r/w]
• Property LaserProofs As Boolean [r/w]
• Property MediaText As String [r/o]
• Property Optical As Boolean [r/w]
• Property Other As Boolean [r/w]
• Property OtherMediaName As String [r/w]
• Property Parent As ProjectInfo [r/o]
• Property SyQuest As Boolean [r/w]
• Property Zip As Boolean [r/w]

Methods:

• Sub Clear()

Class IPlugin

Methods:

• Sub About(ByVal CommandIndex As Long)
• Function Enabled(ByVal CommandIndex As Long, ByVal Selection As VptSelectionType) As Boolean
• Sub Execute(ByVal CommandIndex As Long, ByVal Popup As Boolean, ByVal hWnd As Long)
• Function GetContactMenuItem(ByVal CommandIndex As Long, ByVal Page As VptContactPage) As String
• Function GetFlags(ByVal CommandIndex As Long) As VptPluginFlags
• Function GetMenuItem(ByVal CommandIndex As Long) As String
• Function GetModuleFlags() As VptPluginFlags
• Function GetName(ByVal CommandIndex As Long) As String
• Function GetNumToolIcons() As Long
• Function GetPopupMenuItem(ByVal CommandIndex As Long, ByVal Selection As VptSelectionType) As String
• Function GetToolIconIndex(ByVal CommandIndex As Long) As Long
• Function GetToolIconModule() As Long
• Function GetToolIconResourceID() As Long
• Function GetToolTip(ByVal CommandIndex As Long) As String
• Sub Initialize(ByVal Application As Object, ByVal CommandIndex As Long)
• Sub InitializeModule(ByVal Application As Object)
• Function OnLoad() As Long
• Sub OnUnload()
• Sub ProcessContact(ByVal CommandIndex As Long, ByVal Contact As ContactInfo, ByVal hWnd As Long)
• Sub SetupModule(ByVal hWnd As Long)
• Sub UnInitialize(ByVal CommandIndex As Long)
• Sub UnInitializeModule()

Class OrderInfo

Properties:

• Property Account As String [r/w]
• Property Application As Application [r/o]
• Property BillingInfo As VptBillingInfo [r/w]
• Property CallWhenReady As Boolean [r/w]
• Property CustJobName As String [r/w]
• Property CustJobNumber As String [r/w]
• Property DateDue As String [r/w]
• Property DateReceived As String [r/w]
• Property DirectPhone As String [r/w]
• Property JobDescription As String [r/w]
• Property JobNumber As String [r/w]
• Property OrderInputBy As String [r/w]
• Property Parent As ProjectInfo [r/o]
• Property Rush As Boolean [r/w]
• Property TimeDue As String [r/w]

Methods:

• Sub Clear()

Class OutputMediaInfo

Properties:

• Property Application As Application [r/o]
• Property Bernoulli As Boolean [r/w]
• Property CropMarks As Boolean [r/w]
• Property DyeSubProofs As Boolean [r/w]
• Property EmulsionDown As Boolean [r/w]
• Property Film As Boolean [r/w]
• Property Floppy As Boolean [r/w]
• Property InkJetProofs As Boolean [r/w]
• Property Internet As Boolean [r/w]
• Property Jaz As Boolean [r/w]
• Property LaserProofs As Boolean [r/w]
• Property LaserProofType As VptLaserProofType [r/w]
• Property MediaText As String [r/o]
• Property Negative As Boolean [r/w]
• Property Optical As Boolean [r/w]
• Property Other As Boolean [r/w]
• Property OtherMediaName As String [r/w]
• Property OtherProofs As Boolean [r/w]
• Property OtherProofsName As String [r/w]
• Property Paper As Boolean [r/w]
• Property Parent As ProjectInfo [r/o]
• Property ProofsRequired As Boolean [r/w]
• Property Resolution As Long [r/w]
• Property ScreenFrequency As Long [r/w]
• Property Spreads As Boolean [r/w]
• Property SyQuest As Boolean [r/w]
• Property URL As String [r/w]
• Property Zip As Boolean [r/w]

Methods:

• Sub Clear()

Class Preset

Properties:

• Property Application As Application [r/o]
• Property Index As Long [r/o]
• Property Name As String [r/w] [default]
• Property Parent As Presets [r/o]
• Property PresetAppRecords As PresetAppRecords [r/o]

Methods:

• Sub Delete()
• Sub Save()
• Sub UpdateFromProject(ByVal Project As Project)

Class PresetAppRecord

Properties:

• Property Application As Application [r/o]
• Property BaseRate As Long [r/w]
• Property Category As String [r/o]
• Property DisableUnattended As Boolean [r/w]
• Property DocLevelRate As Boolean [r/w]
• Property Index As Long [r/o]
• Property Name As String [r/o] [default]
• Property Parent As PresetAppRecords [r/o]
• Property Rates As RateRecords [r/o]
• Property Tracked As Boolean [r/w]

Methods:

• Function GetRate(ByVal Time As Long) As Long

Class PresetAppRecords

Properties:

• Property Application As Application [r/o]
• Property Count As Long [r/o]
• Property Item(ByVal Index As Long) As PresetAppRecord [r/o] [default]
• Property Parent As Preset [r/o]

Methods:

• Function Find(ByVal Name As String) As PresetAppRecord

Class Presets

Properties:

• Property Application As Application [r/o]
• Property Count As Long [r/o]
• Property Item(ByVal Index As Long) As Preset [r/o] [default]
• Property Parent As Application [r/o]

Methods:

• Function Add(ByVal Name As String, [ByVal AllTracked As Boolean = True], [ByVal BaseRate As Long = 0]) As Preset
• Function AddFromProject(ByVal Name As String, ByVal Project As Project) As Preset

Class Project

Properties:

• Property Active As Boolean [r/o]
• Property Activities As ActivityRecords [r/o]
• Property ActivityTimers As ActivityTimers [r/o]
• Property Application As Application [r/o]
• Property AppRecords As AppRecords [r/o]
• Property Categories As CategoryRecords [r/o]
• Property Client As Client [r/w]
• Property Cost As Long [r/o]
• Property DataRecords As ProjectDataRecords [r/o]
• Property Dirty As Boolean [r/w]
• Property Editable As Boolean [r/o]
• Property Expenses As ExpenseRecords [r/o]
• Property Index As Long [r/o]
• Property Info As ProjectInfo [r/o]
• Property IsOpen As Boolean [r/o]
• Property LockCount As Long [r/o]
• Property Locked As Boolean [r/o]
• Property Name As String [r/w] [default]
• Property Parent As Projects [r/o]
• Property Protected As Boolean [r/o]
• Property Time As Long [r/o]
• Property TrackedAppRecords As AppRecords [r/o]
• Property UserName As String [r/w]
• Property WorkTime As WorkTime [r/o]

Methods:

• Sub Activate()
• Sub ApplyPreset(ByVal Preset As Preset)
• Sub ChangePassword([ByVal Password As String])
• Sub Close()
• Function CostForInterval(ByVal StartHour As Long, ByVal EndHour As Long) As Long
• Function GetTimeLimits(ByRef StartHour As Long, ByRef EndHour As Long) As Boolean
• Sub Lock()
• Sub Merge(ByVal Project As Project)
• Sub Open()
• Sub Save()
• Sub SaveToFile(ByVal FileName As String)
• Sub SignOff()
• Sub SignOn([ByVal Password As String])
• Function TimeForInterval(ByVal StartHour As Long, ByVal EndHour As Long) As Long
• Sub Unlock()
• Function UserSignOn([ByVal hWnd As Long = 0]) As Boolean

Class ProjectDataRecord

Properties:

• Property Application As Application [r/o]
• Property DataSize As Long [r/o]
• Property Name As String [r/w] [default]
• Property Parent As ProjectDataRecords [r/o]
• Property Type As VptDataType [r/o]
• Property Value As Variant [r/w]

Methods:

• Sub Clear()
• Sub Delete()
• Function GetDataAsArray()() As Byte
• Sub GetDataAsString(ByRef Data As String, ByRef Size As Long)
• Sub SetDataAsArray(ByRef Array() As Byte)
• Sub SetDataAsString(ByVal Data As String)
• Sub SetValue(ByVal Type As VptDataType, ByVal Value As Variant)

Class ProjectDataRecords

Properties:

• Property Application As Application [r/o]
• Property Count As Long [r/o]
• Property Item(ByVal Index As Long) As ProjectDataRecord [r/o] [default]
• Property Parent As Project [r/o]

Methods:

• Function Add(ByVal Name As String, [ByVal Value As Variant], [ByVal Type As VptDataType = vptDataDefault (0)]) As ProjectDataRecord
• Function Find(ByVal Name As String) As ProjectDataRecord

Class ProjectInfo

Properties:

• Property Application As Application [r/o]
• Property Contact As ContactInfo [r/o]
• Property Delivery As DeliveryInfo [r/o]
• Property Finishing As FinishingInfo [r/o]
• Property InputMedia As InputMediaInfo [r/o]
• Property Notes As String [r/w]
• Property OrderInfo As OrderInfo [r/o]
• Property OutputMedia As OutputMediaInfo [r/o]
• Property Parent As Project [r/o]

Class ProjectRecord

Properties:

• Property Application As Application [r/o]
• Property ClientName As String [r/o]
• Property Cost As Long [r/o]
• Property FileName As String [r/o]
• Property Index As Long [r/o]
• Property IsOpen As Boolean [r/o]
• Property LastModified As Date [r/o]
• Property Name As String [r/w] [default]
• Property NumActivities As Long [r/o]
• Property NumApplications As Long [r/o]
• Property NumDocuments As Long [r/o]
• Property NumNonEmptyApps As Long [r/o]
• Property Parent As ProjectRecords [r/o]
• Property Time As Long [r/o]

Methods:

• Sub Delete()
• Function Load() As Project
• Function Open() As Project

Class ProjectRecords

Properties:

• Property Application As Application [r/o]
• Property Count As Long [r/o]
• Property Item(ByVal Index As Long) As ProjectRecord [r/o] [default]
• Property Parent As Application [r/o]

Class Projects

Properties:

• Property Application As Application [r/o]
• Property Count As Long [r/o]
• Property Item(ByVal Index As Long) As Project [r/o] [default]
• Property Parent As Application [r/o]

Methods:

• Function Add(ByVal Name As String, ByVal Client As Client, [ByVal Preset As Preset = 0], [ByVal Open As Boolean = False]) As Project
• Function LoadFromFile(ByVal FileName As String) As Project

Class RateRecord

Properties:

• Property Application As Application [r/o]
• Property Index As Long [r/o]
• Property Parent As RateRecords [r/o]
• Property Rate As Long [r/w]
• Property Time As Long [r/w]

Methods:

• Sub Delete()
• Sub Move(ByVal Position As Long)

Class RateRecords

Properties:

• Property Application As Application [r/o]
• Property Count As Long [r/o]
• Property Item(ByVal Index As Long) As RateRecord [r/o] [default]
• Property Parent As Object [r/o]
• Property Time As Long [r/o]

Methods:

• Function Add(ByVal Time As Long, ByVal Rate As Long) As RateRecord
• Sub Clear()
• Function Insert(ByVal Time As Long, ByVal Rate As Long, ByVal Position As Long) As RateRecord

Class Report

Properties:

• Property Application As Application [r/o]
• Property Description As String [r/w]
• Property Name As String [r/w] [default]
• Property Parent As Reports [r/o]
• Property TemplateFile As String [r/w]

Methods:

• Sub Delete([ByVal DeleteTemplate As Boolean = True])
• Sub Generate([ByRef Projects As Variant], [ByVal Period As VptReportPeriod = vptReportWhole (0)], [ByVal StartHour As Long = 0], [ByVal EndHour As Long = 0], [ByVal FileName As String], [ByVal LaunchBrowser As Boolean = True], [ByVal CombinedReport As Boolean = True], [ByVal ShowDialog As Boolean = True])

Class Reports

Properties:

• Property Application As Application [r/o]
• Property Count As Long [r/o]
• Property Item(ByVal Index As Long) As Report [r/o] [default]
• Property Parent As Application [r/o]

Methods:

• Function Add(ByVal Name As String, ByVal TemplateFile As String, [ByVal Description As String], [ByVal FileName As String]) As Report
• Function Find(ByVal Name As String) As Report

Class TimeRecord

Properties:

• Property Application As Application [r/o]
• Property Hour As Long [r/o]
• Property Index As Long [r/o]
• Property Parent As TimeRecords [r/o]
• Property Time As Long [r/w] [default]

Methods:

• Sub Delete()

Class TimeRecords

Properties:

• Property Application As Application [r/o]
• Property Count As Long [r/o]
• Property Item(ByVal Index As Long) As TimeRecord [r/o] [default]
• Property Parent As TimeTable [r/o]

Methods:

• Function Add(ByVal Hour As Long, ByVal Time As Long) As TimeRecord
• Sub Clear()

Class TimeTable

Properties:

• Property Application As Application [r/o]
• Property Parent As Object [r/o]
• Property Time As Long [r/o] [default]
• Property TimeRecords As TimeRecords [r/o]

Methods:

• Sub Clear()
• Sub DeleteInterval(ByVal StartHour As Long, ByVal EndHour As Long)
• Sub Fill(ByVal StartDate As Date, ByVal Duration As Long)
• Function GetTimeLimits(ByRef StartHour As Long, ByRef EndHour As Long) As Boolean
• Sub Merge(ByVal TimeTable As TimeTable)
• Sub Pack()
• Sub Reclaim(ByVal EndDate As Date, ByVal Duration As Long)
• Sub Sort([ByVal SortDir As VptTimeSortDir = vptAscending (0)])
• Function TimeForHour(ByVal Hour As Long) As Long
• Function TimeForInterval(ByVal StartHour As Long, ByVal EndHour As Long) As Long

Class WorkTime

Properties:

• Property Application As Application [r/o]
• Property Item(ByVal DayOfWeek As Long) As WorkTimeRecord [r/o] [default]
• Property Parent As Object [r/o]

Methods:

• Function GetCount(ByVal DayOfWeek As Long) As Long
• Function GetFromTime(ByVal DayOfWeek As Long, ByVal Index As Long) As Long
• Function GetTime(ByVal DayOfWeek As Long, ByVal Hour As Long, ByVal Minute As Long, ByVal Second As Long) As Long
• Function GetToTime(ByVal DayOfWeek As Long, ByVal Index As Long) As Long
• Function GetType(ByVal DayOfWeek As Long) As VptWorkDayType
• Function IsWorkHour(ByVal Hour As Long) As Boolean
• Function IsWorkTime(ByVal DayOfWeek As Long, ByVal Hour As Long, ByVal Minute As Long) As Boolean

Class WorkTimeRecord

Properties:

• Property Application As Application [r/o]
• Property Count As Long [r/w]
• Property FromTime(ByVal Index As Long) As Long [r/w]
• Property Parent As WorkTime [r/o]
• Property ToTime(ByVal Index As Long) As Long [r/w]
• Property Type As VptWorkDayType [r/w]

Enum VptActivityType

• vptActivityAutomatic As Long=0
• vptActivityManual As Long=1

Enum VptBillingInfo

• vptBillNone As Long=0
• vptBillCash As Long=1
• vptBillCredit As Long=2
• vptBillAccount As Long=3

Enum VptContactPage

• vptContactPrimary As Long=0
• vptContactShipping As Long=1
• vptContactBilling As Long=2

Enum VptDataType

• vptDataDefault As Long=0
• vptDataEmpty As Long=1
• vptDataLong As Long=2
• vptDataDouble As Long=3
• vptDataString As Long=4
• vptDataDate As Long=5
• vptDataCurrency As Long=6
• vptDataBoolean As Long=7
• vptDataBinary As Long=8

Enum VptDeliveryTerm

• vptStandard As Long=0
• vptSecondDay As Long=1
• vptNextAfternoon As Long=2
• vptNextMorining As Long=3

Enum VptDeliveryType

• vptNoDelivery As Long=0
• vptCustomerPickup As Long=1
• vptLocalCourier As Long=2
• vptPrivateCourier As Long=3

Enum VptLaserProofType

• vptComposite As Long=0
• vptSeparation As Long=1

Enum VptPluginFlags

• vptPluginMenu As Long=1
• vptPluginToolBar As Long=2
• vptPluginPrjMenu As Long=4
• vptPluginAppMenu As Long=8
• vptPluginDocMenu As Long=16
• vptPluginActMenu As Long=32
• vptPluginAbout As Long=64
• vptPluginContact As Long=128
• vptPluginSetup As Long=256

Enum VptReportPeriod

• vptReportWhole As Long=0
• vptReportCustom As Long=1
• vptReportLast2Hours As Long=2
• vptReportLast6Hours As Long=3
• vptReportToday As Long=4
• vptReportLast24Hours As Long=5
• vptReportYesterday As Long=6
• vptReportLast2Days As Long=7
• vptReportThisWeek As Long=8
• vptReportLast7Days As Long=9
• vptReportThisMonth As Long=10
• vptReportLastMonth As Long=11

Enum VptSelectionType

• vptNoSelection As Long=0
• vptProjectSelected As Long=1
• vptApplicationSelected As Long=2
• vptDocumentSelected As Long=3
• vptActivitySelected As Long=4

Enum VptTimeSortDir

• vptAscending As Long=0
• vptDescending As Long=1

Enum VptWorkDayType

• vptDefaultDay As Long=0
• vptNonWorkingDay As Long=1
• vptWorkingDay As Long=2