Помощь - Поиск - Пользователи - Календарь
Полная версия этой страницы: импорт txt. Заполнение табличной части документа
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 > Программисту > Программирование в 1С Предприятие 8.3
jojojoba2
05.05.20, 15:07
Добрый день!

Помогите разобраться новичку. Создал обработку импорта TXT файла:

необходимо зарегистрироваться для просмотра ссылки
Мобильный = ЭтотОбъект.Номера.Найти(,"НомерТелефона");

Если ПустаяСтрока(Мобильный.НомерТелефона) Тогда
СтрТаб = ЭтотОбъект.Номера.Добавить();

СтрТаб.НомерТелефона = Тел;
СтрТаб.НомерКонтракта = Контракт;
СтрТаб.ТарифнийПлан = Тариф;
АбонплатаПдв = Абонплата*0.2;
АбонплатаСПдв = АбонплатаПдв+ Абонплата;
СтрТаб.Абонплата = АбонплатаСПдв;
СтрТаб.Скидка = ЗНИЖКИ;
СтрТаб.ТекСумма = ТекСумма;

ТекСуммаПДВ = ТекСумма*0.2;
ТекСуммаСПДВ = +ТекСуммаПДВ+ТекСумма;
СтрТаб.ТекСуммаСПДВ = ТекСуммаСПДВ;

КонецЕсли;


Контракт="";
Тел="";
Пакет="";
Тариф=0;
Абонплата = 0;
ЗНИЖКИ = 0;
Загалом=0;
КонецЕсли;
КонецЦикла;

ЭтотОбъект.СуммаИтого = СуммаБезПДВ2;
ЭтотОбъект.Номер_рахунку =НомерРахунку;
ЭтотОбъект.ОсобовийРахунок = ОсобовийРахунок;
ЭтотОбъект.Организация = Организация2;
ЭтотОбъект.СуммаСПдв =СуммаСПДВ2;
ЭтотОбъект.Примечание =НомерРахункуРозрах+" "+РозрахунковийПеріод;


Для Каждого ТабСтр из ЭтотОбъект.Номера Цикл
СправМоб = Справочники.МобильныеНомераСотрудников.СоздатьЭлемент();
Если Справочники.МобильныеНомераСотрудников.НайтиПоНаименованию(ТабСтр.НомерТелефона).Пустая() Тогда

СправМоб.Наименование = ТабСтр.НомерТелефона;
СправМоб.НомерКонтракта = ТабСтр.НомерКонтракта;
СправМоб.ТарифнийПлан = ТабСтр.ТарифнийПлан;
СправМоб.Записать();
КонецЕсли;


Хочу чтобы из TXT файла данные заполнялись в табличную часть если строка с номером(мобильной связи) пустая. Если повторение тогда пропуск. Только новые номера из TXT файла. И чтобы старые данные в табличной части документа оставались кроме колонок абонплата,скидка, СуммаИтого и СуммаСПдв.

Вот это не сработало:

Если ПустаяСтрока(Мобильный.НомерТелефона) Тогда
СтрТаб = ЭтотОбъект.Номера.Добавить();

Вообще не заполняет.

Буду рад за любую помощь.

Спасибо.
stark
05.05.20, 16:49
Цитата(jojojoba2 @ 05.05.20, 16:07) необходимо зарегистрироваться для просмотра ссылки
Если ПустаяСтрока(Мобильный.НомерТелефона) Тогда

А она таки пустая?
Может 
СокрЛП(Мобильный.НомерТелефона)
поможет.
alex1c
05.05.20, 19:30
Если это поиск по таб. части, то:
Мобильный - Тип: Строка табличной части, Неопределено.
Строка, которая содержит искомое значение. Если значение не найдено, то возвращается значение Неопределено.
Мобильный = ЭтотОбъект.Номера.Найти(,"НомерТелефона");

Вы ищите по колонке "НомерТелефона" но не указываете что.
Для просмотра полной версии этой страницы, пожалуйста, пройдите по ссылке.