|
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: 822 (0x336)
Types: TextFile
Notes: @(#)Form.list 13.1 (RC International) 91/07/25
Names: »Form.list«
└─⟦50656ff4a⟧ Bits:30010538 TX 3.1 Coldstart
└─⟦bbf173f5c⟧ »0004«
└─⟦this⟧ »./usr/sadm/sysadm/menu/usermgmt/list/Form.list«
# @(#)Form.list 13.1 (RC International) 91/07/25
#ident "@(#)oamintf:usermgmt/Form.list 1.2"
################################################################################
# Module Name: Form.list
################################################################################
form="List Users or Groups"
framemsg=`readfile $INTFBASE/form.msg`
help=OPEN TEXT $INTFBASE/Text.itemhelp $LININFO
done=`if [ "$F1" = "user" ];
then
set -l CMD="OPEN TEXT $OBJ_DIR/Text.lsusr";
else
set -l CMD="OPEN TEXT $OBJ_DIR/Text.lsgrp";
fi`$CMD
name=User or group:
lininfo=Form.list:list
nrow=1
ncol=3
frow=1
fcol=17
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