lnSec = SECONDS()
CREATE CURSOR num (num N( 2 , 0 ))
FOR ln1= 1  TO  28 
    INSERT INTO num (num) VALUES (m.ln1)
ENDFOR
SELECT c1.num AS a1, ;
        c2.num AS a2, ;
        c3.num AS a3, ;
        c4.num AS a4, ;
        c5.num AS a5, ;
        c6.num AS a6, ;
        c7.num AS a7 ;
    FROM num c1 ;
        INNER JOIN num c2 ;
            ON c2.num > c1.num ;
        INNER JOIN num c3 ;
            ON c3.num > c2.num ;
        INNER JOIN num c4 ;
            ON c4.num > c3.num ;
        INNER JOIN num c5 ;
            ON c5.num > c4.num ;
        INNER JOIN num c6 ;
            ON c6.num > c5.num ;
        INNER JOIN num c7 ;
            ON c7.num > c6.num ;
    INTO CURSOR Table1
? SECONDS() - m.lnSec