Reseting Shared Variables 1

[MCuthill]

Hi Everyone,

I am developing a CRM report using Crystal Reports 10 & Multiple SQL Databases. The entirety of the report is driven by a Customer Number Parameter field: {?CIF_Number}. This field is set to accept discrete values only, but also multiple discrete values.

The report successfully runs on one Customer, but when I run it on multiple customers, the Shared Variables set to true on customer #1 remain as true on Customer #2. I have tried placing Formula Fields in the Group #1 Header (Customer #) Footer as well as in the Group #1a (above the subreports where the variables are set). And I can't get these Booleans to reset after each customer.


Same Code As Follows:
In Subreport (Group Header #1b):

shared BooleanVar ChequingHeld;
IF ChequingHeld=FALSE THEN
(
    IF Sum ({@PROD_Count_Chq}) > 0 THEN
    (
        ChequingHeld:=TRUE
    )
)

In Main Report (Group Header #1t):

whileprintingrecords;
shared BooleanVar ChequingHeld;

IF ChequingHeld=TRUE THEN "Y" ELSE "N"

In Main Report (Group Header #1a):

WhilePrintingRecords;
BooleanVar ChequingHeld:=False;

Any Suggestions Would Be greatly Appreciated.

Thanks,

Mike

"It Seems All My Problems Exist Between Keyboard and Chair"

 

[lbass]

Please explain the purpose of the shared variable, and also correct the typo in the section for the placement of your middle formula.

-LB

 

[MCuthill]

I'm not sure where the error lies in section of the second formula... it is located in Group Header #1t.
-----------------------------------------
SUBREPORT:
There are a series of these variables, they are simple flags to tell us which products/services the customer currently hold with us.

The Subreport in Group Header #1b is a listing of all Deposits and loan products held by the Customer. There is a series of Formula fields (one for each Product) Category where if the product type falls in the range then show 1 else 0.
Example of this code for Chequing Accounts:

IF {DEP.Type} in [100,101,102,103,104,105,108,110,120,121,125,130,137,140,150,160,300] THEN 1 ELSE 0

The Next Step is a to evaluate the total products in each category and if this total is greater than 0, flag the Shared Boolean to TRUE. (as shown in First Post, Code 1).
----------------------------------------
MAIN REPORT:
In Group Header #1t:
Evaluates the stae of the shared BooleanVar and shows "Y" if TRUE, "N" if FALSE. (as shown in Forst Post, Code 2).

Up to here the report runs sucessfully.

Th issue I cannot resolve is the correct placement of the formula field to reset all of the Product/Service Booleans AFTER each Customer.

Hope I anwsered your questions LBass.

Thanks,

Mike

"It Seems All My Problems Exist Between Keyboard and Chair"

 

[lbass]

Sorry about the 1t--it seemed like too many sections to be correct. I think the problem is the reference to the state of the variable within the formulas. Try instead:

//in the subreport, subreport placed in main report GH#1b:
whileprintingrecords;
shared BooleanVar ChequingHeld;
IF Sum ({@PROD_Count_Chq}) > 0 THEN
ChequingHeld:=TRUE

(I'm assuming the subreport is linked on the group#1 field.)

In the main report, in section GH#1a place:
whileprintingrecords;
shared BooleanVar ChequingHeld := false;

//in GH#1t:
whileprintingrecords;
shared BooleanVar ChequingHeld;
IF ChequingHeld=TRUE THEN "Y" ELSE "N"

-LB

 

[MCuthill]

Hi Lbass,

Tried your recommendations, and still no success on my test customers (a pair where the value should be True for Customer #1, and False for #2).

The interesting thing I noted (or rather remembered, as I think I noticed earlier this week). But when I preview the subreport on Customer #2 the Variables are reset to FALSE, yet the flag in Section Group Header 1t still states "Y". Assuming it has to do with the sequence in which the various sections are run?

To Double Check My Formulas, here they are again (apologies, they are for a different Variable, but this is the caregory I know the difference lies, and should have originally posted) Sorry.

SUBREPORT (located in Main Report GH 1b)

whileprintingrecords;
shared BooleanVar CDHeld;
    IF Sum ({@PROD_Count_CD}) > 0 THEN
    (
        CDHeld:=TRUE
    )

MAIN REPORT
GH #1t ->

whileprintingrecords;
shared BooleanVar CDHeld;

IF CDHeld=TRUE THEN "Y" ELSE "N"

GH #1a ->

WhilePrintingRecords;
BooleanVar CDHeld:=False;

Mike

"It Seems All My Problems Exist Between Keyboard and Chair"

 

[lbass]

Just noticed the problem--you have omitted the "shared" in your main report reset formulas which should read:

WhilePrintingRecords;
shared BooleanVar CDHeld:=False;

-LB

 

[MCuthill]

Thanks lbass.

I guess sometimes the simplest reasons are often overlooked. oops.

Thanks Again.

Mike

"It Seems All My Problems Exist Between Keyboard and Chair"