Procedure

TfrmODProc.txtProvDiagChange

Module

fODProc

Last Modified

7/15/2014 3:26:34 PM

Visibility

Public/Published

Owner

TfrmODProc

Declaration

procedure txtProvDiagChange(Sender: TObject);

Calls Hierarchy


TfrmODProc.txtProvDiagChange
 └TfrmODProc.ControlChange
   ├TResponses.Update
   │ ├TResponses.FindResponseByName
   │ └TResponses.IENForPrompt
   ├TfrmODProc.updateService
   │ ├TfrmODProc.setup508Label
   │ └TResponses.Update...
   └TResponses.GetOrderText
     ├TResponses.NextInstance
     ├TResponses.FindResponseByName
     ├TResponses.FormatResponse
     │ └TResponses.FindResponseByIEN
     └TResponses.AppendChildren
       ├TResponses.FindPromptByIEN
       ├TResponses.FindResponseByIEN
       └TResponses.FormatResponse...

Calls

Name Declaration Comments
TfrmODProc.ControlChange procedure ControlChange(Sender: TObject); -


Source

672   procedure TfrmODProc.txtProvDiagChange(Sender: TObject);
673   begin
674     inherited;
675     if ProvDx.PromptMode = 'F' then
676       ProvDx.Text := txtProvDiag.Text;
677     ControlChange(Self);
678   end;