Class

TPRFNotes

Module

fPatientFlagMulti

Last Modified

7/15/2014 3:26:38 PM

Comments

This object holds a List of Notes Linked to a PRF as Returned VIA the RPCBroker

Scope

Interfaced

Inherits from

TObject

Declaration


TPRFNotes = class(TObject)
private
  FPRFNoteList : TStringList;
public
  //procedure to show the Notes in a ListView, requires a listview parameter
  procedure ShowActionsOnList(DisplayList : TCaptionListView);
  //procedure to load the notes, this will call the RPC
  procedure Load(TitleIEN : Int64; DFN : String);
  function getNoteIEN(index: integer): String;
  constructor create;
  destructor Destroy(); override;
end;

Class Hierarchy


TObject
 └TPRFNotes

Class Fields

Name Type Scope Comments
FPRFNoteList TStringList Private -

Constructors

Name Declaration Scope Comments
create constructor create; Public TPRFNotes

Destructors

Name Declaration Scope Comments
Destroy destructor Destroy(); override; Public -

Methods

Name Declaration Scope Comments
getNoteIEN function getNoteIEN(index: integer): String; Public -
Load procedure Load(TitleIEN : Int64; DFN : String); Public Procedure to load the notes, this will call the RPC
ShowActionsOnList procedure ShowActionsOnList(DisplayList : TCaptionListView); Public Procedure to show the Notes in a ListView, requires a listview parameter

Referenced By (2)

Module (line) Referrer Type
fPatientFlagMulti (55) TfrmFlags Read
fPatientFlagMulti (152) - Read