CRTSQLCBL PGM(XXX) OPTION(*LSTDBG)

Es wird dann die gesamte Spoolfile ins Programm-Objekt kopiert und somit kann per STRDBG OPMSRC(*YES) getestet werden.