Изменение даты в разнесенных закупках

[Andrew Besedin]

Уважаемое сообщество!
У нас очередное ЧП - на сей раз разнесли закупки с неверной датой. Хочется иметь инструмент исправления этой проблемы.
Будьте добры, посмотрите критически нижеследущий код - какие таблицы еще нужно подправить, на ваш взгляд? И вообще, не вырастут ли какие-нибудь ноги от такой процедуры?

PHP код:

void clicked()
{
PurchTable pTable;
PurchLine pLine;
InventTrans iTrans;
VendInvoiceJour vIJour;
VendInvoiceTrans vITrans;
LedgerTrans lTrans;

if(!PurchID.text())
    Throw Error('А где номер закупки');
if(!NewDate.dateValue())
    Throw Error('А где новая дата?');

select forupdate pTable where pTable.PurchId == PurchID.text();
    pTable.DeliveryDate= NewDate.dateValue();
    pTable.Doupdate();

while select forupdate pLine where pLine.PurchId == pTable.PurchId
{
    pLine.DeliveryDate = NewDate.dateValue();
    while select forupdate iTrans where iTrans.InventTransId == pLine.InventTransId
    {
        iTrans.DateFinancial = NewDate.dateValue();
        iTrans.update();
    }
    pLine.update();

    while select forupdate vIJour where vIJour.PurchId == pTable.PurchId
    {
        while select forupdate vITrans where vITrans.InvoiceId == vIJour.InvoiceID
        {
            vITrans.invoiceDate = NewDate.dateValue();
            vITrans.update();
        }

        while select forupdate lTrans where lTrans.Voucher == vIJour.LedgerVoucher
                                        &&  lTrans.TransDate == vIJour.InvoiceDate
        {
            lTrans.TransDate = NewDate.dateValue();
            lTrans.DocumentDate = NewDate.dateValue();
            lTrans.update();
        }

        vIJour.InvoiceDate = NewDate.dateValue();
        vIJour.update();
    }
}
    super();
} 


С уважением,
Андрей Беседин

[mazzy]

Цитата:

У нас очередное ЧП - на сей раз разнесли закупки с неверной датой. Хочется иметь инструмент исправления этой проблемы

Он уже есть.
Возвратить и ввести новую.

Список таблиц позже.

Сейчас только скажу, что дату в inventTrans надо менять с предельной осторожностью поскольку она, как это ни страно , влияет на себестоимость.

Ноги скорее всего вырастут.

[Михаил Андреев]

Цитата:

Сейчас только скажу, что дату в inventTrans надо менять с предельной осторожностью поскольку она, как это ни страно , влияет на себестоимость.

Почему странно ? Это как раз правильно.

Сергей!
А если после обновления дат в InventTrans запустить пересчет остатков, программа сама все эти проблемы с остатками и себестоимостью не решит?

Кстати, список таблиц слишком не полон. В частности, забыли: InventTransPosting, InventBatch на вскидку. Дальше не смотрел. Похоже, придется Андрею Беседину повозиться часок c MorphX

[Andrew Besedin]

Внимательнее допросил милейших девочек . Оказалось, что ошибка была сделана при разноске счет-фактуры (а складские все операции выполнены верно). То есть все, что связано с Invent, разнеслось и отработало перфектли. Да и DeliveryDate тоже верная стоит. Осталось только финансовую часть вытащить...

[mazzy]

К Михаилу:

1.


2.
Не уверен что пересчет остатков пересчитает уже закрытые периоды.
Ни разу не пробовал так над нею издеваться.

Кроме того, а что будет с налогами? Что будет с курсовыми и суммовыми? Что будет с прогнозом движения денежных средств?


К Андрею: к сожалению не успею заняться подготовкой списка. Но Михаил прав - таблиц там гораздо больше. Кроме того основная проблема состоит в том, что в ходе работы Аксапты одна проводка может расщепляться на несколько, а потом несколько проводок могут быть слиты в одну.

Далее,
править InventTrans вручную очень опасно и чревато. Надо использовать класс InventMovement.
Править LedgerJournal лучше с помощью класса LedgerJournalEngine.
Как создаются проводки можно посмотреть в классах LedgerTrans*
Как создаются документы по закупке можно посмотреть в PurchFormLetter*
и т.п.

Стоит только посмотреть в эти классы, как желание что-либо править непосредственно в таблицах пропадает надолго

[mazzy]

Цитата:

Изначально опубликовано Andrew Besedin
Осталось только финансовую часть вытащить...

Успехов.
Расскажешь потом?

Моя рекомендация: сторно, а затем новый правильный СФ. Это лучший выход из ситуации.
Спорим?