PdcClockLine.TimeKind

Declaration

TimeKind as long

Code example

This code example returns the timekind of clockline with ID "456".

Sub sGetClockLineTimeKind
dim objClockLine
dim intID

  intID = "456"
  set objClockLine = pdc.ProductRegistration.ClockLines.Open(intID)

  if IsValid(objClockLine) then
    msgbox objClockLine.TimeKind
  end if

  set objClockLine = nothing
End Sub