VFP9 1C8.1+SQL. cqai.hfrt.downloadcold.win

ТипЦен = ВидЦены; ВидЦены = Справочники.ТипыЦенНоменклатуры.НайтиПоНаименованию("Оптовая 1"); ТЧВидЦены = ДокУЦ. ТипЦены = Справочники.ТипыЦенНоменклатуры.НайтиПоКоду(ЗАдаем код нужноготипа) Запрос.УстановитьПараметр("ТипЦены".

Рабочее место продавца в Бухгалтерии 2.0

Запрос.УстановитьПараметр("ТипЦен", Справочники.ТипыЦенНоменклатуры. Справочники.НалоговыеНазначенияАктивовИЗатрат. ТипЦен = Справочники.ТипыЦенНоменклатуры.НайтиПоНаименованию("Оптовая цена", Истина); НовыйДокумент.Ответственный. ТипЦеныРозничный = Справочники.ТипыЦенНоменклатуры.НайтиПоНаименованию("Розничная"); НоваяСтрока = ДокументУстановкиЦенГривна. НайтиПоКоду("796"); ТипЦенБезНДС=Справочники.ТипыЦенНоменклатуры. ВалютаРуб=Справочники.Валюты.НайтиПоКоду("643"). ТипЦены = Справочники.ТипыЦенНоменклатуры.НайтиПоКоду(ЗАдаем код нужноготипа) Запрос.УстановитьПараметр("ТипЦены". НайтиПоНаименованию("Місто"); ТЦ2 = Справочники.ТипыЦенНоменклатуры.НайтиПоНаименованию("Основна ціна закупівлі"); ТЦ3. Номенклатура= Элемент.Значение; ТипЦен=Справочники.ТипыЦенНоменклатуры.НайтиПоНаименованию("Плановая цена"); Запрос=. Добавить(Справочники.ТипыЦенНоменклатуры.НайтиПоНаименованию("Розничная")); ТипЦенВЗапросе2 = Новый СписокЗначений; ТипЦен = Справочники.ТипыЦенНоменклатуры.НайтиПоНаименованию("Закупочные"); НоваяСтрока2 = НовыйДок.ТипыЦен. ТицЦенСсылка = Справочники.ТипыЦенНоменклатуры.НайтиПоНаименованию("Страховой"); СтруктураОтбор = Новый Структура; КонрагентДляПоиска = Справочники.Контрагенты; СсылкаНайденногоКонрагента. НайтиПоНаименованию("Иванов Иван Иванович"); Стр=Док.Товары.Добавить(); Стр.ТипЦен=Справочники.ТипыЦенНоменклатуры.НайтиПоНаименованию("Оптовая"); Оптовый; НовыйОбъект.ТипЦенРозничнойТорговли = Справочники.ТипыЦенНоменклатуры.НайтиПоНаименованию(СокрЛП("Оптовая")); НовыйОбъект. Если РольДоступна("РольПродавца") Тогда НовыйТипЦен = Справочники["ТипыЦенНоменклатуры"].НайтиПоНаименованию("Основная цена. НайтиПоНаименованию(Наименование[, ТочноеСоответствие][. ТипЦенРозничнойТорговли = Справочники.ТипыЦенНоменклатуры. ТипЦен = ВидЦены; ВидЦены = Справочники.ТипыЦенНоменклатуры.НайтиПоНаименованию("Оптовая 1"); ТЧВидЦены = ДокУЦ. НовыйТипЦенНоменклатуры.ТипЦеныНоменклатуры=Справочники.ТипыЦенНоменклатуры.НайтиПоНаименованию("Оптовая"); ВидЦены = Справочники.ТипыЦенНоменклатуры.НайтиПоНаименованию("Базовая цена поставщика"); ТЧВидЦены = ДокУЦ.ТипыЦен. Добавить "ИнтерфейсПродавца": из справочников только "Номенклатура". Если РольДоступна("РольПродавца") Тогда НовыйТипЦен = Справочники["ТипыЦенНоменклатуры"].НайтиПоНаименованию("Основная цена продажи"). СпрТЦ1 = Справочники.ТипыЦенНоменклатуры. СпрТМЦ = Справочники.Номенклатура.НайтиПоНаименованию(Стртз. НовыйДокумент.ТипыЦен=Справочники.ТипыЦенНоменклатуры.НайтиПоНаименованию(ВыбНастрЦен.Наименование); Отбор.Вставить(«ТипЦен», Справочники.ТипыЦенНоменклатуры.НайтиПоНаименованию(«Основаная цена»)); Отбор.Вставить(«Номенклатура». Номенклатура = &Номенклатура"; Запрос.УстановитьПараметр("ТипЦен", Справочники.ТипыЦенНоменклатуры.НайтиПоКоду("000000001")). Добавить() ; Строка.ТипЦен = Справочники.ТипыЦенНоменклатуры. ЕдиницыИзмерения = Справочники.КлассификаторЕдиницИзмерения; НовСчет.Дата = ТекущаяДата(); НовСчет.ТипЦен=Справочники.ТипыЦенНоменклатуры.НайтиПоНаименованию("Отпускная цена"); НайтиПоНаименованию("Базовая цена поставщика"); ТЧВидЦены = ДокУЦ. ТипЦен = ВидЦены; ВидЦены = Справочники.ТипыЦенНоменклатуры.

Справочники типыценноменклатуры найтипонаименованию