Procedure

TfrmODDiet.calELStartChange

Module

fODDiet

Last Modified

7/15/2014 3:26:42 PM

Visibility

Public/Published

Owner

TfrmODDiet

Declaration

procedure calELStartChange(Sender: TObject);

Calls Hierarchy


TfrmODDiet.calELStartChange
 └TfrmODDiet.ELChange
   ├TResponses.Clear
   ├TResponses.Update
   │ ├TResponses.FindResponseByName
   │ └TResponses.IENForPrompt
   ├TfrmODDiet.GetMealTime
   ├TfrmODDiet.IsEarlyTray
   ├TfrmODBase.OrderForInpatient
   │ ├OrderEventTypeOnCreate
   │ └IsPassEvt1
   ├TfrmODDiet.GetDaysOfWeek
   └TResponses.GetOrderText
     ├TResponses.NextInstance
     ├TResponses.FindResponseByName
     ├TResponses.FormatResponse
     │ └TResponses.FindResponseByIEN
     └TResponses.AppendChildren
       ├TResponses.FindPromptByIEN
       ├TResponses.FindResponseByIEN
       └TResponses.FormatResponse...

Calls

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


Source

1721  procedure TfrmODDiet.calELStartChange(Sender: TObject);
1722  begin
1723    inherited;
1724    if FChangeStop then
1725      calELStop.Text := calELStart.Text
1726    else
1727      ELChange(Sender);
1728  end;