Converting IPDS to AFPDS and getting overlapping characters

4055 pts.
Tags:
AS/400
AS/400 printng
IPDS
We need to replace an IPDS printer but would like to skip the IPDS requirement (co$t). I have read up on converting IPDS to AFPDS printing and testing my conversion. We have about half a dozen documents that print barcodes (otherwise we could use SCS protocol). I have a couple of documents that are not printing correctly. Looking at the spool file (and even printing them to a PDF) looks correct. In one case there is a divider line (80 '-' marks) that are supposed to print after the header, instead, if over prints on the header line. In another case in column 1 should be "RM:" (hardcoded) and in position 5 begin a datafield (data always begin with an 'M'). So the printed result should look like "RM: M5..." Instead it prints something like RMM:5... that looks like 4 characters overprininting in the space of 3. My test printer is an HP4100n. I have tried a variety of MFRTYPMDL, WSCTS


Software/Hardware used:
AS400 7.1, HP4100n.
0

Answer Wiki

Thanks. We'll let you know when a new response is added.
Send me notifications when members answer or reply to this question.

Discuss This Question: 7  Replies

 
There was an error processing your information. Please try again later.
Thanks. We'll let you know when a new response is added.
Send me notifications when members answer or reply to this question.
  • philpl1jb

    I suspect that:

    The display file thinks it's spacing based on the fixed character length data but the characters are variable length

    You must set the character type to a fixed character length type.

    54,090 pointsBadges:
    report
  • azohawk
    Thanks Phlipl1jb, that helps, now to find the correct combination...
    4,055 pointsBadges:
    report
  • TheRealRaven
    The relevant DDS is needed. Someone might have a similar example or be able to create a test.
    35,070 pointsBadges:
    report
  • azohawk

    Hope this looks ok:

    Sample 1: (Line prints through the header on printout)

         A          R HEADER                    SKIPB(001)

         A                                     6'PGMID'

         A                                    +2'Report Title'

         A                                    50'Page'

         A                                    +1

         A  40                                  PAGNBR

         A                                      EDTCDE(Z)

         A                                    68'Date'

         A                                    +1DATE

         A                                      EDTCDE(Y)

         A          R DETL1                     SPACEB(001)

         A                                     1'--------------------'

         A                                    +0'--------------------'

         A                                    +0'--------------------'

         A                                    +0'--------------------'

         A                                      SPACEA(001)

         A            Field1        15         6BARCODE(CODE3OF9 4 )

         A            Field2        30   O    43

         A            Field3         7   O    74

         A                                      SPACEA(6)

    Printing as an *IPDS prints as expected with a header row, a second row of 80 ‘-‘ and the third row. Looks the same when compiled and view on the screen as an *AFPDS, but when printed there is no line advancement between the 1st and 2nd row.

    Sample 2: (prints characters over each other)

      A                                      REF(REFERENCE)

         A          R HEADER                    SKIPB(003)

         A                                     1

         A                                      'PGMID'

         A                                    +5

         A                                      ‘Report Title printes here  

         A                                    +5

         A                                      'Page'

         A                                    +1

         A  30                                  PAGNBR

         A                                      EDTCDE(Z)

         A                                    65

         A                                      'Date'

         A

         A            TODAYP         8  0     70

         A                                      EDTWRD('  /  /    ')

         A                                      SPACEA(001)

         A                          &nb

    4,055 pointsBadges:
    report
  • azohawk

    As I indicated earlier, my test printer is an HP4100N, I have no idea what the new production printer will be.

    4,055 pointsBadges:
    report
  • Splat
    I've found that, on the whole, the layout will be substantially similar between different printers.  We have a mix of HP & Xerox printers & frequently create labels with barcodes & I've yet to have to alter the output to accommodate a printer (though sometimes getting the correct iSeries configuration for a particular printer model can be interesting).
    12,875 pointsBadges:
    report
  • azohawk
    We ended up modifying the PRTF specs to make it work.
    4,055 pointsBadges:
    report

Forgot Password

No problem! Submit your e-mail address below. We'll send you an e-mail containing your password.

Your password has been sent to:

To follow this tag...

There was an error processing your information. Please try again later.

Thanks! We'll email you when relevant content is added and updated.

Following

Share this item with your network: