All messages should be posted in plain text.  HTML will be converted to
attachments.    The meditech-l web site is MTUsers.com
======================================

See attached NPR routines - should get you started on the right boot.

cheers,
Wil

William F. Ladewig
Financial Application Consultant
Children's Hospital Central California
9300 Valley Childrens Place
Madera, CA. 93638
559 353-7334

>>> "Carla Fuller" <[EMAIL PROTECTED]> 07/12/06 7:57 AM >>>
All messages should be posted in plain text.  HTML will be converted
to
attachments.    The meditech-l web site is MTUsers.com
======================================

 
Please post to the L. We are interested in this as well.
Thank you,

Carla Fuller, CPC
War Memorial Hospital
Applications Specialist
500 Osborn Blvd
Sault Ste. Marie, MI 49783
(906) 635-4663
[EMAIL PROTECTED] 

-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] 
On Behalf Of Andre Cappiello
Sent: Monday, July 10, 2006 4:10 PM
To: [email protected] 
Subject: [MEDITECH-L] MM Bin Labels

All messages should be posted in plain text.  HTML will be converted
to
attachments.    The meditech-l web site is MTUsers.com
======================================

Good Afternoon,

Does anyone have a custom NPR for MM Bin Labels (3-across) that they
would
be willing to share.   We are a Magic 5.4 site.

Thanks in advance,
Andy Cappiello
Adirondack Medical Center
Saranac Lake, NY  12983

_______________________________________________
meditech-l mailing list
[email protected] 
http://mtusers.com/mailman/listinfo/meditech-l 

_______________________________________________
meditech-l mailing list
[email protected] 
http://mtusers.com/mailman/listinfo/meditech-l



--------------------------------------------------------------------------------

Children's Hospital Central California
A Great Place to Get Better
------------------------------------------------------------
NOTE: This email and any files transmitted with it are
intended solely for the use of the individual or entity to
whom they are addressed and may contain confidential,
patient health or other legally privileged information.
If you have received this email in error please notify the
sender by email,delete and destroy this message and its
attachments. Any unauthorized review, use, disclosure, or
distribution is prohibited.
------------------------------------------------------------ 

