Найти и изменить записи в периодическом регистре сведений (данными с Excell)
Подскажите как сделать обработку для изменения записей в регистре - данными с Excell. Есть табличка экселя в которой номер телефона и номер контракта и тарифный план нужно найти записи в регистре сведений по полю номер телефона и контракта и посмотреть если тарифный план отличается то сделать ещё одну запись в регистр. С экселя всё взял и не знаю что дальше делать (
Попытка
Эксель = новый COMОбъект("Excel.Application");
Исключение
Сообщить(ОписаниеОшибки());
Возврат;
КонецПопытки;
книга = Эксель.WorkBooks.Open("C:\Users\Downloads\IT_COPY\TP2016.xls");
Лист = Книга.WorkSheets(1);
таб = Лист.UsedRange.Value;
//Значение = Лист.Cells(2,2).Value;
Массив = таб.Выгрузить();
Массив.Удалить(0);
ВсегоСтрок = (Массив.Получить(0).количество())-1;
ПоказатьЭксель = новый COMОбъект("Excel.Application");
Исключение
Сообщить(ОписаниеОшибки());
Возврат;
КонецПопытки;
книга = Эксель.WorkBooks.Open("C:\Users\Downloads\IT_COPY\TP2016.xls");
Лист = Книга.WorkSheets(1);
таб = Лист.UsedRange.Value;
//Значение = Лист.Cells(2,2).Value;
Массив = таб.Выгрузить();
Массив.Удалить(0);
ВсегоСтрок = (Массив.Получить(0).количество())-1;
По теме из базы знаний
- Всякие полезности
- Заметочки про 1С:Предприятие 8 (редакция 22.06.2012)
- 1С8:борьба - личный опыт работы с платформой 1с8
- Пример переноса справочников, документов и движений через Эксель и "Конвертацию данных 2" из оптовой учетной системы 1С 7.7 Комплексной 4.2 и розничной учетной системы Рарус Торговый комплекс -> в 1С 8.3 ЕРП 2.4 (расширение и дополнительные реквизиты)
- Расширение для интеграции с маркетплейсами из одного окна: Озон, ВБ, Яндекс, Сбер, Али, ЛаМода для 1С:УНФ, УТ, КА, ERP
Ответы
В избранное
Подписаться на ответы
Сортировка:
Древо развёрнутое
Свернуть все
В запросе к срезупоследних джоинишь табличку полученную из ёкселя, вяжешь по ключу телефона
и сравниваешь тарифный план, в отборе отсекаешь всё совпавшее. Создаешь новый набор по текущей дате и заполняешь его из запроса. Всё :)
и сравниваешь тарифный план, в отборе отсекаешь всё совпавшее. Создаешь новый набор по текущей дате и заполняешь его из запроса. Всё :)
ВЫБРАТЬ РАЗЛИЧНЫЕ
ТЗ_эксель.Телефон,
ТЗ_эксель.Контракт,
ТЗ_эксель.Тариф
ПОМЕСТИТЬ тз_эксель
ИЗ
&ТЗ_эксель КАК ТЗ_эксель
;
//////////////////////////////////////////////////////////// ////////////////////
ВЫБРАТЬ
РС.телефон,
РС.симка,
РС.контракт,
РС.тариф
ПОМЕСТИТЬ рс_Контакты
ИЗ
&РС КАК РС
;
//////////////////////////////////////////////////////////// ////////////////////
ВЫБРАТЬ
рс_Контакты.телефон,
рс_Контакты.симка,
рс_Контакты.контракт,
рс_Контакты.тариф КАК СтарыйТариф,
тз_эксель.Тариф КАК Тариф
ИЗ
рс_Контакты КАК рс_Контакты
ЛЕВОЕ СОЕДИНЕНИЕ тз_эксель КАК тз_эксель
ПО рс_Контакты.телефон = тз_эксель.Телефон
ГДЕ
ВЫБОР
КОГДА тз_эксель.Тариф ЕСТЬ NULL
ТОГДА ЛОЖЬ
КОГДА тз_эксель.Тариф = рс_Контакты.тариф
ТОГДА ЛОЖЬ
ИНАЧЕ ИСТИНА
КОНЕЦ
Показать
Вакансии
1С-Программист (интегратор Битрикс24)
Санкт-Петербург
зарплата от 150 000 руб. до 250 000 руб.
Полный день
Санкт-Петербург
зарплата от 150 000 руб. до 250 000 руб.
Полный день