|
DataMuseum.dkPresents historical artifacts from the history of: RC9000 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RC9000 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - downloadIndex: @ F T
Length: 818 (0x332)
Types: TextFile
Notes: @(#)Form.add 13.1 (RC International) 91/07/25
Names: »Form.add«
└─⟦50656ff4a⟧ Bits:30010538 TX 3.1 Coldstart
└─⟦bbf173f5c⟧ »0004«
└─⟦this⟧ »./usr/sadm/sysadm/menu/usermgmt/add/Form.add«
# @(#)Form.add 13.1 (RC International) 91/07/25
#ident "@(#)oamintf:usermgmt/Form.add 1.2"
################################################################################
# Module Name: Form.add
################################################################################
form="Add Users or Groups"
framemsg=`readfile $INTFBASE/form.msg`
help=OPEN TEXT $INTFBASE/Text.itemhelp $LININFO
done=`if [ "$F1" = "user" ];
then
set -l CMD="OPEN FORM $OBJ_DIR/Form.addusr";
else
set -l CMD="OPEN FORM $OBJ_DIR/Form.addgrp";
fi`$CMD
name=User or group:
lininfo=Form.add:add
nrow=1
ncol=3
frow=1
fcol=18
rows=1
columns=5
value=user
rmenu={ user group }
menuonly=TRUE
choicemsg=const "Select user or group."
invalidmsg=const "ERROR: Choices are user and group."
name=RESET
button=8
action=RESET