Показать сообщение отдельно
Старый 21.02.2007, 16:14   #8  
rkorchagin is offline
rkorchagin
Участник
 
81 / 69 (3) ++++
Регистрация: 26.09.2006
Заметил что если есть соответствующая запись в ReqTransCov то такой planned order не отображается в форме! сделал так:

X++:
//[AGR6996] TE-rko 20.02.2007 - delete existing Planned Order
void deleteExistingReqPO(ReqPO _reqPO)
{
    ReqPO           reqPO;
    ReqTrans        reqTrans;
    ReqTransCov     reqTransCov;
    ;
    ttsbegin;

    while
        select forupdate reqPO where
                              reqPO.ItemId              == _reqPO.ItemId      &&
                              reqPO.AgrSalesTypeAdv     == _reqPO.AgrSalesTypeAdv &&
                              reqPO.RefType             == 33
    {
        reqTrans = reqPO.reqTrans();
        if (reqTrans && reqTrans.Direction == 1)
        {
            select firstonly reqTransCov where reqTransCov.IssueRecId == reqTrans.RecId;
            if (!reqTransCov)
                reqPO.delete();
        }
    }
    ttscommit;
}
Кто может прокомментировать, не вызовет ли проблем такой код?