Sample Workstation Customization Object (WSCST) to create a 300 DPI TIFF File when using AFP-to-TIF

 

Problem:

Solution:

1. Create and edit a new workstation customization object:
   
   STRSEU SRCFILE(RJSCONVERT/SOURCE) SRCMBR(QFXDFINE) TYPE(WSCST) TEXT('300 DPI Workstation Cust Object')
2. Add all of the following data to the new QFXDFINE source member, then exit and save the source member:
   
   :WSCST DEVCLASS=TRANSFORM.                                                                                                    
   :TRNSFRMTBL.                                                      
   :PRTDTASTRM                                                       
   DATASTREAM= TIFF_G4.                                             
                                                                
   :PRTRSLTN                                                        
   RESOLUTION = 300.                                                
                                                                
   :DWRPAGSIZ.                                                      
   :DWRPAGSIZE                                                   
   DRAWER = 1                                                  
   PAGWTH = 12240      /* 8.5" in 1440ths           @S2  */    
   PAGLEN = 15840.     /* 11"  in 1440ths           @S2  */    
   :DWRPAGSIZE                                                   
   DRAWER = 2                                                  
   PAGWTH = 12240      /* 8.5" in 1440ths           @S2  */    
   PAGLEN = 20160.     /* 14"  in 1440ths           @S2  */    
   :DWRPAGSIZE                                                   
   DRAWER = 3                                                  
   PAGWTH = 11952      /* A4                         @S2 */    
   PAGLEN = 16848.                                             
   :EDWRPAGSIZ.                                                      
                                                                
   :INITPRT                                                         
   DATA = '4D4D002A'X.                                             
   :RESETPRT                                                        
   DATA = '00000000'X.                                              
                                                               
   :EWSCST.                                                           
3. Create the new workstation customization object in RJSCONVERT:
   
   CRTWSCST WSCST(RJSCONVERT/QFXDFINE) SRCFILE(RJSCONVERT/SOURCE) REPLACE(*YES)
4. Change the AFP-to-PDF and AFP-to-TIF commands to use the new workstation customization object.
   
   For example: To change CPYAFPTIF to use WSCST QFXDFINE in the library RJSCONVERT, use:
   
   CHGCMDDFT CMD(RJSCONVERT/CPYAFPTIF) NEWDFT('MFRTYPMDL(*WSCST)')
   
   CHGCMDDFT CMD(RJSCONVERT/CPYAFPTIF) NEWDFT('WSCSTNAME(QFXDFINE)') 
   
   CHGCMDDFT CMD(RJSCONVERT/CPYAFPTIF) NEWDFT('WSCSTLIB(RJSCONVERT)')