Context: |
General |
Library/Class: |
Sample Code |
Coded filter condition & time-stamp for exported documents As Integer, Read/Write
Note: in this sample the exported Notes documents are modified on file. This process might create Save & Replication Conflicts if users and / or other processes modify the same documents at the same time and / or in a different database replica.
Const CB_INITIALISE = 3
Const CB_ACTIONONLY = 16
Const CB_BFOREXPORT = 10
Const CB_INVALID = 12
Const CB_CATEGORY = 13
Const CB_TOTAL = 14
Const CB_CONFLICT = 15
Const CB_BFORREADNOTES = 6
Const CB_BFORWRITECOM = 1
Const CB_AFTERWRITECOM = 9
Const CB_BFORCOMACTION = 5
Const CB_BFORNOTESACTION = 2
Const CB_TERMINATE = 4
select case stats.cbstatus
case CB_INITIALISE
case CB_ACTIONONLY
case CB_BFOREXPORT
case CB_INVALID
case CB_CATEGORY
case CB_TOTAL
case CB_CONFLICT
case CB_BFORREADNOTES
' The following is a filter condition that will export the currently
' processed document only if the IsActiveClient field does not
' contain the value "No".
If stats.ExpDoc.IsActiveClient(0) = "No" Then
' assigning False to export.Continue in this event,
' will force Integra to skip the currently processed
' document and to continue with the next one.
export.Continue = False
EndIf
case CB_BFORWRITECOM
case CB_AFTERWRITECOM
' stats.TimeStamp property contains a date-time value set when
' the export is initialized using this property will stamp all exported
' documents with the same date and time value.
stats.ExpDoc.ExportTimeStamp = stats.TimeStamp
Call stats.ExpDoc.Save(True,False)
case CB_BFORCOMACTION
case CB_BFORNOTESACTION
if not stats.savdoc is nothing then
else
end if
case CB_TERMINATE
end select
|