01 - Programmazione01a - RPG

RPG-FAQ-038: Printer files AFP e Font possibili

Se vogliamo testare i font utilizzabili nei printer files AFP … possiamo utilizzare un semplice PRTF come quello che segue, consigliato da Eric su Midrange.com;

=====================================================================
0005.00      A          R XHDR                                               
0006.00      A*                                                               
0007.00      A*                                                               
0008.00      A                                  1  5 'FONT 6199 - PS 8'       
0009.00      A                                      FONT(6199 (*POINTSIZE 8))
0010.00      A                                  3  5 'FONT 6199 - PS 10'     
0011.00      A                                      FONT(6199 (*POINTSIZE 10))
0012.00      A                                  5  5'FONT 6199 - PS 12'       
0013.00      A                                      FONT(6199 (*POINTSIZE 12))
0014.00      A                                  7  5 'FONT 86 - PS 10'       
0015.00      A                                      FONT(86 (*POINTSIZE 10)) 
0016.00      A                                  9  5 'FONT 86 - PS 12'       
0017.00      A                                      FONT(86 (*POINTSIZE 12)) 
0018.00      A                                 11  5 'FONT 760'               
0019.00      A                                      FONT(760)                 
0020.00      A                                 13  5 'FONT 4427 - PS 8'       
0021.00      A                                      FONT(4427 (*POINTSIZE 8))
0022.00      A                                 15  5 'FONT 4427 - PS 10'     
0023.00      A                                      FONT(4427 (*POINTSIZE 10))
0024.00      A                                 17  5 'FONT 4427 - PS 12'     
0025.00      A                                      FONT(4427 (*POINTSIZE 12))
0026.00      A                                 19  5 'FONT 5687 - PS 8'       
0027.00      A                                      FONT(5687 (*POINTSIZE 8))
0028.00      A                                 21  5 'FONT 5687 - PS 10'     
0029.00      A                                      FONT(5687 (*POINTSIZE 10))
0030.00      A                                 23  5 'FONT 5687 - PS 12'     
0031.00      A                                      FONT(5687 (*POINTSIZE 12))
0032.00      A                                 25  5 'FONT 5707 - PS 8'       
0033.00      A                                      FONT(5707 (*POINTSIZE 8))
0034.00      A                                 27  5 'FONT 5707 - PS 10'     
0035.00      A                                      FONT(5707 (*POINTSIZE 10))
0036.00      A                                 29  5 'FONT 5707 - PS 12'     
0037.00      A                                      FONT(5707 (*POINTSIZE 12))
0038.00      A                                 31  5 'FONT 66'               
0039.00      A                                      FONT(66)                 
0040.00      A                                 33  5 'FONT 69'               
0041.00      A                                      FONT(69)                 
0042.00      A                                 35  5 'FONT 762'               
0043.00      A                                      FONT(762)  

Compilare quindi questo PRTF con l'opzione DEVTYPE(*AFPDS)

Quindi testare i font con un semplice RPG

FFONTPRTP  O    E             PRINTER
                               

  write xhdr;                       

  *inlr = *on;                       

A dire il vero … i font di questo semplice PRTF sono solo una parte di quelli possibili … prendendosi la pazienza di leggersi la documentazione a questo link (https://www.ibm.com/support/pages/system/files/support/nas/nastech.nsf/0/e6abc9cb88fced9a85257bc100617258/$FILE/IBM%20AFP%20Font%20Collection%20for%20i%20Font%20Summary%20(G544-5846-03).pdf) possiamo testare diversi altri tipi di font.

--- Roberto De Pedrini Faq400.com
About author

Founder di Faq400 Srl, IBM Champion, ideatore del sito Faq400.com e del Blog blog.faq400.com. Sviluppatore RPG da quando avevo i pantaloni corti, forte sostenitore della piattaforma IBM i (ex AS400), ho sempre cercato di convididere le mie conoscenze con gli altri tramite forum, eventi e corsi. Oggi, tramite Faq400 Srl, cerchiamo di aiutare le aziende a sfruttare al meglio questa fantastica piattaforma IBM i.

Rispondi

%d blogger hanno fatto clic su Mi Piace per questo: