Still celebrating National IT Professionals Day with 3 months of free Premium Membership. Use Code ITDAY17

x
?
Solved

Trying to print a PRTF using AFPDS printer and the *POINTSIZE cmd.

Posted on 2008-10-29
8
Medium Priority
?
2,499 Views
Last Modified: 2013-12-06
I have a PRTF file that we used to use on an IPDS printer that looked like this:
-----------------------------------------------------------------------------------------------------
0015.00      A          R DETAIL                                              
0015.01      A                                      SKIPB(05)                
0015.02      A                                    10'INTER-PLANT TRANSFER OF'
0015.03      A                                   + 1'MATERIAL DEEDS TO 3RD'  
0015.04      A                                      SPACEA(3)                
0015.05      A                                    10'IF ANY ERRORS RESCAN ER'
0015.06      A                                    +0 'RORS TO NEW CART NUMBER'
0015.07      A                                      SPACEA(2)                
0027.00      A                                    10'CART NUMBER'            
0028.00      A                                      CHRSIZ(4 4)              
0029.00      A                                      SPACEA(3)                
0030.00      A            CARTNO         3S 0     10CHRSIZ(9 9)              
0031.00      A                                      SPACEA(10)                
0031.01      A            DATE           7  0     22                          
------------------------------------------------------------------------------

Now I have read that the CHRSIZ cmd is only supported with IPDS, so I am trying to change it to the *POINTSIZE cmd because I hear that is AFPDS supported.

This is a bit of what I have changed it to, but the font output is still the same size as it is originally when it prints to the paper. The desire is to have the "Cart Number" string and value in extra large font on the print out.

------------------------------------------------------------------------------------------
0012.00      A          R DETAIL                                              
0013.00      A                                      SKIPB(05)                
0014.00      A                                    10'INTER-PLANT TRANSFER OF'
0015.00      A                                   + 1'MATERIAL DEEDS TO 3RD'  
0016.00      A                                      SPACEA(3)                
0017.00      A                                    10'IF ANY ERRORS RESCAN ER'
0018.00      A                                    +0 'RORS TO NEW CART NUMBER'
0019.00      A                                      SPACEA(2)                
0020.00      A                                    10'CART NUMBER'            
0021.00      A                                      FONT(2304 (*POINTSIZE 25))
0022.00      A                                      SPACEA(2)                
0023.00      A            CARTNO         3S 0     10FONT(2304 (*POINTSIZE 25))
0024.00      A                                      SPACEA(3)                
0
Comment
Question by:tammieR
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 4
  • 4
8 Comments
 
LVL 35

Expert Comment

by:Gary Patterson
ID: 22834996
What kind of printer are you printing to, and how is it configured on the AS/400, and how is it attached?  

Most of the time, AFP spooled files is printed on an IPDS printer.  In this configuration, your application generates AFPDS, and the PSF/400 licensed program converts it to IPDS.

The second most common configuration uses Host Print Transform (HPT).  In this configuration, you application generates AFPDS, and HPT (a native OS/400 facility) dynamically converts the AFPDS into the target printer's language (PCL or Postscript).

Here's a great reference Redbook on AS/400 printing:  

http://www.redbooks.ibm.com/redbooks/pdfs/sg246250.pdf

- Gary Patterson
0
 

Author Comment

by:tammieR
ID: 22840256
The new printer is a Lanier LD335 copier. It is hooked up with a network cable.
Here is the device description:

 Device description . . . . . . . . :   PRT_PACKD            
 Option . . . . . . . . . . . . . . :   *BASIC              
 Category of device . . . . . . . . :   *PRT                
                                                             

 Device class . . . . . . . . . . . :   *LAN                
 Device type  . . . . . . . . . . . :   3812                
 Device model . . . . . . . . . . . :   1                    
 LAN attachment . . . . . . . . . . :   *IP                  
 Port number  . . . . . . . . . . . :   9100                
 Physical attachment  . . . . . . . :   *DIRECT              
 Online at IPL  . . . . . . . . . . :   *YES                
 Font:                                                      
   Identifier . . . . . . . . . . . :   11                  
   Point size . . . . . . . . . . . :   *NONE                
 Form feed  . . . . . . . . . . . . :   *AUTOCUT            
 Separator drawer . . . . . . . . . :   *FILE                
                               

 
Device description . . . . . . . . :   PRT_PACKD    
 Option . . . . . . . . . . . . . . :   *BASIC        
 Category of device . . . . . . . . :   *PRT          

                                                     
 Separator program  . . . . . . . . :   *NONE        
 Printer error message  . . . . . . :   *INFO        
 Message queue  . . . . . . . . . . :   QSYSOPR      
   Library  . . . . . . . . . . . . :     *LIBL      
 Current message queue  . . . . . . :   QSYSOPR      
   Library  . . . . . . . . . . . . :     QSYS        
 Activation timer . . . . . . . . . :   170          
 Inactivity timer . . . . . . . . . :   *SEC15        
 Line speed . . . . . . . . . . . . :   19200        
 Word length  . . . . . . . . . . . :   8            
 Type of parity . . . . . . . . . . :   *NONE        
 Stop bits  . . . . . . . . . . . . :   1            
                                                   

                   
Device description . . . . . . . . :   PRT_PACKD      
 Option . . . . . . . . . . . . . . :   *BASIC        
 Category of device . . . . . . . . :   *PRT          

                                                       
 Host print transform . . . . . . . :   *YES          
 Manufacturer type and model  . . . :   *RICOH2035    
 Paper source 1 . . . . . . . . . . :   *LETTER        
 Paper source 2 . . . . . . . . . . :   *LETTER        
 Envelope source  . . . . . . . . . :   *NUMBER10      
 ASCII code page 899 support  . . . :   *NO            
 Image configuration  . . . . . . . :   *NONE          
 Character identifier . . . . . . . :   *SYSVAL      
