Dimensioned Arrays

[smittyusn1 at bellsouth.net]

Ken Brody,  original processing ....not sure how to clip it out and get it
here but here goes....

Input Processing
dim itms(15):60
it(8,allup)=itms(@af)

@wlfa0, (item code) 60 thru 74   looks up items for his invoice and gets
everything,  15 possible items.

I would like to add 2 new fields to this array the easiest way possible, 
when it looks up the inventory item or when he escapes to save and exit the 
invoice.

Wayne Smith
Port Orange, Florida


-----Original Message----- 
From: Kenneth Brody
Sent: Sunday, April 17, 2011 1:16 PM
To: smittyusn1 at bellsouth.net
Cc: filepro-list at lists.celestial.com
Subject: Re: Dimensioned Arrays

On 4/17/2011 1:03 PM, smittyusn1 at bellsouth.net wrote:
> Let me see if I can explain this better.
>
> Cust x  has a 15 items max Invoice with a dimensioned array of  10
> associated fields that do the code lookup, price, ext, tax, etc.  That 
> works
> good,  now he wants to add a LIST price for each item + Extended List with 
> a
> total.
>
> When he Escapes to save his invoice I would like to gosub to a new
> Dimensioned Array (b0-b9) of 15 possible items, find the code  in his
> inventory grab the list price, extend it and return.   When I try that now
> all I get is the first code + list price.
>
> Windows 7,  filePro 5.0
[...]

Something is still missing from your description.  How are these arrays
declared?  Your description of "gosub to a new dimensioned array (b0-b9) of
15 possible items" makes no sense to me.  (How does one "gosub to an array"?
  How do the ten field groups b0-b9 correspond to 15 items?)

Can you give some actual code of how you declare and read/write the array?

-- 
Kenneth Brody