A more efficient way to sort through instances (Cleverpath AION V10.1)

[Athena32]

I am working on a project that would allow our application to more efficiently search through instances(rows on a table). This is current process:

Var ptr is pointer to MessageRefQry
Var ptrs is list of pointer to MessageRefQry

ptrs = LIST(currentclass,LIST_ALL)
FOR ptrs,ptr
  IF  iMsgNum = ptr.MESSAGE_NUMBER 
  THEN
    pLastPtr = ptr
	LastMsgNum = iMsgNum
	return(ptr)
  END
END
return(NULL)

I was thinking of an array but I think it would just be the same.

Thank in advance,
Gina