Function GenerateReportBalance(StartDate, EndDate, Account, Entity, ReportNumber)
   
   Spreadsheet = New SpreadsheetDocument;
   
   Template = GetTemplate("Template");
   
   LcAmount = "NFD = 0";
   
   
   V8 = New COMObject("V83.COMConnector");
   ojBN = V8.Connect("File = E:\BACNINH; Usr = XXXX;Pwd=xxxxxxx;");
   
   Query = ojBN.NewObject("Query", "SELECT
   |   a.Account AS Account,
   |   a.Account.Description AS AccountName,
   |   a.TienOpeningBalanceDr AS OpeningDebit,
   |   a.TienOpeningBalanceCr AS OpeningCredit,
   |   a.TienTurnoverDr AS TurnoverDebit,
   |   a.TienTurnoverCr AS TurnoverCredit,
   |   a.TienClosingBalanceDr AS ClosingDebit,
   |   a.TienClosingBalanceCr AS ClosingCredit
   |FROM
   |   AccountingRegister.CanDoiTaiKhoan.BalanceAndTurnovers(&LdTuNgay, &LdDenNgay, , , , ) AS a
   |WHERE
   |   a.Account.Code LIKE &LcTk
   |TOTALS
   |   SUM(OpeningDebit),
   |   SUM(OpeningCredit),
   |   SUM(TurnoverDebit),
   |   SUM(TurnoverCredit),
   |   SUM(ClosingDebit),
   |   SUM(ClosingCredit)
   |BY
   |   Account HIERARCHY
   |AUTOORDER");

   LcTk    = TrimAll(Account.Code) + "%";
   

   Query.SetParameter("LdTuNgay", BegOfDay(StartDate));
   Query.SetParameter("LdDenNgay", EndOfDay(EndDate));

   Query.SetParameter("LcTk", LcTk);
   
   SelectionDetails = Query.Execute().Select();

..................