>rn1 = 10
>rn2 = 20
>rn=min(rn1,rn2)
>? rn
>
>rn gives the lowest value 10>rn1 = 10
>rn2 = 20
>rn=min(rn1,rn2)
>? rn
>
>rn gives the lowest value 10DIMENSION laList[2] laList[1]=10 laList[2]=20 lnMin=laList[1] lnPointer=1 FOR X=2 TO ALEN(laList,1) if laList[m.x] < lnMin lnMin = laList[m.x] lnPointer = m.x endif ENDFOR ?"the row with the minimum value is ",m.lnPointerWith a cursor
calculate mix(field) to m.lnMin locate for field=m.lnMin lnPointer=recno()