MEDITECH.CUST.RPTS^Children's Hospital Central CA^VAC^LIVE.MIS^WFL^20060711^A^3 
across - prints stock item's common name
@@VERSION:1
MM.STOCK.zcus.bin.lbl.hpiii.x.wfl.common.name
@@PROC
MM.STOCK.zcus.bin.lbl.hpiii.x.wfl.common.name
[EMAIL PROTECTED]
ML
IF{%MM.STOCK.zcus.bin.lbl.hpiii.x.wfl.common.name.S("MM.STOCK.zcus.bin.lbl.hpiii.x.wfl.common.name.R","IF{O(!)=O(#)&('/ZLOCAL)
 27-/.P;0}")X}
@@RPT
Y$zcus.bin.lbl.hpiii.x.wfl.common.nameMM.STOCKtop1Custom Bin Labels w 
Common Name - for HP 
LaserjetNONE10846182182mm.stockNNNYYmm.stock.index1011Y
AT      753279726
WFLE
AT      774360586
WFLE
AT      775313895
WFLE
AT      831892490
WFLE
CI

DC1
09/24/96 CDC - REMOVE *'S, ADD TRANSFER Y/N SELECT FIELD
F1
xx.fsetxx.fset2L
F1CDAT
FREE
F1CFNC
LST
F1CJFY
L
F1CLEN
35
F1CVAL
D(27)_"(8U"_D(27)_"(s0p12.00h10.0v0s3b3T"_D(27)_"&a0L"
F2

xx.reset.lx2L
F2CDAT
FREE
F2CFNC
LST
F2CJFY
L
F2CLEN
1
F2CVAL
IF{L=180 0^L,""}
F3
xx.bconxx.bcon22L
F3CDAT
FREE
F3CFNC
LST
F3CJFY
L
F3CLEN
24
F3CVAL
D(27)_"(0Y"_D(27)_"(s0p4.6h12.0v0s0b0T"
F4
xx.stockxx.stock2C
F4CDAT
BAR.CODE
F4CFNC
LST
F4CJFY
C
F4CLEN
10
F4CVAL
[EMAIL PROTECTED] 1+L^L,@stock.no}
F5
xx.bcoffxx.b2L
F5CDAT
FREE
F5CFNC
LST
F5CJFY
L
F5CLEN
26
F5CVAL
D(27)_"(8U"_D(27)_"(s0p12.00h10.0v0s3b3T"
F6
xx.sn.printxx.sn.2L
F6CDAT
FREE
F6CFNC
LST
F6CJFY
L
F6CLEN
6
F6CVAL
@stock.no:6T
F7
xx.inv.printxx.inv2L
F7CDAT
FREE
F7CFNC
LST
F7CJFY
L
F7CLEN
6
F7CVAL
@inventory:6T
F8
xx.loc.printxx.loc2L
F8CDAT
FREE
F8CFNC
LST
F8CJFY
L
F8CLEN
6
F8CVAL
[EMAIL PROTECTED] 1+L^L,@location}
F9
xx.common.namexx.common.name2L
F9CDAT
FREE
F9CJFY
L
F9CLEN
30
F9CVAL
[EMAIL PROTECTED] 1+L^L,@item's.name:30T}
F10
xx.uoixx.u2L
F10CDAT
FREE
F10CFNC
LST
F10CJFY
L
F10CLEN
4
F10CVAL
[EMAIL PROTECTED]"MPS" @pt.unit.of.issue;@unit.of.issue}
F11
max.shelf.qty.uimax.s5R
F11CFNC
LST
F11CJFY
L
F11CLEN
5
F12
xx.add.3x2L
F12CDAT
FREE
F12CFNC
LST
F12CJFY
L
F12CLEN
1
F12CVAL
[EMAIL PROTECTED] 3+L^L,""}
F13
mrp.uimrp.u5R
F13CJFY
L
F14
xx.positionxx.position2L
F14CDAT
FREE
F14CFNC
LST
F14CJFY
L
F14CLEN
14
F14CVAL
IF{L=120 D(27)_"&a66l-64r-20V";L=60 D(27)_"&a33l-64r-20V";L=18!(L=78)!(L=138) 
(D(27)_"&a+1r+40V")^MR;L=30!(L=90)!(L=150) MR;L=42!(L=102)!(L=162) 
MR;L=12!(L=72)!(L=132) D(27)_"&a+10V"}
F14CLVAL1
75
F14CLVAL2
75
F14CLVAL3
33
F15
xx.stock.noxx.stock.no2L
F15CDAT
FREE
F15CFNC
LST
F15CJFY
L
F15CLEN
18
F15CVAL
@stock.no
F15SE5
LI
c.xx.stock.noFor Stock #ALL
F16
xx.pcu.onlyx2L
F16CDAT
FREE
F16CJFY
L
F16CLEN
1
F16CVAL
IF{c.xx.pcu.only.prompt="Y" [EMAIL PROTECTED]>1 "Y";"N"};"N"}
F16SE9
EQ"Y""Y"
F17
xx.pcu.only.promptx2L
F17CDAT
FREE
F17CJFY
L
F17CLEN
1
F17CVAL
1
F17SE6
IGc.xx.pcu.only.promptPrint Patient Chargeables"Y"
F18
xx.no.pcu.onlyx2L
F18CDAT
FREE
F18CJFY
L
F18CLEN
1
F18CVAL
IF{c.xx.no.pcu.only.prompt="Y" [EMAIL PROTECTED]>1 "N";"Y"};"N"}
F18SE10
EQ"Y""Y"
F19
xx.no.pcu.only.promptx2L
F19CDAT
FREE
F19CJFY
L
F19CLEN
1
F19CVAL
1
F19SE7
IGc.xx.no.pcu.only.promptPrint Non Patient Chargeables"Y"
F20
xx.sort.pcux2L
F20CDAT
FREE
F20CJFY
L
F20CLEN
1
F20CVAL
[EMAIL PROTECTED]>1 "1";"2"}
FS1
active
FS1SE1
EQ"Y""Y"
FS2
        inventory
FS2SE2
EQc.inventoryFor Inventory:
FS3
location
FS3SE3
GE
b.locationFrom Location:   BEGINNING
FS3SE4
LE
e.locationThru Location:END
FS4

transfer.item
FS4SE8
EQc.transfer.itemTransfer (Y/N)ALL
FI10
351
FI20
12
FI30
243
FI324
104
FI334
265
FI40
66
FI48
67
FI416
68
FI50
309
FI64
410
FI614
511
FI620
112
FI627
513
FI80
1414
I1
index
L1
HP
L2
HP
L3
D
L4
D
L5
D
L6
D
L7
D
L8
D
P1
xx.fset____________________________
P2
x
P3
xx.bcon2_________________xx.stock_xx.b______________________
P4
xx.sn.  xx.inv  xx.loc
P5
xx.common.name________________
P6
UI: xx.u MSQ: max.s x MRP: mrp.u
P7
 
