Аналитика доп.соглашение

ПНР и сопровождение

Модераторы: m0p3e, edward_K, Модераторы

Ответить
Anima
Постоянный гость
Сообщения: 81
Зарегистрирован: 10 июл 2006, 11:11
Откуда: г. Кемерово
Контактная информация:

Аналитика доп.соглашение

Сообщение Anima »

Добрый день!

Может кто сталкивался, есть необходимость в ТХО по счету 62.03 в КАУ2(аналитике "Договоры") выбрать не сам договор, а доп.соглашение привязанное к акту.
Алексей
Местный житель
Сообщения: 2896
Зарегистрирован: 24 июн 2005, 12:12
Откуда: Иркутская область

Сообщение Алексей »

А что вам мешает выбрать доп.соглашение? с точки зрения БД - это тот же договор, только со ссылкой на вышестоящий.
Nikos
Местный житель
Сообщения: 577
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Томск

Сообщение Nikos »

Я использовал интерфейс ObjTxoExtractKauPlugin
Anima
Постоянный гость
Сообщения: 81
Зарегистрирован: 10 июл 2006, 11:11
Откуда: г. Кемерово
Контактная информация:

Сообщение Anima »

Алексей писал(а):А что вам мешает выбрать доп.соглашение? с точки зрения БД - это тот же договор, только со ссылкой на вышестоящий.
Я понимаю, что это тот же договор, но как это прописать в ТХО не понятно. Если аналитика "Договоры", то и из документа подтягивается именно верхний уровень т.е. сам договор.
Anima
Постоянный гость
Сообщения: 81
Зарегистрирован: 10 июл 2006, 11:11
Откуда: г. Кемерово
Контактная информация:

Сообщение Anima »

Nikos писал(а):Я использовал интерфейс ObjTxoExtractKauPlugin
А можно поподробнее?
Алексей
Местный житель
Сообщения: 2896
Зарегистрирован: 24 июн 2005, 12:12
Откуда: Иркутская область

Сообщение Алексей »

либо явно указывать - либо txoApi
Nikos
Местный житель
Сообщения: 577
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Томск

Сообщение Nikos »

Нужно написать реализацию интерфейса ObjTxoExtractKauPlugin. Его описание есть в TXOAPI.pdf. Ну а функция у меня выглядит примерно так

Код: Выделить всё

procedure OnExtractKau(hTxo : longint; TiDkGal : word; cSoprHoz, cSoprDoc : comp);
{
  TxoHeadClear(hTxo);

  if(TiDkGal = 1 or TiDkGal = 2)   //Платежные поручения
  {
    if (tsOk = getfirst BASEFIN where ((cSoprHoz == BASEFIN.CSOPRHOZ)) )
    {
      if(BASEFIN.cappdogovor > 0)
      {
        tekdogovor:=BASEFIN.cappdogovor;
      }
      else
      {
        tekdogovor:=BASEFIN.cdogovor;
      }
    } 
  }
  TxoHeadAddKau(hTxo, 	wFlKau_Mode4, 	cgKau_Dogovor, 	tekdogovor);
}
Seybukan
Местный житель
Сообщения: 1357
Зарегистрирован: 29 мар 2005, 17:49
Откуда: СПб, ЭП-Аудит
Контактная информация:

Сообщение Seybukan »

Можно использовать TxoSetKau.
Seybukan
Местный житель
Сообщения: 1357
Зарегистрирован: 29 мар 2005, 17:49
Откуда: СПб, ЭП-Аудит
Контактная информация:

Сообщение Seybukan »

Это если проводим из актов и накладных.
В аналитике договор к счету ставим по Shift+F3 режим 0.
&1 = TxoSetKau(14,160, coTXOGetField('KATSOPR','CAPPDOGOVOR', &SoprDoc ))
Ответить