This is what I use to print barcodes on an OKI 420 printer. The barcode is 3
rows high.
*<PROGRAM.TYPE>SUBROUTINE</PROGRAM.TYPE><LANGUAGE.CONVERT>NO</LANGUAGE.CONVERT><ROLL.TO.DEAD.CODE>NO</ROLL.TO.DEAD.CODE>
$BASICTYPE 'U'
SUBROUTINE SUB.BARCODE.STRING( TEXT.FOR.BARCODE, BARCODE.STR )
*<com>-----------------------------------------------------------------
* Written By : ??? Date : ???
*
* Purpose : Create a barcode string where the first 3 fields are the
* actual barcode and the last string is the human readable
* barcode text in wide format.
*
* Notes : I would like to have seen this just build the string 1 time
* just for the barcode and let the program print it 3 times.
* Also I would have liked to see the wide format printing removed
* from this sub and called separately. But to keep the calling
programs
* the same, I will leave it the same.
*
* Send In : TEXT.FOR.BARCODE - the string to print
*
* Send Out : BARCODE.STR
*
* Modifications :
*
* 11/08/10 George Hammerle
* - added call to DC.GET.CURRENT.PRINTER.MODEL
*
*</com>----------------------------------------------------------------
BARCODE.STR = ''
EQU ESC TO CHAR(27)
EQU CHAR16 TO CHAR(16)
*<com>------------------------------------------------------------------
* oki 420 printers
*</com>-----------------------------------------------------------------
BARCODE.STRING = ""
CALL *DC.GET.PID.ATTRIBUTE( "CURRENT.PRINTER.MODEL", '', PRINTER.MODEL, '' )
*CALL *DC.GET.CURRENT.PRINTER.MODEL( PRINTER.MODEL, '', '' )
IF PRINTER.MODEL = 'TALLY 2365' THEN
* The TALLY barcodes are much different than the OKI 420, so I will
* load the barcode up in field 1. Field 2 and 3 will be nill. This could cause
* additional spacing below the barcode.
* In some cases you may be able to call this sub. But if you have text before
* and after the barcode on the same lines of the barcode, this sub cannot be
* used.
* LCP secured mode
TALLY.BARCODE.LINE = CHAR(27):"[?11~"
TALLY.BARCODE.LINE := CHAR(27):"PSC1":CHAR(27):"\"
* set character size to 5
TALLY.BARCODE.LINE := CHAR(16):"5":CHAR(25)
TALLY.BARCODE.LINE := CHAR(27):"[?11~":CHAR(26):"
F3;000":CHAR(25):CHAR(20):"*":TEXT.FOR.BARCODE:"*":CHAR(20):CHAR(27):"[?10~"
BARCODE.STR<1> = TALLY.BARCODE.LINE
END ELSE
* for OKI 420
THE.BARCODE = ESC:CHAR16:CHAR(65):CHAR(8)
* the documentation is not the greatest on what each of these indicates
N1 = CHAR(2) ;* 2 = code 3 of 9
N2 = CHAR(0) ;* ????
N3 = CHAR(0) ;* vertical length of the bars
N4 = CHAR(2) ;* some formula
N5 = CHAR(1) ;* width of the narrow bars
N6 = CHAR(1) ;* sets the narrow space characters width in n/144 inch
N7 = CHAR(1) ;* number of columns ( 144 dpi ) ?
N8 = CHAR(0) ;* 0 = no human readable barcode 1 = Utility 2 = NLQ
THE.BARCODE := N1:N2:N3:N4:N5:N6:N7:N8
THE.BARCODE := ESC:CHAR16:CHAR(66)
LENGTH.BARCODE = LEN(TEXT.FOR.BARCODE) ;* number of characters in the
barcode
THE.BARCODE := CHAR(LENGTH.BARCODE):TEXT.FOR.BARCODE
FOR ZZ = 1 TO 3
BARCODE.STR<ZZ> = THE.BARCODE
NEXT ZZ
END
CALL *DC.DOUBLE.WIDE.STRING( TEXT.FOR.BARCODE, DOUBLE.WIDE.STRING )
BARCODE.STR<4> = DOUBLE.WIDE.STRING
RETURN
George Hammerle
Programming Dude
Hubert Company LLC.
9555 Dry Fork Road
Harrison, Ohio 45030
513-367-8974
zhammerle@hubertREMOVE_THIS.com
-----Original Message-----
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of
u2-users-requ...@listserver.u2ug.org
Sent: Monday, March 25, 2013 3:00 PM
To: u2-users@listserver.u2ug.org
Subject: U2-Users Digest, Vol 47, Issue 20
Send U2-Users mailing list submissions to
u2-users@listserver.u2ug.org
To subscribe or unsubscribe via the World Wide Web, visit
http://listserver.u2ug.org/mailman/listinfo/u2-users
or, via email, send a message with subject or body 'help' to
u2-users-requ...@listserver.u2ug.org
You can reach the person managing the list at
u2-users-ow...@listserver.u2ug.org
When replying, please edit your Subject line so it is more specific than "Re:
Contents of U2-Users digest..."
Today's Topics:
1. ODBC Errors 81001/81002 (Kevin King)
2. SENDING BARCODE COMMANDS TO OKI PRINTER (Nancy Fisher)
3. Thomas Boadu is out of the office. (thomas.bo...@firstgroup.com)
4. Re: ODBC Errors 81001/81002 (Kevin King)
5. Re: REDBACK Fatal UniBasic errors (David A. Green)
6. Re: REDBACK Fatal UniBasic errors (Bill Haskett)
7. Re: SENDING BARCODE COMMANDS TO OKI PRINTER (Bob Rasmussen)
8. Re: SENDING BARCODE COMMANDS TO OKI PRINTER (Woodward, Bob)
9. Re: SENDING BARCODE COMMANDS TO OKI PRINTER (George Gallen)
10. Re: SENDING BARCODE COMMANDS TO OKI PRINTER (George Gallen)
11. Cataloged programs // finding (Susan Joslyn)
12. Re: SENDING BARCODE COMMANDS TO OKI PRINTER (Tony Gravagno)
13. Re: SENDING BARCODE COMMANDS TO OKI PRINTER (Wjhonson)
14. Re: Cataloged programs // finding (Wjhonson)
----------------------------------------------------------------------
Message: 1
Date: Mon, 25 Mar 2013 10:22:25 -0500
From: Kevin King <ke...@precisonline.com>
To: U2 Users List <u2-users@listserver.u2ug.org>
Subject: [U2] ODBC Errors 81001/81002
Message-ID:
<CA+v=tE+S-z5sP8W405xFuhOuDfkJBb44rh5x4_AMf=ooe4a...@mail.gmail.com>
Content-Type: text/plain; charset=ISO-8859-1
I'm on a client's site today trying to get a working ODBC connection to a
Unidata server running 7.1.19. The connection works fine for one request, then
from that point on we get either error 81001 or 81002 for about 5 minutes and
then it begins to work again. Has anyone else experienced this and possibly
found a solution?
------------------------------
Message: 2
Date: Mon, 25 Mar 2013 08:41:53 -0700
From: "Nancy Fisher" <nan...@peninsulatruck.com>
To: "'U2 Users List'" <u2-users@listserver.u2ug.org>
Subject: [U2] SENDING BARCODE COMMANDS TO OKI PRINTER
Message-ID: <004901ce296f$46c027f0$d44077d0$@com>
Content-Type: text/plain; charset="us-ascii"
I'm having some problems getting the internal barcode to print on an okidata
320 turbo:
Sending to an aux printer:
PRINT CHAR(18):
PRINT " TEST "
PRINT
PRINT
CHAR(27):CHAR(16):CHAR(65):CHAR(8):CHAR(2):CHAR(0):CHAR(1):CHAR(1):CHAR(2):C
HAR(2):CHAR(3):CHAR(1):
PRINT CHAR(27):CHAR(16):CHAR(66):CHAR(10):"1234567890"
PRINT
PRINT
PRINT CHAR(20)
I get the TEST and sometimes I get '67890'.
I could certainly have the Aux codes messed up, or just about anything as this
is my first attempt at sending codes to an OKIDATA. It says it's the IBM PPR
emulation Mode, and has the internal barcode (using code 39).
Nancy Fisher
Peninsula Truck Lines, Inc
Federal Way, Washington
253/929-2040
Visit our Website <http://www.peninsulatruck.com> www.peninsulatruck.com
<mailto:nan...@peninsulatruck.com> nan...@peninsulatruck.com
------------------------------
Message: 3
Date: Mon, 25 Mar 2013 16:06:11 +0000
From: <thomas.bo...@firstgroup.com>
To: U2 Users List <u2-users@listserver.u2ug.org>
Subject: [U2] Thomas Boadu is out of the office.
Message-ID:
<OFFCCAD692.99F6429C-ON80257B39.0058751A-80257B39.0058751A@LocalDomain>
Content-Type: text/plain; charset="US-ASCII"
I will be out of the office starting 23/03/2013 and will not return until
22/04/2013.
I will respond to your message when I return. If urgent please phone the
helpdesk on 0038696 or 7777 from your handset and choose options 3 and1
First Capital Connect Limited. Registered in England & Wales No. 05281077.
Registered office: 50 Eastbourne Terrace, Paddington, London, W2 6LG.
This message is confidential. It may not be disclosed to, or used by, anyone
other than the addressee. If you receive this message in error, please advise
us immediately.
Internet email is not necessarily secure. First does not accept responsibility
for changes to any email which occur after the email has been sent. Attachments
to this email could contain software viruses which could damage your system.
First have checked the attachments for viruses before sending, but you should
virus-check them before opening.
For more information on our range of services or to book your tickets online,
please visit:- http://www.firstgroup.com
------------------------------
Message: 4
Date: Mon, 25 Mar 2013 11:47:47 -0500
From: Kevin King <ke...@precisonline.com>
To: U2 Users List <u2-users@listserver.u2ug.org>
Subject: Re: [U2] ODBC Errors 81001/81002
Message-ID:
<CA+v=teljvv6hs16mioji+uzxhtg5hrugqe0fgo2ttcgsdq1...@mail.gmail.com>
Content-Type: text/plain; charset=ISO-8859-1
Please forgive the response to my own post. The problem appears to be the log
files that are being created by the UniRPC daemon. The users have a mix of
umask settings and this is leaving log files around (millions of
'em) that aren't overwritable due to umask settings. Clearing the log files
appears has had very positive results so far.
On Mon, Mar 25, 2013 at 10:22 AM, Kevin King <ke...@precisonline.com> wrote:
> I'm on a client's site today trying to get a working ODBC connection
> to a Unidata server running 7.1.19. The connection works fine for one
> request, then from that point on we get either error 81001 or 81002
> for about 5 minutes and then it begins to work again. Has anyone else
> experienced this and possibly found a solution?
------------------------------
Message: 5
Date: Mon, 25 Mar 2013 10:11:36 -0700
From: "David A. Green" <dgr...@dagconsulting.com>
To: "'U2 Users List'" <u2-users@listserver.u2ug.org>
Subject: Re: [U2] REDBACK Fatal UniBasic errors
Message-ID: <005f01ce297b$cf364680$6da2d380$@com>
Content-Type: text/plain; charset="utf-8"
Bill, thanks for the post, I will check this location for debugging purposes.
But it doesn't help my issue of having Redback send back an error message that
makes more sense when the UniBasic program aborts.
David A. Green
(480) 813-1725
DAG Consulting
-----Original Message-----
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Bill Haskett
Sent: Friday, March 22, 2013 3:56 PM
To: U2 Users List
Subject: Re: [U2] REDBACK Fatal UniBasic errors
David:
Have you turned on UniObjects error logging? If not, create the following item
in the UDTHOME directory:
serverdebug
001 udcs 10 E:\U2\ud\log\udcs\udcs.log
My UDTHOME is located at "E:\U2\ud" so your path should replace mine from
above. Also, I've created a "udcs" subdirectory under the UDTHOME "log"
subdirectory. You can actually just name (and place) this log file whatever
and wherever you like. After each UO connection there's a bunch of stuff in it
that most often helps me.
HTH,
Bill
Untitled Page
- - -
*/Fav Icon Advantos Systems, Inc./*
? Tel: 760-944-5570 x7002 | ? Fax: 760-655-1583 "The Property Management
Advantage."
----- Original Message -----
*From:* dgr...@dagconsulting.com
*To:* 'U2 Users List' <u2-users@listserver.u2ug.org>
*Date:* 3/22/2013 1:43 PM
*Subject:* [U2] REDBACK Fatal UniBasic errors
> I'm accessing UniData via .NET and Redback. But if there is a fatal
> UniBasic error, like trying to access an unopened file, I get the following:
>
> dagLink.DOAdoExecute - ADO Record Set Execute - Connection to
> Application Server lost Responder Error: (errno=32 The process cannot
> access the file because it is being used by another process.)
> Responder Error: (errno=32 The process cannot access the file because
> it is being used by another process.) Responder Error:
> **** Server Err: ****
> SpGetLen error, rc=-109
>
> **** Output Log: ****
> none.
>
> **** Error Log: ****
> none.
> *********************
>
> It then goes on to tell me that we have a Responder Error.
>
> The rgw.log has this:
> 102340,RESP,spdr.c,1219,SpGetLen error, rc=-109 (ErrorCode=109 The
> pipe has been ended.)
> 102340,RESP,ntbackend.c,720,Resp1 killing pid=122680
> 102340,RESP,ntbackend.c,701,WriteFile (ErrorCode=232 The pipe is
> being
> closed.)
> 102340,RESP,ntbackend.c,769,Sent 0 stop failed. (ErrorCode=232 The
> pipe is being closed.) 102340,RESP,ntbackend.c,626,try
> SafeTerminateProcess (ErrorCode=232 The pipe is being closed.)
> 102340,RESP,ntbackend.c,630,Did not respond to SafeTerminateProcess:
> try TerminateProcess (gag) (ErrorCode=232 The pipe is being closed.)
> 102340,RESP,ntbackend.c,633,TerminateProcess (ErrorCode=5 Access is
> denied.)
> 102340,RESP,ntbackend.c,790,Resp1 kill of pid=0 complete, rc=1.
> 102340,SCHD,ntresp.c,368,2.child slot=6 thandle=-1
> 102340,SCHD,ntresp.c,370,child died aidx=3
> 102340,RESP,respcmn.c,428,Responder terminating now.
>
> Is there a way to capture a better error message?
>
> David A. Green
> (480) 813-1725
> DAG Consulting
>
> _______________________________________________
> U2-Users mailing list
> U2-Users@listserver.u2ug.org
> http://listserver.u2ug.org/mailman/listinfo/u2-users
_______________________________________________
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
------------------------------
Message: 6
Date: Mon, 25 Mar 2013 10:24:05 -0700
From: Bill Haskett <wphask...@advantos.net>
To: U2 Users List <u2-users@listserver.u2ug.org>
Subject: Re: [U2] REDBACK Fatal UniBasic errors
Message-ID: <51508835.70...@advantos.net>
Content-Type: text/plain; charset=UTF-8; format=flowed
David:
Sorry I can't help you on the Redback issue, but you'd be surprised what shows
up in the UO logs. Also, do you have a "UOLOGIN" subroutine? In UD this
subroutine "always" runs when a connection is made through UO.
I've been known to cause myself trouble there.
Bill
Untitled Page
------------------------------------------------------------------------
----- Original Message -----
*From:* dgr...@dagconsulting.com
*To:* 'U2 Users List' <u2-users@listserver.u2ug.org>
*Date:* 3/25/2013 10:11 AM
*Subject:* Re: [U2] REDBACK Fatal UniBasic errors
> Bill, thanks for the post, I will check this location for debugging purposes.
> But it doesn't help my issue of having Redback send back an error message
> that makes more sense when the UniBasic program aborts.
>
> David A. Green
> (480) 813-1725
> DAG Consulting
>
> -----Original Message-----
> From: u2-users-boun...@listserver.u2ug.org
> [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Bill
> Haskett
> Sent: Friday, March 22, 2013 3:56 PM
> To: U2 Users List
> Subject: Re: [U2] REDBACK Fatal UniBasic errors
>
> David:
>
> Have you turned on UniObjects error logging? If not, create the following
> item in the UDTHOME directory:
>
> serverdebug
> 001 udcs 10 E:\U2\ud\log\udcs\udcs.log
>
> My UDTHOME is located at "E:\U2\ud" so your path should replace mine from
> above. Also, I've created a "udcs" subdirectory under the UDTHOME "log"
> subdirectory. You can actually just name (and place) this log file whatever
> and wherever you like. After each UO connection there's a bunch of stuff in
> it that most often helps me.
>
> HTH,
>
> Bill
>
> Untitled Page
>
>
> - - -
> */Fav Icon Advantos Systems, Inc./*
> ? Tel: 760-944-5570 x7002 | ? Fax: 760-655-1583 "The Property Management
> Advantage."
>
> ----- Original Message -----
> *From:* dgr...@dagconsulting.com
> *To:* 'U2 Users List' <u2-users@listserver.u2ug.org>
> *Date:* 3/22/2013 1:43 PM
> *Subject:* [U2] REDBACK Fatal UniBasic errors
>> I'm accessing UniData via .NET and Redback. But if there is a fatal
>> UniBasic error, like trying to access an unopened file, I get the following:
>>
>> dagLink.DOAdoExecute - ADO Record Set Execute - Connection to
>> Application Server lost Responder Error: (errno=32 The process cannot
>> access the file because it is being used by another process.)
>> Responder Error: (errno=32 The process cannot access the file because
>> it is being used by another process.) Responder Error:
>> **** Server Err: ****
>> SpGetLen error, rc=-109
>>
>> **** Output Log: ****
>> none.
>>
>> **** Error Log: ****
>> none.
>> *********************
>>
>> It then goes on to tell me that we have a Responder Error.
>>
>> The rgw.log has this:
>> 102340,RESP,spdr.c,1219,SpGetLen error, rc=-109 (ErrorCode=109 The
>> pipe has been ended.)
>> 102340,RESP,ntbackend.c,720,Resp1 killing pid=122680
>> 102340,RESP,ntbackend.c,701,WriteFile (ErrorCode=232 The pipe is
>> being
>> closed.)
>> 102340,RESP,ntbackend.c,769,Sent 0 stop failed. (ErrorCode=232 The
>> pipe is being closed.) 102340,RESP,ntbackend.c,626,try
>> SafeTerminateProcess (ErrorCode=232 The pipe is being closed.)
>> 102340,RESP,ntbackend.c,630,Did not respond to SafeTerminateProcess:
>> try TerminateProcess (gag) (ErrorCode=232 The pipe is being closed.)
>> 102340,RESP,ntbackend.c,633,TerminateProcess (ErrorCode=5 Access is
>> denied.)
>> 102340,RESP,ntbackend.c,790,Resp1 kill of pid=0 complete, rc=1.
>> 102340,SCHD,ntresp.c,368,2.child slot=6 thandle=-1
>> 102340,SCHD,ntresp.c,370,child died aidx=3
>> 102340,RESP,respcmn.c,428,Responder terminating now.
>>
>> Is there a way to capture a better error message?
>>
>> David A. Green
>> (480) 813-1725
>> DAG Consulting
>>
>> _______________________________________________
>> U2-Users mailing list
>> U2-Users@listserver.u2ug.org
>> http://listserver.u2ug.org/mailman/listinfo/u2-users
> _______________________________________________
> U2-Users mailing list
> U2-Users@listserver.u2ug.org
> http://listserver.u2ug.org/mailman/listinfo/u2-users
>
> _______________________________________________
> U2-Users mailing list
> U2-Users@listserver.u2ug.org
> http://listserver.u2ug.org/mailman/listinfo/u2-users
------------------------------
Message: 7
Date: Mon, 25 Mar 2013 10:31:59 -0700 (PDT)
From: Bob Rasmussen <r...@anzio.com>
To: U2 Users List <u2-users@listserver.u2ug.org>
Subject: Re: [U2] SENDING BARCODE COMMANDS TO OKI PRINTER
Message-ID: <alpine.DEB.2.02.1303251025270.30549@brontosaurus>
Content-Type: TEXT/PLAIN; charset=US-ASCII; format=flowed
As I look at the book, your codes are exactly right. Perhaps the char(10) is
getting post-translated from linefeed to return-linefeed. I suggest you try a
9-digit code for comparison.
On Mon, 25 Mar 2013, Nancy Fisher wrote:
> I'm having some problems getting the internal barcode to print on an
> okidata
> 320 turbo:
>
>
>
> Sending to an aux printer:
>
>
>
> PRINT CHAR(18):
>
> PRINT " TEST "
>
> PRINT
>
> PRINT
> CHAR(27):CHAR(16):CHAR(65):CHAR(8):CHAR(2):CHAR(0):CHAR(1):CHAR(1):CHA
> R(2):C
> HAR(2):CHAR(3):CHAR(1):
>
> PRINT CHAR(27):CHAR(16):CHAR(66):CHAR(10):"1234567890"
>
> PRINT
>
> PRINT
>
> PRINT CHAR(20)
>
>
>
> I get the TEST and sometimes I get '67890'.
>
>
>
> I could certainly have the Aux codes messed up, or just about anything
> as this is my first attempt at sending codes to an OKIDATA. It says
> it's the IBM PPR emulation Mode, and has the internal barcode (using code 39).
>
>
>
>
>
> Nancy Fisher
> Peninsula Truck Lines, Inc
> Federal Way, Washington
> 253/929-2040
> Visit our Website <http://www.peninsulatruck.com>
> www.peninsulatruck.com <mailto:nan...@peninsulatruck.com>
> nan...@peninsulatruck.com
>
>
>
> _______________________________________________
> U2-Users mailing list
> U2-Users@listserver.u2ug.org
> http://listserver.u2ug.org/mailman/listinfo/u2-users
>
Regards,
....Bob Rasmussen, President, Rasmussen Software, Inc.
personal e-mail: r...@anzio.com
company e-mail: r...@anzio.com
voice: (US) 503-624-0360 (9:00-6:00 Pacific Time)
fax: (US) 503-624-0760
web: http://www.anzio.com
street address: Rasmussen Software, Inc.
10240 SW Nimbus, Suite L9
Portland, OR 97223 USA
------------------------------
Message: 8
Date: Mon, 25 Mar 2013 11:02:19 -0700
From: "Woodward, Bob" <bob_woodw...@k2sports.com>
To: "U2 Users List" <u2-users@listserver.u2ug.org>
Subject: Re: [U2] SENDING BARCODE COMMANDS TO OKI PRINTER
Message-ID:
<e4e1f30e3f4d964fb7e7f18de1395854026ac...@k2s-msg-01.k2sports.com>
Content-Type: text/plain; charset="us-ascii"
I forget exactly how I solved a similar problem sending control codes to a
printer like that but it had something to do with an automatic reset code being
automatically sent between an initialization string and the actual data. I
think the way I figured it out was by changing the port of the printer
definition to write the output to a disk file then using a hex editor to pick
apart the codes in the data stream. At least that's what comes to my mind.
Good luck.
BobW
-----Original Message-----
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Bob Rasmussen
Sent: Monday, March 25, 2013 10:32 AM
To: U2 Users List
Subject: Re: [U2] SENDING BARCODE COMMANDS TO OKI PRINTER
As I look at the book, your codes are exactly right. Perhaps the
char(10) is getting post-translated from linefeed to return-linefeed. I suggest
you try a 9-digit code for comparison.
On Mon, 25 Mar 2013, Nancy Fisher wrote:
> I'm having some problems getting the internal barcode to print on an
> okidata
> 320 turbo:
>
>
>
> Sending to an aux printer:
>
>
>
> PRINT CHAR(18):
>
> PRINT " TEST "
>
> PRINT
>
> PRINT
> CHAR(27):CHAR(16):CHAR(65):CHAR(8):CHAR(2):CHAR(0):CHAR(1):CHAR(1):CHA
> R(2):C
> HAR(2):CHAR(3):CHAR(1):
>
> PRINT CHAR(27):CHAR(16):CHAR(66):CHAR(10):"1234567890"
>
> PRINT
>
> PRINT
>
> PRINT CHAR(20)
>
>
>
> I get the TEST and sometimes I get '67890'.
>
>
>
> I could certainly have the Aux codes messed up, or just about anything
> as this is my first attempt at sending codes to an OKIDATA. It says
> it's the IBM PPR emulation Mode, and has the internal barcode (using
code 39).
>
>
>
>
>
> Nancy Fisher
> Peninsula Truck Lines, Inc
> Federal Way, Washington
> 253/929-2040
> Visit our Website <http://www.peninsulatruck.com>
> www.peninsulatruck.com <mailto:nan...@peninsulatruck.com>
> nan...@peninsulatruck.com
>
>
>
> _______________________________________________
> U2-Users mailing list
> U2-Users@listserver.u2ug.org
> http://listserver.u2ug.org/mailman/listinfo/u2-users
>
Regards,
....Bob Rasmussen, President, Rasmussen Software, Inc.
personal e-mail: r...@anzio.com
company e-mail: r...@anzio.com
voice: (US) 503-624-0360 (9:00-6:00 Pacific Time)
fax: (US) 503-624-0760
web: http://www.anzio.com
street address: Rasmussen Software, Inc.
10240 SW Nimbus, Suite L9
Portland, OR 97223 USA
_______________________________________________
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
------------------------------
Message: 9
Date: Mon, 25 Mar 2013 13:05:21 -0500
From: George Gallen <ggal...@wyanokegroup.com>
To: U2 Users List <u2-users@listserver.u2ug.org>
Subject: Re: [U2] SENDING BARCODE COMMANDS TO OKI PRINTER
Message-ID:
<7f929271dea7ce48ae6ddcbc5c7283c401cb7db...@dfw1mbx15.mex07a.mlsrvr.com>
Content-Type: text/plain; charset="us-ascii"
Could it be a problem that doing a print vs a print on is changing the CHAR(16)?
Can you set your printer to go into hex dump mode, to see what you actually
receiving on the printer end.
Also, if your running unix, you could also tee off the printer driver output to
a /tmp file and check that File with a hex editor.
George
-----Original Message-----
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Bob Rasmussen
Sent: Monday, March 25, 2013 1:32 PM
To: U2 Users List
Subject: Re: [U2] SENDING BARCODE COMMANDS TO OKI PRINTER
As I look at the book, your codes are exactly right. Perhaps the char(10) is
getting post-translated from linefeed to return-linefeed. I suggest you try a
9-digit code for comparison.
On Mon, 25 Mar 2013, Nancy Fisher wrote:
> I'm having some problems getting the internal barcode to print on an
> okidata
> 320 turbo:
>
>
>
> Sending to an aux printer:
>
>
>
> PRINT CHAR(18):
>
> PRINT " TEST "
>
> PRINT
>
> PRINT
> CHAR(27):CHAR(16):CHAR(65):CHAR(8):CHAR(2):CHAR(0):CHAR(1):CHAR(1):CHA
> R(2):C
> HAR(2):CHAR(3):CHAR(1):
>
> PRINT CHAR(27):CHAR(16):CHAR(66):CHAR(10):"1234567890"
>
> PRINT
>
> PRINT
>
> PRINT CHAR(20)
>
>
>
> I get the TEST and sometimes I get '67890'.
>
>
>
> I could certainly have the Aux codes messed up, or just about anything
> as this is my first attempt at sending codes to an OKIDATA. It says
> it's the IBM PPR emulation Mode, and has the internal barcode (using code 39).
>
>
>
>
>
> Nancy Fisher
> Peninsula Truck Lines, Inc
> Federal Way, Washington
> 253/929-2040
> Visit our Website <http://www.peninsulatruck.com>
> www.peninsulatruck.com <mailto:nan...@peninsulatruck.com>
> nan...@peninsulatruck.com
>
>
>
> _______________________________________________
> U2-Users mailing list
> U2-Users@listserver.u2ug.org
> http://listserver.u2ug.org/mailman/listinfo/u2-users
>
Regards,
....Bob Rasmussen, President, Rasmussen Software, Inc.
personal e-mail: r...@anzio.com
company e-mail: r...@anzio.com
voice: (US) 503-624-0360 (9:00-6:00 Pacific Time)
fax: (US) 503-624-0760
web: http://www.anzio.com
street address: Rasmussen Software, Inc.
10240 SW Nimbus, Suite L9
Portland, OR 97223 USA
_______________________________________________
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
------------------------------
Message: 10
Date: Mon, 25 Mar 2013 13:06:36 -0500
From: George Gallen <ggal...@wyanokegroup.com>
To: U2 Users List <u2-users@listserver.u2ug.org>
Subject: Re: [U2] SENDING BARCODE COMMANDS TO OKI PRINTER
Message-ID:
<7f929271dea7ce48ae6ddcbc5c7283c401cb7db...@dfw1mbx15.mex07a.mlsrvr.com>
Content-Type: text/plain; charset="us-ascii"
Wait, nevermind, with aux printing, you can't do print on ....
Sorry,
George
-----Original Message-----
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of George Gallen
Sent: Monday, March 25, 2013 2:05 PM
To: U2 Users List
Subject: Re: [U2] SENDING BARCODE COMMANDS TO OKI PRINTER
Could it be a problem that doing a print vs a print on is changing the CHAR(16)?
Can you set your printer to go into hex dump mode, to see what you actually
receiving on the printer end.
Also, if your running unix, you could also tee off the printer driver output to
a /tmp file and check that File with a hex editor.
George
-----Original Message-----
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Bob Rasmussen
Sent: Monday, March 25, 2013 1:32 PM
To: U2 Users List
Subject: Re: [U2] SENDING BARCODE COMMANDS TO OKI PRINTER
As I look at the book, your codes are exactly right. Perhaps the char(10) is
getting post-translated from linefeed to return-linefeed. I suggest you try a
9-digit code for comparison.
On Mon, 25 Mar 2013, Nancy Fisher wrote:
> I'm having some problems getting the internal barcode to print on an
> okidata
> 320 turbo:
>
>
>
> Sending to an aux printer:
>
>
>
> PRINT CHAR(18):
>
> PRINT " TEST "
>
> PRINT
>
> PRINT
> CHAR(27):CHAR(16):CHAR(65):CHAR(8):CHAR(2):CHAR(0):CHAR(1):CHAR(1):CHA
> R(2):C
> HAR(2):CHAR(3):CHAR(1):
>
> PRINT CHAR(27):CHAR(16):CHAR(66):CHAR(10):"1234567890"
>
> PRINT
>
> PRINT
>
> PRINT CHAR(20)
>
>
>
> I get the TEST and sometimes I get '67890'.
>
>
>
> I could certainly have the Aux codes messed up, or just about anything
> as this is my first attempt at sending codes to an OKIDATA. It says
> it's the IBM PPR emulation Mode, and has the internal barcode (using code 39).
>
>
>
>
>
> Nancy Fisher
> Peninsula Truck Lines, Inc
> Federal Way, Washington
> 253/929-2040
> Visit our Website <http://www.peninsulatruck.com>
> www.peninsulatruck.com <mailto:nan...@peninsulatruck.com>
> nan...@peninsulatruck.com
>
>
>
> _______________________________________________
> U2-Users mailing list
> U2-Users@listserver.u2ug.org
> http://listserver.u2ug.org/mailman/listinfo/u2-users
>
Regards,
....Bob Rasmussen, President, Rasmussen Software, Inc.
personal e-mail: r...@anzio.com
company e-mail: r...@anzio.com
voice: (US) 503-624-0360 (9:00-6:00 Pacific Time)
fax: (US) 503-624-0760
web: http://www.anzio.com
street address: Rasmussen Software, Inc.
10240 SW Nimbus, Suite L9
Portland, OR 97223 USA
_______________________________________________
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
_______________________________________________
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
------------------------------
Message: 11
Date: Mon, 25 Mar 2013 14:09:40 -0400
From: "Susan Joslyn" <sjos...@sjplus.com>
To: <u2-users@listserver.u2ug.org>
Subject: [U2] Cataloged programs // finding
Message-ID: <034501ce2983$ecce7110$c66b5330$@sjplus.com>
Content-Type: text/plain; charset="us-ascii"
Hi Geniuses.
At a few of my customer sites I've seen people have these little hand-built
utilities that help them identify the file/location of the source of a globally
cataloged item.
I could really use a handy little device like that - on both platforms,
Universe and Unidata. Does anyone - ideally - have one of those they'd like to
share for either platform? Or, at least know how to quickly put that together.
I confess, I don't want to go do the research into this if I can just smile
pretty and borrow it? But I'll go read up if that's what I need to do.
TIA,
Susan
------------------------------
Message: 12
Date: Mon, 25 Mar 2013 11:30:11 -0700
From: "Tony Gravagno" <3xk547...@sneakemail.com>
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] SENDING BARCODE COMMANDS TO OKI PRINTER
Message-ID: <15972-1364236225-696...@sneakemail.com>
Content-Type: text/plain; charset="us-ascii"
General response...
This is why I love PrintWizard:
PRINT \<barcode src="1234567890" style=code39>\ Done!
Really. Look below. Now look above. Now think about which code you'd rather
maintain, or pay someone else to maintain, every time you get a new printer.
Jus' sayin'...
I do not sell PrintWizard and do not get commissions or any recompense. Bob
Rasmussen does provide it but he's respectfully modest here. I do have pages up
on my site with code samples and screenshots from a time when I was considering
selling it:
http://Nebula-RnD.com/products/PW/demo2.htm
Save yourself some pain. Check it out. Contact Bob.
T
> From: Nancy Fisher
> I'm having some problems getting the internal barcode to print on an
> okidata 320 turbo:
>
> Sending to an aux printer:
> PRINT CHAR(18):
> PRINT " TEST "
> PRINT
> PRINT
> CHAR(27):CHAR(16):CHAR(65):CHAR(8):CHAR(2):CHAR(0):CHAR(1):CHA
> R(1):CHAR(2):CHAR(2):CHAR(3):CHAR(1):
> PRINT CHAR(27):CHAR(16):CHAR(66):CHAR(10):"1234567890"
> PRINT
> PRINT
> PRINT CHAR(20)
>
> I get the TEST and sometimes I get '67890'.
> I could certainly have the Aux codes messed up, or just about
anything
> as this is my first attempt at sending codes to an OKIDATA. It says
it's
> the IBM PPR emulation Mode, and has the internal barcode (using code
> 39).
------------------------------
Message: 13
Date: Mon, 25 Mar 2013 14:36:15 -0400 (EDT)
From: Wjhonson <wjhon...@aol.com>
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] SENDING BARCODE COMMANDS TO OKI PRINTER
Message-ID: <8cff79ec3f5130a-e84-5...@webmail-m247.sysops.aol.com>
Content-Type: text/plain; charset="us-ascii"
My first thought is it's *throwing away* the middle of the data stream and you
get the ending at times when it's over its hiccup.
Try modding your routine below to wait one second between each character :) Hey
it's worth a shot!
-----Original Message-----
From: George Gallen <ggal...@wyanokegroup.com>
To: U2 Users List <u2-users@listserver.u2ug.org>
Sent: Mon, Mar 25, 2013 11:05 am
Subject: Re: [U2] SENDING BARCODE COMMANDS TO OKI PRINTER
Could it be a problem that doing a print vs a print on is changing the CHAR(16)?
Can you set your printer to go into hex dump mode, to see what you actually
receiving on the printer end.
Also, if your running unix, you could also tee off the printer driver output to
a /tmp file and check that File with a hex editor.
George
-----Original Message-----
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org]
On Behalf Of Bob Rasmussen
Sent: Monday, March 25, 2013 1:32 PM
To: U2 Users List
Subject: Re: [U2] SENDING BARCODE COMMANDS TO OKI PRINTER
As I look at the book, your codes are exactly right. Perhaps the char(10) is
getting post-translated from linefeed to return-linefeed. I suggest you try a
9-digit code for comparison.
On Mon, 25 Mar 2013, Nancy Fisher wrote:
> I'm having some problems getting the internal barcode to print on an
> okidata
> 320 turbo:
>
>
>
> Sending to an aux printer:
>
>
>
> PRINT CHAR(18):
>
> PRINT " TEST "
>
> PRINT
>
> PRINT
> CHAR(27):CHAR(16):CHAR(65):CHAR(8):CHAR(2):CHAR(0):CHAR(1):CHAR(1):CHA
> R(2):C
> HAR(2):CHAR(3):CHAR(1):
>
> PRINT CHAR(27):CHAR(16):CHAR(66):CHAR(10):"1234567890"
>
> PRINT
>
> PRINT
>
> PRINT CHAR(20)
>
>
>
> I get the TEST and sometimes I get '67890'.
>
>
>
> I could certainly have the Aux codes messed up, or just about anything
> as this is my first attempt at sending codes to an OKIDATA. It says
> it's the IBM PPR emulation Mode, and has the internal barcode (using code 39).
>
>
>
>
>
> Nancy Fisher
> Peninsula Truck Lines, Inc
> Federal Way, Washington
> 253/929-2040
> Visit our Website <http://www.peninsulatruck.com>
> www.peninsulatruck.com <mailto:nan...@peninsulatruck.com>
> nan...@peninsulatruck.com
>
>
>
> _______________________________________________
> U2-Users mailing list
> U2-Users@listserver.u2ug.org
> http://listserver.u2ug.org/mailman/listinfo/u2-users
>
Regards,
....Bob Rasmussen, President, Rasmussen Software, Inc.
personal e-mail: r...@anzio.com
company e-mail: r...@anzio.com
voice: (US) 503-624-0360 (9:00-6:00 Pacific Time)
fax: (US) 503-624-0760
web: http://www.anzio.com
street address: Rasmussen Software, Inc.
10240 SW Nimbus, Suite L9
Portland, OR 97223 USA
_______________________________________________
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
_______________________________________________
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
------------------------------
Message: 14
Date: Mon, 25 Mar 2013 14:41:10 -0400 (EDT)
From: Wjhonson <wjhon...@aol.com>
To: sjos...@sjplus.com, u2-users@listserver.u2ug.org
Subject: Re: [U2] Cataloged programs // finding
Message-ID: <8cff79f73f2a599-e84-5...@webmail-m247.sysops.aol.com>
Content-Type: text/plain; charset="us-ascii"
I have this built into my "VIEW" routine which allows inter-call jumping but I
don't have it as a sep program Just be aware that you *have* to read the opcode
in BLOCK form (READBLK) because it *can* have embedded char 255's which will
truncate any string read. Nice huh?
So you have to step the code, byte by frickin byte :)
-----Original Message-----
From: Susan Joslyn <sjos...@sjplus.com>
To: u2-users <u2-users@listserver.u2ug.org>
Sent: Mon, Mar 25, 2013 11:10 am
Subject: [U2] Cataloged programs // finding
Hi Geniuses.
At a few of my customer sites I've seen people have these little hand-built
utilities that help them identify the file/location of the source of a globally
cataloged item.
I could really use a handy little device like that - on both platforms,
Universe and Unidata. Does anyone - ideally - have one of those they'd like to
share for either platform? Or, at least know how to quickly put that together.
I confess, I don't want to go do the research into this if I can just smile
pretty and borrow it? But I'll go read up if that's what I need to do.
TIA,
Susan
_______________________________________________
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
------------------------------
_______________________________________________
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
End of U2-Users Digest, Vol 47, Issue 20
****************************************
This e-mail and any files transmitted with it are confidential and intended
solely for the use of the individual or company to whom they are addressed. If
you have received this e-mail in error, please notify the sender immediately and
delete this e-mail including all attachments from your system. Thank you
_______________________________________________
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
