Function

GetReminderData

Directives

Overload

Module

uReminders

Last Modified

10/8/2014 2:49:30 PM

Scope

Interfaced

Declaration

function GetReminderData(Rem: TReminderDialog; Lst: TStrings; Finishing: boolean = FALSE;
                                         Historical: boolean = FALSE): integer; overload;

Calls Hierarchy


GetReminderData
 └TReminderDialog.AddData
   └TRemDlgElement.AddData
     ├TRemDlgElement.Historical
     ├TPCEData.VisitDateTime
     │ └TPCEData.IsSecondaryVisit
     ├TRemData.AddData
     │ ├Add
     │ │ ├Code2DataType
     │ │ ├TRemDlgElement.Historical
     │ │ ├TRemPrompt.GetValue
     │ │ │ ├TRemDlgElement.Historical
     │ │ │ ├TPCEData.VisitDateTime...
     │ │ │ ├TRemPrompt.RemDataActive
     │ │ │ │ └TRemPrompt.CompareActiveDate
     │ │ │ └TRemPrompt.RemDataChoiceActive
     │ │ ├TPCEData.VisitDateTime...
     │ │ ├ValidateGAFDate
     │ │ │ ├TPatient.GetDateDied
     │ │ │ │ └DateOfDeath
     │ │ │ └FMToday
     │ │ │   └FMNow
     │ │ ├TPCEProviderList.PCEProvider
     │ │ │ ├Check
     │ │ │ │ └TPCEProviderList.IndexOfProvider
     │ │ │ └TPCEProviderList.PrimaryIEN
     │ │ │   └TPCEProviderList.GetPrimaryIdx
     │ │ ├AddPrompt
     │ │ │ ├TRemPrompt.PromptType
     │ │ │ │ └Code2PromptType
     │ │ │ ├TPCEProviderList.PCEProvider...
     │ │ │ ├TPCEData.VisitDateTime...
     │ │ │ ├TRemPrompt.VitalValue
     │ │ │ │ └TRemPrompt.GetValue...
     │ │ │ ├TRemPrompt.VitalType
     │ │ │ │ ├Code2VitalType
     │ │ │ │ └TRemData.InternalValue
     │ │ │ ├TRemPrompt.VitalUnitValue
     │ │ │ │ ├TRemPrompt.VitalType...
     │ │ │ │ └TRemPrompt.GetValue...
     │ │ │ ├ConvertVital
     │ │ │ ├FormatVitalForNote
     │ │ │ │ └ConvertVitalData
     │ │ │ ├TRemPrompt.GetValue...
     │ │ │ └TRemDlgElement.Historical
     │ │ └GetPCEDataText
     │ │   └GetDiagnosisText
     │ ├TRemDlgElement.Historical
     │ └TPCEData.VisitDateTime...
     ├TRemDlgElement.ElemType
     └..(rec)..

Calls

Name Declaration Comments
TReminderDialog.AddData function AddData(Lst: TStrings; Finishing: boolean = FALSE; Historical: boolean = FALSE): integer; -


Source

2183  function GetReminderData(Rem: TReminderDialog; Lst: TStrings; Finishing: boolean = FALSE;
2184                                                          Historical: boolean = FALSE): integer;
2185  begin
2186    Result := Rem.AddData(Lst, Finishing, Historical);
2187  end;