Solved

Changing Font of print file in Cobol

Posted on 2004-08-25
6
1,603 Views
Last Modified: 2013-12-03
Hi,
i declared a print file inside a cobol program as:
select printer-file
   assign to printer
   organization is sequential.

now I wonder how can I change the printed font, to some thing like in an outside printer file, because I print the report in a regular printer (not a special as400 printer).
0
Comment
Question by:ams61
6 Comments
 
LVL 14

Expert Comment

by:daveslater
Comment Utility
Hi
you can change the font by createing an external printer file, this needs to be compiled with the
Printer device type  . . . . . .   *AFPDS    

you can then use the Font keyword. These will print on most printers (not too sure on dot matrix but lasers are OK)

here are the fonts I know of that come as standard  - they may be more.

FGID      Font Global Identifier
Name      Name of Font
Font Type      
   U = Uniformly Spaced
   M = Mixed Pitch
   T = Typographic
Attributes      
   Blank = Roman
  b = Bold
   i = Italics
  s = Second Strike
   w = Double Wide

Point      
      Point size (Blank for uniformly spaced & mixed pitch fonts)
      S = Scalable
Pitch      
       Characters per inch (For example, 17)
      S = Scalable



FGID       Name       Type of Font       Attributes       Point       Pitch (CPI)
2      Delegate       U                   10
3      OCR-B       U                   10
5      Rhetoric/Orator       U                   
8      Scribe/Symbol       U                   10
10      Cyrillic 22       U                   10
11      Courier       U                   10
12      Prestige       U                   10
13      Artisan       U                   10
18      Courier Italic       U       I             10
19      OCR-A       U                   10
20      Pica       U                   10
21      Katakana       U                   10
25      Presentor       U                   10
26      Matrix Gothic       U                   10
30      Symbol       U                   10
31      Aviv       U                   10
36      Letter Gothic       U                   10
38      Orator Bold       U       b             10
39      Gothic Bold       U       b             10
40      Gothic       U                   10
41      Roman Text       U                   10
42      Serif       U                   10
43      Serif Italic       U       i             10
44      Katakana Gothic       U                   10
46      Courier Bold       U       b             10
49      Shalom       U                   10
50      Shalom Bold       U       b             10
51      Matrix Gothic       U                   10
52      Courier       U                   10
55      Aviv Bold       U       b             10
61      Nasseem       U                   10
62      Nasseem Italic       U       i             10
63      Nasseem Bold       U       b             10
64      Nasseem Italic Bold       U       bi             10
66      Gothic       U                   12
68      Gothic Italic       U       i             12
69      Gothic Bold       U       b             12
70      Serif       U                   12
71      Serif Italic       U       i             12
72      Serif Bold       U       b             12
74      Matrix Gothic       U                   12
75      Courier       U                   12
76      APL       U                   12
78      Katakana       U                   12
80      Symbol       U                   12
84      Script       U                   12
85      Courier       U                   12
86      Prestige       U                   12
87      Letter Gothic       U                   12
91      Light Italic       U       i             12
92      Courier Italic       U       i             12
95      Adjudant       U                   12
96      Old World       U                   12
98      Shalom       U                   12
99      Aviv       U                   12
101      Shalom Bold       U       b             12
102      Aviv Bold       U       b             12
103      Nasseem       U                   12
109      Letter Gothic Italic       U       i             12
110      Letter Gothic Bold       U       b             12
111      Prestige Bold       U       b             12
112      Prestige Italic       U       i             12
154      Essay       M                   12
155      Boldface Italic       M       bi             12
157      Title       M                   12
158      Modern       M                   12
159      Boldface       M       b             12
160      Essay       M                   12
162      Essay Italic       M       i             12
163      Essay Bold       M       b             12
164      Prestige       M                   12
167      Barak       M                   12
168      Barak Bold       M       b             12
173      Essay       M                   12
174      Gothic       M                   12
175      Document       M                   12
178      Barak       M                   18
179      Barak Bold       M       b             18
180      Barak       M                   15
181      Barak Mixed Bold       M       b             15
182      Barak       M                   5
183      Barak Bold       M       b             5
186      Press Roman       M                   12
187      Press Roman Bold       M       b             12
188      Press Roman Italic       M       i             12
189      Press Roman Italic Bold       M       bi             12
190      Foundry       M                   12
191      Foundry Bold       M       b             12
194      Foundry Italic       M       i             12
195      Foundry Italic Bold       M       bi             12
203      Data 1       U                   13
204      Matrix Gothic       U                   13
205      Matrix Gothic       U                   13
211      Shalom       U                   15
212      Shalom Bold       U       b             15
221      Prestige       U                   15
222      Gothic       U                   15
223      Courier       U                   15
225      Symbol       U                   15
226      Shalom       U                   15
229      Serif       U                   15
230      Gothic       U                   15
232      Matrix Gothic       U                   15
233      Matrix Courier       U                   15
234      Shalom Bold       U       b             15
244      Courier Double Wide       U       w             5
245      Courier Bold Double Wide       U       wb             5
247      Shalom Bold       U       b             17
248      Shalom       U                   17
249      Katakana       U                   17
252      Courier       U                   17
253      Courier Bold       U       b             17
254      Courier       U                   17
255      Matrix Gothic       U                   17
256      Prestige       U                   17
258      Matrix Gothic       U                   18
259      Matrix Gothic       U                   18
279      Nasseem       U                   17
281      Gothic Text       U                   20
282      Aviv       U                   20
283      Letter Gothic       U                   20
285      Letter Gothic       U                   25
290      Gothic Text       U                   27
300      Gothic       U             S       17, S
304      Gothic Text       U             S       S
305      OCR-A       U             S       S
306      OCR-B       U             S       S
307      APL       U             S       S
318      Prestige Bold       U       b       S       S
319      Prestige Italic       U       i       S       S
322      APL Bold       U       b       S       S
400      Gothic       U             S       17, S
404      Letter Gothic Bold       U       b       S       S
416      Courier Roman Medium       U             S       S
420      Courier Roman Bold       U       b       S       S
424      Courier Roman Italic       U       i       S       S
428      Courier Roman Italic Bold       U       bi       S       S
432      Prestige       U             S       S
434      Orator Bold       U       b             8
435      Orator Bold       U       b             6
751      Sonoran Serif       T             8P.       27
752      Nasseem       T             12P       18
753      Nasseem Bold       T       b       12P       18
754      Nasseem Bold       T       b       18P       12
755      Nasseem Bold       T       b       24P       9
756      Nasseem Italic       T       i       12P       18
757      Nasseem Bold Italic       T       bi       12P       18
758      Nasseem Bold Italic       T       bi       18P       12
759      Nasseem Bold Italic       T       bi       24P       9
760      Times Roman       T             6P       36
761      Times Roman Bold       T       b       12P       18
762      Times Roman Bold       T       b       10P       15
763      Times Roman Italic       T       i       12P       18
764      Times Roman Bold Italic       T       bi       10P       21
765      Times Roman Bold Italic       T       bi       12P       18
1051      Sonoran Serif       T             10P       21
1053      Sonoran Serif Bold       T       b       10P       21
1056      Sonoran Serif Italic       T       i       10P       21
1351      Sonoran Serif       T             12P       18
1653      Sonoran Serif Bold       T       b             13
1803      Sonoran Serif Bold       T       b       18P       12
2103      Sonoran Serif Bold       T       b       24P       9
2304      Helvetica Roman Medium       T             S       S
2305      Helvetica Roman Bold       T       b       S       S
2306      Helvetica Roman Italic       T       i       S       S
2307      Helvetica Roman Italic Bold       T       bi       S       S
2308      Times New Roman Medium       T             S       S
2309      Times New Roman Bold       T       b       S       S
2310      Times New Roman Italic       T       i       S       S
2311      Times New Roman Italic Bold       T       bi       S       S
4407      Sonoran Serif       T             8P       *27
4407      Sonoran Serif       T             10P       *21
4407      Sonoran Serif       T             12P       *18
4427      Sonoran Serif Bold       T       b       10P       *21
4427      Sonoran Serif Bold       T       b       16P       *13
4427      Sonoran Serif Bold       T       b       24P       *9
4535      Sonoran Serif Italic       T       i       10P       *21
4919      Goudy       T             6P       *36
4919      Goudy       T             8P       *27
4919      Goudy       T             10P       *21
4919      Goudy       T             12P       *18
4939      Goudy Bold       T       T       10P       *21
4939      Goudy Bold       T       b       14P       *15
4939      Goudy Bold       T       b       18P       *12
5047      Goudy Italic       T       i       10P       *21
5067      Goudy Bold Italic       T       bi       10P       *21
5687      Times Roman       T             6P       *36
5687      Times Roman       T             8P       *27
5687      Times Roman       T             10P       *21
5687      Times Roman       T             12P       *18
5707      Times Roman Bold       T       b       10P       *21
5707      Times Roman Bold       T       b       12P       *18
5707      Times Roman Bold       T       b       14P       *15
5707      Times Roman Bold       T       b       18P       *12
5707      Times Roman Bold       T       b       24P       *12
5815      Times Roman Italic       T       i       10P       *21
5815      Times Roman Italic       T       i       12P       *18
5835      Times Roman Italic Bold       T       bi       10P       *21
5835      Times Roman Italic Bold       T       bi       12P       *18
5943      University       T             12P       *18
5943      University       T             14P       *15
5943      University       T             18P       *12
6199      Palatino       T             6P       *36
6199      Palatino       T             8P       *27
6199      Palatino       T             10P       *21
6199      Palatino       T             12P       *18
6219      Palatino Bold       T       b       10P       *21
6219      Palatino Bold       T       b       14P       *15
6219      Palatino Bold       T       b       18P       *12
6327      Palatino Italic       T       i       10P       *21
6347      Palatino Italic Bold       T       bi       10P       *21
8503      Baskerville       T             6P       *36
8503      Baskerville       T             8P       *27
8503      Baskerville       T             10P       *21
8503      Baskerville       T             12P       *18
8523      Baskerville Bold       T       b       10P       *21
8523      Baskerville Bold       T       b       14P       *15
8523      Baskerville Bold       T       b       18P       *12
8631      Baskerville Italic       T       i       10P       *21
8651      Baskerville Italic Bold       T       bi       10P       *21
8759      Nasseem       T             12P       *18
8779      Nasseem Bold       T       b       12P       *18
8779      Nasseem Bold       T       b       18P       *12
8779      Nasseem Bold       T       b       24P       *9
8887      Nasseem Italic       T       i       12P       *18
8907      Nasseem Italic Bold       T       bi       12P       *18
8907      Nasseem Italic Bold       T       bi       18P       *12
8907      Nasseem Italic Bold       T       bi       24P       *9
12855      Narkisim       T             8P       *27
12855      Narkisim       T             10P       *21
12855      Narkisim       T             18P       *12
12855      Narkisim       T             24P       *9
12875      Narkisim Bold       T       b       8P       *27
12875      Narkisim Bold       T       b       10P       *21
12875      Narkisim Bold       T       b       12P       *18
16951      Century Schoolbook       T             6P       *36
16951      Century Schoolbook       T             8P       *27
16951      Century Schoolbook       T             10P       *21
16951      Century Schoolbook       T             12P       *18
16971      Century Schoolbook Bold       T       b       10P       *21
16971      Century Schoolbook Bold       T       b       14P       *15
16971      Century Schoolbook Bold       T       b       18P       *12
17079      Century Schoolbook Italic       T       i       10P       *21
17099      Century Schoolbook Italic Bold       T       bi       10P       *21
20224      Boldface       T       b       S       S
33335      Optima       T             6P       *36
33335      Optima       T             8P       *27
33335      Optima       T             10P       *21
33335      Optima       T             12P       *18
33355      Optima Bold       T       b       10P       *21
33355      Optima Bold       T       b       14P       *15
33355      Optima Bold       T       b       18P       *12
33463      Optima Italic       T       i       10P       *21
33483      Optima Italic Bold       T       bi       10P       *21
33591      Futura       T             6P       *36
33591      Futura       T             8P       *27
33591      Futura       T             10P       *21
33591      Futura       T             12P       *18
33601      Futura Bold       T       b       10P       *21
33601      Futura Bold       T       b       14P       *15
33601      Futura Bold       T       b       18P       *12
33719      Futura Italic       T       i       10P       *21
33729      Futura Italic Bold       T       bi       10P       *21
34103      Helvetica       T             6P       *36
34103      Helvetica       T             8P       *27
34103      Helvetica       T             10P       *21
34103      Helvetica       T             12P       *18
34123      Helvetica Bold       T       b       10P       *21
34123      Helvetica Bold       T       b       14P       *15
34123      Helvetica Bold       T       b       18P       *12
34231      Helvetica Italic       T       i       10P       *21
34251      Helvetica Italic Bold       T       bi       10P       *21
37431      Old English       T             12P       *18
37431      Old English       T             14P       *15
37431      Old English       T             18P       *12
41783      Coronet Cursive       T             12P       *18
41803      Coronet Cursive Bold       T       b       14P       *15
41803      Coronet Cursive Bold       T       b       18P       *12


