Class

TRemPCERoot

Module

uReminders

Last Modified

10/8/2014 2:49:30 PM

Scope

Interfaced

Inherits from

TObject

Declaration


TRemPCERoot = class(TObject)
private
  FData: TList;
  FID: string;
  FForcedPrompts: TStringList;
  FValue: string;
  FValueSet: string;
protected
  class function GetRoot(Data: TRemData; Rec3: string; Historical: boolean): TRemPCERoot;
  procedure Done(Data: TRemData);
  procedure Sync(Prompt: TRemPrompt);
  procedure UnSync(Prompt: TRemPrompt);
  function GetValue(PromptType: TRemPromptType; var NewValue: string): boolean;
public
  destructor Destroy; override;
end;

Class Hierarchy


TObject
 └TRemPCERoot

Class Fields

Name Type Scope Comments
FData TList Private -
FForcedPrompts TStringList Private -
FID UnicodeString Private -
FValue UnicodeString Private -
FValueSet UnicodeString Private -

Destructors

Name Declaration Scope Comments
Destroy destructor Destroy; override; Public TRemPCERoot

Methods

Name Declaration Scope Comments
Done procedure Done(Data: TRemData); Protected -
GetRoot class function GetRoot(Data: TRemData; Rec3: string; Historical: boolean): TRemPCERoot; Protected -
GetValue function GetValue(PromptType: TRemPromptType; var NewValue: string): boolean; Protected -
Sync procedure Sync(Prompt: TRemPrompt); Protected -
UnSync procedure UnSync(Prompt: TRemPrompt); Protected -

Referenced By (19)

Module (line) Referrer Type
uReminders (177) TRemData Read
uReminders (274) GetRoot Read
uReminders (466) PrimaryDiagRoot Read
uReminders (3167) - Read
uReminders (3170) - Read
uReminders (3347) - Read
uReminders (5285) Add Read
uReminders (5448) - Read
uReminders (5467) - Read
uReminders (5500) - Read
uReminders (6376) - Read
uReminders (6491) - Read
uReminders (6499) - Read
uReminders (6527) - Read
uReminders (6664) - Read
uReminders (6991) - Read
uReminders (6995) - Read
uReminders (7023) - Read
uReminders (7033) - Read