vendor summary aging

Hello,
I have a problem in vendor summary aging report. It is not filtering on the dimensions.
I have tried to add this code:

Vendor - OnAfterGetRecord()
PrintLine := FALSE;
LineTotalCustBalance := 0;
Vendor.COPYFILTER("Currency Filter",DtldVendLedgEntry."Currency Code");
//MOD01 start
Vendor.COPYFILTER("Global Dimension 1 Filter",DtldVendLedgEntry.''Initial Entry Global Dim. 1");
Vendor.COPYFILTER("Global Dimension 2 Filter",DtldVendLedgEntry.''Initial Entry Global Dim. 2");
//MOD01 ENd
FOR i := 1 TO 5 DO BEGIN
...

It is still not filtering on the proper values.

Please any advise?
Thanks