dump cuando genero subrutinas..

[mystic_soul]

Hola a todos! necesito de la ayuda de ustedes de manera urgente!..
Me pasaron un programa para analizar un dump y solucionarlo. Este programa genera otro programa en forma dinamica. Para esto utiliza una sentencia como la siguiente..

DEFINE GENERATE-IT.
GENERATE SUBROUTINE POOL _ZZ_PGM_BUF NAME &1
MESSAGE _ZZ_MESSAGE LINE _ZZ_LINE WORD _ZZ_WORD.
END-OF-DEFINITION.


El problema pasa porque cuando lanzo un job, éste tira un dump porque se excede del maximo de rutinas (que son 36).. Como hago para arreglar este dump? Dejo el adjunto donde se utiliza esto..