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)
>
Words are given to man to enable him to conceal his true feelings.
Charles Maurice de Talleyrand-Périgord
Weeks of programming can save you hours of planning.
OffThere is no place like [::1]