Would it be O.K. to pass along what is in those environment files also?

Tracy Johnson
Measurement Specialties, Inc. 

BT







NNNN


> -----Original Message-----
> From: HP-3000 Systems Discussion 
> [mailto:[log in to unmask]] On Behalf Of Legault, Raymond D
> Sent: Thursday, November 16, 2006 9:26 AM
> To: [log in to unmask]
> Subject: Re: [HP3000-L] HP3000 and Barcode
> 
> 
> On our site I know ENV files TTLJ2039.HPENV2.SYS and 
> TTLJLP39.HPENV2.SYS have code 39 (medium?) as a font 
> available.  LP8839.HPENV2.SYS may also but I'm not sure.
> 
> Here is the Quiz code I use to print the barcode data.  On 
> the report the barcode is printed on the right side of the 
> report and is the last data printed on the line.
> 
> DEFINE ESCN INTEGER*2 = 27
> DEFINE ESC CHAR*1 = CHARACTERS(ESCN)[2:1]
> DEFINE SET-TO-BARCODE CHAR*4  =                                    &
>    ESC + "(2X"
> DEFINE SET-TO-TEXT CHAR*4  =                                       &
>    ESC + "(0X"
> DEFINE MY-BARCODE CHAR*60 = " " IF MY-PRINTER-TYPE = "LP"          &
>       OR MY-SHELF-LOC = " "                                        &
>    ELSE SET-TO-BARCODE + "*1P," + MY-CAT-CODE + CAT-NUMBER +       &
>        "*" + SET-TO-TEXT
> DEFINE MY-EYE-READ CHAR*12 = " " IF MY-PRINTER-TYPE = "LP"         &
>       OR MY-SHELF-LOC = " "                                        &
>    ELSE "*1P " + MY-CAT-CODE + CAT-NUMBER + "*"
> 
> ************************************ 

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *