Function

DfltDCSummTitleName

Module

rDCSumm

Last Modified

7/15/2014 3:26:44 PM

Comments

Returns the name of the user defined default Discharge Summary title (if any)

Scope

Interfaced

Declaration

function  DfltDCSummTitleName: string;

Calls Hierarchy


DfltDCSummTitleName
 └LoadDCSummTitles
   └TDCSummTitles.Create

Called-By Hierarchy


                 DfltDCSummTitleName
          TfrmDCSumm.InsertNewSumm┘ 
       TfrmDCSumm.mnuActNewClick┤   
    TfrmDCSumm.cmdNewSummClick┘ │   
TfrmDCSumm.mnuActAddIDEntryClick┘   

Calls

Name Declaration Comments
LoadDCSummTitles procedure LoadDCSummTitles; -

Called-By

Name Declaration Comments
TfrmDCSumm.InsertNewSumm procedure InsertNewSumm(IsIDChild: boolean; AnIDParent: integer); -


Source

93    function DfltDCSummTitleName: string;
94    { returns the name of the user defined default Discharge Summary title (if any) }
95    begin
96      if uDCSummTitles = nil then LoadDCSummTitles;
97      Result := uDCSummTitles.DfltTitleName;
98    end;