Re: CL OVRPRTF FONT(?)

I tried to reply with this solution on Friday but sent it with the wrong
email address.  But I thought I'll give it another try.  Easy solution for
me...

<<<<<

I don't know how to do that with the OVRPRTF, but I have used program to
system fields using an AFPDS printer file. You can also just hard code it
in the printer file to have a pointsize of 11.

A            TEXT         100          POSITION(&FRMTOP &FRMLEFT)
A                                      FNTCHRSET(*LIBL/&TXTFONT T1L0PCHN +
A                                               (*POINTSIZE &TXTSIZE))
A            FRMLEFT        5S 3P
A            FRMTOP         5S 3P
A            TXTFONT        8A  P
A            TXTSIZE        4S 1P


Hope this helps.

>>>>>

I set this up so that I can print the TEXT field anywhere on the piece of
paper.  You specify that by populating FRMTOP and FRMLEFT in the RPGLE.
There's no need for the SPACEA or SPACEB. Also, I have used POINTSIZE 11
before.

Use WRKFNTRSC to view your type of fonts.

Michael Schutte
Work 614-492-7419
email  michael_schutte@xxxxxxxxxxxx


                                                                           
             Al Mac                                                        
             <macwheel99@sigec                                             
             om.net>                                                    To 
             Sent by:                  Midrange Systems Technical          
             midrange-l-bounce         Discussion                          
             s@xxxxxxxxxxxx            <midrange-l@xxxxxxxxxxxx>           
                                                                        cc 
                                                                           
             03/05/2006 09:25                                      Subject 
             PM                        Re: CL OVRPRTF FONT(?)              
                                                                           
                                                                           
             Please respond to                                             
             Midrange Systems                                              
                 Technical                                                 
                Discussion                                                 
             <midrange-l@midra                                             
                 nge.com>                                                  
                                                                           
                                                                           




This weekend was EOM so I been a bit out of touch, so sorry if I am
duplicating some other answer.  We also had stuff down, but it turned out
not to be VPN but our T1 line, which PC guy showed me how to verify using
PING..

We solved a FONT problem on one printer by adjusting the width of the form
... apparently the PC printer was second guessing the host instructions,
saying "I not have room for all this stuff" so FONT came from what would
fit, and how much was being sent, so we adjusted how much printing
sideways, to force the math.

>0, Henza, Guy wrote:
> > Bob,
> >
> > I feel your pain.  I've been working on changing an invoice print
> > program to use an overlay.  So far so good.  I've been trying to get
the
> > OVRPRTF command to do what I want it to. It refuses, 10 cpi is too big
> > and 12 cpi is too small.  Does anyone know how to get the FONT
parameter
> > to give me 11 point font?
> >
> > Regards,
> >
> > Guy
> >
> > from: "Bob Kohlndorfer"
> > I am having trouble getting my printout formatted correctly on a PC
> > attached
> > printer.
> >
>
>Guy,
>
>If you are using an external print file abandon the idea of CPI.  Check
>the DDS reference for the POSITION keyword and the FONT keyword.
>
>I was trying to hunt an example up, but my vpn connection to the machine
>is down.  I'll see if I can hunt one up after Monday.
>
>Regards,
>Rich


--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.