DataMuseum.dk

Presents historical artifacts from the history of:

RC9000

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about RC9000

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download
Index: @ F T

⟦53416e0ee⟧ TextFile

    Length: 783 (0x30f)
    Types: TextFile
    Notes: @(#)Form.rmusr1 13.1 (RC International) 91/07/25
    Names: »Form.rmusr1«

Derivation

└─⟦50656ff4a⟧ Bits:30010538 TX 3.1 Coldstart
    └─⟦bbf173f5c⟧ »0004« 
        └─⟦this⟧ »./usr/sadm/sysadm/menu/usermgmt/remove/Form.rmusr1« 

TextFile

#	@(#)Form.rmusr1	13.1 (RC International) 91/07/25

#ident	"@(#)oamintf:usermgmt/Form.rmusr1	1.2"

################################################################################
#	Module Name:  Form.rmusr1
################################################################################
form="Remove User Login"

framemsg=`readfile $INTFBASE/form.msg`

help=OPEN TEXT $INTFBASE/Text.itemhelp $LININFO

done=OPEN FORM $OBJ_DIR/Form.rmusr2 $F1

name=User login to be removed:
lininfo=Form.rmusr1:rmusr
nrow=1
ncol=3
frow=1
fcol=29
rows=1
columns=8

rmenu=OPEN MENU $OBJ_DIR/Menu.logins
valid=`sed -e 's/^\([^:]*\):[^:]*:\([^:]*\).*/\1,\2/p' -e '/,[0-9]\{1,2\}$/d' /etc/passwd | fmlgrep "^$F1,"`

invalidmsg=const "ERROR: User login does not exist."

name=RESET
button=8
action=RESET