Function

TfrmDrawers.CanEditTemplates

Module

fDrawers

Last Modified

7/15/2014 3:26:36 PM

Visibility

Public

Owner

TfrmDrawers

Declaration

function CanEditTemplates: boolean;

Calls Hierarchy


TfrmDrawers.CanEditTemplates
 └UserTemplateAccessLevel
   ├GetTemplateRoots
   └GetTemplateAccess

Called-By Hierarchy


   TfrmDrawers.CanEditTemplates
  TfrmDCSumm.popSummMemoPopup┤ 
   TfrmDCSumm.mnuOptionsClick┤ 
TfrmConsults.popNoteMemoPopup┤ 
 TfrmConsults.mnuOptionsClick┤ 
 TfrmSurgery.popNoteMemoPopup┤ 
  TfrmSurgery.mnuOptionsClick┤ 
   TfrmNotes.popNoteMemoPopup┤ 
    TfrmNotes.mnuOptionsClick┘ 

Calls

Name Declaration Comments
UserTemplateAccessLevel function UserTemplateAccessLevel: TTemplateAccess; -

Called-By

Name Declaration Comments
TfrmDCSumm.mnuOptionsClick procedure mnuOptionsClick(Sender: TObject); -
TfrmConsults.mnuOptionsClick procedure mnuOptionsClick(Sender: TObject); -
TfrmSurgery.mnuOptionsClick procedure mnuOptionsClick(Sender: TObject); -
TfrmNotes.mnuOptionsClick procedure mnuOptionsClick(Sender: TObject); -
TfrmConsults.popNoteMemoPopup procedure popNoteMemoPopup(Sender: TObject); -
TfrmSurgery.popNoteMemoPopup procedure popNoteMemoPopup(Sender: TObject); -
TfrmNotes.popNoteMemoPopup procedure popNoteMemoPopup(Sender: TObject); -
TfrmDCSumm.popSummMemoPopup procedure popSummMemoPopup(Sender: TObject); -


Source

1185  function TfrmDrawers.CanEditTemplates: boolean;
1186  begin
1187    Result := (UserTemplateAccessLevel in [taAll, taEditor]);
1188  end;