RE: RPG400-L Digest, Vol 4, Issue 288 -- RPG400-L

Greg,
Usually you program the scanners to insert the CR/LF sequence after the scan
takes place. If you need one more field filled in, then you write code
behind it that says "If field B is blank, then don't do the Enter key
processing, instead loop back around and do a position cursor into field B
and prompt the end-user for the information."


-Bob Cozzi
www.RPGxTools.com
If everything is under control, you are going too slow.
- Mario Andretti


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Fleming, Gregory (ED)
Sent: Friday, March 11, 2005 1:42 PM
To: 'rpg400-l@xxxxxxxxxxxx'
Subject: RE: RPG400-L Digest, Vol 4, Issue 288



Mark,

I'm not familiar with the ER display attribute - did you mean check(ER) ?

But I'm trying to avoid the whole keyboard mapping thing altogether.  It
seems unnecessary.  If it is possible to use HEX characters to insert CR/LF
or whatever other values we want in the Barcode itself, it seems like that
would be better.  

We have a couple different screens they enter barcode info from, and some of
them need field exits between bits of data, some need the CR/LF at the end
of the barcode, and others don't.  We could program the guns to always
include a suffix character, then give the users three different saved 5250
sessions, each using a different keyboard mapping to translate the same
suffix differently, but then the users have to remember which session to use
when entering which document on which screen...it could get ugly.  

Plus, they are running out of keys they don't use for other functions.  We
have their exclamation point mapped to the ENTER key, and the plus sign
mapped to the field exit.  So now they can never enter either of those
characters in other screens if they need to, unless of course they use yet
another 5250 session using the default keyboard mapping.  



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

message: 4
date: Fri, 11 Mar 2005 13:33:19 -0500
from: MWalter@xxxxxxxxxxxxxxx
subject: Re: Barcode CR/LF

Why not do it the same as before, and put DSPATR(ER) on the field?

Thanks,

Mark

Mark D. Walter
Senior Programmer/Analyst
CCX, Inc.
mwalter@xxxxxxxxxx
http://www.ccxinc.com


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


We print invoice numbers and amounts on our remittance slips in a barcode
so
that the A/R reps can scan them into the 5250 screen when they process the
payments.

The tricky bit has always been getting the cursor to move on to the next
field, which we resolved by printing an extra character such as a plus
sign,
then setting up the users' Iseries Access keyboard mapping to associate the
plus sign with the field exit function.

Now we've got another barcode we want to print and have it hit the enter
button when the scan is done.  It seems like I ought to be able to do this
without keyboard mapping or scan-gun suffixes.  Shouldn't I be able to
simply include a CR/LF character in the print-file output?

This doesn't seem to work when I try it.  The barcode prints, but when I
scan it into notepad, all I get is the text.  The cursor doesn't move to
the
next line.  Also, the barcode prints identical whether I include the CR and
LF characters or not, so I don't think those characters are being
represented at all.

Here's what I'm doing:

Printfile:

A          R DETAIL
A            STINKFOOT     15   O    15BARCODE(CODE128)
A
A

RPG Code:

FTSTBARCD  O    E             PRINTER OFLIND(*IN01)
D #CR             C                   CONST(X'0D')
D #LF             C                   CONST(X'15')
 /Free
  STINKFOOT = '123456789' + #CR + #LF;
  Write Detail;
  *INlr = *ON;
 /End-Free


Any ideas ?

Thanks

Greg Fleming
--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.





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

-- 
This is the RPG programming on the AS400 / iSeries (RPG400-L) digest list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.



End of RPG400-L Digest, Vol 4, Issue 288
****************************************
-- 
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.