Arrays in sort/select processing

[Rodgers Hemer]

Is it possible to use arrays (DIM) in sort/select processing as a  
part of the -v process table?

If so, can anyone tell me why the following process fails at the  
indicated point?  I have not been successful in getting debug to give  
me any clues.

The purpose of the process is to input a variable number of existing  
box numbers of 1 to 5 digits each as a selection set for production  
of box labels.  Normal input error checking has been deleted for  
brevity in this posting.

            	  If:    x eq ""
	   Then:   gosub setup
             	  If:
	   Then:   y=y(3,.0.g) + "1"
            	   If:   y gt n
	    Then:   end
		   If:    2 eq box[y]		<===== Failure point at left bracket when  
dcabe checks the syntax
	    Then:   select
	    	   If:
	    Then:   end
setup  	   If:
             Then: dim box[100]:aa
nxtbox 	   If:
             Then:   input popup k(5) "Enter box number: "
		   If:
	    Then:   n=n+"1"; box[n] = k
		   If:   n eq "100" or k=""
	    Then:   x(1,,g)="b", return
		   If:
	    Then:   goto nxtbox

Thanks for the assistance.

Rodgers Hemer