!*** MODULE $IMPDEF *** CDEC$ OPTIONS /NOALIGN ! + ! $PERSONA_CREATE, $PERSONA_ASSUME FLAGS bit definitions ! - PARAMETER IMP$M_ASSUME_SECURITY = '00000001'X PARAMETER IMP$M_ASSUME_ACCOUNT = '00000002'X PARAMETER IMP$M_ASSUME_JOB_WIDE = '00000004'X PARAMETER IMP$M_ASSUME_DEFPRIV = '00000008'X PARAMETER IMP$M_ASSUME_DEFCLASS = '00000010'X STRUCTURE /IMPFLAGDEF/ UNION MAP PARAMETER IMP$S_ASSUME_SECURITY = 1 PARAMETER IMP$V_ASSUME_SECURITY = 0 PARAMETER IMP$S_ASSUME_ACCOUNT = 1 PARAMETER IMP$V_ASSUME_ACCOUNT = 1 PARAMETER IMP$S_ASSUME_JOB_WIDE = 1 PARAMETER IMP$V_ASSUME_JOB_WIDE = 2 PARAMETER IMP$S_ASSUME_DEFPRIV = 1 PARAMETER IMP$V_ASSUME_DEFPRIV = 3 PARAMETER IMP$S_ASSUME_DEFCLASS = 1 PARAMETER IMP$V_ASSUME_DEFCLASS = 4 BYTE %FILL (1) END MAP END UNION END STRUCTURE ! IMPFLAGDEF CDEC$ END OPTIONS