! *** 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 30-MAR-2010 16:57:37.66
    ! 
    !  *************************************************************************
    !  *                                                                       *
    !  * © COPYRIGHT 2003 HEWLETT-PACKARD DEVELOPMENT COMPANY, L.P.            *
    !  *                                                                       *
    !  * CONFIDENTIAL COMPUTER SOFTWARE.  VALID LICENSE FROM HP AND/OR         *
    !  * ITS SUBSIDIARIES REQUIRED FOR POSSESSION, USE, OR COPYING.            *
    !  *                                                                       *
    !  * CONSISTENT WITH FAR 12.211 AND 12.212, COMMERCIAL COMPUTER SOFTWARE,  *
    !  * COMPUTER SOFTWARE DOCUMENTATION, AND TECHNICAL DATA FOR COMMERCIAL    *
    !  * ITEMS ARE LICENSED TO THE U.S. GOVERNMENT UNDER VENDOR'S STANDARD     *
    !  * COMMERCIAL LICENSE.                                                   *
    !  *                                                                       *
    !  * NEITHER HP NOR ANY OF ITS SUBSIDIARIES SHALL BE LIABLE FOR TECHNICAL  *
    !  * OR EDITORIAL ERRORS OR OMISSIONS CONTAINED HEREIN.  THE INFORMATION   *
    !  * IN THIS DOCUMENT IS PROVIDED "as is" WITHOUT WARRANTY OF ANY KIND AND *
    !  * IS SUBJECT TO CHANGE WITHOUT NOTICE.  THE WARRANTIES FOR HP PRODUCTS  *
    !  * ARE SET FORTH IN THE EXPRESS LIMITED WARRANTY STATEMENTS ACCOMPANYING *
    !  * SUCH PRODUCTS.  NOTHING HEREIN SHOULD BE CONSTRUED AS CONSTITUTING AN *
    !  * ADDITIONAL WARRANTY.                                                  *
    !  *                                                                       *
    !  *************************************************************************
    ! ++
    ! 
    !  FACILITY:
    ! 
    ! 	VAX/VMS LICENSING SYSTEM SERVICES
    ! 
    !  ABSTRACT:
    ! 
    ! 	THIS MODULE DEFINES THE STATUS CODES FOR THE VARIOUS ERROR CONDITIONS
    ! 	THAT CAN OCCUR WHILE ATTEMPTING TO DO LICENSING CHECKS FOR A
    ! 	DSLA LICENSED SOFTWARE PRODUCT.
    ! 
    !  AUTHOR:
    ! 
    ! 	TRUDY C. MATTHEWS
    ! 
    !  CREATION DATE:
    ! 
    ! 	26 JANUARY 1987
    ! 
    !  MODIFIED BY:
    ! 
    ! 	X-10	GP030104	GUY PELEG		01-MAR-2004
    ! 		ADD NONCOMPLIANCE.
    ! 
    ! 	X-9	GP121003	GUY PELEG		10-DEC-2003
    ! 		UPDATE ILLPRODUCER TO INCLUDE HP.
    ! 
    !  	X-8	EAG2 		ERIC ABIS      		3-JUN-1998
    !  		ADDED USER_MODE.     
    !  		
    ! 	X-7	EA12 		ERIC ABIS      		4-APR-1995
    ! 		ADDED INVALID_TOKEN.
    ! 		
    ! 	X-6	EA001 		ERIC ABIS      		29-APR-1991
    ! 		ADDED MESSAGE FOR PRODUCTS WITH RESERVE LISTS.  IT IS
    ! 		PUT IN THE PLACE OF THE CURRENTLY UNUSED INVALID_HW_ID
    ! 		MESSAGE BECAUSE THE SEPARATE RELEASE OF LMF 1.1 REQUIRED
    ! 		THE PATCHING OF SYSMSG.EXE.  THIS PATCH REPLACED
    ! 		INVALID_HW_ID WITH NOTINRSRVLIST.  FUTURE RELEASES OF
    ! 		VMS, IF THEY INCLUDE LMF 1.1, WILL NOT HAVE TO PATCH
    ! 		AND NOTINRSRVLIST WILL RETAIN ITS VALUE.  THE UNUSED
    ! 		INVALID_HW_ID WILL GET A NEW MESSAGE NUMBER AND THE
    ! 		IMPACT SHOULD BE MINIMAL
    ! 
    ! 	X-5	JWN009		JOHN W. NOGRADY		03-NOV-1987
    ! 		UPDATE MESSAGE TEXT AND ALLOW FOR "room to grow".
    ! 
    ! 	X-4	JWN001		JOHN W. NOGRADY		14-OCT-1987
    ! 		ADD MESSAGES NOAUTH AND SYSMGR.  THESE MESSAGES WILL
    ! 		BE THE FIRST TWO VALUES IN THE MESSAGE VECTOR USED IN
    ! 		THE ROUTINE $LOOKUP_LICENSE.
    ! 
    ! 	X-3	DKH001		KEN HOBDAY		19-SEP-1987
    ! 		ADD ADDITIONAL MESSAGES FOR LMF$GRANT_LICENSE
    ! 
    ! 	X-2	TCM0002		TRUDY C. MATTHEWS	09-MAR-1987
    ! 		REMOVE WORD WARRANTY FROM LICENSE STATUS MESSAGES.
    ! 
    ! 	X-1	TCM0001		TRUDY C. MATTHEWS	26-JAN-1987
    ! 		INITIAL VERSION.
    ! --
      DECLARE LONG CONSTANT LICENSE_FACILITY = 2708
    !  SUCCESS CODES
    !  THESE CODES RETURN INFORMATION
      DECLARE LONG CONSTANT LICENSE$_SYSMGR = 177505059
      DECLARE LONG CONSTANT LICENSE$_NONCOMPLIANCE = 177505067
    !  THESE CODES RETURN SLIGHTLY DISMAYING INFORMATION
    !  THESE CODES INDICATE UNRECOVERABLE ERRORS
      DECLARE LONG CONSTANT LICENSE$_NOAUTH = 177507058
    !  ALL OF THESE ARE FATAL
      DECLARE LONG CONSTANT LICENSE$_NOLICENSE = 177507860
      DECLARE LONG CONSTANT LICENSE$_EXCEEDED = 177507868
      DECLARE LONG CONSTANT LICENSE$_NOT_STARTED = 177507876
      DECLARE LONG CONSTANT LICENSE$_INVALID_DATE = 177507884
      DECLARE LONG CONSTANT LICENSE$_INVALID_VERSION = 177507892
      DECLARE LONG CONSTANT LICENSE$_TERMINATED = 177507900
      DECLARE LONG CONSTANT LICENSE$_NOTINRSRVLIST = 177507908
    ! +
    !  RETURNED BY SYS$LOOKUP_LICENSE
    ! -
      DECLARE LONG CONSTANT LICENSE$_BADPARAM = 177507916
      DECLARE LONG CONSTANT LICENSE$_ILLPRODUCER = 177507924
      DECLARE LONG CONSTANT LICENSE$_WRONUMARG = 177507932
      DECLARE LONG CONSTANT LICENSE$_INVALID_HW_ID = 177507940
      DECLARE LONG CONSTANT LICENSE$_INVALID_TOKEN = 177507948
    ! +
    !  NEW MESSAGES
    ! -
      DECLARE LONG CONSTANT LICENSE$_USER_MODE = 177507956