Array is not created due to empty result set
Add some

DIMENSION amaxdate(1,1)
amaxdate = {..}

in front if SELECT

Agnes
>I have a network application that is returning an error on some machines and not others. I can test the same application on different machines and only certain ones return an error.
>
>The error returned is "error in click line 8; amaxdate.prg does not exist"
>
>

>LOCAL ldLastCali, ldNextCali, lnGage
>thisform.requery()
>thisform.Refresh()
>thisform.saveallchanges()
>
>lnGage=tgage.fgage
>SELECT MAX(tcalibrate.fdate) FROM tcalibrate WHERE tcalibrate.fgage=lnGage INTO ARRAY aMaxDate
>ldLastCali=aMaxDate[1]
>
>THISFORM.OSTatemanager.CLOSEFORM('calimain.scx')
>thisform.ostatemanager.openform('calimain.scx',lngage,ldLastCali,1) 
>