Hi Dan... On Tue, 23 Jan 2001 D.BALE@handleman.com wrote: > I've created a remote out queue to use an IP-addressable (ASCII) label printer > on our network. The printer requires an ASCII hex code '02' as a prefix to > several "system-level" commands. We have several Datamax label printers that use this x'02' as a prefix to commands... there are also x'01' prefixes, too... > Our experience with this type of label printer thus far has been to attach it > to a 5250 dumb terminal via the serial port. The IDEA display station allows > custom translation and it is here that we translate an '@' character (EBCDIC > x'7C') to an ASCII x'02' character. Interesting idea... I could probably use that :) > Is a workstation customizing object the way to go here? Is there an existing > EBCDIC-to-ASCII *WSCST object that I can copy to a new one and modify the one > byte? Just set one up and tell it that '@' is an ASCII control sequence... Then tell it that the sequence is x'02' Like this: :WSCST DEVCLASS=TRANSFORM. :TRNSFRMTBL. :SPACE DATA ='20'X. :CARRTN DATA ='0D'X. :LINEFEED DATA ='0A'X. :ASCCPINFO. :CODEPAGE CODEPAGE = 437 DATA =''X. :ASCIICTL ASCII ='40'X DATA ='02'X. :EASCCPINFO. :EWSCST. If you typed that into source member LABEL in LIB/QTXTSRC, then you'd compile it with: CRTWSCST WSCST(MYLIB/LABEL) SRCFILE(LIB/QTXTSRC) then specify MYLIB/LABEL as the workstation customizing object. +--- | This is the Midrange System Mailing List! | To submit a new message, send your mail to MIDRANGE-L@midrange.com. | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com. | To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com. | Questions should be directed to the list owner/operator: email@example.com +---
As an Amazon Associate we earn from qualifying purchases.
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.