All messages should be posted in plain text. HTML will be converted to
attachments. The meditech-l web site is MTUsers.com
======================================
Hi Jay,
Attached is an NPR report of ours for printing Device information from the
Meditech OPS database. You can enter in a range of Devices to print. The
Device, Description, Machine, Model, Type, IP Address, Termserver Port, and
Print Port will all print on the report.
Please let me know if you have any questions.
Thanks,
Brian Schmit
Sr. Programmer, Picis
Direct: 781 557 3315
Fax: 781 557 3140
100 Quannapowitt Parkway
Suite 405
Wakefield, MA 01880
[EMAIL PROTECTED]
www.picis.com
Please visit www.picis.com/meditech for additional information about our NPR
Report Writing Trainings.
The information in this email is confidential and may be legally privileged. It
is intended solely for the addressee. Access or use by any other person to this
internet email is not authorized and may be unlawful. If you are not the
intended recipient, please delete or destroy this email. If you do not wish to
receive future emails from the sender, please reply directly to this email
requesting you be removed from any mailing list.
-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Jay Gilmore
Sent: Thursday, June 08, 2006 4:52 PM
To: MEDITECH-L
Subject: [MEDITECH-L] NPR Report for OPS Device Listing
All messages should be posted in plain text. HTML will be converted to
attachments. The meditech-l web site is MTUsers.com
======================================
I found some different posts in the archives about being able to print a
device listing from OPS from an NPR report instead of SPOOLing the report in
OPS and then printing or downloading it. If someone would please share this
report with me, I would greatly appreciate it. If the report allows me to
choose different device types, that would be even better, but I am willing
to take anything I can get.
Thanks!
Jay Gilmore
Systems Analyst
Crisp Regional Hospital
(229) 276-3173
_______________________________________________
meditech-l mailing list
[email protected]
http://mtusers.com/mailman/listinfo/meditech-l
MEDITECH.CUST.RPTS^Newton-Wellesley
Hospital^NEW5.4^TEST.5.4.MIS^MSM.BMS^20060609^A^OPS DEVICE REPORT BY BRIAN
SCHMIT OF PICIS
@@VERSION:1
MIS.USER.zcus.picis.bms.ops
@@PROC
MIS.USER.zcus.picis.bms.ops
[EMAIL PROTECTED]
D1
This report was created by Brian Schmit of Picis
D2
D3
Contact Information: Brian Schmit
D4
Sr. Programmer, Picis
D5
Direct: 781 557 3315
D6
Fax: 781 557 3140
D7
100 Quannapowitt Parkway
D8
Suite 405
D9
Wakefield, MA 01880
D10
[EMAIL PROTECTED]
D11
www.picis.com
D12
D13
Picis provides trainings for NPR Report Writer, Customer-Defined Screens, and
D14
Rules. Picis also provides NPR Reports, CDS attributes, and custom application
D15
programming both on-site and remotely.
D16
D17
Please visit http://www.picis.com/html/Meditech/meditech_1.html for more
D18
information on what Picis can do for your Meditech facility.
@@MACRO
MIS.USER.zcus.picis.bms.ops.M.device
0
$["SEG"](@Z.segment,".SYS"),
1
CL(:)^OLD.CLN,
2
ZZ%O(:,%["files"]),
3
$["SEG"](@Z.segment,@.dir),
4
%Z.id.non.dict.color(^:D,A,"Device":20L_("Description":50TL),"CD:20L_:D[CD]ID:50TL","","OPS
Devices")^A,
5
ZZ%O(:,OLD.CLN),
6
A;
@@MACRO
MIS.USER.zcus.picis.bms.ops.M.start.macro
0
C(?)^OLD.QM,
1
@.dir^OLD.DIR,
2
$["SEG"](@Z.segment,".SYS"),
3
ZZ%O(?,%["files"]),
4
$["SEG"](@Z.segment,OLD.DIR),
5
[EMAIL PROTECTED] +?D[""];c.xx.dev.from}^X,
6
-?D[X]^X,
7
DO{+?D[X]^X'>([EMAIL PROTECTED]) X^/MV["D",X,1],
8
?D[X]ID^/MV["D",X,2],
9
?D[X]A|0^/MV["D",X,3],
10
?D[X]M^/MV["D",X,4],
11
?D[X]T^/MV["D",X,5],
12
?D[X]U^/MV["D",X,6],
13
?IPN[?D[X]A|0]^/MV["D",X,7],
14
?D[X]A|1^/MV["D",X,8],
15
?IPRT[X]P^/MV["D",X,9]},
16
ZZ%O(?,OLD.QM)
@@RPT
Yzcus.picis.bms.opsMIS.USER mainDEVICE LIST FROM OPSREG12200660 66
mis.usersNNNYY 01 Y
AT 730559550
MSM.BMSE
AT 749838228
MSM.BMSE
AT 761913837
MSM.BMSE
AT 762002729
MSM.BMSE
AT 762257608
MSM.BMSC"MIS.USER.zcus.picis.bms.ops.bad.pw
AT 764257789
MSM.BMSE
CI
DC1
This report was created by Brian Schmit of Picis
DC2
DC3
Contact Information: Brian Schmit
DC4
Sr. Programmer, Picis
DC5
Direct: 781 557 3315
DC6
Fax: 781 557 3140
DC7
100 Quannapowitt Parkway
DC8
Suite 405
DC9
Wakefield, MA 01880
DC10
[EMAIL PROTECTED]
DC11
www.picis.com
DC12
DC13
Picis provides trainings for NPR Report Writer, Customer-Defined Screens, and
Rules.
DC14
Picis also provides NPR Reports, CDS attributes, and custom application
programming
DC15
both on-site and remotely.
DC16
DC17
Please visit http://www.picis.com/html/Meditech/meditech_1.html for more
information on
DC18
what Picis can do for your Meditech facility.
F1
xx.device xx.device
F1 C ;COMMENT
FOR AN MV ARRAY FIELD, YOU CAN USE ANY VAL YOU LIKE; IT WILL BEOVERWRITTEN BY
THE LINE ATTRIBUTE MV=D
F1 C DAT
FREE
F1 C JFY
L
F1 C LEN
20
F1 C VAL
1
F1 CL ;COMMENT1
63
F1 CL ;COMMENT2
38
F2
xx.description xx.description2L
F2 C DAT
FREE
F2 C JFY
L
F2 C LEN
45
F2 C VAL
""
F3
xx.machine
xx.machine2L
F3 C DAT
FREE
F3 C JFY
L
F3 C LEN
20
F3 C VAL
""
F4
xx.model xx.model2L
F4 C DAT
FREE
F4 C JFY
L
F4 C LEN
20
F4 C VAL
""
F5
xx.type xx.ty2L
F5 C DAT
FREE
F5 C JFY
L
F5 C LEN
5
F5 C VAL
""
F6
xx.user xx.user2L
F6 C DAT
FREE
F6 C JFY
L
F6 C LEN
30
F6 C VAL
""
F7
xx.ip xx.ip2L
F7 C DAT
FREE
F7 C JFY
L
F7 C LEN
20
F7 C VAL
""
F8
xx.ts.port xx.2L
F8 C DAT
FREE
F8 C JFY
L
F8 C LEN
3
F8 C VAL
""
F9
xx.prt.port xx.pr2L
F9 C DAT
FREE
F9 C JFY
L
F9 C LEN
5
F9 C VAL
""
F10
xx.dev.from xx.dev.from2L
F10 C DAT
FREE
F10 C JFY
L
F10 C LEN
20
F10 C VAL
""
F10 SE2
IG
c.xx.dev.from FROM DEVICE BEGINNING
F11
xx.dev.thru xx.dev.thru
F11 C DAT
FREE
F11 C JFY
L
F11 C LEN
20
F11 C VAL
""
F11 SE3
IG
c.xx.dev.thru THRU DEVICEEND
F S1
initials
F S1 SE1
[EMAIL PROTECTED]@.user
FI50
201
FI523
452
FI571
203
FI594
204
FI5117
55
FI5125
306
FI5158
207
FI5181
38
FI5194
59
FI60
201
FI623
452
FI671
203
FI694
204
FI6117
55
FI6125
306
FI6158
207
FI6181
38
FI6194
59
L1
HP
L1 C BX
WHITE
L1 C PF
b
L1 C VL
D5,21,69,92,115,123,156,179,192
L2
HP
L3
HP
L4
HP
L4 C BX
WHITE
L5
D
L5 C ;NOTES
THE "D" IN MV=D IS THE MARKER USED IN THE MV ARRAY IN THE MACRO
L5 C GB
GRAY
L5 C MV
D
L6
D
N1
AL START start.macro
N2
;AL IS THE FOOTNOTE FOR ALGORITHM, IT IS USED FOR RUNNING CODE
N3
;START IS WHERE I WANT TO RUN MY MACRO
N4
;start.macro IS THE NAME OF MY MACRO
P1
P2
TERMSERVER PRINT
P3
DEVICE DESCRIPTION MACHINE
MODEL TYPE USER
IP ADDRESS PORT PORT
P4
P5
xx.device___________ xx.description_______________________________
xx.machine__________ xx.model____________ xx.ty
xx.user_______________________ xx.ip_______________ xx. xx.pr
P6
xx.device___________ xx.description_______________________________
xx.machine__________ xx.model____________ xx.ty
xx.user_______________________ xx.ip_______________ xx. xx.pr
T1
initials NONEN ASC
U 776993027
MSM.BMS TEST.5.4.MIS
U 777141895
MSM.BMS TEST.5.4.MIS
U 778698472
MSM.BMS TEST.5.4.MIS
U 788353645
MSM.BMS TEST.5.4.MIS
U 788365132
MSM.BMS TEST.5.4.MIS
U 814526272
MSM.BMS TEST.5.4.MIS
U 814526447
MSM.BMS TEST.5.4.MIS
U 829129495
MSM.BMS TEST.5.4.MIS
U 829129519
MSM.BMS TEST.5.4.MIS
@@SCRN
Yzcus.picis.bms.opsMIS.USERMIS.USER.zcus.picis.bms.ops2N N
CS
504334
P1
DEVICE LIST FROM OPS %Z.on.device
P1 F2
c.xx.dev.from 1115 301523
P1 F2 C DAT
FREE
P1 F2 C ID
%MIS.USER.zcus.picis.bms.ops.M.device(A)
P1 F2 C ID.ARG
AR
P1 F2 C IFE
1
P1 F2 C LEN
20
P1 F2 C MAP
D(127),"BEGINNING"
P1 F2 C REQ
1
P1 F3
c.xx.dev.thru 1215 248505
P1 F3 C DAT
FREE
P1 F3 C ID
%MIS.USER.zcus.picis.bms.ops.M.device(A)
P1 F3 C ID.ARG
AR
P1 F3 C IFE
1
P1 F3 C LEN
20
P1 F3 C MAP
D(127),"END"
P1 F3 C REQ
1
P1 P1
FROM DEVICE @2
P1 P2
THRU DEVICE @3
P1 S1
N ,2,3
_______________________________________________
meditech-l mailing list
[email protected]
http://mtusers.com/mailman/listinfo/meditech-l
