Procedure

TfrmODDiet.calOPStartChange

Module

fODDiet

Last Modified

7/15/2014 3:26:42 PM

Visibility

Public/Published

Owner

TfrmODDiet

Declaration

procedure calOPStartChange(Sender: TObject);

Calls Hierarchy


TfrmODDiet.calOPStartChange
 └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...

Calls

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


Source

2002  procedure TfrmODDiet.calOPStartChange(Sender: TObject);
2003  begin
2004    inherited;
2005    if Changing then exit;
2006    if FChangeStop then
2007      calOPStop.Text := calOPStart.Text
2008    else
2009      OPChange(Sender);
2010  end;