Оптимизировать запрос

[Владимир Максимов]

    while select 
            Dimension[4],
            AccountNum,
            Voucher,
            sum(AmountMST)
    from ledgerTrans
    group by
        Dimension[4],
        AccountNum,
        Voucher
    where
        (ledgerTrans.AccountNum == #Account08_20
        || ledgerTrans.AccountNum == #Account08_30
        || ledgerTrans.AccountNum == #Account08_80
        || ledgerTrans.AccountNum == #Account08_90
        || ledgerTrans.AccountNum == #Account08_91
        || ledgerTrans.AccountNum == #Account08_92)
        && ledgerTrans.TransDate <= transdate
        && ledgerTrans.PeriodCode == PeriodCode::Regular
        && !(ledgerTrans.Voucher like "IV05*")
    notexists join inventTrans
    where inventTrans.Voucher == ledgerTrans.Voucher
    {
        value   = ledgerTrans.AmountMST;
        b       = [ledgerTrans.Dimension[4],ledgerTrans.AccountNum];
        simap   = this.SetMap(simap,value,b);
    }