MEDITECH.CUST.RPTS
Hospital North Country
Regional Hospital
MIS NCH
Directory LIVE.MIS
User HAB
Date 20030103
Segment B
Comment PULLS STRING
(LOOKS FOR TEXT)
===================================================================================
===================================================================================
Procedure
PHA.RX.zcus.hab.string.search
Responsibility U
Active Y
Access Y
Menu
Logic
Description @Inquiry
Y
--------------------------------------------------------------------------------
Report
Active Y
Name zcus.hab.string.search
DPM PHA.RX
Segment main
Report
Title
pha.rx.zcus.hab.string.search
Page
Banner REG
Chars/Inch 12
Chars/Line 92
Lines/Inch 6
Lines/Page 60
Segment
DPM PHA.RX
Page
Size 66
Logical
Filename pha.rx.file
Page
Trailer N
Report
Header N
Report
Trailer N
Detail Y
Page
Header N
Access
Path pha.rx.start.date.x
Sort
Modify
Left
Margin 0
--------------------------------------------------------------------------------
Fields
1 FLD=start.date
DSP=start.da
2 FLD=patient's.name
DSP=patient's.name
3 FLD=med
DSP=med
4 FLD=number
DSP=number
5 FLD=sig
DSP=sig
6 FLD=label.comment
DSP=label.comment
7 FLD=xx.check
DSP=xx
DAT=FREE
JFY=L
LEN=3
VAL=IF{"N"^CHK,""^label.comment.q,DO{@Next(label.comment.q)
IF{@label.comment~$L.TO.U^TXT,L
VAL=(TXT,"DOSE")'=L(TXT)
"Y"^CHK}} CHK;CHK}
--------------------------------------------------------------------------------
Selection Fields
Num Field Op Prompt Default (Stored As)
1
start.date
GE From start date
(b.start.date)
2
label.comment
NE ""
("")
3
xx.check
EQ "Y" ("Y")
4
Z.record.limit
EQ 10 (10)
--------------------------------------------------------------------------------
Report Lines
1 D
2 D
3 D
--------------------------------------------------------------------------------
Picture
1 start.da
patient's.name________________
med_______ number_____ sig_________________
2
label.comment_______________________________________________
3 label.comment_______________________________________________
--------------------------------------------------------------------------------
Sort Fields
Num Field Order Header
Trailer Renumber
1 start.date NONE N
2 urn NONE N
--------------------------------------------------------------------------------
Screen
Screen
Title
pha.rx.zcus.hab.string.search
Print
Prompt %Z.on.device
--------------------------------------------------------------------------------
Custom Select Field Attributes
1
b.start.date
ID.ARG=BR
IFE=1
REQ=1
--------------------------------------------------------------------------------
Custom Select Picture
1 From start date @1