#if 0

What does the code below do?

 

Here's a clue

      Unknown,

      Command,

      File,

      Label,

      Menu,

      Query,

      Report,

      Form,

      Class,

      Table,

      Database,

      Project,

      Memo,

      Vue,

      Procedure,

      Classlib,

      View,

#endif

USE SYS(2005) AGAIN ALIAS fuser

SELECT * from fuser WHERE id = "MRU" ORDER BY id INTO CURSOR foo

SCAN

      cData=data

      ?id

      ALINES(aa,SUBSTR(cData,3),0,CHR(0))

      FOR i = 1 TO ALEN(aa)

            ?SPACE(5),aa(i)

      ENDFOR

ENDSCAN