23-OCT-2008 16:10 OpenVMS Command Definition Utility I01-11 Page 1 23-OCT-2008 16:10 DISK$SYSMAN:[LAISHEV.TOOLS]GETUAI.CLD;2 (1) 1 module GETUAI_TABLES 2 ident "V2.2" 3 ! 4 ! Created for V1.0 of GETUAI at Fermilab, Frank J. Nagy 21-Jul-86 5 ! Editted for V1.2 by adding /DEFAULT qualifier (FJN, 28-Jul-86) 6 ! Editted for V2.0 by adding /EXISTS qualifier (FJN, 12-Sep-89) 7 ! Editted for V2.1 by adding /RESTRICTED and /DISIMAGE qualifiers to 8 ! match VMS V5.2 changes (FJN, 03-Oct-89) 9 ! Editted for V2.2 by adding /PWDDIC and /PWDHIS qualifiers to 10 ! match VMS V5.4 chagnes (FJN, 28-Nov-90) 11 ! 12 define verb GETUAI 13 parameter P1, prompt="Username:", value (required) 14 15 qualifier ACCOUNT, nonnegatable, value(required, type=$outsym) 16 qualifier ASTLM, nonnegatable, value(required, type=$outsym) 17 qualifier AUDIT, nonnegatable, value(required, type=$outsym) 18 qualifier AUTOLOGIN, nonnegatable, value(required, type=$outsym) 19 qualifier BATCH, nonnegatable, value(required, type=$outsym) 20 qualifier BIOLM, nonnegatable, value(required, type=$outsym) 21 qualifier BYTLM, nonnegatable, value(required, type=$outsym) 22 qualifier CAPTIVE, nonnegatable, value(required, type=$outsym) 23 qualifier CLI, nonnegatable, value(required, type=$outsym) 24 qualifier CLITABLES, nonnegatable, value(required, type=$outsym) 25 qualifier CPUTIME, nonnegatable, value(required, type=$outsym) 26 qualifier CTRLY, nonnegatable, value(required, type=$outsym) 27 qualifier DEFAULT, nonnegatable, value(required, type=$outsym) 28 qualifier DEFCLI, nonnegatable, value(required, type=$outsym) 29 qualifier DEFPRIVILEGES, nonnegatable, 30 value(required, list, type=$outsym) 31 qualifier DEVICE, nonnegatable, value(required, type=$outsym) 32 qualifier DIALUP, nonnegatable, value(required, type=$outsym) 33 qualifier DIOLM, nonnegatable, value(required, type=$outsym) 34 qualifier DIRECTORY, nonnegatable, value(required, type=$outsym) 35 qualifier DISUSER, nonnegatable, value(required, type=$outsym) 36 qualifier DISIMAGE, nonnegatable, value(required, type=$outsym) 37 qualifier ENQLM, nonnegatable, value(required, type=$outsym) 38 qualifier EXISTS, nonnegatable, value(required, type=$outsym) 39 qualifier EXPIRATION, nonnegatable, value(required, type=$outsym) 40 qualifier FILLM, nonnegatable, value(required, type=$outsym) 41 qualifier GENPWD, nonnegatable, value(required, type=$outsym) 42 qualifier JTQUOTA, nonnegatable, value(required, type=$outsym) 43 qualifier LAST_LOGIN, nonnegatable, value(required, type=$outsym) 44 qualifier INTERACTIVE_LOGIN, nonnegatable, value(required, type=$outsym) 45 46 qualifier NONINTERACTIVE_LOGIN, nonnegatable, 47 value(required, type=$outsym) 48 qualifier LGICMD, nonnegatable, value(required, type=$outsym) 49 qualifier LOCAL, nonnegatable, value(required, type=$outsym) 50 qualifier LOCKPWD, nonnegatable, value(required, type=$outsym) 51 qualifier LOGIN_FAILURES, nonnegatable, value(required, type=$outsym) 52 qualifier MAIL, nonnegatable, value(required, type=$outsym) 53 qualifier MAXACCTJOBS, nonnegatable, value(required, type=$outsym) 54 qualifier MAXDETACH, nonnegatable, value(required, type=$outsym) 55 qualifier MAXJOBS, nonnegatable, value(required, type=$outsym) 56 qualifier NETWORK, nonnegatable, value(required, type=$outsym) 23-OCT-2008 16:10 OpenVMS Command Definition Utility I01-11 Page 2 23-OCT-2008 16:10 DISK$SYSMAN:[LAISHEV.TOOLS]GETUAI.CLD;2 (1) 57 qualifier NEWMAIL, nonnegatable, value(required, type=$outsym) 58 qualifier OWNER, nonnegatable, value(required, type=$outsym) 59 qualifier USER_DATA, nonnegatable, value(required, type=$outsym) 60 qualifier PBYTLM, nonnegatable, value(required, type=$outsym) 61 qualifier PGFLQUOTA, nonnegatable, value(required, type=$outsym) 62 qualifier PRCLM, nonnegatable, value(required, type=$outsym) 63 qualifier PRIMEDAYS, nonnegatable, value(required, type=$outsym) 64 qualifier PRIORITY, nonnegatable, value(required, type=$outsym) 65 qualifier PRIVILEGES, nonnegatable, value(required, list, type=$outsym) 66 qualifier PWDATE nonnegatable, value(required, type=$outsym) 67 qualifier PWDDIC nonnegatable, value(required, type=$outsym) 68 qualifier PWDHIS nonnegatable, value(required, type=$outsym) 69 qualifier PWLIFETIME, nonnegatable, value(required, type=$outsym) 70 qualifier PWMINIMUM, nonnegatable, value(required, type=$outsym) 71 qualifier PWLENGTH, nonnegatable, value(required, type=$outsym) 72 qualifier PWEXPIRED, nonnegatable, value(required, type=$outsym) 73 qualifier P2DATE nonnegatable, value(required, type=$outsym) 74 qualifier P2EXPIRED, nonnegatable, value(required, type=$outsym) 75 qualifier QUEUE_PRIORITY nonnegatable, value(required, type=$outsym) 76 qualifier RECONNECT, nonnegatable, value(required, type=$outsym) 77 qualifier REMOTE, nonnegatable, value(required, type=$outsym) 78 qualifier REPORT, nonnegatable, value(required, type=$outsym) 79 qualifier RESTRICTED, nonnegatable, value(required, type=$outsym) 80 qualifier SHRFILLM, nonnegatable, value(required, type=$outsym) 81 qualifier TQELM, nonnegatable, value(required, type=$outsym) 82 qualifier UIC, nonnegatable, value(required, type=$outsym) 83 qualifier USERNAME, nonnegatable, value(required, type=$outsym) 84 qualifier WELCOME, nonnegatable, value(required, type=$outsym) 85 qualifier WSDEFAULT, nonnegatable, value(required, type=$outsym) 86 qualifier WSEXTENT, nonnegatable, value(required, type=$outsym) 87 qualifier WSQUOTA, nonnegatable, value(required, type=$outsym) 88 $ SET COMMAND/LIST=GETUAI_TABLES/OBJECT=GETUAI_TABLES GETUAI