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:
  1. Cancel CICS® VR, using the dump option.
  2. Search for repetitive patterns of called modules, using the trace table.
  3. If there is no repetitive pattern, rerun CICS® VR, repeat steps 1 and 2, and compare the trace tables.
  4. Provide a description of the situation leading up to the problem.
See Collecting documentation about all problems to complete your documentation of the problem.