Function

GetServiceIEN

Module

rConsults

Last Modified

7/15/2014 3:26:36 PM

Scope

Interfaced

Declaration

function GetServiceIEN(ORIEN: string): string;

Called-By Hierarchy


                                           GetServiceIEN
                                          AssignBPText┤ 
                               TResponses.SetControl┘ │ 
                            TfrmODMisc.SetupDialog┤   │ 
                             TfrmODGen.SetupDialog┤   │ 
                           TfrmODMedIn.SetupDialog┤   │ 
                   TfrmODMedIn.cboMedicationSelect┤   │ 
                        TfrmODMedIn.CheckFormAlt┘ │   │ 
                   TfrmODMedIn.cboDispenseExit┤   │   │ 
             TfrmODMedIn.cboDispenseMouseClick┘   │   │ 
          TfrmODMedIn.cboMedicationSelect...┘     │   │ 
                          TfrmODMedOut.SetupDialog┤   │ 
                  TfrmODMedOut.cboMedicationSelect┤   │ 
                       TfrmODMedOut.CheckFormAlt┘ │   │ 
                  TfrmODMedOut.cboDispenseExit┤   │   │ 
            TfrmODMedOut.cboDispenseMouseClick┘   │   │ 
         TfrmODMedOut.cboMedicationSelect...┘     │   │ 
                      TfrmODMedOut.SetInstructions┤   │ 
                        TfrmODMedOut.SetupDialog┤ │   │ 
             TfrmODMedOut.cboMedicationSelect...┤ │   │ 
                    TfrmODMedOut.cmdComplexClick┘ │   │ 
                            TfrmODText.SetupDialog┤   │ 
                            TfrmODProc.SetupDialog┤   │ 
                          TfrmODProc.cboProcSelect┤   │ 
                            TfrmODCslt.SetupDialog┤   │ 
                       TfrmODCslt.treServiceChange┤   │ 
                    TfrmODCslt.treServiceKeyDown┘ │   │ 
                       TfrmODCslt.cboServiceSelect┤   │ 
                       TfrmODCslt.cboServiceExit┘ │   │ 
                             TfrmODRad.SetupDialog┤   │ 
                      TfrmODRad.cboProcedureSelect┤   │ 
                      TfrmODRad.cboProcedureExit┘ │   │ 
                             TfrmODLab.SetupDialog┤   │ 
                      TfrmODLab.cboAvailTestSelect┤   │ 
                           TfrmODLab.SetupDialog┤ │   │ 
                      TfrmODLab.cboAvailTestExit┘ │   │ 
                           TfrmODBBank.SetupDialog┤   │ 
                       TfrmODBBank.SetOnQuickOrder┤   │ 
                       TfrmODBBank.cboQuickClick┘ │   │ 
                TfrmODMedIV.SetValuesFromResponses┤   │ 
                         TfrmODMedIV.SetupDialog┤ │   │ 
               TfrmODMedIV.cboSolutionMouseClick┘ │   │ 
                   TfrmODMedIV.cboSolutionExit┘   │   │ 
                          TfrmODVitals.SetupDialog┤   │ 
                      TfrmODMedNVA.SetOnQuickOrder┤   │ 
                        TfrmODMedNVA.SetupDialog┤ │   │ 
                     TfrmODMedNVA.btnSelectClick┘ │   │ 
                     TfrmODMedNVA.UMDelayClick┘   │   │ 
                        TfrmODMeds.SetOnQuickOrder┤   │ 
                          TfrmODMeds.SetupDialog┤ │   │ 
                       TfrmODMeds.btnSelectClick┘ │   │ 
                       TfrmODMeds.UMDelayClick┘   │   │ 
               TfrmODDiet.SetValuesFromResponsesDO┤   │ 
                          TfrmODDiet.SetupDialog┤ │   │ 
               TfrmODDiet.cboDietAvailMouseClick┘ │   │ 
                   TfrmODDiet.cboDietAvailExit┘   │   │ 
               TfrmODDiet.SetValuesFromResponsesTF┤   │ 
                          TfrmODDiet.SetupDialog┤ │   │ 
                 TfrmODDiet.cboProductMouseClick┘ │   │ 
                     TfrmODDiet.cboProductExit┘   │   │ 
               TfrmODDiet.SetValuesFromResponsesEL┤   │ 
                          TfrmODDiet.SetupDialog┘ │   │ 
               TfrmODDiet.SetValuesFromResponsesIP┤   │ 
                          TfrmODDiet.SetupDialog┘ │   │ 
               TfrmODDiet.SetValuesFromResponsesAO┤   │ 
                          TfrmODDiet.SetupDialog┘ │   │ 
               TfrmODDiet.SetValuesFromResponsesOP┤   │ 
                          TfrmODDiet.SetupDialog┤ │   │ 
             TfrmODDiet.cboOPDietAvailMouseClick┘ │   │ 
                      TfrmODDiet.nbkDietChange┤   │   │ 
                       TfrmODDiet.InitDialog┤ │   │   │ 
                      TfrmODDiet.SetupDialog┤ │   │   │ 
                                   ..(rec)..┘ │   │   │ 
                 TfrmODDiet.cboOPDietAvailExit┤   │   │ 
              TfrmODDiet.cboOPDietAvailKeyDown┘   │   │ 
                         TfrmODAllergy.SetupDialog┤   │ 
                    TfrmODAllergy.lstAllergySelect┘   │ 
                       TfrmODAllergy.SetupDialog┤     │ 
                                       ..(rec)..┘     │ 
                                TfrmODCslt.SetupDialog┤ 
                                   TfrmODAuto.Validate┤ 
                                   ActivateOrderDialog┘ 
                           TfrmRemDlg.btnFinishClick┤   
           TfrmConsults.mnuActNewConsultRequestClick┤   
                   TfrmConsults.cmdNewConsultClick┘ │   
                TfrmConsults.mnuActNewProcedureClick┤   
                      TfrmConsults.cmdNewProcClick┘ │   
                                        ChangeOrders┤   
                      TfrmOrders.mnuActChangeClick┤ │   
                        TfrmMeds.mnuActChangeClick┘ │   
                                     ChangeOrdersEvt┤   
                                          CopyOrders┤   
                        TfrmOrders.mnuActCopyClick┤ │   
                          TfrmMeds.mnuActCopyClick┤ │   
                           TfrmODActive.btnOKClick┘ │   
                                      TransferOrders┤   
                        TfrmOrders.mnuActCopyClick┤ │   
                          TfrmMeds.mnuActCopyClick┤ │   
                           TfrmODActive.btnOKClick┘ │   
                            TfrmOrders.lstWriteClick┤   
               TfrmOrders.PlaceOrderForDefaultDialog┤   
                  TfrmOrders.DisplayDefaultDlgList┤ │   
                       TfrmOrders.ResetOrderPage┘ │ │   
               TfrmOrders.btnDelayedOrderClick┘   │ │   
                                 DisplayEvntDialog┤ │   
                             SetDelayEventForMed┘ │ │   
                      TfrmMeds.mnuActCopyClick┘   │ │   
                                 DisplayEvntDialog┤ │   
                                  SetViewForCopy┘ │ │   
                    TfrmOrders.mnuActCopyClick┘   │ │   
                                 DisplayEvntDialog┘ │   
                                ExecuteChangeEvt┘   │   
                 TfrmOrders.mnuActChgEvntClick┘     │   
                             TfrmMeds.mnuActNewClick┤   
                           TfrmOMNavA.ActivateDialog┤   
                         TfrmOMNavA.grdMenuKeyDown┤ │   
                         TfrmOMNavA.grdMenuMouseUp┘ │   
                                TfrmOMSet.DoNextItem┘   
                              TfrmOMSet.InsertList┤     
                               ActivateOrderList┘ │     
                     TfrmRemDlg.btnFinishClick┤   │     
                             ActivateOrderHTML┤   │     
                    TfrmOrders.lstWriteClick┤ │   │     
    TfrmOrders.PlaceOrderForDefaultDialog...┘ │   │     
                              ActivateOrderSet┤   │     
                   TfrmRemDlg.btnFinishClick┤ │   │     