0
 
LVL 35

Expert Comment

by:Gary Patterson
ID: 22846344
Looks like this device is basically a Ricoh 2035 PCL/PJL printer, andthat is how you have it configured.  In that mode, you don't need tohave PSF/400 installed on you AS/400, since you can use Host PrintTransform to handle the AFPDS-to-ASCII  (PCL/PJL) transformation foryou.

First, we need an AFPDS spooled file:

Is the printer file set to generate AFPDS?  Either on the CRTPRTFcommand used to create the printer file, or on an OVRPRTF in theprogram generating the spooled file:  

DEVTYPE(*AFPDS)?  

Next, generate a spooled file, and verify witrh WRKSPLFA that it is an AFPDS-format file.

Check the joblog of the job generating the print file, and see if you have any "font substitution" messages.

If you still have a problem, you might want to considerswitching fonts, perhaps to a printer-resident font, instead of ahost-resident font, and trying it again.  You can see the list ofprinter resident fonts that are supported by HPT for this device by retrieving theWSCST object associated with the *RICOH2035 manufacturer type and modelsetting:

According to:

http://www-912.ibm.com/s_dir/slkbase.NSF/643d2723f2907f0b8625661300765a2a/a944982b85205c738625669700615ca3?OpenDocument

The WSCST object is QWPRICOH1, so:

RTVWSCST WSCST(QWPRICOH1) ...

If you view the retrieved source, you can look to see what FGID/CSID's are supported.

All of this is covered in detail in the IBM AS/400 Printing V Redbook, in chapter 6:  

http://www.redbooks.ibm.com/redbooks/pdfs/sg242160.pdf

BTW, there is a software optionfor this device that can be installed on it to make it emulate anIPDS/AFP printer (the software basically does the same thing that HPTdoes, but it offloads the translation chore from the AS/400 to theprinter.  To do this, you need to have PSF/400 installed.  

Hope this helps...

- Gary Patterson
0
Get free NFR key for Veeam Availability Suite 9.5

Veeam is happy to provide a free NFR license (1 year, 2 sockets) to all certified IT Pros. The license allows for the non-production use of Veeam Availability Suite v9.5 in your home lab, without any feature limitations. It works for both VMware and Hyper-V environments

 

Author Comment

by:tammieR
ID: 22849751
The font cmd is working now! I had changed the PRTF to AFPDS before, but when I recompile it changes it back to SCS. I was unaware of that. Thanks!

But unfortunetly only the FONT is working and not the *POINTSIZE, which is actually the more important of the two.
0
 
LVL 35

Accepted Solution

by:
Gary Patterson earned 2000 total points
ID: 22853628
tammieR,

FONT - *POINTSIZE qualifier is used with scalable printer-resident fonts.  Pick a printer-resident font, rather than a host-resident for if you want to use this method.

Otherwise use CHRSIZ, or specify a non-scalable fixed-size font for the field.  

Check out the DDS Reference for the FONT keyword and the CHRSIZ keyword.

http://publib.boulder.ibm.com/iseries/v5r1/ic2924/index.htm?info/dds/rbafpmst19.htm

- Gary Patterson
0
 

Author Comment

by:tammieR
ID: 22868307
Im having a difficult time figuring out how to code printer resident font. I spent all morning reading about printing off of the 400, but my experience is very limited.

I can not use the CHRSIZ keyword because this is NOT an IPDS printer, that is why I changed it to an AFPDS printer. The old code ran on an IPDS printer, but this was a replaced with a non-IPDS printer.
0
 
LVL 35

Expert Comment

by:Gary Patterson
ID: 22888506
tammieR,

Have you tried using the CHRSIZ keyword and it fails when you create the printer file as AFPDS?  I know this is not an IPDS printer, but it isn't an AFP printer, either (at least not the way you have it configured).  You are using Host Print Transform to convert AFPDS to PCL.  I suggest you try CHRSIZ, if you haven't already.

Now, I'll assume that you've already tried it and it didn't work, and that is why you are here...

If that doesn't work, retrieve the workstation customization object that I discussed above and post it in a text file here and we'll see if we can find you something that -will- work.

- Gary Patterson

0
 

Author Closing Comment

by:tammieR
ID: 31511204
Your answers were close. They led me to the right direction. Thanks
0

Featured Post

Free learning courses: Active Directory Deep Dive

Get a firm grasp on your IT environment when you learn Active Directory best practices with Veeam! Watch all, or choose any amount, of this three-part webinar series to improve your skills. From the basics to virtualization and backup, we got you covered.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

November 2009 Recently, a question came up in the DB2 forum regarding the date format in DB2 UDB for AS/400.  Apparently in UDB LUW (Linux/Unix/Windows), the date format is a system-wide setting, and is not controlled at the session level.  I'm n…
I use more than 1 computer in my office for various reasons. Multiple keyboards and mice take up more than just extra space, they make working a little more complicated. Using one mouse and keyboard for all of my computers makes life easier. This co…
This is used to tweak the memory usage for your computer, it is used for servers more so than workstations but just be careful editing registry settings as it may cause irreversible results. I hold no responsibility for anything you do to the regist…
Hi friends,  in this video  I'll show you how new windows 10 user can learn the using of windows 10. Thank you.

715 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