|
Terry, Sorry for the delay, I had to look up my old programs from my manual archives :-) Yes, you can do GDDM and AFP together on the same page! You need to create a normal AFP printer file to use the BARCODE keyword. You can also put plain text on the page if you want to. Once you have the printer file settled, you will use THAT file for your GDDM work instead of QPGDDM. The trick is to do the FSINIT, DSOPEN and DSUSE before you OPEN the printer file. I will email you a complete sample, but here are the salient points: FGRPRTF O E PRINTER UC C* Initialise graphics C CALL 'GDDM' C PARM 'FSINIT 'GPARM 8 C* Prepare printer C CALL 'GDDM' C PARM 'DSOPEN 'GPARM C PARM 2 I01 C PARM 1 I02 C PARM 'IPDS 'C08 8 C PARM 0 I03 C PARM IA01 C PARM 1 I04 C PARM 'GRPRTF 'C10 10 C* Using printer C CALL 'GDDM' C PARM 'DSUSE 'GPARM C* Put some text print on printer for testing C OPEN GRPRTF C WRITETEXT C* Put some AFP print on printer for testing C MOVE *ALL'1234'BARCOD C WRITEAFP C* Print fancy text C* LOAD CHAR SET C CALL 'GDDM' C PARM 'GSLSS 'GPARM C* SELECT CHAR SET C CALL 'GDDM' C PARM 'GSCS 'GPARM C* Fancy name C CALL 'GDDM' C PARM 'GSCHAR 'GPARM C* Print a pie chart C* SET CHART AREA TO 50% OF PICTURE SPACE C CALL 'GDDM' C PARM 'CHAREA 'GPARM C* PERCENTAGE PIE CHART C CALL 'GDDM' C PARM 'CHSET 'GPARM C* Set key attributes C CALL 'GDDM' C PARM 'CHKEY 'GPARM C* DRAW THE HEADING C CALL 'GDDM' C PARM 'CHHEAD 'GPARM C* DRAW THE PIE C CALL 'GDDM' C PARM 'CHPIE 'GPARM C* Send picture C CALL 'GDDM' C PARM 'FSFRCE 'GPARM C* Terminate processing C CLOSEGRPRTF C CALL 'GDDM' C PARM 'FSTERM 'GPARM C SETON LR Buck Calabro Aptis; Albany, NY mailto:Buck.Calabro@aptissoftware.com > -----Original Message----- > From: Terry Richardson > Sent: Thursday, September 16, 1999 7:52 AM > To: 'MIDRANGE-L@midrange.com' > Subject: Calling all GDDM experts > > Hopefully someone out there can tell me if it's at all possible to produce > a > barcode with GDDM. We have a program that produces gift certificates, and > a > request has come in to place a barcode on these. Rather than trash this > program and write it with IPDS commands, I'd prefer to modify it. I'm not > too optimistic, since the GDDM programming guide and reference manuals do > not make any mention of barcodes. Any ideas, or am I SOL? > > TIA > > Terry Richardson > Sr. P/A > The Orvis Company, Inc. > 802-362-8663 > +--- | This is the Midrange System Mailing List! | To submit a new message, send your mail to MIDRANGE-L@midrange.com. | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com. | To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com. | Questions should be directed to the list owner/operator: david@midrange.com +---
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.