Function

HasTemplateField

Module

uTemplateFields

Last Modified

3/11/2015 8:41:54 AM

Scope

Interfaced

Declaration

function HasTemplateField(txt: string): boolean;

Called-By Hierarchy


                                        HasTemplateField
                               CheckBoilerplate4Fields┤ 
                                    DoTemplateDialog┤ │ 
                        CheckBoilerplate4Fields...┤ │ │ 
                                 TTemplate.GetText┘ │ │ 
                    ExecuteTemplateOrBoilerPlate┤   │ │ 
                          TfrmDrawers.InsertText┤   │ │ 
               TfrmDrawers.tvTemplatesDblClick┤ │   │ │ 
                TfrmDrawers.tvTemplatesKeyDown┤ │   │ │ 
                    TfrmDrawers.NewRECDragDrop┤ │   │ │ 
              TfrmDrawers.SetRichEditControl┘ │ │   │ │ 
                     TfrmDCSumm.FormCreate┤   │ │   │ │ 
                   TfrmConsults.FormCreate┤   │ │   │ │ 
                    TfrmSurgery.FormCreate┤   │ │   │ │ 
                      TfrmNotes.FormCreate┘   │ │   │ │ 
            TfrmDrawers.mnuInsertTemplateClick┘ │   │ │ 
      TfrmDCSumm.popSummMemoInsTemplateClick┤   │   │ │ 
    TfrmConsults.popNoteMemoInsTemplateClick┤   │   │ │ 
     TfrmSurgery.popNoteMemoInsTemplateClick┤   │   │ │ 
       TfrmNotes.popNoteMemoInsTemplateClick┘   │   │ │ 
             TfrmDrawers.mnuPreviewTemplateClick┤   │ │ 
            TfrmDCSumm.popSummMemoPreviewClick┤ │   │ │ 
          TfrmConsults.popNoteMemoPreviewClick┤ │   │ │ 
           TfrmSurgery.popNoteMemoPreviewClick┤ │   │ │ 
             TfrmNotes.popNoteMemoPreviewClick┘ │   │ │ 
                TfrmDrawers.mnuCopyTemplateClick┤   │ │ 
                TfrmTemplateEditor.mnuBPTryClick┘   │ │ 
              TfrmTemplateEditor.tvTreeKeyDown┘     │ │ 
                                    ShowTemplateData┘ │ 
            TfrmDrawers.mnuPreviewTemplateClick...┤   │ 
               TfrmTemplateEditor.mnuBPTryClick...┘   │ 
                                   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; -
CheckBoilerplate4Fields procedure CheckBoilerplate4Fields(SL: TStrings; const CaptionText: string = ''; PreviewMode: boolean = FALSE); overload; -
TfrmODAuto.Validate procedure Validate(var AnErrMsg: string); override; -


Source

619   function HasTemplateField(txt: string): boolean;
620   begin
621     Result := (pos(TemplateFieldBeginSignature, txt) > 0);
622   end;