/********************************************************************************************************************************/
/* Created: 19-JUN-1992 18:08:29 by OpenVMS SDL EV1-11     */
/* Source:  19-JUN-1992 18:04:56 CRTL$:[ROUTLEY.CRTL.SDLFIX.BLADEFIX]RMSUSR.SDI; */
/* Modified: 24-Aug-1992 for C++ compatibility. */
/********************************************************************************************************************************/
/*** MODULE $XABDATDEF ***/
#ifndef __XABDATDEF_LOADED
#define __XABDATDEF_LOADED 1
 
#if defined(__DECC) || defined(__DECCXX)
#pragma __nostandard  /* This file uses non-ANSI-Standard features */
#else
#pragma nostandard
#endif

#if defined(__DECC) || defined(__DECCXX)
#pragma __member_alignment __save
#pragma __nomember_alignment
#endif

#ifdef __DECC
#pragma __message __save
#pragma __message __disable (__MISALGNDSTRCT)
#pragma __message __disable (__MISALGNDMEM)
#endif
 
#ifdef __cplusplus
    extern "C" {
#define __unknown_params ...
#else
#define __unknown_params
#endif
 
#if !defined(__VAXC) && !defined(VAXC)
#define __struct struct
#define __union union
#else
#define __struct variant_struct
#define __union variant_union
#endif

#ifndef __VMS_DATE
#define __VMS_DATE 1
struct __vms_date {
    int : 32;
    int : 32;
    };
#endif

/* Macros produced from STARLET */

/*** MODULE $xabdatdef ***/
/*--                                                                        */
/*++                                                                        */
/*                                                                          */
/*        date/time xab definitions                                         */
/*                $xabdatdef                                                */
/*                                                                          */
#define XAB$C_DAT 18                    /* xabdat id code                   */
#define XAB$K_DATLEN_V2 36              /* Version 2 XABDAT length          */
#define XAB$C_DATLEN_V2 36              /* Version 2 XABDAT length          */
#define XAB$K_DATLEN_V54 44             /* Version V5.4 XABDAT  length      */
#define XAB$C_DATLEN_V54 44
#define XAB$K_DATLEN 60                 /* length of XABDAT                 */
#define XAB$C_DATLEN 60                 /* length of XABDAT                 */
/* The STARLET definition of XABDAT is nearly useless.  This is a hand
 * built version */
struct	XABDAT	{
    unsigned char xab$b_cod;
    unsigned char xab$b_bln;
    unsigned	: 16;			/* spare */
    void *xab$l_nxt;			/* Next XAB in chain */
    unsigned short xab$w_rvn;		/* revision number */
    unsigned	: 16;			/* spare */
    struct __vms_date xab$q_rdt;	/* revision date and time */
   struct __vms_date xab$q_cdt;		/* creation date and time */
   struct __vms_date xab$q_edt;		/* expiration date and time */
   struct __vms_date xab$q_bdt;		/* backup date and time */
   struct __vms_date xab$q_rcd;		/* recorded date and time */
   struct __vms_date xab$q_eff;		/* effective date and time */
};

#define cc$rms_xabdat (*decc$ga_rms_xabdat)

#if defined(__DECC) || defined(__DECCXX)
# pragma __extern_model __save
# pragma __extern_model __strict_refdef
   extern struct XABDAT cc$rms_xabdat;	/* Declare initialized prototype data structures */
# pragma __extern_model __restore
#else
   globalref struct XABDAT cc$rms_xabdat;	/* Declare initialized prototype data structures */
#endif

#if defined(__DECC)
#pragma __message __restore
#endif

#if defined(__DECC) || defined(__DECCXX)
#pragma __member_alignment __restore
#endif
 
#ifdef __cplusplus
    }
#endif
#if defined(__DECC) || defined(__DECCXX)
#pragma __standard  /* This file uses non-ANSI-Standard features */
#else
#pragma standard
#endif
 
#endif /* __XABDATDEF_LOADED */