Example 3

Establish a search argument to be used by a TBSCAN operation of the table DATETBL. Assume DATE1 to be a name variable in table DATETBL and that the dates are in a yy/mm/dd format. Specify a scan direction of forward and terminate the scan when the row value of DATE1 is greater than 99/01/31.

• Invoke TBVCLEAR for table DATETBL
• Set variable DATE1 to 99/01/31
• Issue these requests:

  ISPEXEC TBSARG DATETBL NEXT NAMECOND(DATE1,GTY1)
  ISPEXEC TBSCAN DATETBL