Get Voucher balance in AX 2012

ledgerJournalTrans ledgerJournalTrans;
    ledgerJournalEngine ledgerJournalEngine = new ledgerJournalEngine();
    ledgerJournalTable ledgerJournalTable;
    tmpVoucherSum       tmpVoucherSum;
    ;

    ledgerJournalTrans = ledgerJournalTrans::findRecId(5638439934,false);
    ledgerJournalTable = ledgerJournalTable::find(ledgerJournalTrans.JournalNum);
    ledgerJournalEngine.newJournalActive(ledgerJournalTable,true);
    print ledgerJournalEngine.voucherDebit(ledgerJournalTrans);




    tmpVoucherSum   = LedgerJournalEngine_Server::createVoucherBalance(ledgerJournalTrans.Voucher,
                                                                        ledgerJournalTable.JournalNum);
    print   tmpVoucherSum.debit;
    print   tmpVoucherSum.Credit;
    pause;