Re: Barcode CR/LF

[MWalter@xxxxxxxxxxxxxxx]

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


                                                                           
             "Fleming, Gregory                                             
             (ED)"                                                         
             <gfleming@evergla                                          To 
             desdirect.com>            "'rpg400-l@xxxxxxxxxxxx'"           
             Sent by:                  <rpg400-l@xxxxxxxxxxxx>             
             rpg400-l-bounces@                                          cc 
             midrange.com                                                  
                                                                   Subject 
                                       Barcode CR/LF                       
             03/11/2005 12:59                                              
             PM                                                            
                                                                           
                                                                           
             Please respond to                                             
              RPG programming                                              
              on the AS400 /                                               
                  iSeries                                                  
             <rpg400-l@midrang                                             
                  e.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.