Upgrading to version 27
This commit is contained in:
kdtop3
parent
bac61a9c0f
commit
b5d09c7a2e
|
|
@ -1,32 +0,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
|
||||
|
|
@ -1,277 +0,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
|
||||
Loading…
Reference in New Issue