Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Array misinterpreted as prg
Message
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00592280
Message ID:
00592286
Views:
14
Nick,

I believe that the problem is that the array result is not created due to the result being no records met the criteria. You may want to use TYPE("result") instead of VARTYPE, since VARTYPE assumes that the variable does exist.

Doug

>I have the following code
>
>
>SELECT sum(pinfo.workhour) from pinfo ;
>where person.personid = pinfo.personid into array result
>testresult = VARTYPE(result)
>IF VARTYPE(result) # 'U' OR VARTYPE(result) # 'L'
>   .pf1.p1.txtdisplaycurrentwrkhrs.value = result[1,1]
>   .pf1.p1.txtdisplaycurrentwrkhrs.refresh()
>ELSE
>   .pf1.p1.txtdisplaycurrentwrkhrs.value = 0.0
>   .pf1.p1.txtdisplaycurrentwrkhrs.refresh()
>ENDIF
>RELEASE result
>
>
>When I run the program, I get an error on 4th line as follows:
>
>File "result.prg" does not exist.
>
>
>the variable called "testresult" is returning a 'U', but when the "result" array is evaluated on 4th line I get the above mentioned error. Can some clue me in on this.
>
>Thanks
>Nick Patel
Previous
Reply
Map
View

Click here to load this message in the networking platform