Loop procedure (LOOP)
Use the LOOP keyword to specify a LOOP problem.
If new output is being produced in the DWWPRINT file, CICS® VR is not in a loop.
If CICS® VR has ended, the loop is probably recursive: module A calls module B calls module A, and so on. The abend is caused by CICS® VR running out of automatic storage producing user abend code 3001. Loop problems can involve many modules or a single module. Look for messages that are associated with the loop.
If CICS® VR is
still running in a loop perform these steps:
- Cancel CICS® VR, using the dump option.
- Search for repetitive patterns of called modules, using the trace table.
- If there is no repetitive pattern, rerun CICS® VR, repeat steps 1 and 2, and compare the trace tables.
- Provide a description of the situation leading up to the problem.