Показать сообщение отдельно
Старый 02.08.2006, 15:02   #2  
konopello is offline
konopello
SAP
SAP
 
628 / 76 (4) ++++
Регистрация: 08.11.2005
Адрес: Минск
Ну вот пример, добавь в клас PurchFormLetter метод :
Код:
void PostJournal(   Common         source,
                    Num           _number,
                    TransDate     _transDate          = this.transDate(),
                    PurchUpdate   _specQty            = PurchUpdate::All,
                    AccountOrder  _accountOrder       = AccountOrder::None,
                    NoYes         _proforma           = purchParmUpdate.proforma,
                    NoYes         _printFormLetter    = printFormLetter)

{;
     switch(source.tableId)
     {
         case tablenum(PurchTable)       :   this.purchTable(source);
                                             this.initParmPurchTable(purchTable);
                                             break;
     }

     if (!_transDate)
         _transDate = systemDateGet();

     this.transDate          (_transDate);
     this.specQty            (_specQty);
     this.proforma           (_proforma);
     this.printFormLetter    (_printFormLetter);
     this.printPromissoryNote(NoYes::No);

     this.createParmUpdate();
     this.initParameters(purchParmUpdate, PrintOut::Current);  // Printout

     this.initLinesQuery();
     this.progressHide();

      ttsbegin;
     while select forUpdate purchParmTable
         index hint ParmIdPurchIdIdx
         where purchParmTable.PurchId == purchTable.PurchId
     {
         purchParmTable.Num = _number;
         purchParmTable.doupdate();

     }
     ttscommit;

     this.run();
}
создай экземпляр и вызове этот метод, работоспасобность его не проверял, но вроде работает