====== Save_Select subroutine ======


 
==== Description ====
 
The Save_Select subroutine saves an active select list of keys from cursor 0.
 
==== Syntax ====
 
**Save_Select**(//target//, //targetName//, //reserved//, //comment//, //cursorNum//)
 
==== Parameters ====
 
The Save_Select subroutine has the following parameters:

^ Parameter       ^ Description                                                                                                                                                                                                                                                                                                                                                                                                                               |   |
| //target//      | Reserved. Pass null.                                                                                                                                                                                                                                                                                                                                                                                                                      |   |
| //targetName//  | The name to save the select as.\\ The targetName may be in the following formats:\\ \\ 1. <targetName>\\ 2. <tableName><space><targetName>\\ \\ If targetName contains a space then the assumption is that the first word is <tablename>. If the <tablename> is valid then any wording after the initial space is the targetName .If the tablename is not valid the tablenme is SYSLISTS and the whole string is used as the targetName.  |   |
| //reserved//    | Reserved for internal use.                                                                                                                                                                                                                                                                                                                                                                                                                |   |
| //comment//     | A reference string can be stored with the saved list; null is permitted. The comment must not contain system delimiters.                                                                                                                                                                                                                                                                                                                     ||
| //cursorNum//   | A number from 0 to 8, indication which cursor's keys to save.  Optional, defaults to 0                                                                                                                                                                                                                                                                                                                                                    |   |

 
==== Note ====
 
The list of keys is stored in the SYSLISTS table, with targetName as the record ID.  An Activate_Save_Select should be used to process the list once the Save_Select is executed.
 
==== See Also ====
 
[[activate_save_select|Activate_Save_Select]], [[delete_save_select|Delete_Save_Select]], [[reduce|Reduce]], [[rlist|RList]], [[select_by|Select...By]]
 
==== Example ====
 
<code>
Function Save_Select_Example(param1)

 

Declare Subroutine Save_Select, Activate_Save_Select, Msg

$Insert Logical

 

ClearSelect 0

done = False$

ctr  = 0

 

Select "SYSREPOS" by "@ID" using 0 Then

   Save_Select("","SYSREPOS_LIST","","")

   Activate_Save_Select("SYSREPOS_LIST")

   Loop

      Readnext id Else done = True$

   Until done

      ctr += 1

   repeat

   Msg(@window,"Number of Records Selected = ": ctr)

end

 

return ctr

 
 
**
**
</code>