Procedure

TfrmReminderTree.mnuCoverSheetClick

Module

fReminderTree

Last Modified

7/15/2014 3:26:38 PM

Visibility

Public/Published

Owner

TfrmReminderTree

Declaration

procedure mnuCoverSheetClick(Sender: TObject);

Calls Hierarchy


TfrmReminderTree.mnuCoverSheetClick
 ├EditCoverSheetReminderList
 │ ├TfrmBase508Form.Create
 │ │ ├TfrmBase508Form.UpdateAccessibilityActions
 │ │ ├UnfocusableControlEnter
 │ │ └AdjustControls
 │ │   ├TfrmBase508Form.ModifyUnfocusableControl
 │ │   └..(rec)..
 │ ├TfrmRemCoverSheet.Init
 │ │ ├GetAllRemindersAndCategories
 │ │ ├TfrmRemCoverSheet.GetUserInfo
 │ │ │ └UserDivClassInfo
 │ │ ├GetPCECodes
 │ │ │ ├LoadHistLocations
 │ │ │ └CodeSetIndex
 │ │ │   ├LoadImmSeriesItems
 │ │ │   ├LoadImmReactionItems
 │ │ │   ├LoadSkResultsItems
 │ │ │   ├LoadPEDLevelItems
 │ │ │   ├LoadHFLevelItems
 │ │ │   └LoadXAMResultsItems
 │ │ ├TfrmRemCoverSheet.GetExternalName
 │ │ │ └GetNameFromList
 │ │ │   └ExternalName
 │ │ ├TfrmRemCoverSheet.UpdateView
 │ │ │ └TfrmRemCoverSheet.GetCurrent
 │ │ │   └TfrmRemCoverSheet.GetCoverSheetLvlData
 │ │ │     └GetCoverSheetLevelData
 │ │ └TfrmRemCoverSheet.UpdateButtons
 │ │   ├TfrmRemCoverSheet.GetCurrent...
 │ │   ├TfrmRemCoverSheet.GetIndex
 │ │   └TfrmRemCoverSheet.LockButtonUpdate
 │ │     ├TfrmRemCoverSheet.btnLockClick
 │ │     │ └TfrmRemCoverSheet.ChangeStatus
 │ │     │   ├TfrmRemCoverSheet.GetCurrent...
 │ │     │   ├TfrmRemCoverSheet.GetIndex
 │ │     │   ├TfrmRemCoverSheet.MarkListAsChanged
 │ │     │   │ └TfrmRemCoverSheet.UpdateView...
 │ │     │   ├TfrmRemCoverSheet.SetupItem
 │ │     │   └TfrmRemCoverSheet.LockButtonUpdate...
 │ │     └TfrmRemCoverSheet.btnAddClick
 │ │       └TfrmRemCoverSheet.ChangeStatus...
 │ └ResetReminderLoad
 │   └LoadReminderData
 │     ├BeginReminderUpdate
 │     ├GetCurrentReminders
 │     ├CheckReminders
 │     │ ├EvaluateReminders
 │     │ └ReminderEvaluated
 │     ├GetOtherReminders
 │     └EndReminderUpdate
 └CanEditAllRemCoverSheetLists
   └HasMenuOptionAccess

Calls

Name Declaration Comments
CanEditAllRemCoverSheetLists function CanEditAllRemCoverSheetLists: boolean; -
EditCoverSheetReminderList procedure EditCoverSheetReminderList(AsUser: boolean); -


Source

685   procedure TfrmReminderTree.mnuCoverSheetClick(Sender: TObject);
686   begin
687     EditCoverSheetReminderList(not CanEditAllRemCoverSheetLists);
688   end;