Ledger Account Based Summary AMount

static void ASAP_BalanceAmt_CashInHand(Args _args)
{
    GeneralJournalEntry        generalJournalEntry;
    GeneralJournalAccountEntry generalJournalAccountEntry;
    MainAccount                 MainAccount;

    ;

     while select generalJournalAccountEntry
          join generalJournalEntry
              where generalJournalEntry.RecId == generalJournalAccountEntry.GeneralJournalEntry
                  && generalJournalEntry.SubledgerVoucherDataAreaId == 'ASAP'
                  && generalJournalEntry.AccountingDate >= mkDate(16,04,2017)
                  && generalJournalEntry.AccountingDate <= mkDate(16,04,2017)
              join MainAccount
                 where MainAccount.RecId == generalJournalAccountEntry.MainAccount
                    && MainAccount.MainAccountId == '1111001'

            {
                info(strFmt("Amount : %1 -- Voucher : %2 -- Journal :%3", generalJournalAccountEntry.TransactionCurrencyAmount,generalJournalEntry.SubledgerVoucher ,generalJournalEntry.JournalNumber));
            }

    }