Отсторнировать документ ГК программно

[Sada]

Не кидайте камнями. Хочу сначала просто чтоб в новый Документ ГК попали все строки из сторнируемого документа. Выходит в итоге вообще что попало...

    numberSeq = NumberSeq::newGetVoucher(VendParameters::numRefVendExchAdjVoucher());

    ledgerVoucher = ledgerVoucher::newLedgerPost(DetailSummary::Summary,
                                                 SysModule::Vend,
                                                 numberSeq.parmVoucherSequenceCode());
    voucher   = numberSeq.voucher();

    ledgerVoucherObject = LedgerVoucherObject::newVoucher(
                        voucher,
                        _inventJournalCostClosing.TransDate,
                        SysModule::Vend,
                        LedgerTransType::ExchAdjustment);
    ledgerVoucher.addVoucher(ledgerVoucherObject);
    ledgerVoucher.findLedgerVoucherObject().parmCorrection(true);
    ledgerBondClient = ledgerVoucher.findLedgerVoucherObject().ledgerBondClient_RU();

        while select ledgerTrans index hint VoucherDateIdx
        where ledgerTrans.TransDate == _inventJournalCostClosing.TransDate &&
              ledgerTrans.Voucher   == _inventJournalCostClosing.ExchAdjVoucher &&
        {
        ledgerVoucher.addTrans(ledgerVoucherTransObject::newCreateTrans(ledgerVoucherObject,
                                                                        ledgerTrans.Posting,
                                                                        ledgerTrans.AccountNum,
                                                                        ledgerTrans.Dimension,
                                                                        currencyCodeMST,
                                                                        ledgerTrans.AmountMST,
                                                                        0));

}
ledgerVoucher.end()

вместо 24-х строк попадает только 6 и то какие то левый суммы вылазят кое где...