VARREAD()

Class

Screen Forms

Purpose

Function to return name of the @...GET variable being processed by a READ

Syntax

VARREAD()

See Also

@...GET, DEFINE TABLE, GETNO(), PARAMETERS, READ, READVAR(), RECNO(), SET FIELDVAL, SET VALIDATE

Description

The VARREAD() function is synonymous with the READVAR() function. The VARREAD() function returns the name of the current @...GET variable being processed by a READ command. The VARREAD() function is most useful if used in conjunction with the @...GET...VALIDATE command and a validation procedure used to validate more than one field/variable.

Example

// Pop-up choice list called from a field validation
procedure choices
  parameters m_input
  //if the [HELP] key is pressed
  if m_input = "HELP"
      m_exp = iif(varread()="acc_no","account", "supplier")
      select codes
      save screen
      set message to "Select code.  ^C to abandon."
      menu browse &m_exp at 5,30 to 15,40 quit clear
      restore screen
      // if a selection was made
      if not empty(menuitem(),3)
          set fieldval to left(menuitem(),3)
          set validate on
      endif
      select accounts
  else
    // validate as required
  endif
return

Products

Recital Mirage Server, Recital Terminal Developer