You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
<strong>CICS</strong> <strong>Nuts</strong>, <strong>Bolts</strong>, <strong>and</strong> <strong>Gotchas</strong><br />
Steve Ware, UF<br />
Session: 1080, SHARE: 103<br />
Fri., 08/20/2004, 11:00<br />
Hilton New York – Second Floor – Murray Hill A<br />
mailto: sfw@cns.ufl.edu<br />
http://nersp.cns.ufl.edu/~sfware/share103/s1080sfw.pdf
EXEC <strong>CICS</strong> READ SET(ptr-ref)<br />
The pointer reference is valid until the next READ comm<strong>and</strong><br />
for the same file or until completion of a corresponding<br />
REWRITE, DELETE, or UNLOCK comm<strong>and</strong>, or a<br />
SYNCPOINT in the case of READ UPDATE SET. If you<br />
want to retain the data within the field addressed by the<br />
pointer, it should be moved to your own area.<br />
Note:<br />
<strong>CICS</strong> maint. within the past year seems to "enforce" what<br />
the doc. says about READ SET(ptr-ref), <strong>and</strong> has been<br />
seen in <strong>CICS</strong> TS 2.2 <strong>and</strong> 2.3.
DFHDSTCB 0C4/AKEA<br />
DFHDS0001 applid An abend (code 0C4/AKEA)<br />
has occurred at offset X'03AE' in module DFHDSTCB.<br />
APAR PQ83224 PTF UQ84085 SUPBY(UQ84133)<br />
APAR Identifier ...... PQ83224 Last Changed ........ 04/03/02<br />
LOOP HANG HUNG DB2 FORCE PURGE<br />
MERGE_FRONT_TO_BACK GENERAL_NEXT<br />
PROBLEM DESCRIPTION: Loop in <strong>CICS</strong> after DB2 crashed.
DFHDSDS3 OC4/AKEA<br />
DFHDS0001 applid An abend (code 0C4/AKEA) has<br />
occurred at offset X'0B9A' in module DFHDSDS3.<br />
APAR PQ87991/UQ88792 SUPBY(UQ90594)<br />
APAR Identifier ...... PQ87991 Last Changed ........ 04/06/03<br />
MSGDFHDS0001 ABEND0C4 REPORTED IN DFHDSDS3<br />
AT +X'B9A', DUE TO A PROGRAM CHECK OCCURRING<br />
IN DFHZLGX +X'8C4'.
prefix.SDFHPROC(DFHYITEL)<br />
//*============================================<br />
//* C++ TRANSLATE, COMPILE AND LINK FOR &NAME<br />
//*============================================<br />
//* $P1= D08934 630 030919 HD3SCWG : DFHEILID now<br />
//* in SDFHSAMP<br />
//* $P2= D09277 630 031006 HD3SCWG : Change<br />
//* compiler to CBCDRVRA<br />
DFHEILID used to be in prefix.SDFHC370.<br />
Review your local <strong>CICS</strong> procs for required changes.
Presentation Information<br />
● Slackware Linux 9.1:<br />
http://www.slackware.com/<br />
● OpenOffice 1.1.0 "Impress":<br />
http://www.openoffice.org/<br />
(File -> Export as PDF)<br />
● IBM ThinkPad T40 2379-D5U:<br />
http://www.pc.ibm.com/thinkpad