There are several reasons for an ASRA abend but the most common is, I believe, in processing decimal fields (S0C7).
Check the transaction dump to see what the program is doing. The PSW should help identify the failing instruction and the instruction can then show what fields you are operating on. You might, for example, be overflowing a fields while accumulating and this field gets re-initialised when you re-launch for items 19-36 &c.
The fact that it abends on a multiple of 18 might also be a clue......
Joined: 11 Jun 2007 Posts: 80 Location: Columbus, Ohio
From the fine manual:
Explanation: The task has terminated abnormally because of a program check.
System Action: The task is abnormally terminated and CICS issues either message DFHAP0001 or DFHSR0001. Message DFHSR0622 may also be issued.
User Response: Refer to the description of the associated message or messages to determine and correct the cause of the program check.