• XbQueryOldestLogEntry(nEvtHandle, @nRecord)

  
  

  • Description
    this function retrieves the absolute record number of the oldest record
    in the specified event log.
    
  • Parameter(s)

    hEventLog
    Identifies the event log to be closed.
    This handle is returned by the XbOpenEventLog function

    nRecord (by reference)
    points to a numeric-variable that receives absolute record number of the
    oldest record in the given event log.
    

  • Return Value
    If the function succeeds, the return value is TRUE, otherwise FALSE.
    To get extended error information, call XbEventGetLastError.
    

• Sample
  #include "xbevent.ch"

local nEvtHandle    := 0
local cError        := space(100)
local nRecords      := 0

//
// open a Eventlog-Key and directly close key again
//
if ((nEvtHandle := XbOpenEventLog(, "WinApp")) <= 0)
  XbEventGetLastError(@cError)
  ? "Error :", cError
else
  if (XbQueryOldestLogEntry(nEvtHandle, @nRecord)== FALSE)
    XbEventGetLastError(@cError)
    ? "Error :", cError
  else
    ? "the oldest record is", nRecord, "in this logfile"
  endif
  XbCloseEventLog(nEvtHandle)
endif