Function

GetNameFromList

Module

fRemCoverSheet

Last Modified

7/15/2014 3:26:38 PM

Scope

Local

Local subprogram to

GetExternalName

Declaration

function GetNameFromList(List: TORStringList; IEN: Int64; FileNum: Double): string;

Calls Hierarchy


GetNameFromList
 └ExternalName

Called-By Hierarchy


                             GetNameFromList
         TfrmRemCoverSheet.GetExternalName┘ 
                  TfrmRemCoverSheet.Init┤   
            EditCoverSheetReminderList┘ │   
 TfrmReminderTree.mnuCoverSheetClick┤   │   
              DialogOptionsReminders┘   │   
TfrmOptions.btnCoverRemindersClick┘     │   
             TfrmRemCoverSheet.SetupItem┤   
         TfrmRemCoverSheet.cbxUserChange┤   
      TfrmRemCoverSheet.cbEditLevelClick┘   
    TfrmRemCoverSheet.cbxDropDownClose┘     
 TfrmRemCoverSheet.cbxDivisionChange┤       
  TfrmRemCoverSheet.cbxServiceChange┤       
 TfrmRemCoverSheet.cbxLocationChange┤       
    TfrmRemCoverSheet.cbxClassChange┤       
     TfrmRemCoverSheet.cbxUserChange┤       
  TfrmRemCoverSheet.lvViewSelectItem┘       
    TfrmRemCoverSheet.lvViewChange┘         

Calls

Name Declaration Comments
ExternalName function ExternalName(IEN: Int64; FileNumber: Double): string; -

Called-By

Name Declaration Comments
TfrmRemCoverSheet.GetExternalName function GetExternalName(Level: TRemCoverDataLevel; IEN: Int64): string; -


Source

625   function GetNameFromList(List: TORStringList; IEN: Int64; FileNum: Double): string;
626   var
627     idx: integer;
628   
629   begin
630     idx := List.IndexOfPiece(IntToStr(IEN));
631     if idx < 0 then
632       idx := List.Add(IntToStr(IEN) + U + ExternalName(IEN, FileNum));
633       Result := piece(List[idx],U,2);
634   end;