P8
xx.positio____
SR
C9!C10
T1
xx.sort.pcuNONENASC
T2
locationNONENASC
T3
stock.noNONENASC
T4
        inventoryNONENASC
T5
urnNONENASC
U       829567261
GDILIVE.MIS
U       829654032
GDILIVE.MIS
U       829661033
GDILIVE.MIS
U       829661071
GDILIVE.MIS
U       830702280
AC18LIVE.MIS
U       830951961
GDILIVE.MIS
U       830952005
GDILIVE.MIS
U       831546853
GDILIVE.MIS
U       831807330
GDILIVE.MIS
U       831885551
KSL1LIVE.MIS
@@SCRN
Y$zcus.bin.lbl.hpiii.x.wfl.common.nameMM.STOCK-MM.STOCK.zcus.bin.lbl.hpiii.x.wfl.common.name2NN
CS
3650
P1
1Custom Bin Labels w Common Name - for HP Laserjet%Z.on.device
P1F2
c.inventory1115
P1F2CID.ARG
BR
P1F2CIFE
1
P1F2CREQ
1
P1F3

b.location1315
P1F3CID.ARG
BA
P1F3CIFE
1
P1F3CMAP
D(127),"BEGINNING"
P1F3CREQ
1
P1F4

e.location1415
P1F4CID.ARG
BA
P1F4CIFE
1
P1F4CMAP
D(127),"END"
P1F4CREQ
1
P1F5

c.xx.stock.no270
P1F5CDAT
FREE
P1F5CID.ARG
BA
P1F5CIFE
1
P1F5CLEN
18
P1F5CMAP
D(127),"ALL"
P1F5CREQ
N
P1F5CREQI
N
P1F6
c.xx.pcu.only.prompt31126
P1F6CDAT
FREE
P1F6CDFT2
"Y"
P1F6CID.ARG
BR
P1F6CIFE
1
P1F6CLEN
1
P1F6CREQ
1
P1F7
c.xx.no.pcu.only.prompt31330
P1F7CDAT
FREE
P1F7CDFT2
"Y"
P1F7CID.ARG
BR
P1F7CIFE
1
P1F7CLEN
1
P1F7CREQ
1
P1F8
c.transfer.item31515
P1F8CID.ARG
BA
P1F8CIFE
1
P1F8CMAP
D(127),"ALL"
P1F8CREQ
1
P1MF5
31
P1P1
For Inventory: @2
P1P2
 
P1P3
>From Location: @3
P1P4
Thru Location: @4
P1P5
 
P1P6
For Stock #
P1P7
@5
P1P8
@5
P1P9
@5
P1P10
 
P1P11
Print Patient Chargeables @6
P1P12
 
P1P13
Print Non Patient Chargeables @7
P1P14
 
