Vina Ayu Pramadya Puspa Blog: Add Range of Query datasource in a form ( Load )

public void init()
{
    callerFDS = element.args().record().dataSource();
    ledgerJournalTrans = element.args().record();
    ledgerJournalTable = ledgerJournalTrans.ledgerJournalTable();
    ledgerJournalName = ledgerJournalTable.ledgerJournalName();

    super();

    markedMap = new Map(Types::Int64, Types::Real);

    element.dialogBoxreset();
    this.initFromCaller();
}

void initFromCaller()
{
    LedgerJournalTrans  ledgerJournalTransLocal;
    LPPJournalLine      lppJournalLineLocal;
    AmountCur           amountTmp;
    VendAccount         VendAccount;
    LPPJournalTable     LPP;

    while select ledgerJournalTransLocal
        where ledgerJournalTransLocal.JournalNum == ledgerJournalTable.JournalNum
        && (ledgerJournalTransLocal.LPPJournalTable)
    {
        if (markedMap.exists(ledgerJournalTransLocal.LPPJournalTable))
        {
            amountTmp = markedMap.lookup(ledgerJournalTransLocal.LPPJournalTable);
            amountTmp += ledgerJournalTransLocal.AmountCurDebit;
            amountTmp -= ledgerJournalTransLocal.AmountCurCredit;
            markedMap.remove(ledgerJournalTransLocal.LPPJournalTable);
        }
        else if(ledgerJournalTransLocal.AmountCurDebit)
            amountTmp = ledgerJournalTransLocal.AmountCurDebit;
        else if(ledgerJournalTransLocal.AmountCurCredit)
            amountTmp = -1 * ledgerJournalTransLocal.AmountCurCredit;

        markedMap.insert(ledgerJournalTransLocal.LPPJournalTable, amountTmp);
    }

    if(ClearAllData)
    {
        delete_from ledgerJournalTransLocal
            where ledgerJournalTransLocal.JournalNum == ledgerJournalTable.JournalNum
                  && (ledgerJournalTransLocal.LPPJournalLine || ledgerJournalTransLocal.LPPJournalTable);
    }
    //LPPSettlement::refreshSettle();

    if (ledgerJournalTrans.NoteAccountNum != '' && ledgerJournalTrans.AccountType == LedgerJournalACType::Ledger)
    {
        //VendAccount = VendTable::find(DimensionStorage::ledgerDimension2AccountNum(ledgerJournalTrans.LedgerDimension)).AccountNum;
        VendAccount = ledgerJournalTrans.NoteAccountNum;
        if (VendAccount)
        {
            LPPJournalTable_ds.query().dataSourceTable(tableNum(LPPJournalTable)).
                addRange(fieldNum(LPPJournalTable, NoteAccountNum)).value(SysQuery::value(VendAccount));
        }
    }

    LPPJournalTable_ds.query().dataSourceTable(tableNum(LPPJournalTable)).
        addRange(fieldNum(LPPJournalTable, Posted)).value(SysQuery::value(NoYes::Yes));

    LPPJournalTable_ds.query().dataSourceTable(tableNum(LPPJournalTable)).
        addRange(fieldNum(LPPJournalTable, Cancelled)).value(SysQuery::value(NoYes::No));

    LPPJournalTable_ds.query().dataSourceTable(tableNum(LPPJournalTable)).
        addRange(fieldNum(LPPJournalTable, Closed)).value(SysQuery::value(NoYes::No));

    LPPJournalTable_ds.query().dataSourceTable(tableNum(LPPJournalTable)).
        addRange(fieldNum(LPPJournalTable, AccountType)).value(SysQuery::value(LPPLedgerJournalType::Ledger));

    LPPJournalTable_ds.query().dataSourceTable(tableNum(LPPJournalTable)).
        addRange(fieldNum(LPPJournalTable, totaloutstanding)).value(SysQuery::valuenot(0));
}

Vina Ayu Pramadya Puspa Blog

Kamis, 12 Oktober 2017

Add Range of Query datasource in a form ( Load )

Tidak ada komentar:

Posting Komentar

X++ REVERSE CLOSE TRANSACTION IN CUSTOMER SETTLEMENT

Cari Blog Ini