XMRSC - Transaction Restart Program Commarea

  
  Licensed Materials - Property of IBM
  
  5655-Y04
  
  (C) Copyright IBM Corp. 1992, 2017 All Rights Reserved.
  
  
  %PRODUCT Commarea for Transaction Restart
  
  This control block defines the commarea passed to the
  user-replaceable Transaction Restart program DFHREST.
  
  Although provided as a sample, this control block is not to be
  used as a general programming interface. Refer to the CICS
  Customisation Guide to determine its intended usage.
  
  --------------------------------------------------------------------
Table 1.
Offset Hex Type Len Name (Dim) Description
(0) STRUCTURE 20 XMRS_COMMAREA Transaction restart commarea
(0) CHARACTER 4 XMRS_STANDARD_HEADER Standard commarea header
(0) CHARACTER 1 XMRS_FUNCTION Function (always '1')
(1) CHARACTER 2 XMRS_COMPONENT_CODE Component (always 'XM')
(3) CHARACTER 1 * Reserved
(4) CHARACTER 1 XMRS_READ Terminal read done
(5) CHARACTER 1 XMRS_WRITE Terminal write done
(6) CHARACTER 1 XMRS_SYNCPOINT Syncpoint done
(7) CHARACTER 1 XMRS_RESTART Restart (output)
(8) UNSIGNED 2 XMRS_RESTART_COUNT No. of previous restarts
(A) CHARACTER 2 * Reserved
(C) CHARACTER 4 XMRS_ORIGINAL_ABEND_ CODE Original abend code
(10) CHARACTER 4 XMRS_CURRENT_ABEND_ CODE Current abend code

Constants

Table 2.
Len Type Value Name Description
1 CHARACTER 1 XMRS_TRANSACTION_ RESTART
2 CHARACTER XM XMRS_TRANSACTION_ MANAGER
1 CHARACTER Y XMRS_READ_YES
1 CHARACTER N XMRS_READ_NO
1 CHARACTER Y XMRS_WRITE_YES
1 CHARACTER N XMRS_WRITE_NO
1 CHARACTER Y XMRS_SYNCPOINT_YES
1 CHARACTER N XMRS_SYNCPOINT_NO
1 CHARACTER Y XMRS_RESTART_YES
1 CHARACTER N XMRS_RESTART_NO