source: cprs/branches/foia-cprs/CPRS-Chart/Encounter/fVisitType.dfm

Last change on this file was 459, checked in by Kevin Toppenberg, 16 years ago

Adding foia-cprs branch

File size: 5.5 KB
Line 
1inherited frmVisitType: TfrmVisitType
2 Left = 255
3 Top = 186
4 Caption = 'Encounter VisitType'
5 ClientWidth = 620
6 OnCloseQuery = FormCloseQuery
7 OnResize = FormResize
8 PixelsPerInch = 96
9 TextHeight = 13
10 object lblVType: TLabel [0]
11 Left = 150
12 Top = 6
13 Width = 67
14 Height = 13
15 Caption = 'Section Name'
16 end
17 object lblSCDisplay: TLabel [1]
18 Left = 6
19 Top = 123
20 Width = 186
21 Height = 13
22 Caption = 'Service Connection && Rated Disabilities'
23 end
24 object lblVTypeSection: TLabel [2]
25 Left = 6
26 Top = 6
27 Width = 58
28 Height = 13
29 Caption = 'Type of Visit'
30 end
31 object lblCurrentProv: TLabel [3]
32 Left = 277
33 Top = 249
34 Width = 165
35 Height = 13
36 Caption = 'Current providers for this encounter'
37 end
38 object lblProvider: TLabel [4]
39 Left = 6
40 Top = 249
41 Width = 89
42 Height = 13
43 Caption = 'Available providers'
44 end
45 object lblMod: TLabel [5]
46 Left = 358
47 Top = 6
48 Width = 42
49 Height = 13
50 Hint = 'Modifiers'
51 Caption = 'Modifiers'
52 ParentShowHint = False
53 ShowHint = True
54 end
55 inherited btnOK: TBitBtn
56 Left = 463
57 Top = 377
58 TabOrder = 8
59 end
60 inherited btnCancel: TBitBtn
61 Left = 543
62 Top = 377
63 TabOrder = 9
64 end
65 object pnlMain: TPanel
66 Left = 2
67 Top = 19
68 Width = 615
69 Height = 92
70 BevelOuter = bvNone
71 TabOrder = 0
72 object splLeft: TSplitter
73 Left = 145
74 Top = 0
75 Width = 3
76 Height = 92
77 Cursor = crHSplit
78 OnMoved = splLeftMoved
79 end
80 object splRight: TSplitter
81 Left = 352
82 Top = 0
83 Width = 3
84 Height = 92
85 Cursor = crHSplit
86 Align = alRight
87 OnMoved = splRightMoved
88 end
89 object pnlLeft: TPanel
90 Left = 0
91 Top = 0
92 Width = 145
93 Height = 92
94 Align = alLeft
95 BevelOuter = bvNone
96 TabOrder = 0
97 object lstVTypeSection: TORListBox
98 Tag = 10
99 Left = 0
100 Top = 0
101 Width = 145
102 Height = 92
103 Align = alTop
104 ItemHeight = 13
105 ParentShowHint = False
106 ShowHint = True
107 TabOrder = 0
108 OnClick = lstVTypeSectionClick
109 Caption = 'Type of Visit'
110 ItemTipColor = clWindow
111 LongList = False
112 Pieces = '3'
113 CheckEntireLine = True
114 end
115 end
116 object lbxVisits: TORListBox
117 Tag = 10
118 Left = 148
119 Top = 0
120 Width = 204
121 Height = 92
122 Style = lbOwnerDrawFixed
123 Align = alClient
124 ItemHeight = 16
125 ParentShowHint = False
126 ShowHint = True
127 TabOrder = 1
128 OnClick = lbxVisitsClick
129 Caption = 'Section Name'
130 ItemTipColor = clWindow
131 LongList = False
132 Pieces = '3,4,5'
133 TabPosInPixels = True
134 CheckBoxes = True
135 CheckEntireLine = True
136 OnClickCheck = lbxVisitsClickCheck
137 end
138 object lbMods: TORListBox
139 Left = 355
140 Top = 0
141 Width = 260
142 Height = 92
143 Style = lbOwnerDrawFixed
144 Align = alRight
145 Font.Charset = DEFAULT_CHARSET
146 Font.Color = clWindowText
147 Font.Height = -11
148 Font.Name = 'MS Sans Serif'
149 Font.Style = []
150 ItemHeight = 14
151 ParentFont = False
152 ParentShowHint = False
153 ShowHint = True
154 TabOrder = 2
155 Caption = 'Modifiers'
156 ItemTipColor = clWindow
157 LongList = False
158 Pieces = '2,3'
159 TabPosInPixels = True
160 CheckBoxes = True
161 CheckEntireLine = True
162 OnClickCheck = lbModsClickCheck
163 end
164 end
165 object memSCDisplay: TCaptionMemo
166 Left = 6
167 Top = 137
168 Width = 411
169 Height = 107
170 Color = clBtnFace
171 Lines.Strings = (
172 '')
173 ScrollBars = ssVertical
174 TabOrder = 1
175 Caption = 'Service Connection && Rated Disabilities'
176 end
177 object lbProviders: TORListBox
178 Left = 277
179 Top = 265
180 Width = 183
181 Height = 126
182 ItemHeight = 13
183 ParentShowHint = False
184 ShowHint = True
185 TabOrder = 7
186 OnDblClick = lbProvidersDblClick
187 Caption = 'Current providers for this encounter'
188 ItemTipColor = clWindow
189 LongList = False
190 Pieces = '2'
191 OnChange = lbProvidersChange
192 CheckEntireLine = True
193 end
194 object cboPtProvider: TORComboBox
195 Left = 6
196 Top = 265
197 Width = 183
198 Height = 126
199 Style = orcsSimple
200 AutoSelect = True
201 Caption = 'Available providers'
202 Color = clWindow
203 DropDownCount = 8
204 ItemHeight = 13
205 ItemTipColor = clWindow
206 ItemTipEnable = True
207 ListItemsOnly = True
208 LongList = True
209 LookupPiece = 2
210 MaxLength = 0
211 Pieces = '2,3'
212 Sorted = False
213 SynonymChars = '<>'
214 TabOrder = 3
215 TabStop = True
216 CheckEntireLine = True
217 OnChange = cboPtProviderChange
218 OnDblClick = cboPtProviderDblClick
219 OnNeedData = cboPtProviderNeedData
220 end
221 object btnAdd: TButton
222 Left = 196
223 Top = 275
224 Width = 75
225 Height = 21
226 Caption = 'Add'
227 TabOrder = 4
228 OnClick = btnAddClick
229 end
230 object btnDelete: TButton
231 Left = 196
232 Top = 307
233 Width = 75
234 Height = 21
235 Caption = 'Remove'
236 TabOrder = 5
237 OnClick = btnDeleteClick
238 end
239 object btnPrimary: TButton
240 Left = 196
241 Top = 355
242 Width = 75
243 Height = 21
244 Caption = 'Primary'
245 TabOrder = 6
246 OnClick = btnPrimaryClick
247 end
248 inline fraVisitRelated: TfraVisitRelated
249 Left = 426
250 Top = 112
251 Width = 192
252 Height = 137
253 TabOrder = 2
254 end
255end
Note: See TracBrowser for help on using the repository browser.