Retrieve a list of keys set using the U2_SaveList subroutine.
U2_GetList(ListName, VolumeName, SelNum )
The function has the following parameters:
| Parameter | Description | |
|---|---|---|
| ListName | The name of the saved list to retrieve. | |
| VolumeName | The volume on which the list was saved. | |
| SelNum | The cursor to use when retrieving the list. | |
This subroutine does not return a value. Use Get_Status() to check for errors.
Declare subroutine Rlist, U2_SaveList, FsMsg
* Retrieve the list on the U2 Server.
U2_GetList("CUSTOMER_LIST","U2_VOLUME_1",3)
If Get_Status(errCodes) then
FsMsg(errCodes)
end else
keyList = ""
loop
readnext id else done = 1
until done
keyList := id : @fm
repeat
keyList[-1,1] = "" ; * remove the trailing @fm
end