Function

TPCEPat.ItemStr

Directives

Override

Module

uPCE

Last Modified

7/15/2014 3:26:36 PM

Comments

Function delimitedStrC: string;
returns string to be assigned to Tlist in PCEData object

Visibility

Public

Overrides

TPCEItem.ItemStr

Owner

TPCEPat

Declaration

function ItemStr: string; override;

Calls Hierarchy


TPCEPat.ItemStr
 └GetPCECodeString
   └CodeSetIndex
     ├LoadImmSeriesItems
     ├LoadImmReactionItems
     ├LoadSkResultsItems
     ├LoadPEDLevelItems
     ├LoadHFLevelItems
     └LoadXAMResultsItems

Calls

Name Declaration Comments
GetPCECodeString function GetPCECodeString(CodeType: integer; ID: string): string; -


Source

1500  function TPCEPat.ItemStr: string;
1501  {returns string to be assigned to Tlist in PCEData object}
1502  begin
1503    if(Level <> NoPCEValue) then
1504      Result := GetPCECodeString(TAG_PEDLEVEL, Level)
1505    else
1506      Result := '';
1507    Result := Result + U + inherited ItemStr;
1508  end;