Dimensioned Arrays

smittyusn1 at bellsouth.net smittyusn1 at bellsouth.net
Mon Apr 18 10:36:39 PDT 2011


I will try to explain it better...............

dim itms(15):60           thru  212
it(8,*)=itms(@af)
user supplies  (it) in field 60 ......
@wlfa0 (field 60) it looks up inventory using (it) and  gets all the fields 
it needs

gosub totals, writes, returns,  cursor goes to next line 61,  gets a new 
item needs, 62, 63, repeats....

until he runs out of items on the ticket, escapes, saves it.

dim lisp(15):213  (b0) start  thru  242 actually works but only gets data on 
the same line every lookup, it never fills in 214, 215, 216, etc, etc.

Hope I am explaining it better.....

Wayne Smith
Port Orange, Florida


-----Original Message----- 
From: Kenneth Brody
Sent: Monday, April 18, 2011 12:05 PM
To: smittyusn1 at bellsouth.net
Cc: filepro-list at lists.celestial.com
Subject: Re: Dimensioned Arrays

On 4/18/2011 9:15 AM, smittyusn1 at bellsouth.net wrote:
> Still having the same problem of the new list price array&  extended 
> price,
> it always fills in the first element in the array and never fills in the
> next elements as I add items to the Invoice.
>
> "Alias" the original    dim itms(15):60   to new  Dim list(15):213   How 
> do
> you do that ??
[...]

We can still only guess, since you still haven't given us any details, only
vague descriptions.

Assuming that some of the existing fields are fields 60 through 74, and some
of the new fields are 213 through 227, then you do it exactly as you showed.

If you can do the assignment:

    itms[foo] = something

then:

    list[foo] = something_else

will assign to the corresponding B-field.

Of course, you don't show us how you assign to the new arrays, nor how you
assign to the existing arrays which works, so we really can't give you any
better answers.

-- 
Kenneth Brody
_______________________________________________
Filepro-list mailing list
Filepro-list at lists.celestial.com
Subscribe/Unsubscribe/Subscription Changes
http://mailman.celestial.com/mailman/listinfo/filepro-list 



More information about the Filepro-list mailing list