Guardian Procedure Calls Reference Manual (G06.25+)

Guardian Procedure Calls (G)

Guardian Procedure Calls Reference Manual—522629-013

6-10

GETDEVNAME Procedure

(Superseded by DEVICE_GETINFOBYLDEV_

•

1 word identifying the node number and 3 words of zero for example,

"\n",0,0,0 (n is the value in SYSNUM)

Example

INT system; !target system

INT ldev; !ldev to start search

INT name [0:3] := [" "];

STRING names = name;

INT status;

! get next disk name

BEGIN

ldev := ldev + 1;

status := getdevname ( ldev, name, system, 3 );

END

UNTIL (status '>' 1)

OR (name AND name <> " "

AND NOT (names = "\" AND (name[1] = " "

OR name[1] = 0)));