Settle Clearing Entries (Postdated Check) Status

Settle Clearing Entries (Postdated Check) Status

Recently I face the issue that after posting of payment journal status of post dated check not changed from Open to Post. I have lots of R&D in this but no luck,

So I write a batch job where will change the status of custVendPosted check for me.

    LedgerJournalTable _ledgerJournalTable;

    LedgerJournalTrans _ledgerJournalTrans;

    CustVendPDCRegister custPDC;

    Counter             _counter=0;

    while select forUpdatecustPDC

            wherecustPDC.PDCStatus==PostDatedCheckStatus::Open

            && custPDC.MaturityDate > systemDateGet()

          existsjoin _ledgerJournalTrans

            wherecustPDC.LedgerJournalTrans==_ledgerJournalTrans.RecId

          existsjoin _ledgerJournalTable

            where_ledgerJournalTrans.JournalNum==_ledgerJournalTable.JournalNum

            && _ledgerJournalTable.Posted==NoYes::Yes

    {

               _counter++;

               custPDC.PDCStatus=PostDatedCheckStatus::Posted;

               ttsBegin;

               custPDC.update();

               ttsCommit;

    }

        info(strFmt("Total Number %1 of records updated on %2.",_counter,today()));