define class myClass as custom myArray(1,1) = '' procedure myArray_assign() LPARAMETERS vNewVal, m.nIndex1, m.nIndex2 IF ISNULL(m.nIndex1) && user didn't pass in a subscript THIS.myArray = m.vNewVal ELSE THIS.myArray[m.nIndex1, m.nIndex2] = m.vNewVal ENDIF procedure myMethod() local la(1) ..... create la(1,1) thru la( 5,2 ) acopy( la, THIS.myArray ) && sends really screwed up nIndex1 and nIndex2 to _assign() end defineI think I discovered my problem. I was creating myArray(1) instead of myArray(1,1). That only put m.nIndex1 as a lparameter in the assign(). I manually put in m.nIndex2 and it no longer crashed, but got really screwed up results when I acopy(). I just tried creating myArray(1,1) and acopy() seems to work now.
define class myClass as custom myArray(1,1) = '' procedure myArray_access() LPARAMETERS m.nIndex1, m.nIndex2 if empty( THIS.myArray(1) ) ..... dimension array and fill in values endif RETURN THIS.myArray[m.nIndex1, m.nIndex2] procedure myMethod() if empty( this.myArray(1) ) && triggers myArray_access() ...... endif if empty( this.myArray ) && DOES NOT trigger myArray_access() ...... endif end define>Bill,