рс = СоздатьОбъект("ODBCRecordset");
ТекстЗапроса = "
|SELECT
| Рег.IDDoc as [Док $Документ],
| Рег.IDDocDef as Док_вид,
| $Рег.СуммаСНДС as [СуммаСНДС]
|FROM
| $Регистр.ОборотыТМЦ as Рег
|WHERE
| Рег.IDDoc = :ВыбДок";
рс.УстановитьТекстовыйПараметр("ВыбДок", РН);
тз = рс.ВыполнитьИнструкцию(ТекстЗапроса);
Возврат тз.итог("СуммаСНДС");
ТекстЗапроса = "
|SELECT
| Рег.IDDoc as [Док $Документ],
| Рег.IDDocDef as Док_вид,
| $Рег.СуммаСНДС as [СуммаСНДС]
|FROM
| $Регистр.ОборотыТМЦ as Рег
|WHERE
| Рег.IDDoc = :ВыбДок";
рс.УстановитьТекстовыйПараметр("ВыбДок", РН);
тз = рс.ВыполнитьИнструкцию(ТекстЗапроса);
Возврат тз.итог("СуммаСНДС");
Комментариев нет:
Отправить комментарий