Страница 1 из 1

TxoBodySetSumKol

Добавлено: 25 июн 2015, 17:44
Masygreen
Добрый..
Не пойму как работает TxoBodySetSumKol, в ТХО стоит "авто". Уже прям константу проставляю, не работает...
На счете есть количественный учет. МЦ на 3 уровне КАУ, пробовал katmc.cEd и Kated.cKatOtped .. ни какого толка ..

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

TxoBodyClear(hTxo);
..
TxoBodySetSumKol(hTxo, VALSPMNP.Kol, KatOtpEd.nrec);//Кол-во
message(VALSPMNP.PRICEFACT + '\' + VALSPMNP.Kol + '; KatOtpEd.nrec = ' + KatOtpEd.nrec + '; KatOtpEd.Name = ' + KatOtpEd.Name);

TxoBodySetSum(hTxo, VALSPMNP.PRICEFACT, 0, 0);//Сумма факт
TxoBodyInsert(hTxo);

Re: TxoBodySetSumKol

Добавлено: 25 июн 2015, 18:38
Masygreen
сам себе отвечу ... ппц .. взрыв мозга .. если бы не исходники, вернее комменты к коду ларина ))

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

     TxoBodySetSum(hTxo, PGetAnyCurrency(PaySchem.cVal, tmpSum, buf.DatOb, 0), 0, 0);
               TxoBodySetSumVal(hTxo, tmpSum, PaySchem.cVal);
               TxoBodySetSumKol(hTxo, SpDocs.Kol, SpDocs.cOtpEd);  //А так количество есть :)
               TxoBodyInsert(hTxo);
оказывается важен порядок.. сначала сумма потом кол-во

Re: TxoBodySetSumKol

Добавлено: 25 июн 2015, 22:30
LaaLaa

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

     
  TxoBodySetSum(hTxo, tmpSum, 0, 100500); //А так третьим праметром 100500 штук тоже может проскочит :)
  TxoBodyInsert(hTxo);

Re: TxoBodySetSumKol

Добавлено: 26 июн 2015, 11:14
Masygreen
LaaLaa писал(а):

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

     
  TxoBodySetSum(hTxo, tmpSum, 0, 100500); //А так третьим праметром 100500 штук тоже может проскочит :)
Ну может конечно , но мне не подходит, не ко всем проводкам в ТХО нужно кол-во, только для некоторых ( я есно упростил пример)..и это был реальный коммент ))