HP OpenVMS Systems

ask the wizard

Finding next available UIC in SYSUAF?

» close window

The Question is:

 
Is there a DCL command or lexical or freeware utility that will identify the
 next free UIC in a given group?

The Answer is :

 
    Here is a trivial command file to walk a UIC group for the
    highest member uic in use in that group.
 
$ IF p1.eqs."" THEN INQUIRE p1 "Group (octal)"
$ IF p1.eqs."" THEN EXIT
$ grp = %o'p1' * 65536
$ mem = 65535
$ IF p2.nes."" THEN mem = %o'p2'
$loop:
$ mem = mem - 1
$ IF F$IDENT (grp + mem, "NUMBER_TO_NAME") .NES. "" THEN GOTO done
$ IF mem .GT. 0 THEN GOTO loop
$done:
$ mem = mem + 1
$ SHOW SYMBOL mem
 

  
     
     answer written or last revised on ( 21-SEP-2000 )
     » close window