Копирование строк журнала отгрузочной накладной по производственному заказу

[tolstjak]

Здравствуйте уважаемые.

В производстве почти все завязано на спецификациях. Их можно копировать из ПЗ в ПЗ. По ним можно создавать отгрузочные накладные и т.д.
А вот копирования строк отгрузочных накладных из одного журнала в другой не предусмотрено.
Вопрос:
На основе какого класса (с доработкой под свои требования) можно сделать это копирование или лучше писать свой класс?

Заранее благодарен.

[EVGL]

Проще самому написать, примерно так (тут журнал другой):

protected JournalTableMap reverseJournal(ProdJournalTable _journalTable)
{
    ProdJournalTable    journalTableReverse;
    ;

    journalTableReverse.data(_journalTable);
    journalTableReverse.journalId               = '';
    journalTableReverse.Posted                  = NoYes::No;
    journalTableReverse.RouteAutoPickList       = NoYes::No;
    journalTableReverse.EndJob                  = NoYes::No;
    journalTableReverse.insert();

    setPrefix(journalTableReverse.JournalId);

    switch (journalTableReverse.JournalType)
    {
        case ProdJournalType::ReportFinished :
            this.reverseTransRAF(_journalTable, journalTableReverse);
            break;

        default :
            throw error(strFmt("@SYS18917", _journalTable.JournalType));
    }

    return journalTableReverse;
}

protected void reverseTransRAF(
    ProdJournalTable _journalTable,
    ProdJournalTable _journalTableReverse)
{
    ProdJournalProd         journalTrans;
    ProdJournalProd         journalTransReverse;
    ProdJournalTableData    journalTableData;
    ProdJournalTransData    journalTransData;
    Voucher                 voucher;
    ;

    journalTableData = ProdJournalTableData::newTable(_journalTableReverse);

    while select journalTrans
        where journalTrans.JournalId == _journalTable.JournalId
    {
        journalTransReverse.data(journalTrans);
        journalTransReverse.JournalId            = _journalTableReverse.JournalId;

        if (! voucher)
        {
            journalTransData = ProdJournalTransData::newTransTable(journalTransReverse, journalTableData);
            journalTransData.initVoucher('', false);
            voucher = journalTransReverse.Voucher;
        }

        journalTransReverse.Voucher              = voucher;
        journalTransReverse.TransDate            = this.transDate(journalTransReverse);
        ...
        journalTransReverse.ProdFinished         = NoYes::No;
        journalTransReverse.ProdPickList         = NoYes::No;
        journalTransReverse.insert();
    }
}

[tolstjak]

Цитата:

Сообщение от EVGL

Проще самому написать, примерно так (тут журнал другой):

Понятно. Больщое спасибо. Буду пробовать