RE: Cash Register on AS400. Updated and more Questions. -- MIDRANGE-L

Will try on monday. Will keep you possted.
Thanks a lot.
Gary

________________________________

From: midrange-l-bounces@xxxxxxxxxxxx on behalf of Wayne McAlpine
Sent: Thu 11/2/2006 5:14 PM
To: midrange-l@xxxxxxxxxxxx
Subject: Re: Cash Register on AS400. Updated and more Questions.

Oops, that string should read X'03021B70' since there are two characters
being sent.

Wayne McAlpine wrote:

Gary,

The hex value of ESC p is 1B70.  To get this to your printer, define a
constant named ESCP in the RPG definition specs:

 D ESCP             C                   CONST(X'03031B70')

Then insert this string variable into your print data whenever you want
to send an ESC p to the printer.

Let me know if this works.

Wayne

Gary Segal wrote:

Thank You Wayne. I will try that as well. I am not very good with hex.
Do you know what is the syntax for "ESC p"? what is the length of the
field?
Thanks
Gary
-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx]
On Behalf Of Wayne McAlpine
Sent: Thursday, November 02, 2006 4:33 PM
To: midrange-l@xxxxxxxxxxxx
Subject: Re: Cash Register on AS400. Updated and more Questions.

You might want to give the ASCII transparency character a shot.

The ASCII transparency code (Hex 03) allows you to send a string of ascii
control characters to the printer.

The syntax is hex 03 followed by the hex value for the number of
characters you
are going to send followed by the escape sequence in hex.

For example, to send an ESC H] sequence, insert the character string
X'03031B485D' into your print text.


Gary Segal wrote:

   I am back. After 4 hours of testing. I aim still wasn't able to
open the
   cash drawer.

   I tried all possible variations that I could think off. None of
them open
   the drawer. I can print the receipt without any problems. I get hex
   characters printed on it. (see Attached.)

  
   1. Changing WSCST

   :INITPRT
   DATA ='1B70'X.
   :INITPRT
   DATA ='1B401270'X.
   :INITPRT
   DATA ='2797'X.

   2. Inserting Hex into spool file

   C Move X'2797' P#Hex 1
   C Move X'2797' P#Hex2 2
   C Move X'1B70' P#Hex 1
   C Move X'1B70' P#Hex2 2

   and compile PRTF with:
   Unprintable character action:
   Replace character . . . . . . *NO *SAME, *YES, *NO
   Replacement character . . . . 40-FE, *SAME

   3.  I have changed "Printer Commands" on a printer properties. I
was able
   to open the drawer from PC(Print test Pgage),

   But, as soon as I print from AS400 to the same printer (same parms in
   "Printer Commands") "Sim Sim" stays close.

   Any other Ideas. I am I doing something wrong. Looks like that no one
   knows how to do it. I can not believe that I am the first one how is
   trying to do this.

   Thank You all for your help............

   Gary

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


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

   With ASCII Transparency?

   > Also spoke to IBM(Client Access support team). They said that there
   > in no way to trigger "ESC P" in Client access accept by putting
it in
   > WSCST(Work Station Customizing Object), but they no longer
support it
   > therefore they can not let me know how to do it.
   > Does anyone has any knowledge what syntaxes do I have to put in
   my  WSCST  object and where? Text file is pretty big.      >
Please see attached.

   It seems to me IBM support have given you an acceptable pointer to
the
   solution.
   The caveat is that I've never tried this particular support using
a WSCST
   however ...
   A look through the WSCST source you sent shows two interesting tags
   :INITPRT and :RESETPRT
   A cursory glance through the WSCST Programming Reference says:
   "The INITPRT (initialize printer) tag defines the ASCII control
sequence
   for the initialize printer function for an ASCII printer. The host
print
   transform function uses the INITPRT tag at the beginning of each
print
   job."

   and

   "The RESETPRT (reset printer) tag defines the ASCII control
sequence for
   the reset printer function for an ASCII printer. The RESETPRT tag
is used
   by the host print transform at the end of each print job."

   Because printing a receipt is a "print job" (presuming each
receipt is a
   separate spooled file) it would seem reasonable that you could modify
   either of these tags to include the ESC P incantation. Your only
decision
   is whether to open the drawer before printing the receipt (i.e.
:INITPRT)
   or after (:RESETPRT).

   The current data for these tags already includes the Escape
character. I'm
   fairly sure that Escape codes can be strung together so you only
need to
   add the 70 to the end of the current data. Easy enough to try it
both with
   and without the second 1B and see what happens.

   Regards,

   Simon Coulter.

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


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

   Hello again.

   still need some more help. I am almost there. I am able to print to
   Receipt printer from AS400, but still can not open cash drawer.

   I have spoke to Wasp(Cash drawer manufacturer). They told me:

   "ESC P should open the cash drawer. In hexadecimal this is 1B70
and in
   decimal it is 27112"

   I tried to put in spool file as hex. No luck

   Also spoke to IBM(Client Access support team). They said that
there in no
   way to trigger "ESC P" in Client access accept by putting it in
WSCST(Work
   Station Customizing Object), but they no longer support it
therefore they
   can not let me know how to do it.

   Does anyone has any knowledge what syntaxes do I have to put in my
WSCST
   object and where? Text file is pretty big. Please see attached.

   Thanks a million

   Gary Segal

   Goebel Of North America
   609-730-8929 Direct
   609-737-1980 Ext 8781
   609-737-8685 Fax
   215-431-7294 Mobil

   ===============================================================

   Original
   --------------

   Hi guys,
   I need some advise on "Point of Sale" hardware.
   We have a store with two POS(Wasp) systems that are using Wasp
software
   and
   hardware. We have to upload/download inventory, convert data,
etc.... It
   does  not work smoothly....... we have 2 stand a long Wasp Quick
store
   systems:

   http://www.waspbarcode.com/point_of_sale/quickstore_pos_bundle_p.asp
   We would like to write Cash Register software that will work
directly with
   our  inventory files and merge into our existing applications.

   1. Is there any POS software with open source?
   2. What hardware is the best to use?
   3. How can I make iSeries(model 9406 V5R2M0) to communicate with a
Wasp
   cash  register?
   4. Is there a special API's to open the cash drawer?

   Thank you in advance

   Gary Segal
   Goebel Of North America
   609-730-8929 Direct
   609-737-1980 Ext 8781
   609-737-8685 Fax
   215-431-7294 Mobil
   GSegal@xxxxxxxxxx

--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.