/********************************************************************************************************************************/ /* Created: 23-JUN-2005 16:27:50 by OpenVMS SDL EV1-53 */ /* Source: 22-MAY-1991 15:13:27 X25DEVEL$VMS$ROOT:[LESV3.SRC]PSILIB.SDL;1 */ /********************************************************************************************************************************/ /*** MODULE $psidef ***/ #pragma __member_alignment __save #pragma __nomember_alignment /* */ /* PSI: */ /* These are Network Connect Block codes and various status codes. */ /* */ #define psi$c_ncb_null 0 /* Network connect null data type */ #define psi$c_ncb_remdte 1 /* Remote DTE address */ #define psi$c_ncb_remsubadr 2 /* Remote DTE sub-address */ #define psi$c_ncb_locdte 3 /* Local DTE address */ #define psi$c_ncb_locsubadr 4 /* Local DTE subaddress */ #define psi$c_ncb_userdata 5 /* Outgoing call data */ #define psi$c_ncb_respdata 6 /* Response data field */ #define psi$c_ncb_objname 7 /* Process to handle call */ #define psi$c_ncb_endtoend 8 /* Outgoing end to end acknowledgment (D-bit) */ #define psi$c_ncb_endtoendr 9 /* Call requires end to end acknowledgment (D-bit) */ #define psi$c_ncb_gateway 10 /* Gateway name */ #define psi$c_ncb_ici 11 /* Incoming call identifier */ #define psi$c_ncb_revchg 12 /* Reverse charge for this call */ #define psi$c_ncb_locfacr 13 /* Facilities for call accept */ #define psi$c_ncb_fsel 14 /* Fast select for outgoing call */ #define psi$c_ncb_fsel_res 15 /* Restricted response fast select */ #define psi$c_ncb_thrucls 16 /* Throughput class */ #define psi$c_ncb_cug 17 /* Closed user group name */ #define psi$c_ncb_diagcode 18 /* Clear 8 bit diagnostics code */ #define psi$c_ncb_cause 19 /* Clear 8 bit cause code */ #define psi$c_ncb_reason 20 /* Clear 8 bit reason code */ #define psi$c_ncb_pktsize 21 /* Packet size-must be power of 2 */ #define psi$c_ncb_winsize 22 /* Window size */ #define psi$c_ncb_locfac 23 /* Local facilities */ #define psi$c_ncb_pvcnam 24 /* PVC name */ /* */ /* The following codes are mainly for internal use. */ /* They may not normally be used by a user program */ /* (require PHYSIO and SYSPRV privileges) */ /* */ /* Used to be ncb_dte (or ncb_line) */ #define psi$c_ncb_pvcset 26 /* Set up PVC */ #define psi$c_ncb_lcn 27 /* Select LCN */ #define psi$c_ncb_cugn 28 /* Closed user group number */ #define psi$c_ncb_cugnb 29 /* Bilateral closed user group number */ #define psi$c_ncb_locnet 30 /* Local network name */ /* */ /* The following codes are for use in gateway/access. */ /* */ #define psi$c_ncb_network 30 /* For use in gateway access (Same as NCB_LOCNET) */ #define psi$c_ncb_userid 31 /* User id */ #define psi$c_ncb_password 32 /* Password */ #define psi$c_ncb_account 33 /* Account */ /* */ /* The following are general NCB item codes */ /* */ #define psi$c_ncb_pridst 34 /* priority of the activated destination */ #define psi$c_ncb_prired 35 /* priority to skip in redirection */ #define psi$c_ncb_rcv_quota 36 /* receive buffer quota */ /* */ /* New CCITT 1984 facilities */ /* */ #define psi$c_ncb_net_user_id 37 /* Network User Identification facility */ #define psi$c_ncb_charging_info 38 /* Charging Information facility (request) */ #define psi$c_ncb_charge_mon 39 /* Charging Information facility (monetary units) */ #define psi$c_ncb_charge_seg 40 /* Charging Information facility (segment count) */ #define psi$c_ncb_charge_time 41 /* Charging Information facility (duration) */ #define psi$c_ncb_rpoa 42 /* RPOA Selection facility */ #define psi$c_ncb_addr_mod_rsn 43 /* Called Line Address Modified Notification facility (reason) */ #define psi$c_ncb_call_redir_rsn 44 /* Call Redirection facility (reason) */ #define psi$c_ncb_call_redir_orig 45 /* Call Redirection facility (original address) */ #define psi$c_ncb_transit_delay 46 /* Transit Delay Selection and Notification facility */ /* */ /* CCITT specified DTE facilities for OSI network service */ /* */ #define psi$c_ncb_calling_extension 47 /* Calling Address Extension facility */ #define psi$c_ncb_called_extension 48 /* Called Address Extension facility */ #define psi$c_ncb_min_thrucls 49 /* Minimum Throughput Class facility */ #define psi$c_ncb_expedite 50 /* Expedited Data Negotiation facility */ /* */ /* ISO end-to-end transit delay facility fields */ /* */ #define psi$c_ncb_cum_trst_dly 51 /* Cumulative Transit Delay (in outgoing and incoming calls) */ #define psi$c_ncb_cum_trst_dly_r 52 /* Cumulative Transit Delay (in call accepts) */ #define psi$c_ncb_ete_trst_dly 53 /* End-to-end Transit Delay */ #define psi$c_ncb_max_trst_dly 54 /* Maximum Acceptable End-to-end Transit Delay */ #define psi$c_ncb_incoming_dte 55 /* Incoming DTE address ( from called dte field). */ /* */ /* X.29 PAD reselection DTE field */ /* */ #define psi$c_ncb_reselect_dte 56 /* Reselection DTE */ /* */ /* Phase V items */ /* */ #define psi$c_ncb_template 57 /* template */ #define psi$c_ncb_local_id 58 /* name of local user. */ #define psi$c_ncb_def_dteclass 59 /* default dteclass (NW uses this to pass */ /* the translation of PSI$NETWORK. */ #define psi$c_ncb_flt_pri 60 /* priority of phase V filter */ #define psi$c_ncb_flt_redpri 61 /* priority of phase V filter */ #define psi$c_ncb_snm_cug 62 /* simplename of group */ #define psi$c_ncb_snm_dteclass 63 /* simplename of dteclass */ #define psi$c_ncb_snm_filter 64 /* simplename of filter */ #define psi$c_ncb_snm_template 65 /* simplename of template */ #define psi$c_ncb_snm_pvcnam 66 /* simplename of pvc name */ #define psi$c_ncb_snm_port 67 /* simplename of port name */ /* */ /* Added to supply device unit number to user interface */ /* */ #define psi$c_ncb_unit_number 68 /* longword item */ /* */ /* User defined NCB items */ /* */ #define psi$c_ncb_last_itm 69 /* Marks the end of PSI items to allow for */ /* user defined items */ /* */ #define psi$c_ncb_dteclass 30 #define psi$c_ncb_filter 7 /* */ /* Item List Codes for Network Process Declaration */ /* */ #define psi$c_ntd_acclvl 1 /* Access level (X.25 or X.29) */ #define psi$c_ntd_salo 2 /* DTE subaddress range low end */ #define psi$c_ntd_sahi 3 /* DTE subaddress range high end */ #define psi$c_ntd_remdte 4 /* Remote DTE address */ #define psi$c_ntd_usrgrp 5 /* CUG/BCUG Name */ #define psi$c_ntd_usrdata 6 /* User data field */ #define psi$c_ntd_datmsk 7 /* User data mask */ #define psi$c_ntd_priority 8 /* Priority */ #define psi$c_ntd_redrsn 9 /* Redirect reason */ #define psi$c_ntd_network 10 /* Network name */ #define psi$c_ntd_rcvdte 11 /* Receiving dte */ #define psi$c_ntd_called_dte 12 /* Called dte */ #define psi$c_ntd_incdte 13 /* Incoming dte */ #define psi$c_ntd_extmsk 14 /* Called extension mask */ #define psi$c_ntd_extval 15 /* Called extension value */ #define psi$c_ntd_name 16 /* Name of destination created */ #define psi$c_ntd_local_id 17 /* Name of local user. */ #define psi$c_ntd_uic 18 /* Users UIC */ #define psi$c_ntd_flt_pri 19 /* Phase V priority value */ #define psi$c_ntd_snm_security_filter 20 /* Security entity used for this filter */ #define psi$c_ntd_snm_usrgrp 21 /* Simplename for CUG/BCUG */ #define psi$c_ntd_snm_dteclass 22 /* Simplename for dteclass */ #define psi$c_ntd_snm_filter 23 /* Simplename for filter */ #define psi$c_ntd_filter 16 #define psi$c_ntd_dteclass 10 /* */ /* Codes for redirect reason */ /* */ #define psi$c_redrsn_busy 0 #define psi$c_redrsn_out_of_order 1 #define psi$c_redrsn_systematic 2 /* */ /* Clear/Reset/Restart Cause Codes from Level 3 */ /* */ #define psi$c_l3_local 1 /* Host requested */ #define psi$c_l3_netwrk 2 /* Network initiated */ #define psi$c_l3_neterr 3 /* Network protocol error */ #define psi$c_l3_locerr 4 /* Local protocol error */ #define psi$c_l3_lnkrst 5 /* Link reset */ #define psi$c_l3_lnkdwn 6 /* Link down */ #define psi$c_l3_lnkup 7 /* Link up */ #define psi$c_l3_lnkrrt 8 /* Link restarted */ #define psi$c_l3_locmgt 9 /* Network management function */ #define psi$c_l3_calcol 10 /* Call collision */ #define psi$c_l3_nettim 11 /* Timeout on network */ #define psi$c_l3_gatdisc 12 /* Gap logical link disconnected by gateway */ #define psi$c_l3_netdisc 13 /* Gap logical link lost */ /* */ /* I/O Status Returns */ /* */ #define psi$m_moredata 0x1 #define psi$m_qualified 0x2 #define psi$m_sts_pvc 0x1 #define psi$m_sts_locdtelng 0x2 #define psi$m_sts_remdtelng 0x4 #define psi$m_sts_userlng 0x8 #define psi$m_sts_winbad 0x10 #define psi$m_sts_pktbad 0x20 #define psi$m_sts_thrbad 0x40 #define psi$m_sts_rpoalng 0x80 #define psi$m_sts_wordbad 0x100 union fill_1 { struct { unsigned psi$v_moredata : 1; /* More data follows (M-bit) */ unsigned psi$v_qualified : 1; /* Qualified sub-channel (Q-bit) */ unsigned psi$v_fill_0 : 6; } psi$r_fill_2; struct { /* */ /* Status flags for IOST2 */ /* */ unsigned psi$v_sts_pvc : 1; /* PVC setup MUST BE LOW ORDER BIT */ unsigned psi$v_sts_locdtelng : 1; /* Local dte address too long - truncated */ unsigned psi$v_sts_remdtelng : 1; /* Remote dte address too long - truncated */ unsigned psi$v_sts_userlng : 1; /* Too much user data supplied - truncated */ unsigned psi$v_sts_winbad : 1; /* Invalid window size - nearest valid chosen */ unsigned psi$v_sts_pktbad : 1; /* Invalid packet size - nearest valid chosen */ unsigned psi$v_sts_thrbad : 1; /* Invalid throughput class - nearest valid chosen */ unsigned psi$v_sts_rpoalng : 1; /* RPOA not a multiple of 4 digits - truncated */ unsigned psi$v_sts_wordbad : 1; /* A word facility (Transit delay) reduced to %xFFFF */ unsigned psi$v_fill_1 : 7; } psi$r_fill_3; } ; /* */ /* Error codes returned in IOST2 */ /* */ #define psi$c_err_unknown 0 /* Unspecified internal error */ #define psi$c_err_faclng 1 /* Facilities too long */ #define psi$c_err_invitem 2 /* Invalid item code */ #define psi$c_err_conflict 3 /* Conflicting items specified */ #define psi$c_err_badparm 4 /* Bad parameter specified */ #define psi$c_err_notrans 5 /* No translation for this name (e.g. unknown user group) */ #define psi$c_err_recurlmt 6 /* Recursion limit reached */ #define psi$c_err_invnum 7 /* Invalid ASCII number */ #define psi$c_err_noici 8 /* No internal call identifier specified */ #define psi$c_err_manyici 9 /* More than one internal call identifier given */ #define psi$c_err_notimp 10 /* A feature that is not yet implemented was requested */ #define psi$c_err_nodtes 11 /* No DTE is available on which to make the call */ #define psi$c_err_nosuchdte 12 /* The specified DTE is not known */ #define psi$c_err_nosuchpvc 13 /* The specified PVC is not known */ #define psi$c_err_nosuchnet 14 /* The specified network is not known */ #define psi$c_err_nolocal 15 /* The ACP has run out of local workspace memory */ #define psi$c_err_nononpag 16 /* There is insufficient free non-paged pool */ #define psi$c_err_nol3 17 /* Internal error */ #define psi$c_err_badname 18 /* Bad counted string parameter */ #define psi$c_err_l3err 19 /* Error returned from level 3 */ #define psi$c_err_pvcalracc 20 /* PVC already accessed */ #define psi$c_err_bad_pvcname 21 /* Accessing PVC on wrong channel */ #define psi$c_err_nosuchgroup 22 /* The specified GROUP is not known */ #define psi$c_err_invexp 23 /* Invalid use of expedited data negotiation */ #define psi$c_err_invtrstdly 24 /* Invalid use of ISO end-to-end transit delay facility */ /* */ /* Phase V additions */ /* */ #define psi$c_err_NoAccess 25 /* The X25 Access module has not been */ /* created/enabled. */ #define psi$c_err_DteNotInClass 26 /* The requested dte is not a member of the */ /* resolved dteclass. */ #define psi$c_err_DteNotAvailable 27 /* The requested dte can't carry calls. */ #define psi$c_err_NoActiveMembers 28 /* The resolved dteclass has no active members. */ #define psi$c_err_NoSuchTemplate 29 /* The requested template does not exist. */ #define psi$c_err_NoSuchPort 30 /* The port to be cleared does not exist. */ #define psi$c_err_NoSuchFilter 31 /* The requested filter does not exist. */ #define psi$c_err_FilterAlreadySet 32 /* ACPCONTROL - filter already in use or */ /* already created. */ #define psi$c_err_DteNotInGroup 33 /* The resolved dte is not a member of the */ /* specified group. */ #define psi$c_err_DteClassNotSpecified 34 /* no dteclass could be resolved */ #define psi$c_err_Security 35 /* Security error */ #define psi$c_err_NoSuchSecurityFilter 36 /* the named security filter was not found */ #define psi$c_err_NoSuchSecurityDtecls 37 /* the named security dteclass was not found */ #define psi$c_err_DestNotKnown 38 /* Destination unknown */ #define psi$c_err_NoTransit 39 /* Transit Error */ #define psi$c_err_AddressNotReachable 40 /* Called address not reachable */ #define psi$c_err_IncompatibleLCN 41 /* Incompatible or reserved LCN */ #define psi$c_err_ClearedByDirective 42 /* Clear directive issued */ #define psi$c_err_InvalidParameter 43 /* Invalid parameter */ /* For compatibility only */ #define psi$c_msl_table_base 26 #define psi$c_err_nosuchdteclass 14 #define psi$c_err_nolines 11 #define psi$c_err_nosuchline 12 /* */ /* Special function codes for IO$_NETCONTROL */ /* */ #define psi$c_interrupt 1 /* Interrupt NETCONTROL function code */ #define psi$k_interrupt 1 /* Interrupt NETCONTROL function code */ #define psi$c_intack 2 /* Interrupt acknowledge NETCONTROL */ #define psi$k_intack 2 /* Interrupt acknowledge NETCONTROL */ #define psi$c_reset 3 /* Reset NETCONTROL function Code */ #define psi$k_reset 3 /* Reset NETCONTROL function Code */ /* */ /* Values 4 to 6 inclusive reserved for all time. */ /* They were the old NV IO$_NETCONTROL functions. */ /* */ #define psi$c_restart 7 /* Acknowlege Restart on PVC */ #define psi$k_restart 7 /* Acknowlege Restart on PVC */ #define psi$c_x29_set 8 /* Set Parameter for an NV unit */ #define psi$k_x29_set 8 /* */ #define psi$c_x29_read 9 /* Read Parameter for an NV unit */ #define psi$k_x29_read 9 /* */ #define psi$c_x29_read_specific 10 /* Read specific Parameter for an NV unit */ #define psi$k_x29_read_specific 10 /* */ /* */ /* Parameter type codes for use with x29_set and x29_read */ /* */ #define psi$k_x29_temp_nohang 1 /* NV tempory NoHangup */ #define psi$k_x29_pad_params 2 /* PAD parameters */ #define psi$k_x29_int_action 3 /* NV action on receiving an interrupt */ #define psi$k_x29_break_action 4 /* NV action on receiving a break indication */ #define psi$k_x29_hold_timer 5 /* NV output data hold timer */ #define psi$k_x29_host_echo_params 6 /* NV host echo params */ #define psi$k_x29_local_echo_params 7 /* NV local echo params */ #define psi$k_x29_hangup_params 8 /* NV hangup params, for clearing call */ #define psi$k_x29_pad_reselection 9 /* NV PAD reselection facility */ #define psi$m_x29_calculated 0x1 #define psi$m_x29_add_value 0x2 #define psi$m_x29_user_value 0x4 #define psi$m_x29_if_changed 0x8 #define psi$c_x29_param_length 8 /* length of block */ #define psi$k_x29_param_length 8 /* length of block */ struct psi$_x29_param { unsigned short int psi$w_x29_param_ref; /* The x.29 parameter reference */ struct { /* Flags controlling this parameter */ unsigned psi$v_x29_calculated : 1; /* Value is calculated */ unsigned psi$v_x29_add_value : 1; /* Add value to parameter */ unsigned psi$v_x29_user_value : 1; /* Use last value supplied in x29_pad_params */ unsigned psi$v_x29_if_changed : 1; /* only set param if changed */ unsigned psi$v_x29_fill_2 : 12; /* unused bits Must be zero */ } psi$w_x29_param_flags; unsigned char psi$b_x29_param_value; /* Value for the parameter */ unsigned psi$v_x29_fill_1 : 24; /* unused must be zero */ } ; #define psi$m_x29_action_reset 0x1 #define psi$m_x29_action_purge 0x2 #define psi$m_x29_action_clear 0x4 #define psi$c_x29_action_length 20 /* Length of the action block */ #define psi$k_x29_action_length 20 /* Length of the action block */ struct psi$_x29_flags { struct { unsigned psi$v_x29_action_reset : 1; /* Reset circuit */ unsigned psi$v_x29_action_purge : 1; /* Purge input data in NV */ unsigned psi$v_x29_action_clear : 1; /* Clear circuit */ unsigned psi$v_x29_fill_1 : 29; } psi$l_x29_action_flags; char psi$t_x29_action_string [16]; /* counted action string */ } ; /* */ /* X29 PAD parameter types, used with x29_pad_params. */ /* */ /* Key: */ /* B - boolean */ /* M - bit mask */ /* C - character */ /* I - integer */ /* */ #define psi$k_x29_par_escape 1 /* BC PAD escape to command mode character */ #define psi$k_x29_par_echo 2 /* B Echoing */ #define psi$k_x29_par_forward 3 /* M Data forwarding terminators */ #define psi$k_x29_par_timeout 4 /* BI Forwarding timeout */ #define psi$k_x29_par_hostsync 5 /* B Host sync */ #define psi$k_x29_par_messages 6 /* M PAD message control */ #define psi$k_x29_par_break 7 /* M Action on break */ #define psi$k_x29_par_discard 8 /* B Discard output at PAD */ #define psi$k_x29_par_crfill 9 /* I CR fill */ #define psi$k_x29_par_wrap 10 /* BI Wrap column */ #define psi$k_x29_par_speed 11 /* I Terminal line speed */ #define psi$k_x29_par_ttsync 12 /* B TT sync */ #define psi$k_x29_par_new_line 13 /* M Line feed insertion by PAD */ #define psi$k_x29_par_lffill 14 /* I LF fill */ #define psi$k_x29_par_edit 15 /* B PAD editing enable */ #define psi$k_x29_par_delete 16 /* C Delete-character character */ #define psi$k_x29_par_line_delete 17 /* C Delete-line character */ #define psi$k_x29_par_redisplay 18 /* C Redisplay-line character */ #define psi$k_x29_par_display_edit 19 /* MC Editing service signals */ #define psi$k_x29_par_restrict_echo 20 /* M Echo mask */ #define psi$k_x29_par_parity 21 /* M Parity generation and checking */ #define psi$k_x29_par_page_wait 22 /* BI Page wait line */ #define psi$k_x29_last_1980_x3_param 18 #define psi$k_x29_last_1984_x3_param 22 /* */ /* PSI accounting record definitions */ /* */ #define acr$k_psi 15 /* PSI record type */ #define acr$k_psi_vct 1 /* PSI virtual circuit termination packet */ /* */ /* Virtual circuit termination packet layout */ /* */ #define acr$m_psi_out 0x1 #define acr$m_psi_pvc 0x2 #define acr$m_psi_x29 0x4 #define acr$m_psi_access 0x8 #define acr$m_psi_gateway 0x10 #define acr$m_psi_fail 0x20 #define acr$m_psi_revchg 0x1 #define acr$m_psi_fast 0x2 #define acr$m_psi_cug 0x4 #define acr$m_psi_bcug 0x8 #define acr$m_psi_fast_res 0x10 #define acr$m_psi_busy 0x1 #define acr$m_psi_out_of_order 0x2 #define acr$m_psi_systematic 0x4 struct psi$_acr_vct { int acr$l_psi_vct_fill_1; /* Packet header */ struct { /* Type of circuit */ unsigned acr$v_psi_out : 1; /* Outgoing SVC */ unsigned acr$v_psi_pvc : 1; /* PVC */ unsigned acr$v_psi_x29 : 1; /* X29 circuit */ unsigned acr$v_psi_access : 1; /* Used PSI-access */ unsigned acr$v_psi_gateway : 1; /* Used gateway or multi-host */ unsigned acr$v_psi_fail : 1; /* Access failed */ unsigned acr$v_psi_vctype_fill : 10; } acr$w_psi_vctype; unsigned short int acr$w_psi_lcn; /* Logical channel number */ unsigned int acr$q_psi_start_time [2]; /* Start time */ unsigned short int acr$w_psi_source; /* Offset to Source */ unsigned short int acr$w_psi_association; /* Offset to Call Association */ unsigned short int acr$w_psi_rdte; /* Offset to remote DTE address */ unsigned short int acr$w_psi_ldte; /* Offset to local DTE address */ unsigned short int acr$w_psi_dteclass; /* Offset to DTE Class */ unsigned short int acr$w_psi_pvc_name; /* Offset to PVC name */ unsigned short int acr$w_psi_remote_nsap; /* Offset to Remote NSAP */ unsigned short int acr$w_psi_local_nsap; /* Offset to Local NSAP */ unsigned int acr$q_psi_bytes_tx [2]; /* Bytes sent */ unsigned int acr$q_psi_bytes_rx [2]; /* Bytes received */ unsigned int acr$q_psi_segments_tx [2]; /* Segments sent */ unsigned int acr$q_psi_segments_rx [2]; /* Segments received */ unsigned int acr$q_psi_packets_tx [2]; /* Packets sent */ unsigned int acr$q_psi_packets_rx [2]; /* Packets received */ unsigned int acr$q_psi_messages_tx [2]; /* Messages sent */ unsigned int acr$q_psi_messages_rx [2]; /* Messages received */ unsigned short int acr$w_psi_inc_thru; /* Incoming thruput class */ unsigned short int acr$w_psi_out_thru; /* Outgoing thruput class */ unsigned short int acr$w_psi_inc_window; /* Incoming window size */ unsigned short int acr$w_psi_out_window; /* Outgoing window size */ unsigned short int acr$w_psi_inc_psize; /* Incoming packet size */ unsigned short int acr$w_psi_out_psize; /* Outgoing packet size */ struct { /* Facilities requested */ unsigned acr$v_psi_revchg : 1; /* Reverse charging */ unsigned acr$v_psi_fast : 1; /* Fast select */ unsigned acr$v_psi_cug : 1; /* Closed user group used */ unsigned acr$v_psi_bcug : 1; /* Bilateral CUG used */ unsigned acr$v_psi_fast_res : 1; /* Fast select (restricted response) */ unsigned acr$v_psi_fac_req_fill : 11; } acr$w_psi_fac_req; unsigned short int acr$w_psi_cug_number; /* Closed user group number */ unsigned short int acr$w_psi_orig_dte; /* Offset to Originally Called DTE */ unsigned short int acr$w_psi_clear_facs; /* Offset to clearing facilities */ unsigned short int acr$w_psi_call_facs; /* Offset to calling facilities */ unsigned short int acr$w_psi_accept_facs; /* Offset to accepting facilities */ unsigned char acr$b_psi_reason; /* Clearing reason */ unsigned char acr$b_psi_cause; /* Clearing cause */ unsigned char acr$b_psi_diag; /* Clearing diagnostic */ struct { /* Redirect reason */ unsigned acr$v_psi_busy : 1; /* Number busy */ unsigned acr$v_psi_out_of_order : 1; /* Number out of order */ unsigned acr$v_psi_systematic : 1; /* Number systematically redirected */ unsigned acr$v_psi_redirect_fill : 5; /* 8^) */ } acr$b_psi_redirect; unsigned short int acr$w_psi_unit; /* Offset to NW or NV unit name */ unsigned short int acr$w_psi_protocol; /* Offset to protocol ID string */ unsigned short int acr$w_psi_group; /* Offset to CUG Name */ /* Start of variable length part */ } ; #define acr$k_psi_vct_var 130 /* Start of variable part */ #pragma __member_alignment __restore