P1P15
Transfer (Y/N) @8
P1S1
N,2,3,4
P1S2
N173/T2,5
P1S3
N,6,7,8
MEDITECH.CUST.RPTS^Children's Hospital Central 
CA^VAC^LIVE.MIS^WFL^20060711^A^stock description
@@VERSION:1
MM.STOCK.zcus.bin.lbl.hpiii.x.adg
@@PROC
MM.STOCK.zcus.bin.lbl.hpiii.x.adg
[EMAIL PROTECTED]
ML
IF{%MM.STOCK.zcus.bin.lbl.hpiii.x.adg.S("MM.STOCK.zcus.bin.lbl.hpiii.x.adg.R","IF{O(!)=O(#)&('/ZLOCAL)
 27-/.P;0}")X}
@@RPT
Yzcus.bin.lbl.hpiii.x.adgMM.STOCKtop,Custom Bin Labels - for HP Laserjet 
PrintersNONE10846182182mm.stockNNNYYmm.stock.index1011Y
AT      734719781
ADG1E
AT      735739450
WFLE
AT      735833915
WFLE
AT      753277394
WFLC-MM.STOCK.zcus.bin.lbl.hpiii.x.adg.common.name
AT      774357999
WFLE
AT      775311970
WFLE
AT      825503456
ADG1C$MM.STOCK.zcus.bin.lbl.hpiii.x.adg.ts
AT      827858224
ADG1CMM.STOCK.zcus.bin.lbl.thermal
AT      831892294
WFLE
CI

DC1
09/24/96 CDC - REMOVE *'S, ADD TRANSFER Y/N SELECT FIELD
F1
xx.fsetxx.fset2L
F1CDAT
FREE
F1CFNC
LST
F1CJFY
L
F1CLEN
35
F1CVAL
D(27)_"(8U"_D(27)_"(s0p12.00h10.0v0s3b3T"_D(27)_"&a0L"
F2

xx.reset.lx2L
F2CDAT
FREE
F2CFNC
LST
F2CJFY
L
F2CLEN
1
F2CVAL
IF{L=180 0^L,""}
F3
xx.bconxx.bcon22L
F3CDAT
FREE
F3CFNC
LST
F3CJFY
L
F3CLEN
24
F3CVAL
D(27)_"(0Y"_D(27)_"(s0p4.6h12.0v0s0b0T"
F4
xx.stockxx.stock2C
F4CDAT
BAR.CODE
F4CFNC
LST
F4CJFY
C
F4CLEN
10
F4CVAL
[EMAIL PROTECTED] 1+L^L,@stock.no}
F5
xx.bcoffxx.b2L
F5CDAT
FREE
F5CFNC
LST
F5CJFY
L
F5CLEN
26
F5CVAL
D(27)_"(8U"_D(27)_"(s0p12.00h10.0v0s3b3T"
F6
xx.sn.printxx.sn.2L
F6CDAT
FREE
F6CFNC
LST
F6CJFY
L
F6CLEN
6
F6CVAL
@stock.no:6T
F7
xx.inv.printxx.inv2L
F7CDAT
FREE
F7CFNC
LST
F7CJFY
L
F7CLEN
6
F7CVAL
@inventory:6T
F8
xx.loc.printxx.loc2L
F8CDAT
FREE
F8CFNC
LST
F8CJFY
L
F8CLEN
6
F8CVAL
[EMAIL PROTECTED] 1+L^L,@location}
F9
xx.descrxx.descr2L
F9CDAT
FREE
F9CJFY
L
F9CLEN
30
F9CVAL
[EMAIL PROTECTED] 1+L^L,@description:30T}
F10
xx.uoixx.u2L
F10CDAT
FREE
F10CFNC
LST
F10CJFY
L
F10CLEN
4
F10CVAL
[EMAIL PROTECTED]"MPS" @pt.unit.of.issue;@unit.of.issue}
F11
max.shelf.qty.uimax.s5R
F11CFNC
LST
F11CJFY
L
F11CLEN
5
F12
xx.add.3x2L
F12CDAT
FREE
F12CFNC
LST
F12CJFY
L
F12CLEN
1
F12CVAL
[EMAIL PROTECTED] 3+L^L,""}
F13
mrp.uimrp.u5R
F13CJFY
L
F14
xx.position
xx.positio2L
F14CDAT
FREE
F14CFNC
LST
F14CJFY
L
F14CLEN
14
F14CVAL
IF{L=120 D(27)_"&a66l-64r-20V";L=60 D(27)_"&a33l-64r-20V";L=18!(L=78)!(L=138) 
(D(27)_"&a+1r+40V")^MR;L=30!(L=90)!(L=150) MR;L=42!(L=102)!(L=162) 
MR;L=12!(L=72)!(L=132) D(27)_"&a+10V"}
F14CLVAL1
75
F14CLVAL2
75
F14CLVAL3
33
F15
xx.stock.noxx.stock.no2L
F15CDAT
FREE
F15CFNC
LST
F15CJFY
L
F15CLEN
18
F15CVAL
@stock.no
F15SE5
LI
c.xx.stock.noFor Stock #ALL
F16
xx.pcu.onlyx2L
F16CDAT
FREE
F16CJFY
L
F16CLEN
1
F16CVAL
IF{c.xx.pcu.only.prompt="Y" [EMAIL PROTECTED]>1 "Y";"N"};"N"}
F16SE9
EQ"Y""Y"
F17
xx.pcu.only.promptx2L
F17CDAT
FREE
F17CJFY
L
F17CLEN
1
F17CVAL
1
F17SE6
IGc.xx.pcu.only.promptPrint Patient Chargeables"Y"
F18
xx.no.pcu.onlyx2L
F18CDAT
FREE
F18CJFY
L
F18CLEN
1
F18CVAL
IF{c.xx.no.pcu.only.prompt="Y" [EMAIL PROTECTED]>1 "N";"Y"};"N"}
F18SE10
EQ"Y""Y"
F19
xx.no.pcu.only.promptx2L
F19CDAT
FREE
F19CJFY
L
F19CLEN
1
F19CVAL
1
F19SE7
IGc.xx.no.pcu.only.promptPrint Non Patient Chargeables"Y"
F20
xx.sort.pcux2L
F20CDAT
FREE
F20CJFY
L
F20CLEN
1
F20CVAL
[EMAIL PROTECTED]>1 "1";"2"}
FS1
active
FS1SE1
EQ"Y""Y"
FS2
        inventory
