Procedure

TfrmODDiet.InitDialog

Directives

Override

Module

fODDiet

Last Modified

7/15/2014 3:26:42 PM

Visibility

Protected

Overrides

TfrmODBase.InitDialog

Owner

TfrmODDiet

Declaration

procedure InitDialog; override;

Calls Hierarchy


TfrmODDiet.InitDialog
 └TfrmODDiet.nbkDietChange
   ├TfrmODBase.cmdQuitClick
   ├TResponses.Clear
   ├CurrentDietText
   ├CheckForAutoDCDietOrders
   │ ├LoadOrdersAbbr
   │ │ ├ClearOrders
   │ │ ├LoadDGroupMap
   │ │ ├ExpiredOrdersStartDT
   │ │ ├FMNow
   │ │ └SeqOfDGroup
   │ │   └LoadDGroupMap
   │ └RetrieveOrderFields
   │   └SetOrderFields
   │     ├TOrder.Clear
   │     ├SeqOfDGroup...
   │     └TopNameOfDGroup
   │       └LoadDGroupMap
   ├TfrmODBase.OrderMessage
   │ └TfrmODBase.ShowOrderMessage
   ├TResponses.SetDialog
   │ ├LoadDialogDefinition
   │ └SortPromptsBySequence
   ├TfrmODBase.SetDisplayGroup
   ├DisplayGroupForDialog
   ├LoadDietQuickList
   ├TfrmODDiet.ResetControlsDO
   ├TfrmODBase.OrderForInpatient
   │ ├OrderEventTypeOnCreate
   │ └IsPassEvt1
   ├TfrmODDiet.PatientHasRecurringMeals
   │ └GetCurrentRecurringOPMeals
   ├..(rec)..
   ├TextForOrder
   ├AppendTFProducts
   ├TfrmODDiet.ResetControlsTF
   │ └TfrmODDiet.TFClearGrid
   ├TfrmODDiet.ResetControlsEL
   ├LoadIsolations
   ├CurrentIsolation
   ├IsolationID
   ├TfrmODDiet.ResetControlsIP
   ├TfrmODDiet.ResetControlsAO
   ├TfrmODDiet.ResetControlsOP
   ├SubSetOfOPDiets
   ├TfrmODDiet.cboOPDietAvailMouseClick
   │ ├TResponses.SetQuickOrder
   │ │ ├TResponses.Clear
   │ │ └LoadResponses
   │ │   └ExtractToResponses
   │ │     └ExpandOrderObjects
   │ │       ├TdmodShared.BoilerplateOK
   │ │       │ ├ErrCount
   │ │       │ ├AddErr
   │ │       │ └TdmodShared.LoadTIUObjects
   │ │       │   └GetObjectList
   │ │       └GetTemplateText
   │ │         └TEncounter.GetVisitStr
   │ │           └TEncounter.GetVisitCategory
   │ ├TfrmODDiet.SetValuesFromResponsesOP
   │ │ ├TfrmODDiet.ResetControlsOP
   │ │ ├TResponses.FindResponseByName
   │ │ ├DietAttributes
   │ │ ├TResponses.SetControl
   │ │ │ ├TResponses.FindResponseByName
   │ │ │ └AssignBPText
   │ │ │   ├DisplayGroupToLinkType
   │ │ │   │ └DisplayGroupByName
   │ │ │   ├TResponses.EValueFor
   │ │ │   ├GetServiceIEN
   │ │ │   ├TResponses.IValueFor
   │ │ │   ├GetProcedureIEN
   │ │ │   ├ExpandOrderObjects...
   │ │ │   ├SetTemplateDialogCanceled
   │ │ │   ├CheckBoilerplate4Fields
   │ │ │   ├ExecuteTemplateOrBoilerPlate
   │ │ │   └WasTemplateDialogCanceled
   │ │ ├TfrmODDiet.calOPStopChange
   │ │ │ ├TfrmODDiet.SetEnableOPDOW
   │ │ │ ├TfrmODDiet.FMDOW
   │ │ │ ├TfrmODDiet.FMDays
   │ │ │ └TfrmODDiet.OPChange
   │ │ │   ├TResponses.Clear
   │ │ │   ├TResponses.Update
   │ │ │   │ ├TResponses.FindResponseByName
   │ │ │   │ └TResponses.IENForPrompt
   │ │ │   ├TfrmODDiet.GetOPDaysOfWeek
   │ │ │   └TResponses.GetOrderText
   │ │ │     ├TResponses.NextInstance
   │ │ │     ├TResponses.FindResponseByName
   │ │ │     ├TResponses.FormatResponse
   │ │ │     │ └TResponses.FindResponseByIEN
   │ │ │     └TResponses.AppendChildren
   │ │ │       ├TResponses.FindPromptByIEN
   │ │ │       ├TResponses.FindResponseByIEN
   │ │ │       └TResponses.FormatResponse...
   │ │ ├TfrmODDiet.OPDietCheckForNPO
   │ │ ├TfrmODDiet.OPDietCheckForTF
   │ │ │ └TextForOrder
   │ │ └TfrmODDiet.OPChange...
   │ ├DietAttributes
   │ ├TfrmODDiet.OPDietCheckForNPO
   │ ├TfrmODDiet.OPDietCheckForTF...
   │ ├TfrmODBase.OrderMessage...
   │ ├OIMessage
   │ └TfrmODDiet.OPChange...
   └TfrmODDiet.SetEnableOPDOW

Calls

Name Declaration Comments
TfrmODDiet.nbkDietChange procedure nbkDietChange(Sender: TObject); -


Source

406   procedure TfrmODDiet.InitDialog;
407   begin
408     inherited;
409     // handle all initialization at the tab level
410     // if FTabChanging, then nbkDietChange is about to be called anyway
411     if not FTabChanging then nbkDietChange(Self);
412   end;