[development-axapta] How to add a space in btw in the Voucher Number by using Job

[mchiat]

Hi all,

I would like to know how to add a space in between a voucher number,
e.g. from 'AP-OP00000001' to 'AP-OP 00000001'.  Hope someone can shed
any light on it. Thanks in advance. 

Herewith my code:
static void remove_VoucherSpace(Args _args)
{
    LedgerJournalTable      _ledgerJournalTable;
    LedgerJournalTrans      _ledgerJournalTrans;
    str                      txt;
  
    ;
    ttsbegin;
    while select forupdate _ledgerJournalTrans where
_ledgerJournalTrans.Voucher == 'APOP*'
    {
        if
(LedgerJournalTable::find(_ledgerJournalTrans.JournalNum).JournalName
like 'AP-OP')
        {
            _ledgerJournalTrans.Voucher = 'APOP ';
            _ledgerJournalTrans.update();
        }
    }
    ttscommit;
    info(strfmt("Update completed as of %1", systemdateget()));
}