Module

fNoteSTStop

Path

C:\CPRS\CPRS30\fNoteSTStop.pas

Last Modified

7/15/2014 3:26:38 PM

Units Used in Interface

Name Comments
fAutoSz -

Units Used in Implementation

Name Comments
fNotes -

Classes

Name Comments
TfrmSearchStop -

Procedures

Name Owner Declaration Scope Comments
btnSearchStopClick TfrmSearchStop procedure btnSearchStopClick(Sender: TObject); Public/Published -
FormShow TfrmSearchStop procedure FormShow(Sender: TObject); Public/Published -

Global Variables

Name Type Declaration Comments
frmSearchStop TfrmSearchStop frmSearchStop: TfrmSearchStop; -


Module Source

1     unit fNoteSTStop;
2     
3     interface
4     
5     uses
6       Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
7       Dialogs, StdCtrls, fAutoSz, VA508AccessibilityManager;
8     
9     type
10      TfrmSearchStop = class(TfrmAutoSz)
11        btnSearchStop: TButton;
12        lblSearchStatus: TStaticText;
13        procedure btnSearchStopClick(Sender: TObject);
14        procedure FormShow(Sender: TObject);
15      private
16        { Private declarations }
17      public
18        { Public declarations }
19      end;
20    
21    var
22      frmSearchStop: TfrmSearchStop;
23    
24    implementation
25    
26    {$R *.dfm}
27    uses fNotes, ORFn;
28    
29    procedure TfrmSearchStop.btnSearchStopClick(Sender: TObject);
30    begin
31      SearchTextStopFlag := True;
32    end;
33    
34    procedure TfrmSearchStop.FormShow(Sender: TObject);
35    begin
36      ResizeFormToFont(frmSearchStop);
37    end;
38    
39    end.

Module Calls (2 levels)


fNoteSTStop
 ├fAutoSz
 │ └fBase508Form
 └fNotes
   ├fHSplit
   ├uConst
   ├uPCE
   ├fDrawers
   ├rTIU
   ├uTIU
   ├uDocTree
   ├fRptBox
   ├fPrintList
   ├fNoteST
   ├fNoteSTStop...
   ├fFrame
   ├fEncnt
   ├rCore
   ├uCore
   ├fNoteBA
   ├fNoteBD
   ├fSignItem
   ├fEncounterFrame
   ├rPCE
   ├fNotePrt
   ├fAddlSigners
   ├fNoteDR
   ├fConsults
   ├uSpell
   ├fTIUView
   ├fTemplateEditor
   ├uReminders
   ├fReminderDialog
   ├uOrders
   ├rConsults
   ├fReminderTree
   ├fNoteProps
   ├fNotesBP
   ├fTemplateFieldEditor
   ├dShared
   ├rTemplates
   ├fIconLegend
   ├fPCEEdit
   ├fNoteIDParents
   ├rSurgery
   ├uTemplates
   ├fTemplateDialog
   ├uInit
   └uVA508CPRSCompatibility

Module Called-By (2 levels)


        fNoteSTStop
        CPRSChart┤ 
           fNotes┘ 
         fFrame┤   
     fPrintList┤   
 fNoteSTStop...┤   
      fConsults┤   
fReminderDialog┤   
        fReview┘