- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
//Тут был код
//!Проверки на корректность данных.
ИначеЕсли (Строка(Лист.Cells(Счетчик,8).value) = "") ИЛИ (Строка(Лист.Cells(Счетчик,8).value) = "") ИЛИ ((Лист.Cells(Счетчик,8).value) = 0) ИЛИ ((Лист.Cells(Счетчик,8).value) = 0) Тогда
Сообщить("У номенклатуры в строке №"+Счетчик+" не хватает данных по ценам! Позиция не добавлена!", СтатусСообщения.Важное);
ИначеЕсли ((Лист.Cells(Счетчик,8).value) < 0) ИЛИ ((Лист.Cells(Счетчик,8).value) < 0) Тогда
Сообщить("У номенклатуры в строке №"+Счетчик+" отрицательная цена! Позиция не добавлена!", СтатусСообщения.Важное);
Иначе
Мас.Добавить(Строка(Лист.Cells(Счетчик, 1).value));
ЭлементСправочника = Справочники.Номенклатура.НайтиПоРеквизиту("Артикул", Строка(Лист.Cells(Счетчик, 1).value));
//Там дальше код
Фрагмент обработки найден в конфиге клиента. До фрагмента - открытие файла excel. После - распихивание данных с него по регистрам. Гениальная проверка на корректность гениальна.
EvilWisp 08.12.2010 07:25 # 0
Maxim546 08.12.2010 12:53 # 0
CreatorOfBullshit 08.12.2010 18:00 # 0
bugmenot 08.12.2010 23:03 # 0
смирись
KirAmp 08.12.2010 14:43 # 0
//а там не было мозга
Maxim546 08.12.2010 14:46 # 0
//А там был тёплый туалет и журнал плей-бой...
//Выбор был не легок..
Sauron 08.12.2010 14:47 # +2
ЕслиЧо надо
Maxim546 08.12.2010 14:50 # 0
Похуй;
ИначеЕсли ((Лист.Cells(Счетчик,8).value) < 0) ИЛИ ((Лист.Cells(Счетчик,8).value) < 0) Тогда
ОдетьКастетИСпортивныеШтаны.НаколотитьБа бло;
Иначе
Пацаны.ЗамутитьДвижуху;