! ********************************************************************************************************************************
!  Created: 12-JUN-2006 19:50:23 by OpenVMS SDL EV1-69     
!  Source:  23-AUG-1995 17:32:15 $2$DUA315:[OSAK.V30_AXP_BUILDS.VT.TEMP.SRC]OSAK 
! ********************************************************************************************************************************
 
!*** MODULE osak_rose_code IDENT X01 ***
!DEC$ OPTIONS/ALIGN=(RECORDS=PACKED,COMMONS=PACKED)/NOWARN
 !  Copyright Digital Equipment Corporation 1985,1995.  All rights reserved.
 !  
 !  Restricted Rights: 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, or in FAR 52.227-14 Alt. III, as 
 !  applicable.
 !  
 !  This software is proprietary to and embodies the confidential technology 
 !  of Digital Equipment Corporation.  Possession, use, or copying of this 
 !  software and media is authorized only pursuant to a valid written license 
 !  from Digital or an authorised sublicensor.
 ! 
	PARAMETER ROSE_C_INVOKE = '00000001'X
	PARAMETER ROSE_C_RESULT = '00000002'X
	PARAMETER ROSE_C_ERROR = '00000003'X
	PARAMETER ROSE_C_REJECT_U = '00000004'X
	PARAMETER ROSE_C_REJECT_P = '00000005'X
	PARAMETER ROSE_C_OPVAL_LOCAL = '00000001'X
	PARAMETER ROSE_C_OPVAL_GLOBAL = '00000002'X
	PARAMETER RORJ_C_INVOKEID_INTEGER = '00000001'X
	PARAMETER RORJ_C_INVOKEID_NULL = '00000002'X
	PARAMETER RORJ_C_GEN_PROB = '00000000'X
	PARAMETER RORJ_C_INVOK_PROB = '00000001'X
	PARAMETER RORJ_C_RET_RES_PROB = '00000002'X
	PARAMETER RORJ_C_RET_ERR_PROB = '00000003'X
	PARAMETER RORJ_C_RETURN_PARAM = '00000004'X
	PARAMETER RORJ_C_UNREC_APDU = '00000000'X
	PARAMETER RORJ_C_MISTYPE_ADPU = '00000001'X
	PARAMETER RORJ_C_BAD_STRUC_APDU = '00000002'X
	PARAMETER RORJ_C_DUPLIC_INV = '00000000'X
	PARAMETER RORJ_C_UNREC_OPER = '00000001'X
	PARAMETER RORJ_C_MISTYPE_ARG = '00000002'X
	PARAMETER RORJ_C_RES_LIMIT = '00000003'X
	PARAMETER RORJ_C_INIT_REL = '00000004'X
	PARAMETER RORJ_C_UNREC_LINK = '00000005'X
	PARAMETER RORJ_C_LINK_RESP_UNEXP = '00000006'X
	PARAMETER RORJ_C_UNEXP_CHILD_OPER = '00000007'X
	PARAMETER RORJ_C_UNREC_INV = '00000000'X
	PARAMETER RORJ_C_RES_RESP_UNEXP = '00000001'X
	PARAMETER RORJ_C_MISTYPE_RES = '00000002'X
	PARAMETER RORJ_C_UNREC_INV = '00000000'X
	PARAMETER RORJ_C_ERR_RESP_UNEXP = '00000001'X
	PARAMETER RORJ_C_UNREC_ERR = '00000002'X
	PARAMETER RORJ_C_UNEXP_ERR = '00000003'X
	PARAMETER RORJ_C_MISTYPE_PAR = '00000004'X
!DEC$ END OPTIONS