Long Variable Name as Array Element#

Scott Walker scottw1 at alltel.net
Tue Aug 17 05:14:44 PDT 2004



Scott Walker
RAM Systems Corp.
PO Box 1778
Davidson, NC 28036
Ph: (704) 896-6549
Fx: (704) 896-7458
Email:  scottw1 at alltel.net 

> -----Original Message-----
> From: Kenneth Brody [mailto:kenbrody at bestweb.net] 
> Sent: Monday, August 16, 2004 10:43 PM
> To: Scott Walker
> Cc: Filepro List - No spam
> Subject: Re: Long Variable Name as Array Element#
> 
> 
> Scott Walker wrote:
> [... rclerk 5.0.13 ...]
> >         dim Redhat_Sell[6](12,,2):aa
> >         declare Cust_Type(1,*)
> 
> I would use (1,.0) for clarity, but that's irrelevent to the 
> question at hand.
> 
> >         Cust_Type=order_file(82)    'Will be a value of 1 - 6
> 
> I would insert:
> 
>     mesgbox "Cust_Type = '" & Cust_Type & "'"
> 
> What does it show?
> 
> >         Redhat_Sell[Cust_Type]=Redhat_Sell[Cust_Type]+8  
> 'Add up Total 
> > Sales for Customer Type
> > 
> > The fourth line gives me a syntax error when I run it.  Says:
> > 
> >         "A filepro error has occurred"
> > 
> >         "Array Index Out of Range:  dim redhat_sell(6) -- Index: 0"
> > 
> > If I change it to this:
> > 
> >         dim Redhat_Sell[6](12,,2):aa
> >         ty(1,*)
> >         ty=order_file(82)
> >         Redhat_Sell[ty]=Redhat_Sell[ty]+8
> > 
> > It works like a champ.
> 
> Assuming that orderfile(82) is the same in both cases, both 
> should work the same way and give the same results.
> 


I agree, it either on should work but the one where I use the Long
Variable for the array element fails...everytime.    I just tried to use
a Long_Variable with another array, and it also fails with a similar
error message.  I think something is broken.

I'm forwarding this to fp tech support.




More information about the Filepro-list mailing list