Class

TPCEHealth

Module

uPCE

Last Modified

7/15/2014 3:26:36 PM

Scope

Interfaced

Inherits from

TPCEItem

Declaration


  TPCEHealth = class(TPCEItem)
  {class for Health Factors}
  public
//    Provider: Int64; {jm 9/8/99}
    Level:   string;
    procedure Assign(Src: TPCEItem); override;
    procedure Clear; override;
    function DelimitedStr: string; override;
//    function delimitedStrC: string;        
    function ItemStr: string; override;
    procedure SetFromString(const x: string); override;
    function HasCPTStr: string; override;
  end;

Class Hierarchy


TObject
 └TPCEItem
   └TPCEHealth

Class Fields

Name Type Scope Comments
Level UnicodeString Public Provider: Int64; {jm 9/8/99}

Methods

Name Declaration Scope Comments
Assign procedure Assign(Src: TPCEItem); override; Public TPCEHealth methods -------------------------------------------------------------------------
Clear procedure Clear; override; Public Clear fields(properties) of class
DelimitedStr function DelimitedStr: string; override; Public
Function TPCEHealth.DelimitedStr: string;
modified: 6/17/98
By: Robert Bott
Location: ISL
Purpose: Add Comments to PCE Items.

created delimited string to pass to broker
HasCPTStr function HasCPTStr: string; override; Public
Function TPCEHealth.delimitedStrC: string;
begin
  Result := inherited DelimitedStr;
  Result := 'HF' + Result + U + Level + U + IntToStr(Provider) + U + U + U +
   U + comment;
end;
ItemStr function ItemStr: string; override; Public
Function delimitedStrC: string;
returns string to be assigned to Tlist in PCEData object
SetFromString procedure SetFromString(const x: string); override; Public Sets fields to pieces passed from server: TYP ^ Code ^ Category ^ Narrative ^ Qty ^ Prov

Referenced By (18)

Module (line) Referrer Type
fHealthFactor (53) - Read
fHealthFactor (69) - Read
fHealthFactor (89) - Read
fReminderDialog (1424) - Read
uPCE (1165) - Read
uPCE (1659) - Read
uPCE (1748) - Read
uPCE (1785) - Read
uPCE (2014) - Read
uPCE (2138) - Read
uPCE (2211) - Read
uPCE (2216) - Read
uPCE (2527) - Read
uPCE (2532) - Read
uPCE (2536) - Read
uPCE (2551) - Read
uPCE (2782) - Read
uPCE (2912) - Read