Multiple Arrays for limiting Record Pulling in Main Report

Question

I have created an array in a subreport that pulls all applicable order #'s for a specific period.  The subreport has been placed in the report header of the main report.  In the main report, I have a formula that looks at the order # in the database.  If that order # exists in the array, then I want the main report to pull that order # and the related invoices.  One order # can have more than one invoice.
I've used the above method many times to limit records pulled when I had less than 1000 applicable records.  Now, out of necessity, I'm trying to do this with more than 1000 records, so I have created multiple array strings within the "array" formula.  The "array" formula is working correctly - the data that I see is correct. The problem is with the formula in the main report. This formula is not returning any data - so, basically, the main report formula is saying that no order #'s exist in the array.
Here's my coding for the array (appears to be working fine since the data looks correct):
whileprintingrecords;
shared stringvar array Groups1;
shared stringvar array Groups2;
shared stringvar array Groups3;
numbervar rtc1;
//if pymt receipt date is in the report period, add that order# to the array. 
if {BI50_BankTransactions_AR_InvcDt_H.ValueDate} = {?Cash Receipt Period}
then
(redim Groups1[1];
redim Groups2[1];
redim Groups3[1];
rtc1 := 0);
// the code below checks to see if the order ID field is in any of the above-declared arrays...
//if it is it is not added again and rtc1 is not incremented
if not({oehdrhst_sql.ord_no} in Groups1 or {oehdrhst_sql.ord_no} in Groups2 or {oehdrhst_sql.ord_no} in Groups3) then
rtc1 := rtc1 + 1;
if rtc1 <= 1000 then (Redim Preserve Groups1[rtc1]; Groups1[rtc1] := {oehdrhst_sql.ord_no});
if rtc1 in 1001 to 2000 then (Redim Preserve Groups2[rtc1-1000]; Groups2[rtc1-1000] := {oehdrhst_sql.ord_no});
if rtc1 in 2001 to 3000 then (Redim Preserve Groups3[rtc1-2000]; Groups3[rtc1-2000] := {oehdrhst_sql.ord_no});
if rtc1 <= 1000 then Groups1[rtc1]
else if rtc1 in 1001 to 2000 then Groups2[rtc1-1000]
else if rtc1 in 2001 to 3000 then Groups3[rtc1-2000]
Now, here's the code for the formula in the Main Report (please note, for now I'm just trying to generate a "true" or "false" result - so my current results are all "false" which isn't correct)
whileprintingrecords;
shared stringvar array Groups1;
shared stringvar array Groups2;
shared stringvar array Groups3;
({oehdrhst_sql.ord_no} in shared stringvar array Groups1) or
({oehdrhst_sql.ord_no} in shared stringvar array Groups2) or
({oehdrhst_sql.ord_no} in shared stringvar array Groups3);
If I only use one "shared stringvar array", everything works like a charm, but when I add another "shared stringvar array", the formula in my main report stops working.  I've tried changing this code but nothing has worked.  I'm at a loss as to what the problem is.  Any suggestions would be very much appreciated.
Edited by: Linda Offenbacker on Sep 21, 2010 9:41 PM
I have resolved this issue.  I guess seeing my coding in a different perspective helped me identify the issue.  The problem was in this section of the code where my redim criteria was incorrect:
"if {BI50_BankTransactions_AR_InvcDt_H.ValueDate} = {?Cash Receipt Period}"
It should be:
"if {BI50_BankTransactions_AR_InvcDt_H.ValueDate} <> {?Cash Receipt Period}"

Answer 1

Post Author: Don
CA Forum: General
Also, keep in mind that you only need a sub-report if your table joins are one to many records.  If they are = joins then you don't need a sub-report if the tables are linked in Crystal correctly.