Have Fun

Dave
0
 

Author Comment

by:ams61
Comment Utility
Thanks.
but what I ment is if there any thing I can do inside the cobol program to change the attribute of the printed charcters (like different size for the letters...), I actually want a bigger letters then the defualt...

Thanks again.
0
 
LVL 14

Expert Comment

by:daveslater
Comment Utility
Hi
not that I know of.
If you are using the standard  pre-sulpied printer files then these are *SCS data stream that only support CPI changes.

Dave
0
Better Security Awareness With Threat Intelligence

See how one of the leading financial services organizations uses Recorded Future as part of a holistic threat intelligence program to promote security awareness and proactively and efficiently identify threats.

 
LVL 27

Expert Comment

by:tliotta
Comment Utility
Since it's not exactly clear what's needed, the only suggestion I can imagine is an OVRPRTF command before opening the file so that the attributes are set at that time.

Tom
0
 
LVL 14

Expert Comment

by:daveslater
Comment Utility
No comment has been added lately, so it's time to clean up this TA.
I will leave a recommendation in the Cleanup topic area that this question is:

PAQ - do not refund points
 

Please leave any comments here within the next four days.

PLEASE DO NOT ACCEPT THIS COMMENT AS AN ANSWER!
daveslater
Page Editor
0
 
LVL 1

Accepted Solution

by:
Computer101 earned 0 total points
Comment Utility
PAQed - no points refunded (of 150)

Computer101
E-E Admin
0

Featured Post

Find Ransomware Secrets With All-Source Analysis

Ransomware has become a major concern for organizations; its prevalence has grown due to past successes achieved by threat actors. While each ransomware variant is different, we’ve seen some common tactics and trends used among the authors of the malware.

Join & Write a Comment

This article will show you how to create an ISO CD-ROM/DVD-ROM image (*.iso), and MD5 checksum signature, for use with VMware vSphere Hypervisor 6.5 (ESXi 6.5). It's a good idea to compare checksums, because many installations fail because of a corr…
Scam emails are a huge burden for many businesses. Spotting one is not always easy. Follow our tips to identify if an email you receive is a scam.
Excel styles will make formatting consistent and let you apply and change formatting faster. In this tutorial, you'll learn how to use Excel's built-in styles, how to modify styles, and how to create your own. You'll also learn how to use your custo…
This video demonstrates how to create an example email signature rule for a department in a company using CodeTwo Exchange Rules. The signature will be inserted beneath users' latest emails in conversations and will be displayed in users' Sent Items…

728 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

10 Experts available now in Live!

Get 1:1 Help Now