×

Good News Everybody!

The new search engine is LIVE!

Please report any problems to david (at) midrange.com.




Roger,

Are you using the actual AFP tool or are you using external print files
creating a *AFPDS spooled file, and using all the different fonts and
keywords?
Either way, my experience is with *AFPDS printer files.

Note that a *SCS spooled file (the default) has a HIGHLIGHT keyword for
"bold". Very simple and no parameters.
A PAD01 50 6 HIGHLIGHT

I prefer printing by position rather than line spacing so that I can change
font or attributes within a line (pardon the paste of code, my email client
will not let me set a font on a reply..).
You can change font and/or size on each field
2304 is normal helvetica, 2305 is bold
A R NCCOPIE8 FONT(2304 (*POINTSIZE 6.7))
A @NCUNDER 80 POSITION(9.05 2.50)
A @NCCUC# 35 POSITION(9.50 1.10)
A @NC01DE 35 POSITION(9.50 5.30)
A FONT(2305
(*POINTSIZE 9))

Or control the location by values in the program (x and y coordinates)
A R $PRT03 FONT(2305 (*POINTSIZE 14))
A @3TEXT 80 POSITION(&D1Y &D1X)
A D1Y 5S 3P
A D1X 5S 3P

So you could print the long line in one font, then position a field in a
different font within same line. It gets tricky if you are trying to make a
word processor out of this, like bolding single variable length words or
numbers that may start/end in any position. In fixed width fonts maybe so,
but not typographic where every character is a different width. In that case
do something like a Word "merge".

But you certainly with position you could do this (bold the amount)
HEY DEADBEAT!!! PAY THIS AMOUNT NOW ----> $565.33 OR WE WILL xxxx
.

Btw - If a courier font can be used, where you can do positioning then check
these out (note the font 416 allows character sizing) - this is a sample
print I refer to
Btw - there are other fixed width beside courier - like Lucida Console,
which look better, but I don't know the font id. There are some older
manuals online that have appendixes of the fonts and types.

A R $PRT01 FONT(11)
A SKIPB(3)
A 1'Font 11 Courier'
A R $PRT02 FONT(18)
A 1'Font 18 Courier Italic'
A SPACEA(3)
A R $PRT03 FONT(46)
A 1'Font 46 Courier Bold'
A SPACEA(3)
A R $PRT04 FONT(75)
A 1'Font 75 Courier 12 pitch'
A SPACEA(3)
A R $PRT05 FONT(223)
A 1'Font 223 Courier'
A R $PRT06 FONT(244)
A 1'Font 244 Courier double'
A SPACEA(3)
A R $PRT07 FONT(245)
A 1'Font 245 Courier'
A SPACEA(3)
A R $PRT08 FONT(420)
A 1'Font 420 Courier'
A SPACEA(3)
A R $PRT09 FONT(416)
A CHRSIZ(1 1)
A 1'Font 416 Courier'
A SPACEA(3)

A final note that if these were email and not print, then a html email could
do it and you can string the fonts and bolds anywhere.

Jim


-----Original Message-----
From: MIDRANGE-L [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Roger
Harman
Sent: Tuesday, December 01, 2015 7:34 PM
To: Midrange Systems Technical Discussion
Subject: AFP - Selective bolding

I've done a little work with AFP before but have a project to modernize some
dunning letters.  Changing font, adding company logo for letterhead, etc.  

We have a template (PF) with substitution variables (~CUSTNAME, etc) and an
RPG program does the scan/replace to build the print data (PRTDATA).

Everything works fine and it is a vast improvement over the Courier 10
layout.

I just know that when I show the changes to the users, someone is going to
ask "Can you bold the <amount, date, whatever> in that sentence?"

The print file DDS looks like this:
** HELVETICA A          R PRTLINE A            PRTDATA       70A      
15SPACEA(1)                  
A                                      FONT(2304 (*POINTSIZE
12)) 

I've perused the printing redbook and  some other resources and I don't see
that capability.  Is this doable? 

Thanks.

Roger Harman
COMMON Certified Application Developer - ILE RPG on IBM i on Power OCEAN
User Group
 
 
--
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.


As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2026 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.