4.4. Fusionar una ledgerDimension y una DefaultDimension

Como todos ya sabéis la cuenta contable de los diarios actualmente está compuesta por la cuenta principal y unas dimensiones.

Lo que haremos será utilizar un método existente del estándar para fusionar una cuenta contable con las dimensiones de un cliente.

Para quien lo desconozca existe esta clase la cual podemos utilizar para trabajar con las dimensiones.

Esta será la línea de nuestro diario.  Procederemos a fusionar la cuenta contable (0160) con las dimensiones del cliente.

static void MergeledgerDimensionDefaultDimension(Args _args)

{

    CustTable                custTable;

    LedgerJournalTrans  ledgerJournalTrans;

    ttsBegin;

    

    select firstOnly forUpdate ledgerJournalTrans

        where ledgerJournalTrans.JournalNum == "000084_010";

    

    select firstonly custTable;

    

    ledgerJournalTrans.LedgerDimension = DimensionDefaultingService::serviceCreateLedgerDimension(ledgerJournalTrans.LedgerDimension,

                                                                                             custtable.DefaultDimension);

    ledgerJournalTrans.update();

    

    ttsCommit;

}

Como podéis ver en la imagen tenemos la fusión de nuestra cuenta contable con las dimensiones del cliente.

.