How to show the interest rate in report

kolaboy
kolaboy Member Posts: 446
edited 2007-09-19 in NAV/Navision Classic Client
Hi Experts,
I am trying to show the interest Rate Under the Finance Charge Terms table, but it is not coming.
I created i report from customer and Cust. ledger Entry tables.But when i try to show the interest rate which Corresponse to the Finance Charge terms Codes in the Finance Charge Terms table, its not showing.

Can anyone show me how to go about this Please!!!
Thanks.

Answers

  • ufuk
    ufuk Member Posts: 514
    Do you want to show entries or some amount field grouped by interest rate? Can you explain more clearly?
    Ufuk Asci
    Pargesoft
  • kolaboy
    kolaboy Member Posts: 446
    Code Interest Rate
    BAK 10
    BNKG 8


    The interest rates are in the Finance charge Terms Table as shown above.

    I created this report as shown below: 
    OBJECT Report 50301 Mortgage Statements
{
  OBJECT-PROPERTIES
  {
    Date=12/08/07;
    Time=22:37:26;
    Modified=Yes;
    Version List=NCM/MLS;
  }
  PROPERTIES
  {
    OnPreReport=BEGIN
                  DateFilt:=Customer.GETFILTER(Customer."Date Filter");
                END;

  }
  DATAITEMS
  {
    { PROPERTIES
      {
        DataItemTable=Table18;
        DataItemTableView=SORTING(No.)
                          ORDER(Ascending);
        NewPagePerRecord=Yes;
        PrintOnlyIfDetail=Yes;
        ReqFilterFields=No.;
      }
      SECTIONS
      {
        { PROPERTIES
          {
            SectionType=Header;
            PrintOnEveryPage=Yes;
            SectionWidth=18300;
            SectionHeight=1692;
          }
          CONTROLS
          {
            { 1000000001;Label  ;0    ;0    ;7500 ;423  ;FontSize=8;
                                                         FontBold=Yes;
                                                         CaptionML=ENU=Mortgage Customer Statement }
            { 1000000002;TextBox;15000;0    ;3150 ;423  ;HorzAlign=Right;
                                                         SourceExpr=FORMAT(TODAY,0,4) }
            { 1000000003;TextBox;0    ;423  ;7500 ;423  ;SourceExpr=COMPANYNAME }
            { 1000000004;TextBox;17700;423  ;450  ;423  ;CaptionML=ENU=Page;
                                                         SourceExpr=CurrReport.PAGENO }
            { 1000000005;Label  ;16950;423  ;750  ;423  ;ParentControl=1000000004 }
          }
           }
        { PROPERTIES
          {
            SectionType=Body;
            SectionWidth=18300;
            SectionHeight=3384;
          }
          CONTROLS
          {
            { 1000000008;TextBox;3150 ;0    ;1500 ;423  ;HorzAlign=Left;
                                                         FontSize=8;
                                                         SourceExpr="No." }
            { 1000000009;Label  ;0    ;0    ;3000 ;423  ;ParentControl=1000000008;
                                                         FontSize=8;
                                                         FontBold=Yes }
            { 1000000011;TextBox;3150 ;423  ;6150 ;423  ;HorzAlign=Left;
                                                         FontSize=8;
                                                         SourceExpr=Name }
            { 1000000012;Label  ;0    ;423  ;3000 ;423  ;ParentControl=1000000011;
                                                         FontSize=8;
                                                         FontBold=Yes }
            { 1000000014;TextBox;13950;423  ;1800 ;423  ;HorzAlign=Left;
                                                         FontSize=8;
                                                         SourceExpr="Monthly Install" }
            { 1000000015;Label  ;10800;423  ;3000 ;423  ;ParentControl=1000000014;
                                                         FontSize=8;
                                                         FontBold=Yes }
            { 1000000017;TextBox;3150 ;1269 ;1800 ;423  ;HorzAlign=Left;
                                                         FontSize=8;
                                                         SourceExpr="Loan Amount" }
            { 1000000018;Label  ;0    ;1269 ;3000 ;423  ;ParentControl=1000000017;
                                                         FontSize=8;
                                                         FontBold=Yes;
                                                         CaptionML=ENU=Plot Cost }
            { 1000000020;TextBox;3150 ;1692 ;1800 ;423  ;HorzAlign=Left;
                                                         FontSize=8;
                                                         SourceExpr="Down Payment" }
            { 1000000021;Label  ;0    ;1692 ;3000 ;423  ;ParentControl=1000000020;
                                                         FontSize=8;
                                                         FontBold=Yes }
            { 1000000023;TextBox;3150 ;2115 ;1500 ;423  ;HorzAlign=Left;
                                                         FontSize=8;
                                                         SourceExpr="Plot No." }
            { 1000000024;Label  ;0    ;2115 ;3000 ;423  ;ParentControl=1000000023;
                                                         FontSize=8;
                                                         FontBold=Yes }
            { 1000000026;TextBox;13950;1269 ;1800 ;423  ;HorzAlign=Left;
                                                         FontSize=8;
                                                         SourceExpr="Interest Rate" }
            { 1000000027;Label  ;10800;1269 ;3000 ;423  ;ParentControl=1000000026;
                                                         FontSize=8;
                                                         FontBold=Yes }
          }
           }
      }
       }
    { PROPERTIES
      {
        DataItemIndent=1;
        DataItemTable=Table21;
        DataItemTableView=SORTING(Customer No.,Posting Date)
                          WHERE(Reversed=CONST(No));
        OnPreDataItem=BEGIN

                        //"Cust. Ledger Entry".SETFILTER("Posting Date",DateFilt);

                        FinchargeTotal:=0;
                        PrincipalTotal:=0;
                        ArreasVarTotal:=0;
                        CustBal1 := 0;
                        TotCustBal1:=0;
                      END;

        OnAfterGetRecord=BEGIN
                           Fincharge:=0;
                           Principal:=0;
                           ArreasVar:=0;
                           CustBal :=CustBal+"Cust. Ledger Entry".Amount;

                           TotalCustBal := "Detailed Cust. Ledg. Entry"."Amount (LCY)";
                           CustBal1 := "Cust. Ledger Entry". Amount;

                           //CustBal :=CustBal + "Cust. Ledger Entry". Amount;
                           TotCustBal1 += CustBal1;

                           IF "Document Type"=0 THEN  BEGIN
                            Amount := CustBal1-CustBal1;
                            END;

                           IF "Document Type"="Document Type":: Invoice THEN  BEGIN
                            Amount := CustBal1-CustBal1;
                           END;

                           IF "Document Type"="Document Type":: "Finance Charge Memo" THEN  BEGIN
                             Fincharge :=ABS(Amount);
                           END;

                           IF "Document Type"="Document Type":: "Finance Charge Memo" THEN  BEGIN
                             Amount :=ABS(Amount)-ABS(Amount);
                           END;



                           IF "Document Type"="Document Type"::Payment THEN  BEGIN
                             Principal:= "Closed by Amount";
                            // Fincharge :=ABS(Amount)-ABS(Principal);
                             FinchargeTotal:=FinchargeTotal+ ABS(Fincharge);
                             PrincipalTotal :=PrincipalTotal+ABS(Principal);
                             ArreasVar:= -Customer."Monthly Install" - "Cust. Ledger Entry".Amount;
                             ArreasVarTotal:=ArreasVarTotal+ArreasVar;
                           END;
                         END;

        CalcFields=Amount;
        DataItemLink=Customer No.=FIELD(No.);
      }
      SECTIONS
      {
        { PROPERTIES
          {
            SectionType=Header;
            SectionWidth=18300;
            SectionHeight=846;
          }
          CONTROLS
          {
            { 1000000007;Label  ;0    ;0    ;1200 ;846  ;ParentControl=1000000000;
                                                         HorzAlign=Right;
                                                         VertAlign=Bottom;
                                                         FontSize=8;
                                                         FontBold=Yes;
                                                         MultiLine=Yes }
            { 1000000013;Label  ;3000 ;0    ;1500 ;846  ;ParentControl=1000000010;
                                                         VertAlign=Bottom;
                                                         FontSize=8;
                                                         FontBold=Yes;
                                                         MultiLine=Yes }
            { 1000000019;Label  ;4650 ;0    ;4050 ;846  ;ParentControl=1000000016;
                                                         VertAlign=Bottom;
                                                         FontSize=8;
                                                         FontBold=Yes;
                                                         MultiLine=Yes }
            { 1000000025;Label  ;9000 ;0    ;1800 ;846  ;ParentControl=1000000022;
                                                         HorzAlign=Right;
                                                         VertAlign=Bottom;
                                                         FontSize=8;
                                                         FontBold=Yes;
                                                         MultiLine=Yes }
            { 1000000029;Label  ;1500 ;0    ;1350 ;846  ;ParentControl=1000000028;
                                                         VertAlign=Bottom;
                                                         FontSize=8;
                                                         FontBold=Yes;
                                                         MultiLine=Yes }
            { 1000000031;Label  ;16650;0    ;1500 ;846  ;ParentControl=1000000030;
                                                         HorzAlign=Right;
                                                         VertAlign=Bottom;
                                                         FontSize=8;
                                                         FontBold=Yes;
                                                         MultiLine=Yes;
                                                         CaptionML=ENU=Arreas }
            { 1000000033;Label  ;10950;0    ;1800 ;846  ;HorzAlign=Right;
                                                         VertAlign=Bottom;
                                                         FontSize=8;
                                                         FontBold=Yes;
                                                         MultiLine=Yes;
                                                         CaptionML=ENU=Interest  Charge }
            { 1102750002;Label  ;12900;0    ;1500 ;846  ;HorzAlign=Right;
                                                         VertAlign=Bottom;
                                                         FontSize=8;
                                                         FontBold=Yes;
                                                         MultiLine=Yes;
                                                         CaptionML=ENU=Principal }
            { 1102750003;Label  ;14550;0    ;1950 ;846  ;HorzAlign=Right;
                                                         VertAlign=Bottom;
                                                         FontSize=8;
                                                         FontBold=Yes;
                                                         MultiLine=Yes;
                                                         CaptionML=ENU=Acc Balance }
          }
           }
        { PROPERTIES
          {
            SectionType=Body;
            SectionWidth=18300;
            SectionHeight=423;
          }
          CONTROLS
          {
            { 1000000000;TextBox;150  ;0    ;1200 ;423  ;SourceExpr="Posting Date" }
            { 1000000010;TextBox;3000 ;0    ;1500 ;423  ;HorzAlign=Center;
                                                         SourceExpr="Document No." }
            { 1000000016;TextBox;4650 ;0    ;4200 ;423  ;SourceExpr=Description }
            { 1000000022;TextBox;9000 ;0    ;1800 ;423  ;SourceExpr=Amount }
            { 1000000028;TextBox;1500 ;0    ;1350 ;423  ;SourceExpr="Document Type" }
            { 1000000030;TextBox;16650;0    ;1500 ;423  ;HorzAlign=Right;
                                                         BlankZero=Yes;
                                                         SourceExpr=ArreasVar }
            { 1000000032;TextBox;10950;0    ;1800 ;423  ;BlankZero=Yes;
                                                         SourceExpr=-Fincharge }
            { 1102750000;TextBox;14550;0    ;1950 ;423  ;BlankZero=Yes;
                                                         SourceExpr=TotCustBal1 }
            { 1102750001;TextBox;12900;0    ;1500 ;423  ;BlankZero=Yes;
                                                         SourceExpr=Principal }
          }
           }
        { PROPERTIES
          {
            SectionType=Footer;
            SectionWidth=18300;
            SectionHeight=846;
          }
          CONTROLS
          {
            { 1102750004;TextBox;10950;0    ;1800 ;423  ;FontSize=8;
                                                         FontBold=Yes;
                                                         BlankZero=Yes;
                                                         SourceExpr=FinchargeTotal }
            { 1102750005;TextBox;12900;0    ;1650 ;423  ;FontSize=8;
                                                         FontBold=Yes;
                                                         BlankZero=Yes;
                                                         SourceExpr=PrincipalTotal }
            { 1102750006;TextBox;16200;0    ;1950 ;423  ;HorzAlign=Right;
                                                         FontSize=8;
                                                         FontBold=Yes;
                                                         BlankZero=Yes;
                                                         SourceExpr=ArreasVarTotal }
          }
           }
      }
       }
  }
  REQUESTFORM
  {
    PROPERTIES
    {
      Width=9020;
      Height=3410;
    }
    CONTROLS
    {
    }
  }
  CODE
  {
    VAR
      Fincharge@1000000000 : Decimal;
      CustBal@1102750000 : Decimal;
      Principal@1102750001 : Decimal;
      DateFilt@1102750002 : Text[50];
      FinchargeTotal@1102750003 : Decimal;
      PrincipalTotal@1102750004 : Decimal;
      ArreasVar@1102750005 : Decimal;
      ArreasVarTotal@1102750006 : Decimal;
      CustBal1@1000000001 : Decimal;
      TotCustBal1@1000000002 : Decimal;
      TotalCustBal@1000000003 : Decimal;
      "Detailed Cust. Ledg. Entry"@1000000004 : Record 379;

    BEGIN
    END.
  }
}

    I when to pick the interest Rate Corresponding to BAK code
    ie 10% to be shown in the report shown above.
    Any idea please.
    Thanks.
  • kolaboy
    kolaboy Member Posts: 446
    kolaboy wrote:
    Code Interest Rate
    BAK 10
    BNKG 8


    The interest rates are in the Finance charge Terms Table as shown above.

    I created this report as shown below: 
    OBJECT Report 50301 Mortgage Statements
{
  OBJECT-PROPERTIES
  {
    Date=12/08/07;
    Time=22:37:26;
    Modified=Yes;
    Version List=NCM/MLS;
  }
  PROPERTIES
  {
    OnPreReport=BEGIN
                  DateFilt:=Customer.GETFILTER(Customer."Date Filter");
                END;

  }
  DATAITEMS
  {
    { PROPERTIES
      {
        DataItemTable=Table18;
        DataItemTableView=SORTING(No.)
                          ORDER(Ascending);
        NewPagePerRecord=Yes;
        PrintOnlyIfDetail=Yes;
        ReqFilterFields=No.;
      }
      SECTIONS
      {
        { PROPERTIES
          {
            SectionType=Header;
            PrintOnEveryPage=Yes;
            SectionWidth=18300;
            SectionHeight=1692;
          }
          CONTROLS
          {
            { 1000000001;Label  ;0    ;0    ;7500 ;423  ;FontSize=8;
                                                         FontBold=Yes;
                                                         CaptionML=ENU=Mortgage Customer Statement }
            { 1000000002;TextBox;15000;0    ;3150 ;423  ;HorzAlign=Right;
                                                         SourceExpr=FORMAT(TODAY,0,4) }
            { 1000000003;TextBox;0    ;423  ;7500 ;423  ;SourceExpr=COMPANYNAME }
            { 1000000004;TextBox;17700;423  ;450  ;423  ;CaptionML=ENU=Page;
                                                         SourceExpr=CurrReport.PAGENO }
            { 1000000005;Label  ;16950;423  ;750  ;423  ;ParentControl=1000000004 }
          }
           }
        { PROPERTIES
          {
            SectionType=Body;
            SectionWidth=18300;
            SectionHeight=3384;
          }
          CONTROLS
          {
            { 1000000008;TextBox;3150 ;0    ;1500 ;423  ;HorzAlign=Left;
                                                         FontSize=8;
                                                         SourceExpr="No." }
            { 1000000009;Label  ;0    ;0    ;3000 ;423  ;ParentControl=1000000008;
                                                         FontSize=8;
                                                         FontBold=Yes }
            { 1000000011;TextBox;3150 ;423  ;6150 ;423  ;HorzAlign=Left;
                                                         FontSize=8;
                                                         SourceExpr=Name }
            { 1000000012;Label  ;0    ;423  ;3000 ;423  ;ParentControl=1000000011;
                                                         FontSize=8;
                                                         FontBold=Yes }
            { 1000000014;TextBox;13950;423  ;1800 ;423  ;HorzAlign=Left;
                                                         FontSize=8;
                                                         SourceExpr="Monthly Install" }
            { 1000000015;Label  ;10800;423  ;3000 ;423  ;ParentControl=1000000014;
                                                         FontSize=8;
                                                         FontBold=Yes }
            { 1000000017;TextBox;3150 ;1269 ;1800 ;423  ;HorzAlign=Left;
                                                         FontSize=8;
                                                         SourceExpr="Loan Amount" }
            { 1000000018;Label  ;0    ;1269 ;3000 ;423  ;ParentControl=1000000017;
                                                         FontSize=8;
                                                         FontBold=Yes;
                                                         CaptionML=ENU=Plot Cost }
            { 1000000020;TextBox;3150 ;1692 ;1800 ;423  ;HorzAlign=Left;
                                                         FontSize=8;
                                                         SourceExpr="Down Payment" }
            { 1000000021;Label  ;0    ;1692 ;3000 ;423  ;ParentControl=1000000020;
                                                         FontSize=8;
                                                         FontBold=Yes }
            { 1000000023;TextBox;3150 ;2115 ;1500 ;423  ;HorzAlign=Left;
                                                         FontSize=8;
                                                         SourceExpr="Plot No." }
            { 1000000024;Label  ;0    ;2115 ;3000 ;423  ;ParentControl=1000000023;
                                                         FontSize=8;
                                                         FontBold=Yes }
            { 1000000026;TextBox;13950;1269 ;1800 ;423  ;HorzAlign=Left;
                                                         FontSize=8;
                                                         SourceExpr="Interest Rate" }
            { 1000000027;Label  ;10800;1269 ;3000 ;423  ;ParentControl=1000000026;
                                                         FontSize=8;
                                                         FontBold=Yes }
          }
           }
      }
       }
    { PROPERTIES
      {
        DataItemIndent=1;
        DataItemTable=Table21;
        DataItemTableView=SORTING(Customer No.,Posting Date)
                          WHERE(Reversed=CONST(No));
        OnPreDataItem=BEGIN

                        //"Cust. Ledger Entry".SETFILTER("Posting Date",DateFilt);

                        FinchargeTotal:=0;
                        PrincipalTotal:=0;
                        ArreasVarTotal:=0;
                        CustBal1 := 0;
                        TotCustBal1:=0;
                      END;

        OnAfterGetRecord=BEGIN
                           Fincharge:=0;
                           Principal:=0;
                           ArreasVar:=0;
                           CustBal :=CustBal+"Cust. Ledger Entry".Amount;

                           TotalCustBal := "Detailed Cust. Ledg. Entry"."Amount (LCY)";
                           CustBal1 := "Cust. Ledger Entry". Amount;

                           //CustBal :=CustBal + "Cust. Ledger Entry". Amount;
                           TotCustBal1 += CustBal1;

                           IF "Document Type"=0 THEN  BEGIN
                            Amount := CustBal1-CustBal1;
                            END;

                           IF "Document Type"="Document Type":: Invoice THEN  BEGIN
                            Amount := CustBal1-CustBal1;
                           END;

                           IF "Document Type"="Document Type":: "Finance Charge Memo" THEN  BEGIN
                             Fincharge :=ABS(Amount);
                           END;

                           IF "Document Type"="Document Type":: "Finance Charge Memo" THEN  BEGIN
                             Amount :=ABS(Amount)-ABS(Amount);
                           END;



                           IF "Document Type"="Document Type"::Payment THEN  BEGIN
                             Principal:= "Closed by Amount";
                            // Fincharge :=ABS(Amount)-ABS(Principal);
                             FinchargeTotal:=FinchargeTotal+ ABS(Fincharge);
                             PrincipalTotal :=PrincipalTotal+ABS(Principal);
                             ArreasVar:= -Customer."Monthly Install" - "Cust. Ledger Entry".Amount;
                             ArreasVarTotal:=ArreasVarTotal+ArreasVar;
                           END;
                         END;

        CalcFields=Amount;
        DataItemLink=Customer No.=FIELD(No.);
      }
      SECTIONS
      {
        { PROPERTIES
          {
            SectionType=Header;
            SectionWidth=18300;
            SectionHeight=846;
          }
          CONTROLS
          {
            { 1000000007;Label  ;0    ;0    ;1200 ;846  ;ParentControl=1000000000;
                                                         HorzAlign=Right;
                                                         VertAlign=Bottom;
                                                         FontSize=8;
                                                         FontBold=Yes;
                                                         MultiLine=Yes }
            { 1000000013;Label  ;3000 ;0    ;1500 ;846  ;ParentControl=1000000010;
                                                         VertAlign=Bottom;
                                                         FontSize=8;
                                                         FontBold=Yes;
                                                         MultiLine=Yes }
            { 1000000019;Label  ;4650 ;0    ;4050 ;846  ;ParentControl=1000000016;
                                                         VertAlign=Bottom;
                                                         FontSize=8;
                                                         FontBold=Yes;
                                                         MultiLine=Yes }
            { 1000000025;Label  ;9000 ;0    ;1800 ;846  ;ParentControl=1000000022;
                                                         HorzAlign=Right;
                                                         VertAlign=Bottom;
                                                         FontSize=8;
                                                         FontBold=Yes;
                                                         MultiLine=Yes }
            { 1000000029;Label  ;1500 ;0    ;1350 ;846  ;ParentControl=1000000028;
                                                         VertAlign=Bottom;
                                                         FontSize=8;
                                                         FontBold=Yes;
                                                         MultiLine=Yes }
            { 1000000031;Label  ;16650;0    ;1500 ;846  ;ParentControl=1000000030;
                                                         HorzAlign=Right;
                                                         VertAlign=Bottom;
                                                         FontSize=8;
                                                         FontBold=Yes;
                                                         MultiLine=Yes;
                                                         CaptionML=ENU=Arreas }
            { 1000000033;Label  ;10950;0    ;1800 ;846  ;HorzAlign=Right;
                                                         VertAlign=Bottom;
                                                         FontSize=8;
                                                         FontBold=Yes;
                                                         MultiLine=Yes;
                                                         CaptionML=ENU=Interest  Charge }
            { 1102750002;Label  ;12900;0    ;1500 ;846  ;HorzAlign=Right;
                                                         VertAlign=Bottom;
                                                         FontSize=8;
                                                         FontBold=Yes;
                                                         MultiLine=Yes;
                                                         CaptionML=ENU=Principal }
            { 1102750003;Label  ;14550;0    ;1950 ;846  ;HorzAlign=Right;
                                                         VertAlign=Bottom;
                                                         FontSize=8;
                                                         FontBold=Yes;
                                                         MultiLine=Yes;
                                                         CaptionML=ENU=Acc Balance }
          }
           }
        { PROPERTIES
          {
            SectionType=Body;
            SectionWidth=18300;
            SectionHeight=423;
          }
          CONTROLS
          {
            { 1000000000;TextBox;150  ;0    ;1200 ;423  ;SourceExpr="Posting Date" }
            { 1000000010;TextBox;3000 ;0    ;1500 ;423  ;HorzAlign=Center;
                                                         SourceExpr="Document No." }
            { 1000000016;TextBox;4650 ;0    ;4200 ;423  ;SourceExpr=Description }
            { 1000000022;TextBox;9000 ;0    ;1800 ;423  ;SourceExpr=Amount }
            { 1000000028;TextBox;1500 ;0    ;1350 ;423  ;SourceExpr="Document Type" }
            { 1000000030;TextBox;16650;0    ;1500 ;423  ;HorzAlign=Right;
                                                         BlankZero=Yes;
                                                         SourceExpr=ArreasVar }
            { 1000000032;TextBox;10950;0    ;1800 ;423  ;BlankZero=Yes;
                                                         SourceExpr=-Fincharge }
            { 1102750000;TextBox;14550;0    ;1950 ;423  ;BlankZero=Yes;
                                                         SourceExpr=TotCustBal1 }
            { 1102750001;TextBox;12900;0    ;1500 ;423  ;BlankZero=Yes;
                                                         SourceExpr=Principal }
          }
           }
        { PROPERTIES
          {
            SectionType=Footer;
            SectionWidth=18300;
            SectionHeight=846;
          }
          CONTROLS
          {
            { 1102750004;TextBox;10950;0    ;1800 ;423  ;FontSize=8;
                                                         FontBold=Yes;
                                                         BlankZero=Yes;
                                                         SourceExpr=FinchargeTotal }
            { 1102750005;TextBox;12900;0    ;1650 ;423  ;FontSize=8;
                                                         FontBold=Yes;
                                                         BlankZero=Yes;
                                                         SourceExpr=PrincipalTotal }
            { 1102750006;TextBox;16200;0    ;1950 ;423  ;HorzAlign=Right;
                                                         FontSize=8;
                                                         FontBold=Yes;
                                                         BlankZero=Yes;
                                                         SourceExpr=ArreasVarTotal }
          }
           }
      }
       }
  }
  REQUESTFORM
  {
    PROPERTIES
    {
      Width=9020;
      Height=3410;
    }
    CONTROLS
    {
    }
  }
  CODE
  {
    VAR
      Fincharge@1000000000 : Decimal;
      CustBal@1102750000 : Decimal;
      Principal@1102750001 : Decimal;
      DateFilt@1102750002 : Text[50];
      FinchargeTotal@1102750003 : Decimal;
      PrincipalTotal@1102750004 : Decimal;
      ArreasVar@1102750005 : Decimal;
      ArreasVarTotal@1102750006 : Decimal;
      CustBal1@1000000001 : Decimal;
      TotCustBal1@1000000002 : Decimal;
      TotalCustBal@1000000003 : Decimal;
      "Detailed Cust. Ledg. Entry"@1000000004 : Record 379;

    BEGIN
    END.
  }
}

    I when to pick the interest Rate Corresponding to BAK code
    ie 10% to be shown in the report shown above.
    Any idea please.
    Thanks.

    I am still struggling with the above problem. Can anyone help me out please.
    Thanks
  • Albertvh
    Albertvh Member Posts: 516
    Hi Kolaboy,

    you will need to define the Finance Charge Terms table as variable of record type and do the following in the OnAfterGetrecord of the Customer table

    FinChrgTerm.GET("Fin. Charge Terms Code");

    Albert
  • kolaboy
    kolaboy Member Posts: 446 
    IF "Fin. Charge Terms Code" = BAK  THEN
FinChrgTerm.GET("Fin. Charge Terms Code");
IntRate := "Finance Charge Terms"."Interest Rate"

    I use the above code to be able to display the interest of 10% which is correspond to BAK, but is giving 0.00 as result.

    i define IntRate as decimal in a text box of the report to display the result but to no avail.

    I have done what Albertvh told me to do, but its not working. Am i missing anything. Please i need you help. Albertvh is there anything am missing?
    Thanks
  • Albertvh
    Albertvh Member Posts: 516
    Hi Kolaboy,

    change

    SourceExpr="Interest Rate"

    to

    SourceExpr=FinChrgTerms."Interest Rate"

    In Customer - OnAfterGetRecord

    IF NOT FinChrgTerm.GET("Fin. Charge Terms Code") THEN
    FinChrgTerm."Interest Rate" := 0;


    Albert
  • kolaboy
    kolaboy Member Posts: 446
    Albertvh, thanks for the suggestion its working now.
    Thanks.

Categories