Description

The Activate_Save_Select subroutine loads a saved list of keys into cursor 0.

Syntax

Activate_Save_Select(targetName)

Parameters

The Activate_Save_Select subroutine has the following parameters:

Parameter

ParameterDescription
TargetnameThe name which the select list was saved as using Save_Select.

The targetName may be in the following formats:

1. <targetName>

2. <tableName><space><targetName>

The algorithm executes in the following manner: If targetName contains a space then the assumption is that the first word is <tablename> and a check is performed to determine if the <tablename> is valid. If the <tablename> is valid then any wording after the initial space is the targetName .If the tablename is not valid then the whole string is used as the targetName and the list of keys is saved to SYSLISTS.

See also

Delete_Save_SelectReduceRListSelectSelect...By

Example

/* this code segment activates the list saved as SYSREPOS_LIST
and traverses the list, branching to ProcessEntity for each key */
 
declare subroutine Activate_Save_Select
$insert Logical
 
Activate_Save_Select("SYSREPOS_LIST")
if Get_Status() else
  EOF = FALSE$
  loop
    readnext Key else EOF = TRUE$
  until EOF
    gosub ProcessEntity
  repeat
end
  • No labels