have not ever used IPDS or SUBR52 but have some input. The only way I have seen non-ipds barcodes is with: 1) a product that has that printer type support or 2) hand coded printer commands imbedded in the code. You said cobol36, which I a very familiar with? I have never used a printer file with the DDS keyword, which I am assuming you are doing. cobol36 does not know anything about DDS, so how you are attempting that is a mystery to me. The easy way out of this, I think, is to write your data to a file and run a barcode/formtool command over that data to the printer of choice. If they are ever going to change printers or have more barcode needs, it make sense. We use markmagic. The AS/400 AFP product will print basic barcodes to a non IPDS laser (in my testing), but if I recall it is not supported, nor acknowedlged to do so in the documentation very well, and it is native. This background I am referring to is about 2 years old, so some of these problems may have better solutions. Mark Villa in Charleston SC ~~~-----Original Message----- ~~~From: email@example.com ~~~[mailto:firstname.lastname@example.org]On Behalf Of Klein, Ron ~~~Sent: Monday, November 12, 2001 9:55 AM ~~~To: 'email@example.com' ~~~Subject: Printing Barcodes ~~~ ~~~ ~~~Hi All, ~~~ ~~~I have a question to post for a programmer in our office. I ~~~will include ~~~her question and then add a little to that. ~~~ ~~~I am trying to print a barcode using a S36 Cobol program. I am using ~~~SUBR52. I have an OVRPRTF statement specifying DEVTYPE(*IPDS). It ~~~generates a spool file with *IPDS as the device type. Host ~~~print transform ~~~is also YES. ~~~ ~~~What I'm currently doing will not print out a barcode on a ~~~laser printer, ~~~and I would like to know if there is a way to print a ~~~barcode to a laser ~~~printer under these conditions. ~~~ ~~~To Change the program to native is the last option that we ~~~want to consider. ~~~To have the customer buy an IPDS printer is not an option. ~~~ ~~~Thanks ~~~Ron ~~~ ~~~_______________________________________________ ~~~This is the COBOL Programming on the iSeries/AS400 ~~~(COBOL400-L) mailing list ~~~To post a message email: COBOL400-L@midrange.com ~~~To subscribe, unsubscribe, or change list options, ~~~visit: http://lists.midrange.com/cgi-bin/listinfo/cobol400-l ~~~or email: COBOL400-Lfirstname.lastname@example.org ~~~Before posting, please take a moment to review the archives ~~~at http://archive.midrange.com/cobol400-l. ~~~ ~~~
As an Amazon Associate we earn from qualifying purchases.
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.