parm spoolfilenum,printer=$stdlist,breaks="Y",startrec=1                
if finfo("!spoolfilenum",0) then                                        
   setvar printfile "!spoolfilenum"                                     
else                                                                    
   setvar printfile "O!spoolfilenum.out.hpspool"                        
   if finfo("!printfile",0) = FALSE then                                
      echo File does not exist.                                         
      escape                                                            
   endif                                                                
endif                                                                   
if "!breaks" = "Y" then                                                 
  print !printfile;out=!printer;start=!startrec                         
else                                                                    
  print !printfile;out=!printer;page=0;start=!startrec                  
endif                                                                   
deletevar printfile