Index: rs/trunk/CPRS-Chart/CPRS.vpw
===================================================================
--- /cprs/trunk/CPRS-Chart/CPRS.vpw	(revision 831)
+++ 	(revision )
@@ -1,32 +1,0 @@
-[ProjectDates]
-[State]
-SCREEN: 800 600 22 22 600 432 0 0 N 0 0 0 0 588 233
-CWD: D:\vista\cprs\main\CPRS-Chart
-BUFFER: BN="D:\ejb\book\chap09\timetracker\Employee.java"
-BI: MA=1 74 1  TABS=1 9  WWS=1 IWT=0 ST=0 IN=2 BW=0 US=32000 RO=1 SE=1 SN=0 BIN=0 MN=Java	HM=0 MF=0 TL=0 MLL=0 ASE=0 LNL=6 LCF=0 CAPS=0
-VIEW: LN=.0 CL=1 LE=0 CX=0 CY=1 WI=5 BI=12 HT=0 HN=0 HF=0 HC=4
-BUFFER: BN="D:\ejb\book\chap09\timetracker\EmployeePK.java"
-BI: MA=1 74 1  TABS=1 9  WWS=1 IWT=0 ST=0 IN=2 BW=0 US=32000 RO=1 SE=1 SN=0 BIN=0 MN=Java	HM=0 MF=0 TL=0 MLL=0 ASE=0 LNL=6 LCF=0 CAPS=0
-VIEW: LN=.0 CL=1 LE=0 CX=0 CY=1 WI=5 BI=14 HT=0 HN=0 HF=0 HC=4
-BUFFER: BN="D:\ejb\book\chap09\timetracker\EmployeeBean.java"
-BI: MA=1 74 1  TABS=1 9  WWS=1 IWT=0 ST=0 IN=2 BW=0 US=32000 RO=1 SE=1 SN=0 BIN=0 MN=Java	HM=0 MF=608 TL=0 MLL=0 ASE=0 LNL=6 LCF=0 CAPS=0
-VIEW: LN=.0 CL=1 LE=0 CX=0 CY=1 WI=5 BI=15 HT=0 HN=0 HF=0 HC=4
-WINDOW: 0 0 522 167 -1 -1 N  WF=0 WT=2 "Courier New,9,0,1"
-BUFFER: BN="D:\ejb\book\chap09\timetracker\Employee.java"
-VIEW: LN=.0 CL=1 LE=0 CX=0 CY=1 WI=121 BI=12 HT=0 HN=0 HF=0 HC=4
-WINDOW: 22 22 522 167 -1 -1 N  WF=0 WT=3 "Courier New,9,0,1"
-BUFFER: BN="D:\ejb\book\chap09\timetracker\EmployeePK.java"
-VIEW: LN=.0 CL=1 LE=0 CX=0 CY=1 WI=122 BI=14 HT=0 HN=0 HF=0 HC=4
-WINDOW: 44 44 522 167 -1 -1 N  WF=0 WT=1 "Courier New,9,0,1"
-BUFFER: BN="D:\ejb\book\chap09\timetracker\EmployeeBean.java"
-VIEW: LN=.6777 CL=1 LE=0 CX=0 CY=6 WI=123 BI=15 HT=0 HN=0 HF=0 HC=4
-FILEHIST: 9
-c:\temp\p4win\ReadOnly-0-Rev-12-fReview.pas
-D:\dev\AppExHandler\AppExHandler.pas
-D:\vista\cprs\OR_3_190V24\CPRS-Chart\fmeds.dfm
-D:\vista\cprs\OR_3_190V24\CPRS-Chart\Orders\fODMedNVA.pas
-D:\vista\cprs\OR_3_215V26\CPRS-Chart\dcu\Trpcb.dcu
-D:\vista\cprs\OR_3_215V26\CPRS-Chart\Accessibility_TLB.~pas
-D:\ejb\book\chap09\timetracker\Employee.java
-D:\ejb\book\chap09\timetracker\EmployeePK.java
-D:\ejb\book\chap09\timetracker\EmployeeBean.java
Index: rs/trunk/CPRS-Chart/fEncntKEEP.dfm
===================================================================
--- /cprs/trunk/CPRS-Chart/fEncntKEEP.dfm	(revision 831)
+++ 	(revision )
@@ -1,277 +1,0 @@
-object frmEncounter: TfrmEncounter
-  Left = 435
-  Top = 175
-  Width = 351
-  Height = 350
-  BorderIcons = [biSystemMenu]
-  Caption = 'Provider & Location for Current Activities'
-  Color = clBtnFace
-  Font.Charset = DEFAULT_CHARSET
-  Font.Color = clWindowText
-  Font.Height = -11
-  Font.Name = 'MS Sans Serif'
-  Font.Style = []
-  OldCreateOrder = True
-  Position = poScreenCenter
-  OnClose = FormClose
-  OnCreate = FormCreate
-  OnDestroy = FormDestroy
-  DesignSize = (
-    343
-    323)
-  PixelsPerInch = 96
-  TextHeight = 13
-  object lblInstruct: TLabel
-    Left = 6
-    Top = 6
-    Width = 253
-    Height = 31
-    AutoSize = False
-    Caption = 
-      'Select the appointment or visit that should be associated with t' +
-      'he note or orders .'
-    Visible = False
-    WordWrap = True
-  end
-  object lblLocation: TLabel
-    Tag = 9
-    Left = 6
-    Top = 133
-    Width = 93
-    Height = 13
-    Caption = 'Encounter Location'
-  end
-  object lblProvider: TLabel
-    Left = 6
-    Top = 6
-    Width = 91
-    Height = 13
-    Caption = 'Encounter Provider'
-  end
-  object cmdOK: TButton
-    Left = 250
-    Top = 20
-    Width = 72
-    Height = 21
-    Caption = 'OK'
-    Default = True
-    TabOrder = 4
-    OnClick = cmdOKClick
-  end
-  object cmdCancel: TButton
-    Left = 250
-    Top = 49
-    Width = 72
-    Height = 21
-    Cancel = True
-    Caption = 'Cancel'
-    TabOrder = 5
-    OnClick = cmdCancelClick
-  end
-  object txtLocation: TCaptionEdit
-    Tag = 9
-    Left = 6
-    Top = 147
-    Width = 212
-    Height = 21
-    Color = clBtnFace
-    ReadOnly = True
-    TabOrder = 1
-    Text = '< Select a location from the tabs below.... >'
-    Caption = 'Encounter Location'
-  end
-  object pgeVisit: TPageControl
-    Tag = 9
-    Left = 6
-    Top = 171
-    Width = 331
-    Height = 147
-    ActivePage = tabClinic
-    Anchors = [akLeft, akTop, akBottom]
-    TabIndex = 0
-    TabOrder = 2
-    OnChange = pgeVisitChange
-    object tabClinic: TTabSheet
-      Caption = 'Clinic Appointments'
-      DesignSize = (
-        323
-        119)
-      object lblClinic: TLabel
-        Left = 4
-        Top = 4
-        Width = 127
-        Height = 13
-        Caption = 'Clinic Appointments / Visits'
-      end
-      object lblDateRange: TLabel
-        Left = 138
-        Top = 4
-        Width = 71
-        Height = 13
-        Caption = '(T-30 thru T+1)'
-      end
-      object lstClinic: TORListBox
-        Left = 0
-        Top = 18
-        Width = 321
-        Height = 97
-        Anchors = [akLeft, akTop, akBottom]
-        ItemHeight = 13
-        ParentShowHint = False
-        ShowHint = True
-        TabOrder = 0
-        OnDblClick = cmdOKClick
-        Caption = 'Clinic Appointments / Visits (T-30 thru T+1)'
-        ItemTipColor = clWindow
-        LongList = False
-        Pieces = '3,2,4'
-        TabPositions = '20'
-        OnChange = lstClinicChange
-      end
-    end
-    object tabAdmit: TTabSheet
-      Caption = 'Hospital Admissions'
-      object lblAdmit: TLabel
-        Left = 4
-        Top = 4
-        Width = 93
-        Height = 13
-        Caption = 'Hospital Admissions'
-      end
-      object lstAdmit: TORListBox
-        Left = 4
-        Top = 18
-        Width = 352
-        Height = 117
-        ItemHeight = 13
-        ParentShowHint = False
-        ShowHint = True
-        TabOrder = 0
-        OnDblClick = cmdOKClick
-        Caption = 'Hospital Admissions'
-        ItemTipColor = clWindow
-        LongList = False
-        Pieces = '3,5,4'
-        TabPositions = '20'
-        OnChange = lstAdmitChange
-      end
-    end
-    object tabNewVisit: TTabSheet
-      Caption = 'New Visit'
-      object lblVisitDate: TLabel
-        Left = 220
-        Top = 4
-        Width = 85
-        Height = 13
-        Caption = 'Date/Time of Visit'
-        Visible = False
-      end
-      object lblNewVisit: TLabel
-        Left = 4
-        Top = 4
-        Width = 63
-        Height = 13
-        Caption = 'Visit Location'
-      end
-      object calVisitDate: TORDateBox
-        Left = 220
-        Top = 18
-        Width = 140
-        Height = 21
-        TabOrder = 1
-        Text = 'NOW'
-        OnChange = calVisitDateChange
-        OnExit = calVisitDateExit
-        DateOnly = False
-        RequireTime = True
-      end
-      object ckbHistorical: TORCheckBox
-        Left = 220
-        Top = 50
-        Width = 140
-        Height = 81
-        Caption = 
-          'Historical Visit: a visit that occurred at some time in the past' +
-          ' or at some other location (possibly non-VA) but is not used for' +
-          ' workload credit.'
-        ParentShowHint = False
-        ShowHint = True
-        TabOrder = 2
-        OnClick = ckbHistoricalClick
-        WordWrap = True
-        AutoSize = True
-      end
-      object cboNewVisit: TORComboBox
-        Left = 4
-        Top = 18
-        Width = 208
-        Height = 117
-        Style = orcsSimple
-        AutoSelect = True
-        Caption = 'Visit Location'
-        Color = clWindow
-        DropDownCount = 8
-        ItemHeight = 13
-        ItemTipColor = clWindow
-        ItemTipEnable = True
-        ListItemsOnly = True
-        LongList = True
-        LookupPiece = 0
-        MaxLength = 0
-        Pieces = '2'
-        Sorted = False
-        SynonymChars = '<>'
-        TabOrder = 0
-        OnChange = cboNewVisitChange
-        OnDblClick = cmdOKClick
-        OnNeedData = cboNewVisitNeedData
-        CharsNeedMatch = 1
-      end
-    end
-  end
-  object cmdDateRange: TButton
-    Tag = 9
-    Left = 224
-    Top = 145
-    Width = 90
-    Height = 21
-    Caption = 'Date Range...'
-    TabOrder = 3
-    OnClick = cmdDateRangeClick
-  end
-  object cboPtProvider: TORComboBox
-    Left = 6
-    Top = 20
-    Width = 235
-    Height = 93
-    Style = orcsSimple
-    AutoSelect = True
-    Caption = 'Encounter Provider'
-    Color = clWindow
-    DropDownCount = 8
-    ItemHeight = 13
-    ItemTipColor = clWindow
-    ItemTipEnable = True
-    ListItemsOnly = True
-    LongList = True
-    LookupPiece = 2
-    MaxLength = 0
-    Pieces = '2,3'
-    Sorted = False
-    SynonymChars = '<>'
-    TabOrder = 0
-    OnDblClick = cmdOKClick
-    OnNeedData = cboPtProviderNeedData
-    CharsNeedMatch = 1
-  end
-  object dlgDateRange: TORDateRangeDlg
-    DateOnly = True
-    Instruction = 'Show appointments / visits in the date range:'
-    LabelStart = 'From'
-    LabelStop = 'Through'
-    RequireTime = False
-    Format = 'mmm d,yyyy'
-    Left = 264
-    Top = 4
-  end
-end