Hi all,
In IMS V6R1, How a "LOST POINTER" may be created in a database and how we can
prevent the Abend U0852 in batch process?
This is part of system log at the time of Abend:
***************************************************************************************************************************************************************************
01.25.19 JOB01569 $HASP375 RETPJU11 ESTIMATE EXCEEDED BY 2,718,000
LINES 2 % SPOOL
01.25.21 JOB01569 +DFS629I IMS BATCH REGION ABEND- IMS 0852 IMSA
01.25.21 JOB01569 +DFS629I PSW AT ERROR = 078D1000 80011B94 IMSA
01.25.22 JOB01569 +DFS0096W DATA BASE BUFFERS PURGED,UPDATE INTENT,NOLOG
SELECTED IMSA
01.25.22 JOB01569 +DFS036I BATCH BACKOUT NOT REQUIRED FOR RETPJU11 IMSA
01.25.22 JOB01569 $HASP375 RETPJU11 ESTIMATE EXCEEDED BY 2,724,000
LINES 2 % SPOOL
01.25.22 JOB01569 $HASP375 RETPJU11 ESTIMATE EXCEEDED BY 2,730,000
LINES 2 % SPOOL
01.25.23 JOB01569 IEA995I SYMPTOM DUMP OUTPUT
USER COMPLETION CODE=0852
TIME=01.25.21 SEQ=41921 CPU=0000 ASID=0029
PSW AT TIME OF ERROR 078D1000 80011B94 ILC 2 INTC 0D
ACTIVE LOAD MODULE ADDRESS=000114B0
OFFSET=000006E4
NAME=DFSPR000
DATA AT PSW 00011B8E - 00181610 0A0D0A0D 00000000
GPR 0-3 80000000 80000354 00006A08 00006B68
GPR 4-7 50000354 00008E90 00072C98 09EAB038
GPR 8-11 89EAA458 09E7C204 00000004 0002F060
GPR 12-15 000114B0 80006B20 80011784 00000000
END OF SYMPTOM DUMP
01.25.23 JOB01569 DFS627I IMS RTM CLEANUP ( EOT ) COMPLETE FOR JS
RETPJU11.RETPU011. ,RC=00
01.25.23 JOB01569 IEF450I RETPJU11 RETPU011 - ABEND=S000 U0852 REASON=00000000
TIME=01.25.23
01.25.23 JOB01569 - --TIMINGS
(MINS.)-- ----PAGING COUNTS---
01.25.23 JOB01569 -JOBNAME STEPNAME PROCSTEP RC EXCP CONN TCB
SRB CLOCK SERV PG PAGE SWAP VIO SWAPS
01.25.23 JOB01569 -RETPJU11 RETPU011 U0852 430K 584K 18.22
.19 30.2 57358K 2 0 0 0 0
01.25.23 JOB01569 -RETPJU11 JOB1 FLUSH 0 0 .00
.00 .0 0 2 0 0 0 0
01.25.23 JOB01569 IEF404I RETPJU11 - ENDED - TIME=01.25.23
01.25.23 JOB01569 -RETPJU11 ENDED. NAME-AXSYS-BATCH-0135 TOTAL TCB CPU
TIME= 18.22 TOTAL ELAPSED TIME= 30.2
01.25.23 JOB01569 $HASP395 RETPJU11 ENDED
***************************************************************************************************************************************************************************
All the best,
Mehrdad Rastegar.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
