Previous Topic: Limit CICS RequestsNext Topic: Remove the MXS Option


Remove the MXR Option

Now you can remove the MXR option so that ASMDEMO continues executing. If this were your own program, you would want to examine the instructions that are generating excessive CICS requests.

  1. Type status in the Command field and press Enter (or press PF12).

    CA InterTest for CICS displays the Monitoring Status display.

  2. To remove an option, tab to the Option, enter an r, and press Enter.

    Note: Only remove the MXR option; do not remove or modify the MXS option.

  3. Tab to the MXR entry.
  4. Type R.
  5. Press Enter.

    ‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑ CA InterTest for CICS Release 9.1.00 MONITORING STATUS ‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑ COMMAND ===> Type + to expand or ‑ collapse option levels displayed below, or R to remove option(s). Option Description Attributes _ ‑ ASMDEMO Program monitor entry Assembler | Waiting at breakpoint Task 00079, ABP since 02:20 p.m. _ ‑ |‑.ANY User monitoring options Active | Symbolic listing file PROTSYM r |‑MXR Maximum CICS requests 20 _ |‑MXS Maximum total storage 50000 . .

    CA InterTest for CICS removes the MXR option.

  6. Press PF3 to return to the Source Listing Breakpoint screen.

    Notice that the explanation of the abend does not redisplay so that more of your source listing can be displayed.

Limit Storage Acquisition

  1. Press PF5 to resume program execution.

    The next screen you see is an automatic breakpoint display. CA InterTest for CICS halted ASMDEMO at an automatic breakpoint because the maximum main storage limit of 50,000 was exceeded.

    Note: In most cases, the instruction that triggered the automatic breakpoint is within a loop containing a GETMAIN request.

    CA InterTest for CICS Release 9.1.00 - PROTSYM FILE ABEND DETECTED BREAKPOINT COMMAND ===> Program= ASMDEMO Option # Stmt # Displacement= Margin= 28 Search= ----------+-------------------------------------------------------------------- Loc Object Code Addr1 Addr2 Stmt Source Statement 2875 * PRINT GEN A 0021B4 ==> CP LOOPCTR,=P'+10' ==> ==> MXS (max storage size) trigger value exceeded. ==> ==> Press PF1 for a detailed description. ==> _ 0021BA 2877 BE SENDMP00 _ 0021BE 2878 AP LOOPCTR,=P'+1' _ 0021C4 2879 B GETMLOOP _ 0021C8 2881 NOSTORG DS 0H _ 0021C8 2882 MVC ERRORO,=CL10'NO STORAGE' 2883 * EXEC CICS SEND 2884 * MAP('DERROR') 2885 * MAPSET('IN25AMP') 2886 * ERASE 2887 DFHECALL =X'1804D000080000000005E204000020',(CHA7,=CL 00068 ),(______RF,DERRORO),,(CHA7,=CL7'IN25AMP')