! *** PREDECLARED TYPES
     
      %IF %DECLARED ( %BASIC$QUADWORD_DECLARED ) = 0 %THEN
         RECORD BASIC$QUADWORD
            LONG FILL ( 2 )
         END RECORD
         %LET %BASIC$QUADWORD_DECLARED = 1
      %END %IF
     
      %IF %DECLARED ( %BASIC$OCTAWORD_DECLARED ) = 0 %THEN
         RECORD BASIC$OCTAWORD
            LONG FILL ( 4 )
         END RECORD
         %LET %BASIC$OCTAWORD_DECLARED = 1
      %END %IF
     
      %IF %DECLARED ( %BASIC$HFLOAT_AXP_DECLARED ) = 0 %THEN
         RECORD BASIC$HFLOAT_AXP
            LONG FILL ( 4 )
         END RECORD
         %LET %BASIC$HFLOAT_AXP_DECLARED = 1
      %END %IF
     
      %IF %DECLARED ( %BASIC$F_FLOATING_COMPLEX_DECL ) = 0 %THEN
         RECORD BASIC$F_FLOATING_COMPLEX
            SINGLE REAL_PART
            SINGLE IMAGINARY_PART
         END RECORD
         %LET %BASIC$F_FLOATING_COMPLEX_DECL = 1
      %END %IF
     
      %IF %DECLARED ( %BASIC$D_FLOATING_COMPLEX_DECL ) = 0 %THEN
         RECORD BASIC$D_FLOATING_COMPLEX
            DOUBLE REAL_PART
            DOUBLE IMAGINARY_PART
         END RECORD
         %LET %BASIC$D_FLOATING_COMPLEX_DECL = 1
      %END %IF
     
      %IF %DECLARED ( %BASIC$G_FLOATING_COMPLEX_DECL ) = 0 %THEN
         RECORD BASIC$G_FLOATING_COMPLEX
            GFLOAT REAL_PART
            GFLOAT IMAGINARY_PART
         END RECORD
         %LET %BASIC$G_FLOATING_COMPLEX_DECL = 1
      %END %IF
     
      %IF %DECLARED ( %BASIC$H_FLOAT_AXP_CMPLX_DCL ) = 0 %THEN
         RECORD BASIC$H_FLOATING_COMPLEX_AXP
            BASIC$HFLOAT_AXP REAL_PART
            BASIC$HFLOAT_AXP IMAGINARY_PART
         END RECORD
         %LET %BASIC$H_FLOAT_AXP_CMPLX_DCL = 1
      %END %IF
    
    
    ! 
    !  This SDL File Generated by VAX-11 Message V04-00 on  9-MAR-2021 22:26:23.44
    ! 
    ! 	.TITLE	DDTMMSGDEF -- DECDTM SERVICES EXTENDED REASON CODES
    ! 
    ! *************************************************************************
    ! *                                                                       *
    ! * COPYRIGHT (C) DIGITAL EQUIPMENT CORPORATION, 1991, 1993               *
    ! * ALL RIGHTS RESERVED.                                                  *
    ! * UNPUBLISHED RIGHTS RESERVED UNDER THE COPYRIGHT LAWS  OF  THE  UNITED *
    ! * STATES.                                                               *
    ! *                                                                       *
    ! * THE SOFTWARE CONTAINED ON THIS MEDIA IS PROPRIETARY TO  AND  EMBODIES *
    ! * THE   CONFIDENTIAL   TECHNOLOGY  OF  DIGITAL  EQUIPMENT  CORPORATION. *
    ! * POSSESSION, USE, DUPLICATION OR DISSEMINATION  OF  THE  SOFTWARE  AND *
    ! * MEDIA  IS  AUTHORIZED  ONLY  PURSUANT TO A VALID WRITTEN LICENSE FROM *
    ! * DIGITAL EQUIPMENT CORPORATION.                                        *
    ! *                                                                       *
    ! * RESTRICTED RIGHTS LEGEND USE, DUPLICATION, OR DISCLOSURE BY THE  U.S. *
    ! * GOVERNMENT  IS  SUBJECT  TO RESTRICTIONS AS SET FORTH IN SUBPARAGRAPH *
    ! * (C)(1)(II) OF DFARS 252.227-7013, OR IN FAR 52.227-19, AS APPLICABLE. *
    ! *                                                                       *
    ! *************************************************************************
    ! 
    ! ++
    !  FACILITY: DDTM
    ! 
    !  ABSTRACT:
    ! 
    ! 	THIS MODULE DEFINES THE EXTENDED TRANSACTION ABORT REASON CODES FOR THE
    ! 	DECDTM TRANSACTION MANAGER.
    ! 
    !  ENVIRONMENT:
    ! 	VMS V5.4 OR LATER.
    ! 
    !  AUTHOR: JAMES E JOHNSON			CREATION DATE:  27-FEB-1990
    ! 
    !  MODIFIED BY:
    ! 
    ! 	A-4	KJP		KEVIN PLAYFORD		15-SEP-1993
    ! 		UPDATED ALPHA VERSION OF DECDTM MESSAGES TO REFLECT MESSAGE
    ! 		TEXT AS FOUND IN HELP MESSAGE TEXT.
    ! 
    ! 	A-3	KJP		KEVIN PLAYFORD		23-AUG-1993
    ! 		UPDATED ALPHA VERSION OF DECDTM MESSAGES TO DECDTM V1.2
    ! 		FUNCTIONALITY.
    ! 
    ! 		*** VAX CHANGES PICKED UP FOR ALPHA
    ! 
    ! 		X-6	RM	RUDI MARTIN		 9-AUG-1993
    ! 			UPDATE SYNCH_FAIL AND ORPHAN_BRANCH MESSAGES TO
    ! 			CORRESPOND TO THEIR HELP/MESSAGE TEXT.
    ! 
    ! 	A-2	KJP		KEVIN PLAYFORD		20-JUL-1993
    ! 		UPDATED ALPHA VERSION OF DECDTM MESSAGES TO DECDTM V1.2
    ! 		FUNCTIONALITY.
    ! 
    ! 		*** VAX CHANGES PICKED UP FOR ALPHA
    ! 
    ! 		X-5	RM	RUDI MARTIN		25-FEB-1993
    ! 			ADD XA ERROR CODES.
    ! 
    ! 		X-4	CW	CHRIS WHITAKER		26-FEB-1991
    ! 			MODIFY WORDING ON SOME MESSAGES TO CONFORM TO
    ! 			FUNCTIONAL SPECIFICATION OF DECDTM V1.2.
    ! 
    ! 	X-3	CW1023		CHRIS WHITAKER		21-MAY-1990
    ! 		ADD RESERVED CODE AS FIRST MESSAGE.
    ! 
    ! 	X-2	JEJ0599		JAMES E JOHNSON		23-APR-1990
    ! 		ADD LOG_FAIL, SYNC_FAIL, AND ORPHAN_BRANCH
    ! 
    ! --
      DECLARE LONG CONSTANT DDTM$_FACILITY = 1187
      DECLARE LONG CONSTANT DDTM$_UNKNOWN = 0  !  NO EXTENDED CODE PROVIDED
    !  ERROR CODES:
    ! 
      DECLARE LONG CONSTANT DDTM$_RESERVED = 77824002
      DECLARE LONG CONSTANT DDTM$_TIMEOUT = 77824010
      DECLARE LONG CONSTANT DDTM$_PART_TIMEOUT = 77824018
      DECLARE LONG CONSTANT DDTM$_SEG_FAIL = 77824026
      DECLARE LONG CONSTANT DDTM$_COMM_FAIL = 77824034
      DECLARE LONG CONSTANT DDTM$_VETOED = 77824042
      DECLARE LONG CONSTANT DDTM$_ABORTED = 77824050
      DECLARE LONG CONSTANT DDTM$_SERIALIZATION = 77824058
      DECLARE LONG CONSTANT DDTM$_PART_SERIAL = 77824066
      DECLARE LONG CONSTANT DDTM$_INTEGRITY = 77824074
      DECLARE LONG CONSTANT DDTM$_LOG_FAIL = 77824082
      DECLARE LONG CONSTANT DDTM$_SYNC_FAIL = 77824090
      DECLARE LONG CONSTANT DDTM$_ORPHAN_BRANCH = 77824098
      DECLARE LONG CONSTANT DDTM$_DEADLOCK = 77824106
      DECLARE LONG CONSTANT DDTM$_PROTERROR = 77824114
      DECLARE LONG CONSTANT DDTM$_ROLLBACK = 77824122
      DECLARE LONG CONSTANT DDTM$_TRANSIENT = 77824130