Click above to get retro games delivered to your door ever month!

Syntax: N_SAVEGETS()

Saves `Get' list to be restored at a later time with N_RESTGETS.

Example

@ 1,0 SAY "City:" GET M->city
@ 2,0 SAY "State:" GET M->state VALID STATE->(STATE())
READ
 ...
FUNCTION STATE
SEEK M->STATE
IF .NOT. FOUND()
  gets = N_SAVEGETS()
  APPEND BLANK
  @ 4,0 SAY "Enter new state"
  READ
  N_RESTGETS(gets)
ENDIF
RETURN .T.

Notes

N_SAVEGETS should be issued before initiating a new Get List.  Do not issue
`CLEAR' or `CLEAR GETS' before N_SAVEGETS or the list will not be preserved
properly.  However, you may issue them afterwards.

N_SAVEGETS() effectively issues a `CLEAR GETS' after preserving the list.
Thus the cursor will not stop at the higher-level GETs while in the lower-
level READ.

N_SAVEGETS does not preserve the screen's contents.  Use the Clipper command
"SAVE SCREEN" to accomplish this.

Reads may be nested as many levels deep as memory allows.  Each Get List
must be stored in a different variable.

A lower level read may modify fields and memory variables in use by a higher
level read, however a lower level read must not release any memory variables
is use by a higher level read.