FS2SE2
EQc.inventoryFor Inventory:
FS3
location
FS3SE3
GE
b.locationFrom Location:   BEGINNING
FS3SE4
LE
e.locationThru Location:END
FS4

transfer.item
FS4SE8
EQc.transfer.itemTransfer (Y/N)ALL
FI10
351
FI20
12
FI30
243
FI324
104
FI334
265
FI40
66
FI48
67
FI416
68
FI50
309
FI64
410
FI614
511
FI620
112
FI627
513
FI80
1414
I1
index
L1
HP
L2
HP
L3
D
L4
D
L5
D
L6
D
L7
D
L8
D
P1
xx.fset____________________________
P2
x
P3
xx.bcon2_________________xx.stock_xx.b______________________
P4
xx.sn.  xx.inv  xx.loc
P5
xx.descr______________________
P6
UI: xx.u MSQ: max.s x MRP: mrp.u
P7
 
P8
xx.positio____
SR
C9!C10
T1
xx.sort.pcuNONENASC
T2
locationNONENASC
T3
stock.noNONENASC
T4
        inventoryNONENASC
T5
urnNONENASC
U       831820502
KSL1LIVE.MIS
U       831833408
RA7LIVE.MIS
U       831833493
RA7LIVE.MIS
U       831888422
EMBLIVE.MIS
U       831888435
EMBLIVE.MIS
U       831888451
EMBLIVE.MIS
U       831888494
EMBLIVE.MIS
U       831888516
EMBLIVE.MIS
U       831888528
EMBLIVE.MIS
U       831892078
WFLLIVE.MIS
@@SCRN
Yzcus.bin.lbl.hpiii.x.adgMM.STOCK!MM.STOCK.zcus.bin.lbl.hpiii.x.adg2NN
CS
3650
P1
,Custom Bin Labels - for HP Laserjet Printers%Z.on.device
P1F2
c.inventory1115
P1F2CID.ARG
BR
P1F2CIFE
1
P1F2CREQ
1
P1F3

b.location1315
P1F3CID.ARG
BA
P1F3CIFE
1
P1F3CMAP
D(127),"BEGINNING"
P1F3CREQ
1
P1F4

e.location1415
P1F4CID.ARG
BA
P1F4CIFE
1
P1F4CMAP
D(127),"END"
P1F4CREQ
1
P1F5

c.xx.stock.no270
P1F5CDAT
FREE
P1F5CID.ARG
BA
P1F5CIFE
1
P1F5CLEN
18
P1F5CMAP
D(127),"ALL"
P1F5CREQ
N
P1F5CREQI
N
P1F6
c.xx.pcu.only.prompt31126
P1F6CDAT
FREE
P1F6CDFT2
"Y"
P1F6CID.ARG
BR
P1F6CIFE
1
P1F6CLEN
1
P1F6CREQ
1
P1F7
c.xx.no.pcu.only.prompt31330
P1F7CDAT
FREE
P1F7CDFT2
"Y"
P1F7CID.ARG
BR
P1F7CIFE
1
P1F7CLEN
1
P1F7CREQ
1
P1F8
c.transfer.item31515
P1F8CID.ARG
BA
P1F8CIFE
1
P1F8CMAP
D(127),"ALL"
P1F8CREQ
1
P1MF5
31
P1P1
For Inventory: @2
P1P2
 
P1P3
>From Location: @3
P1P4
Thru Location: @4
P1P5
 
P1P6
For Stock #
P1P7
@5
P1P8
@5
P1P9
@5
P1P10
 
P1P11
Print Patient Chargeables @6
P1P12
 
P1P13
Print Non Patient Chargeables @7
P1P14
 
P1P15
Transfer (Y/N) @8
P1S1
N,2,3,4
P1S2
N173/T2,5
P1S3
N,6,7,8
_______________________________________________
meditech-l mailing list
[email protected]
http://mtusers.com/mailman/listinfo/meditech-l

Reply via email to