Procedure

TfrmODMeds.UMShowNSSBuilder

Directives

Message

Module

fODMeds

Last Modified

7/15/2014 3:26:42 PM

Visibility

Private

Owner

TfrmODMeds

Declaration

procedure UMShowNSSBuilder(var Message: TMessage); message UM_NSSOTHER;

Calls Hierarchy


TfrmODMeds.UMShowNSSBuilder
 └TfrmODMeds.cboScheduleClick
   ├TfrmODMeds.CreateOtherScheduel
   │ └ShowOtherSchedule
   │   ├TfrmBase508Form.Create
   │   │ ├TfrmBase508Form.UpdateAccessibilityActions
   │   │ ├UnfocusableControlEnter
   │   │ └AdjustControls
   │   │   ├TfrmBase508Form.ModifyUnfocusableControl
   │   │   └..(rec)..
   │   └SetFormPosition
   │     └TSizeHolder.GetSize
   └TfrmODMeds.UpdateRelated
     └TfrmODMeds.timCheckChangesTimer
       ├TfrmODMeds.ControlChange
       │ ├TResponses.Clear
       │ ├TResponses.Update
       │ │ ├TResponses.FindResponseByName
       │ │ └TResponses.IENForPrompt
       │ ├TfrmODMeds.FindCommonDrug
       │ │ ├TfrmODMeds.FindDoseFields
       │ │ ├SaveDrug
       │ │ └KillDrug
       │ ├TfrmODMeds.ConstructedDoseFields
       │ ├TfrmODMeds.ValueOf
       │ │ ├GetSingleDoseSchedule
       │ │ ├GetSingleDoseScheduleEX
       │ │ ├TfrmODMeds.FieldsForDose
       │ │ │ └TfrmODMeds.ConstructedDoseFields
       │ │ ├TfrmODMeds.FieldsForDrug
       │ │ ├GetComplexDoseSchedule
       │ │ │ └TfrmODMeds.ValFor
       │ │ └GetComplexDoseScheduleEX
       │ │   └TfrmODMeds.ValFor
       │ ├TfrmODMeds.lblAdminSchGetText
       │ ├TfrmODMeds.ValFor
       │ ├TfrmODMeds.InpatientSig
       │ │ ├TfrmODMeds.ValueOf...
       │ │ └TfrmODMeds.CheckDecimal
       │ │   └TfrmODMeds.TextDosage
       │ ├TfrmODMeds.OutpatientSig
       │ │ ├TfrmODMeds.ValueOf...
       │ │ └TfrmODMeds.CheckDecimal...
       │ └TResponses.GetOrderText
       │   ├TResponses.NextInstance
       │   ├TResponses.FindResponseByName
       │   ├TResponses.FormatResponse
       │   │ └TResponses.FindResponseByIEN
       │   └TResponses.AppendChildren
       │     ├TResponses.FindPromptByIEN
       │     ├TResponses.FindResponseByIEN
       │     └TResponses.FormatResponse...
       ├TResponses.NextInstance
       ├TfrmODMeds.ValueOfResponse
       │ └TResponses.IValueFor
       ├TfrmODMeds.ValueOf...
       ├TfrmODMeds.UpdateStartExpires
       │ ├TfrmODMeds.ValFor
       │ ├TfrmODMeds.lblAdminSchSetText
       │ ├TfrmODMeds.lblAdminSchGetText
       │ ├LoadAdminInfo
       │ ├FMToday
       │ │ └FMNow
       │ └TfrmODMeds.DisplayDoseNow
       ├IsClozapineOrder
       ├TfrmODMeds.UpdateDefaultSupply
       │ ├TResponses.IValueFor
       │ ├IsClozapineOrder
       │ ├DefaultDays
       │ └DaysToQty
       ├TfrmODMeds.UpdateSupplyQuantity
       │ ├TfrmODMeds.DurationToDays
       │ │ └TfrmODMeds.ValFor
       │ ├DaysToQty
       │ └QtyToDays
       └TfrmODMeds.UpdateRefills
         └CalcMaxRefills

Calls

Name Declaration Comments
TfrmODMeds.cboScheduleClick procedure cboScheduleClick(Sender: TObject); -


Source

5470  procedure TfrmODMeds.UMShowNSSBuilder(var Message: TMessage);
5471  begin
5472    Sleep(1000);
5473    cboScheduleClick(Self);
5474  end;