| DESCRIPTION OF ENHANCEMENTS |
This patch to the Laboratory package does not contain any changes to
printers. This patch supports 1x2, 15/16X3, and 10 part 2.4x4
formats used on the Intermec printers, did not use all of the space.
This resulted in a shortened test list. The label software has been
adjusted to use the full amount of space available for the test list.
This varies with the different label sizes and formats.
The list of tests will be formatted such that a ";" separates each
test abbreviation. If all of the accession tests can not print on the
label due to lack of space then the list will be truncated. Truncation
will be indicated by the characters "..." at the end of the label test
list.
NOIS ASH-1095-33536, BAY-0796-30672, MRN-0296-41708, WBP-0795-22054
label stock.
16. Fixed the location not printing on 1x2 and 10 part labels.
NOIS ASH-0795-30288, FHM-0396-50465, SHR-0696-70850
17. Fixed an undefined error, variables LRAN and LRACC, when printing
future collection labels.
NOIS MAN-0196-11087
18. Changed the setting of variables LRBAR0/LRBAR1 to values returned by
a supported call to KERNEL (PSET^%ZISP) for bar code on (IOBARON)/bar
code off (IOBAROFF) characteristics.
NOIS SPO-0696-50319
19. Provided the ability to designate label type and label routine on a
printer by printer basis. See the section on the POST-INSTALLATION
INSTRUCTIONS item #1.
NOIS AMA-0297-71215
20. To conform to VistA Programming Standards and Conventions (SAC),
The following changes have been made:
2. Support exists for the following bar code symbologies:
a. W * was changed to W $C() in the label routines.
NOIS FNC-0697-31993
b. Routine LRLABLD was changed to use an approved DBIA (#2469) when
determining a user's default lab label printer. If a printer is
associated with the user's home device by entering a printer in
the LAB LABEL PRINTER field (#101) in the DEVICE (#3.5) file, then
this printer becomes the default label printer instead of LABLABEL.
It had been using a direct global read of global %ZIS.
Code 39
c. Routine LRPHLIST was changed to use the supported DBIA #10091 call.
If the user has no institution defined in the NEW PERSON (#200) file,
this call is used to determine the user's default institution,
It had been using a direct global read of global XMB.
21. The Print future collection labels option [LRUFCL] was not determining
the collection sample correctly. The collection sample is now derived
from the COLLECTION SAMPLE field (#3) in the SPECIMEN # multiple
field (#1) of the LAB ORDER ENTRY file (#69).
Code 39 with check digit
22. Lab routine selection:
a. The label routine selection is backward compatible with previous
logic. The software determines a label routine by the value of the
LABEL TYPE field (#302) in the LABORATORY SITE file (#69.9).
b. If a site defines label devices in the LABEL DEVICE multiple field
(#360) of the LABORATORY SITE file (#69.9), the label routine will
be determined as follows:
Code 128 bar code
If an accession area is not defined (test/future order labels) then
the accession area designated by DEFAULT ACCESSION AREA field (#.06)
within LABEL DEVICE multiple field (#360) of the LABORATORY SITE
file (#69.9) for following selection logic is used.
If an alternate label routine for the accession area is designated
then the label routine designated by fields ALTERNATE LABEL
ENTRY (#5.2) and ALTERNATE LABEL ROUTINE (#5.3) of the
ACCESSION file (#68) is used.
Otherwise if site has designated an alternate label routine for the
device then the label routine designated by fields ALTERNATE LABEL
ENTRY (#.04) and ALTERNATE LABEL ROUTINE (#.05) within LABEL DEVICE
multiple field (#360) of the LABORATORY SITE file (#69.9) is used.
Otherwise if the printer is designated as an Intermec 4100 by the
PRINTER TYPE field (#.02) of the LABEL DEVICE multiple field (#360)
of the LABORATORY SITE file (#69.9), the label routine is determined
by the LABEL STOCK field (#.03) of the LABEL DEVICE multiple field
The bar code symbology used can be designated on an accession area
(#360) of LABORATORY SITE file (#69.9) as follows:
1 15/16X3 --> routine LRLABELC
2 1X2 --> routine LRLABELA
3 2.5X4 10 PART --> routine LRLABELB
c. If none of the conditions checked in b. above apply then the label
routine designated in a. above is used.
basis. See the BAR CODE PRINT field (#5) in the ACCESSION file (#68).
23. Intermec 4100 label format assignments:
F0 - Reserved by manufacturer
F1 - Presently not used (Unavailable on 4100BA models)
F2 - Presently not used (Unavailable on 4100BA models)
F3 - 1x2 Plain Label (Old Style)
F4 - 1x2 Code 39 Label (Old Style)
F5 - 1x2 Code 39/128 - UID
F6 - Presently not used
F7 - 15/16x3 Plain Label (Old Style)
the VISTA BLOOD BANK Software as defined by VHA DIRECTIVE 97-033
The set of codes for this field has been expanded to allow designating
F8 - 15/16x3 Code 39 (Old Style)
F9 - 15/16x3 Code 39/128 - UID
F10 - Presently not used
F11 - Presently not used
F12 - 10 Part Code 39 (Old Style)
F13 - 10 Part Code 39/128 - UID
F14 - Presently not used - Reserved for LEDI shipping labels
F15 - Presently not used - Reserved for LEDI shipping labels
F16 - Presently not used - Reserved for LEDI shipping labels
F17 - Presently not used - Reserved for LEDI shipping labels
a specific symbology. See item #23 below for the effect of this field
F18 - Presently not used - Reserved for LEDI shipping labels
F19 - Presently not used - Reserved for LEDI shipping labels
Note: Formats F4, F8, and F12 print the bar code with a check digit.
24. Intermec format selection:
Note: This is based on the printer being designated as Intermec printer,
that is when the PRINTER TYPE field (#.02) in the LABEL DEVICE
multiple field (#360) of the LABORATORY SITE file (#69.9)
equals 1 and the value of the BAR CODE PRINT field (#5) in the
when using the Intermec label printers.
ACCESSION file (#68) is as listed in the below table:
Intermec 4100
1x2 label 15/16X3 10 part label
0 F3 F7 F12
1 F4 F8 F12
BAR CODE 2 F5 F9 F13
PRINT 3 F5 F9 F13
4 F5 F9 F13
BAR CODE PRINT set of code: 0 - NONE
1 - YES (Code 39 with check digit)
2 - Code39
3 - Code39 with check digit
4 - Code128
NOTE: The site will need to program the Intermec 4100 printer for those
formats which will be used based on label stock and bar code
symbology selected.
3. Support exists for bar coding the short/long identifier on labels.
Example: Site is using 1x2 labels and has specified BAR CODE
PRINT of 0,1, or 4 for various accession areas.
The Intermec 4100 printer would need to be
downloaded with formats F3, F4, and F5.
Associated NOIS
---------------
AMA-0297-71215
ASH-0795-30288
The label software will now check the field TYPE OF ACCESSION NUMBER
ASH-1095-33536
BAN-1097-11647
BAY-0796-30672
BIG-0596-71566
BRK-0696-11519
BUF-0695-13329
DAY-0497-42491
FHM-0396-50465
FNC-0697-31993
GRJ-0395-50211
(#.092) to determine the identifier to bar code. If a short identifier
GRJ-1095-52265
GRJ-0796-50216
MAN-0196-10924
MAN-0196-11087
MRN-0296-41708
PRO-0196-10343
PRO-1096-11923
SHR-0696-70850
SPO-0696-50319
WBP-0795-22054
(accession number) is selected it will be formatted as determined in
Test Sites
----------
Asheville VAMC
Bath VAMC
Dayton VAMC
Loma Linda VAMC
Long Beach VAMC
item #4 below. If it is a long identifier the Laboratory Unique
Manchester VAMC
Milwaukee VAMC
North Chicago VAMC
----------------------------
ROUTINE SUMMARY
---------------
The following is a list of routines included in this patch. The second
Identifier (UID) will be printed. Formats in the Intermec label routines
line of each routine now looks like:
<tab>;;5.2;LAB SERVICE;**[patch list]**; Sep 27, 1994
CHECK^XTSUMBLD results
Routine Name Before Patch After Patch Patch List
------------ ------------ ----------- ----------
LR161 N/A 2465270 161
LRBARA 3774911 6240751 161
titled VISTA BLOOD BANK SOFTWARE VERSION 5.2.
have been adjusted to handle the increased length of the bar code
LRBARB 6451096 18545310 161
LRBARC N/A 4506131 161
LRBARCF N/A 4094580 161
LRLABEL 1668195 826314 161
LRLABEL1 2827443 978058 161
LRLABEL2 1294781 590501 161
LRLABEL3 1905479 847432 161
LRLABEL5 2457165 1079193 161
LRLABEL6 3490879 3114683 161
LRLABELA 1935828 2536685 161
printed.
LRLABELB 4990488 6023279 161
LRLABELC N/A 1616954 161
LRLABELF 7055278 5776749 121,161
LRLABLD 10046912 8089099 65,161
LRLABLD0 9258958 9351158 1,65,121,161
LRLABLDS 5030406 4835286 161
LRLABLIO 7032106 5515879 107,161
LRLABXOL 5526784 2794683 11,121,161
LRLABXT 5435171 6060326 80,161
LRPHLIS1 14289685 12110295 1,161
NOIS PRO-1096-11923, MAN-0196-10924, BRK-0696-11519
LRPHLIST 13349268 12051480 161
FILE SECURITY
-------------
There are four new fields added by this patch which have FileMan Write
Access equal to "@". This is required for security purposes. To edit these
fields requires the user to have FileMan Programmers Access. The fields
affected are:
- ALTERNATE LABEL ENTRY (#5.2) and ALTERNATE LABEL ROUTINE (#5.3) of the
ACCESSION file (#68).
- ALTERNATE LABEL ENTRY (#.04) and ALTERNATE LABEL ROUTINE (#.05) within
LABEL DEVICE multiple field (#360) of the LABORATORY SITE file (#69.9).
INSTALLATION INSTRUCTIONS
-------------------------
4. The ability to designate the length of a short identifier (accession
The install time for this patch is less than 5 minutes. This patch
can be installed when Laboratory users are on the system.
However the following conditions apply:
- Label printing should not be occurring
NOTE: MailMan and KERNEL patches must be current on the target system to
avoid problems loading and/or installing this patch.
number) when it is selected to be bar coded on an accession label is
Patch installation needs to be coordinated with the Laboratory
Information Manager (LIM/ADPAC). The LIM/ADPAC needs to perform the
file setup as explained in the post-installation instructions if
applicable.
1. If any of the above routines are mapped, disable mapping for them.
2. Use the 'INSTALL/CHECK MESSAGE' option of the PackMan menu. This
supported. When the accession number is less than the number specified,
option will load the KIDS patch onto your system.
3. The patch has now been loaded into a Transport global on your
system. You now need to use KIDS to install the transport global.
4. On the 'Kernel Installation & Distribution System' Menu (KIDS),
select the 'Installation' menu.
5. Use the 'Verify Checksum in Transport Global' option and verify that
all routines have the correct checksums.
it will be padded with zeros. See the description for the BAR CODE PAD
6. If you wish to preserve a copy of the routines exported in this patch
prior to installation, you should use the 'Backup a Transport Global'
option at this time. You may also compare the routine in your
production account to the routine in the patch by using the 'Compare
a Transport Global to Current System' option. These options can
both be found under the 'Installation' menu.
7. Use the 'Install Package(s)' option under the 'Installation' menu
and select the package 'LR*5.2*161'. When prompted 'Want to
field (#5.1) in the ACCESSION file (#68) for additional information and
DISABLE Scheduled Options, Menu Options, and Protocols? YES//',
choose 'NO'.
8. On a mapped system, rebuild your map set.
9. Routine LR161 can be deleted after successful patch installation.
*****************************************************************************
Below is an example of the dialogue seen during the KIDS install:
examples.
Select Installation Option: 6 Install Package(s)
Select INSTALL NAME: LR*5.2*161 Loaded from Distribution
5/2/97@17:11:20
=> LR*5.2*161
This Distribution was loaded on May 02, 1997@17:11:20 with header of
LR*5.2*161
It consisted of the following Install(s):
LR*5.2*161
LR*5.2*161
Will first run the Environment Check Routine, LR161
--- Environment Check is Ok ---
Install Questions for LR*5.2*161
5. Support for local label routines on a printer or accession area basis
Incoming Files:
62.05 URGENCY (Partial Definition)
Note: You already have the 'URGENCY' File.
68 ACCESSION (Partial Definition)
Note: You already have the 'ACCESSION' File.
is available. To designate local label routines on a printer by printer
69.9 LABORATORY SITE (Partial Definition)
Note: You already have the 'LABORATORY SITE' File.
Want to DISABLE Scheduled Options, Menu Options, and Protocols? YES// NO
Enter the Device you want to print the Install messages.
You can queue the install by enter a 'Q' at the device prompt.
Enter a '^' to abort the install.
basis see the section on POST-INSTALLATION INSTRUCTIONS item #1.
DEVICE: HOME// VIRTUAL TERMINAL
Install Started for LR*5.2*161 :
May 02, 1997@17:14:54
Installing Routines:
May 02, 1997@17:15:09
To designate local label routines on an accession area basis see the
Running Pre-Install Routine: PRE^LR161
*** Pre install started ***
--- No actions required for pre install ---
*** Pre install completed ***
Installing Data Dictionaries:
May 02, 1997@17:15:45
section on POST-INSTALLATION INSTRUCTIONS item #2 and complete the
Installing PACKAGE COMPONENTS:
Installing OPTION
May 02, 1997@17:15:46
LR*5.2*161
Running Post-Install Routine: POST^LR161
fields ALTERNATE LABEL ENTRY (#5.2) and ALTERNATE LABEL ROUTINE (#5.3)
*** Post install started ***
--- No actions required for post install ---
*** Post install completed ***
Updating Routine file...
Updating KIDS files...
in the ACCESSION file (#68).
LR*5.2*161 Installed.
May 02, 1997@17:16:09
Install Completed
Select Installation Option:
End of example install
*****************************************************************************
POST-INSTALLATION INSTRUCTIONS
------------------------------
The following actions should be performed by the Lab Information Manager
(LIM) or the person(s) responsible for the maintenance of the files LABORATORY
6. The ability to print test urgencies on a label exists. Sites can
SITE (#69.9) and ACCESSION (#68).
1. If a site is using local label routines or the Intermec 4100 label
printers to print lab labels then perform the following steps.
To define local label routines on a printer by printer basis, complete
fields ALTERNATE LABEL ENTRY (#.04) and ALTERNATE LABEL ROUTINE (#.05).
a. Define printers in the LABEL DEVICE multiple field (#360) in the
LABORATORY SITE file (#69.9).
designate on an individual urgency basis if the urgency is to print.
*** Start of example ***
Select OPTION: 1 ENTER OR EDIT FILE ENTRIES
INPUT TO WHAT FILE: LABORATORY SITE//
EDIT WHICH FIELD: ALL// LABEL DEVICE (multiple)
EDIT WHICH LABEL DEVICE SUB-FIELD: ALL// ?
Answer with LABEL DEVICE SUB-FIELD, or NUMBER
Choose from:
.01 LABEL DEVICE
The urgency that is printed will be the highest urgency of all the
.02 PRINTER TYPE
.03 LABEL STOCK
.04 ALTERNATE LABEL ENTRY (see note on FILE SECURITY)
.05 ALTERNATE LABEL ROUTINE (see note on FILE SECURITY)
.06 DEFAULT ACCESSION AREA
FOLLOW A FIELD NAME WITH ';"CAPTION"' TO HAVE THE FIELD ASKED AS
'CAPTION: ' OR WITH ';T' TO USE THE FIELD 'TITLE' AS CAPTION
EDIT WHICH LABEL DEVICE SUB-FIELD: ALL//
THEN EDIT FIELD:
tests on the accession. The highest urgency is determined as the
Select LABORATORY SITE SITE NAME: 'name of your site'
Select LABEL DEVICE: IRM DEVELOP INTERMEC
LABEL DEVICE: IRM DEVELOP INTERMEC//
PRINTER TYPE: INTERMEC 4100// ?
Choose from:
0 OTHER
1 INTERMEC 4100
PRINTER TYPE: INTERMEC 4100//
LABEL STOCK: 2.5X4 10 PART// ?
urgency with the lowest internal entry number in the URGENCY file
Choose from:
0 OTHER
1 15/16X3
2 1X2
3 2.5X4 10 PART
LABEL STOCK: 2.5X4 10 PART//
ALTERNATE LABEL ENTRY: ?
Answer must be 1-8 uppercase alpha and/or numeric characters in
length. Site can enter an alternate label entry point to be used
instead of the standard lab label routines used by the lab package
(#62.05). Sites can designate a 1-5 character abbreviation that will
when printing labels using this device. Field ALTERNATE LABEL
ROUTINE (#.05) must be completed for the software to use this field.
(see note on FILE SECURITY)
ALTERNATE LABEL ENTRY:
ALTERNATE LABEL ROUTINE: ??
Answer must be 1-8 uppercase alpha and/or numeric characters in
length. Site can enter an alternate label routine to be used
instead of the standard lab label routines used by the lab package
when printing labels using this device.
be printed as the urgency. See the section on POST-INSTALLATION
(see note on FILE SECURITY)
ALTERNATE LABEL ROUTINE:
DEFAULT ACCESSION AREA: ??
Select accession area to use for default characteristics.
This field is used by the label software when printing test
or future order labels. When printing these types of labels
there is no accession area identified to determine label
characteristics such as type of barcode or accession
area alternate label routine.
INSTRUCTIONS item #3.
The accession area designated for this device will be used
by the software to obtain accession area specific
characteristics when printing labels which are not associated
with any particular accession area. Examples of these
characteristics are barcode type, number of pad digits
for barcode number, and alternate label routine.
*** End of example ***
b. Program the Intermec 4100 label printer with new formats using
the Lab Bar Code Label Formatter option [LR BAR CF] located on
the Lab liaison menu [LRLIAISON]
2. Edit the following fields in the ACCESSION file (#68), to set up the
bar code parameters and/or local label routines for each accession
area.
*** Start of example ***
7. The Reprint accession label(s) option [LRLABXT] has been enhanced to
Select OPTION: 1 ENTER OR EDIT FILE ENTRIES
INPUT TO WHAT FILE: ACCESSION//
EDIT WHICH FIELD: ALL// 5 BAR CODE PRINT
THEN EDIT FIELD: 5.1 BAR CODE PAD
THEN EDIT FIELD: 5.2 ALTERNATE LABEL ENTRY (see note on FILE SECURITY)
THEN EDIT FIELD: 5.3 ALTERNATE LABEL ROUTINE (see note on FILE SECURITY)
allow printing selected accessions.
Select ACCESSION AREA: CHEMISTRY
BAR CODE PRINT: CODE39 WITH CHECK DIGIT// ??
This field is used by the label print utilities to determine if
bar code labels should be printed for this accession area.
Choose from:
0 NONE
1 YES
2 CODE39
3 CODE39 WITH CHECK DIGIT
This patch will address enhancements and fixes to Lab label printing.
4 CODE128
BAR CODE PRINT: CODE39 WITH CHECK DIGIT//
BAR CODE PAD: ?
Type a Number between 1 and 15, 0 Decimal Digits
Enter the number of zeros ("0") to pad an accession number when
printing a bar code using the accession number. Used when site
needs a minimum length bar code on labels.
Example if need a four digit bar code then enter four.
This would produce the following:
8. The Print future collection labels option [LRUFCL] has been enhanced
Accession number Bar Code
1 0001
12 0012
123 0123
1234 1234
12345 12345
ALTERNATE LABEL ENTRY: ?
Answer must be 1-8 uppercase alpha and/or numeric characters
in length.
to allow selection of a range of collection types. The collection type
Site can enter an alternate label entry point to be used instead of
the standard lab label routine entry point defined in file
LABORATORY SITE (#69.9).
This field overrides the label routine settings in file LABORATORY
SITE (#69.9) for this accession area. Field ALTERNATE LABEL ROUTINE
(#5.3) must be completed for the software to use this field.
See description of field #5.3.
(see note on FILE SECURITY)
ALTERNATE LABEL ENTRY:
WARD COLLECT is now selectable. A user can select one or more types
ALTERNATE LABEL ROUTINE: ?
Answer must be 1-8 uppercase alpha and/or numeric characters
in length.
Site can enter an alternate label routine to be used instead
of the standard lab label routine defined in file LABORATORY
SITE (#69.9).
This field overrides the label routine settings in file LABORATORY
SITE (#69.9) for this accession area. It is used in conjunction
with field ALTERNATE LABEL ENTRY (#5.2) for building the
when printing future collection labels.
variable LRLABEL.
(see note on FILE SECURITY)
ALTERNATE LABEL ROUTINE:
Select ACCESSION AREA:
3. Edit new fields LABEL PRINT (#5) and ABBREVIATION (#6) in the URGENCY
file (#62.05) using FileMan's Enter/Edit option.
Select OPTION: 1 ENTER OR EDIT FILE ENTRIES
INPUT TO WHAT FILE: URGENCY//
EDIT WHICH FIELD: ALL// 5 LABEL PRINT
THEN EDIT FIELD: 6 ABBREVIATION
THEN EDIT FIELD:
Select URGENCY: ROUTINE
LABEL PRINT: YES// ?
9. Fixed the null subscript error in array variable LRBAR when the
Select if abbreviation is to be printed.
Choose from:
0 NO
1 YES
2 YES, REVERSE FIELD
LABEL PRINT: YES// ??
Determines if urgency's abbreviation is to be printed on labels.
If "YES, REVERSE FIELD" is selected and label printer supports
reverse field printing, then abbreviation will be printed with
white letters on a black background.
variable LRAA was undefined.
Choose from:
0 NO
1 YES
2 YES, REVERSE FIELD
LABEL PRINT: YES//
ABBREVIATION: ROUT
Select URGENCY:
NOIS GRJ-0395-50211
*** End of example ***
10. Fixed printing of information in the wrong fields on the Intermec 4100
10-part labels. There was an extra carriage return being sent to the
printer which was moving the accession and other information into the
wrong fields.
NOIS BUF-0695-13329
11. Fix an undefined variable error, usually LRAN, when printing test labels.
All standard required lab variables will be defined when printing test
labels.
NOIS BAN-1097-11647, DAY-0497-42491, GRJ-0796-50216
1. The ability to designate label stock on a printer by printer basis
12. Fixed formatting the SSN on the 10-part label. There was an extra
carriage return being sent to the printer which was moving the SSN
into the next field.
NOIS BIG-0596-71566
13. Fixed a problem in the Reprint accession label(s) option [LRLABXT]
in which a user, after selecting the label device, would encounter
a "Device Unavailable" message. This error was caused by the opening,
closing, and reopening of the label device.
is available. This is used for printing with the Intermec label
NOIS PRO-0196-10343
14. Adjusted the label field positioning. Position of the field on label
was near the edge which left little room for variation in label stock
positioning.
NOIS GRJ-1095-52265
15. When the list of tests are printed on accession labels the software
attempts to print as many test abbreviations as will fit within the
dimensions of the label. Some of the label formats, specifically the
|
