This filter property returns only flow sheets which have suitable 'patient filter' conditions.
object.OnlyFiltered
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISFlowSheetFilter interface |
bool
Display the number of the flow sheets loaded on the basis of the selected filter and their names.
Dim aFilter
Dim aFlowSheet
Dim aFlowSheets
Dim aMessage
Set aPatient = Profile.SelectPatient
set aFilter = Profile.CreateFlowSheetFilter
aFilter.PatientId = aPatient.Id
aFilter.OnlyFiltered = True
set aFlowSheets = Profile.LoadFlowSheets(aFilter)
aMessage = "Flow Sheets Count = " & aFlowSheets.Count
for i = 0 to aFlowSheets.Count - 1
set aFlowSheet = aFlowSheets.Item(i)
aMessage = aMessage & vbNewLine & "The name of the flow sheet is " &_
aFlowSheet.Name
next
Profile.MsgBox(aMessage)
In Profile Client v8 on User Interface Flow Sheets can be found in
or in .