Information Systems:EODCLR

/* Delete spool files generated by ASW End of Day - only keep Invoice    */
/* Register.                                                             */ 
                                                                              
            DLTSPLF    FILE(GCFP752) SPLNBR(*LAST)                            
            DLTSPLF    FILE(FKR050P) SPLNBR(*LAST)                            
            DLTSPLF    FILE(FMR050P) SPLNBR(*LAST)                            
            DLTSPLF    FILE(FMR050P) SPLNBR(*LAST)                            
            DLTSPLF    FILE(FMR066P) SPLNBR(*LAST)                            
            DLTSPLF    FILE(FMR065P) SPLNBR(*LAST)                            
            DLTSPLF    FILE(FMR065P) SPLNBR(*LAST)                            
                                                                              
/* Clear out queues of reports generated, but never actually printed     */ 
                                                                              
            CLROUTQ    OUTQ(ASWPICKLST)  
            CLROUTQ    OUTQ(ASWPUTAWAY)                                       
            CLROUTQ    OUTQ(ASWSOREDI)                                        
            CLROUTQ    OUTQ(JFPIPE)                                           
                                                                               
/* Clear Pick List work files (these should be cleared each time the     */ 
/* user exists the program, but apparently aren't always)                */ 
                                                                               
             CLRPFM     FILE(WKPL30P)                                          
             CLRPFM     FILE(WKPL40P)                                          
             CLRPFM     FILE(WKPL45P)                                          
                                                                               
/* Clear work files.  Some of this are used in WebSmart; they are by     */  
/* user, and are only cleared when they make a new selection.  Which     */
/* means if they are not cleared here, there will be a set of records    */
/* for every user who has ever used the program, and the file will grow. */
                                                                            
            CLRPFM     FILE(UROLCU)                                         
            CLRPFM     FILE(WSVENODTP)                                      
            CLRPFM     FILE(WSVENOSP)                                       
            CLRPFM     FILE(WSGENERP)                                       
            CLRPFM     FILE(WOPUR01AP)                                      
            CLRPFM     FILE(WSCSTSLS1P)                                     
            CLRPFM     FILE(INTRANSP)                                       
            CLRPFM     FILE(INTRANS2P)                                      
            CLRPFM     FILE(CAINTSLSP)   
            CLRPFM     FILE(DETORDCST)   
            CLRPFM     FILE(IUSERS)      
            CLRPFM     FILE(SUMDCACT)    
            CLRPFM     FILE(SUMINVC01)   
            CLRPFM     FILE(SUMINVC02)   
            CLRPFM     FILE(SUMSLSC02)   
            CLRPFM     FILE(SUMSLSC03)   
            CLRPFM     FILE(POSUM01)     
            CLRPFM     FILE(POSUM01A)    
            CLRPFM     FILE(PODET01)                                         
                                                                             
/* Clear promo report work files                                            */
                                                                             
            CLRPFM     FILE(PXWRK05P)                                        
            CLRPFM     FILE(PXWRK06P)
                                                                              
/* Clear unused reports from Out Queues                                  */  
                                                                               
             CALL       PGM(OUTQCLEAR)