TfrmConsults.mnuActNewConsultRequestClick...┤ │   │     
     TfrmConsults.mnuActNewProcedureClick...┤ │   │     
                    TfrmOrders.lstWriteClick┤ │   │     
    TfrmOrders.PlaceOrderForDefaultDialog...┤ │   │     
                     TfrmMeds.mnuActNewClick┤ │   │     
                TfrmOMNavA.ActivateDialog...┤ │   │     
                     TfrmOMSet.DoNextItem...┘ │   │     
                       TfrmOMNavA.DoSelectList┘   │     
                     TfrmOMNavA.grdMenuKeyUp┤     │     
                   TfrmOMNavA.grdMenuMouseUp┘     │     
                                        SkipToNext┤     
                         TfrmOMSet.DoNextItem...┘ │     
                            TfrmOMSet.UMDelayEvent┘     

Called-By

Name Declaration Comments
ActivateOrderDialog function ActivateOrderDialog(const AnID: string; AnEvent: TOrderDelayEvent; AnOwner: TComponent; ARefNum: Integer; ANeedVerify: boolean = True): Boolean; -
AssignBPText procedure AssignBPText(List: TStrings; const Value: string); -
TfrmODCslt.SetupDialog procedure SetupDialog(OrderAction: Integer; const ID: string); override; -
TfrmODAuto.Validate procedure Validate(var AnErrMsg: string); override; -


Source

810   function GetServiceIEN(ORIEN: string): string;
811   begin
812     Result := sCallV('ORQQCN GET SERVICE IEN', [ORIEN]);
813   end;