El mandato Suprimir Ficheros de Spool Viejos (DLTOLDSPLF) permite eliminar de las colas de salida aquellos ficheros de spool que cumplan una serie de requisitos. En concreto se pueden eliminar aquellos que pertenezcan a un usuario o a todos y estén ubicados en una cola o en todas. También se puede especificar una fecha que sirve de fin de borrado que permitirá mantener los ficheros de spool más recientes y eliminando los anteriores a ésta.

Se ha construido desde cero y completamente en ILE RPG. Si no me equivoco sólo es compilable en V5R2 o superiores ya que usa ciertas características del lenguaje que no existen en las versiones anteriores. Al diseñarse desde cero me he permitido licenciar el mandato como GNU GPL.
Para la compilación del mandato son necesarios unos fuentes en donde está declarados los prototipos de las APIs del sistema y las estructuras de datos que se usan para su manejo. Todos estos fuentes se incluyen en el archivo "API-version.ZIP". En la documentación del mandato se explica como usarlas.
Creo que el programa ha quedado bastante claro y puede ser un ejemplo sencillo de uso. Además, veo que tal y como queda será más sencillo mantenerlo y ampliarlo que cuando estaba en OPM RPG. Se ha modificado un poco el comportamiento con las versiones anteriores, sobre todo en el caso de los mensajes informativos por cada spool eliminado.

Javier Mora

Octubre 2005
Puedes bajarte los fuentes en formato aquí

Puedes encontrar la misma utilidad para V3R7 y posterior aquí