Problem Totaling a Report

xina_man

Hi there!

I'm having a problems calculating a value in a report.
In the report of purchase receipt line i want to calculate the amount of the "qty received not invoiced"... in the body section it's easy to do it (qty received not invoiced*unit price in the SourceExpr properties).
Now i want to create a total with the previously calculated field in the footer section...
Can anybody help me with that?

Many thanks

kine

Use some new variable and the value save into it. In the source expression use the variable instead the expression. Than you can use the CurrReport.CREATETOTALS(myvariable) for creating automatic totals of the variable.

xina_man

kine wrote:

Use some new variable and the value save into it. In the source expression use the variable instead the expression. Than you can use the CurrReport.CREATETOTALS(myvariable) for creating automatic totals of the variable.

I'm not a C/AL programmer so I dont know the code for do that task. Is it possible to give me de code for this task?

Thanks&Regards

xina_man

xina_man wrote:

kine wrote:

Use some new variable and the value save into it. In the source expression use the variable instead the expression. Than you can use the CurrReport.CREATETOTALS(myvariable) for creating automatic totals of the variable.

I'm not a C/AL programmer so I dont know the code for do that task. Is it possible to give me de code for this task?

Thanks&Regards

Problem Solved!!!
Many Thanks

kine

1) Create new global variable e.g. with name "ReceivedNotInvAmount" with type Decimal
2) In the correc dataitem add code (expression is same as you are using in the section in SourceExpr) into OnAfterGetRecord

  ReceivedNotInvAmount := "qty received not invoiced" * "unit price";

3) Add this code into OnBeforeDataItem

  CurrReport.CREATETOTALS(ReceivedNotInvAmount);

4) Use the ReceivedNotInvAmount variable everywhere you want to print the amount. If it will be in Footer section, it will print the total.

allende

- Define a global variable ex: MyGrandTotal
- Write this code to "Purch. Rcpt. Line" DataItems OnAfterGetRecord Triggger

Code:
MyGrandTotal := MyGrandTotal + (qty received not invoiced*unitprice );

- Add a text box to Purch.Rcpt.Line footer section
- Write MyGrandTotal to text box's SourceExpr property
- Run the report