Внесение/исправление данных с помощью Vanessa Automation

Когда открылось окно "Контрагенты"

И в поле с именем 'КомпоновщикНастроекПользовательскиеНастройкиЭлемент4Значение' я ввожу текст "[ИНН]"

И я перехожу к следующему реквизиту

И в поле с именем 'КомпоновщикНастроекПользовательскиеНастройкиЭлемент10Значение' я ввожу текст "[КПП]"

И я перехожу к следующему реквизиту

И в таблице 'Список' я выбираю текущую строку

Тогда открылось окно "*(Контрагент)*"

И из выпадающего списка с именем 'Вид' я выбираю точное значение "Обособленное подразделение"

И из выпадающего списка с именем 'Вид' я выбираю точное значение "Юридическое лицо"

И в поле с именем 'ИНН' я ввожу текст "[ИНН]"

И в поле с именем 'КПП' я ввожу текст "[КПП]"

И я перехожу к следующему реквизиту

И я нажимаю на кнопку с именем 'ФормаКомандаЗаписатьИЗакрыть'

И я жду закрытия окна "*(Контрагент)*" в течение 10 секунд

Когда открылось окно "Контрагенты"
И в поле с именем 'КомпоновщикНастроекПользовательскиеНастройкиЭлемент4Значение' я ввожу текст "11111111"
И я перехожу к следующему реквизиту
И в поле с именем 'КомпоновщикНастроекПользовательскиеНастройкиЭлемент10Значение' я ввожу текст "222222222"
И я перехожу к следующему реквизиту
И в таблице 'Список' я выбираю текущую строку
Тогда открылось окно "*(Контрагент)*"
И из выпадающего списка с именем 'Вид' я выбираю точное значение "Обособленное подразделение"
И из выпадающего списка с именем 'Вид' я выбираю точное значение "Юридическое лицо"
И в поле с именем 'ИНН' я ввожу текст "11111111"
И в поле с именем 'КПП' я ввожу текст "222222222"
И я перехожу к следующему реквизиту
И я нажимаю на кнопку с именем 'ФормаКомандаЗаписатьИЗакрыть'
И я жду закрытия окна "*(Контрагент)*" в течение 10 секунд

Когда открылось окно "Контрагенты"
И в поле с именем 'КомпоновщикНастроекПользовательскиеНастройкиЭлемент4Значение' я ввожу текст "3333333"
И я перехожу к следующему реквизиту
И в поле с именем 'КомпоновщикНастроекПользовательскиеНастройкиЭлемент10Значение' я ввожу текст "444444"
И я перехожу к следующему реквизиту
И в таблице 'Список' я выбираю текущую строку
Тогда открылось окно "*(Контрагент)*"
И из выпадающего списка с именем 'Вид' я выбираю точное значение "Обособленное подразделение"
И из выпадающего списка с именем 'Вид' я выбираю точное значение "Юридическое лицо"
И в поле с именем 'ИНН' я ввожу текст "3333333"
И в поле с именем 'КПП' я ввожу текст "444444"
И я перехожу к следующему реквизиту
И я нажимаю на кнопку с именем 'ФормаКомандаЗаписатьИЗакрыть'
И я жду закрытия окна "*(Контрагент)*" в течение 10 секунд

Когда открылось окно "Контрагенты"
И в поле с именем 'КомпоновщикНастроекПользовательскиеНастройкиЭлемент4Значение' я ввожу текст "55555"
И я перехожу к следующему реквизиту
И в поле с именем 'КомпоновщикНастроекПользовательскиеНастройкиЭлемент10Значение' я ввожу текст "6666666"
И я перехожу к следующему реквизиту
И в таблице 'Список' я выбираю текущую строку
Тогда открылось окно "*(Контрагент)*"
И из выпадающего списка с именем 'Вид' я выбираю точное значение "Обособленное подразделение"
И из выпадающего списка с именем 'Вид' я выбираю точное значение "Юридическое лицо"
И в поле с именем 'ИНН' я ввожу текст "55555"
И в поле с именем 'КПП' я ввожу текст "6666666"
И я перехожу к следующему реквизиту
И я нажимаю на кнопку с именем 'ФормаКомандаЗаписатьИЗакрыть'
И я жду закрытия окна "*(Контрагент)*" в течение 10 секунд

Когда открылось окно "Контрагенты"
И в поле с именем 'КомпоновщикНастроекПользовательскиеНастройкиЭлемент4Значение' я ввожу текст "77777"
И я перехожу к следующему реквизиту
И в поле с именем 'КомпоновщикНастроекПользовательскиеНастройкиЭлемент10Значение' я ввожу текст "888888"
И я перехожу к следующему реквизиту
И в таблице 'Список' я выбираю текущую строку
Тогда открылось окно "*(Контрагент)*"
И из выпадающего списка с именем 'Вид' я выбираю точное значение "Обособленное подразделение"
И из выпадающего списка с именем 'Вид' я выбираю точное значение "Юридическое лицо"
И в поле с именем 'ИНН' я ввожу текст "77777"
И в поле с именем 'КПП' я ввожу текст "888888"
И я перехожу к следующему реквизиту
И я нажимаю на кнопку с именем 'ФормаКомандаЗаписатьИЗакрыть'
И я жду закрытия окна "*(Контрагент)*" в течение 10 секунд

Когда открылось окно "Контрагенты"
И в поле с именем 'КомпоновщикНастроекПользовательскиеНастройкиЭлемент4Значение' я ввожу текст "999999"
И я перехожу к следующему реквизиту
И в поле с именем 'КомпоновщикНастроекПользовательскиеНастройкиЭлемент10Значение' я ввожу текст "00000000"
И я перехожу к следующему реквизиту
И в таблице 'Список' я выбираю текущую строку
Тогда открылось окно "*(Контрагент)*"
И из выпадающего списка с именем 'Вид' я выбираю точное значение "Обособленное подразделение"
И из выпадающего списка с именем 'Вид' я выбираю точное значение "Юридическое лицо"
И в поле с именем 'ИНН' я ввожу текст "999999"
И в поле с именем 'КПП' я ввожу текст "00000000"
И я перехожу к следующему реквизиту
И я нажимаю на кнопку с именем 'ФормаКомандаЗаписатьИЗакрыть'
И я жду закрытия окна "*(Контрагент)*" в течение 10 секунд

// @strict-types
#Область ОбработчикиКомандФормы


&НаКлиенте
Процедура ЗаполнитьШаблон(Команда)
    Если ПустаяСтрока(ШаблонДляПодстановки) Тогда
        ПоказатьПредупреждение(, НСтр("ru = 'Не заполнен шаблон для подстановки.'"));
        Возврат;
    КонецЕсли;
    ЗаполнитьШаблонНаСервере();
КонецПроцедуры


#КонецОбласти

#Область СлужебныеПроцедурыИФункции

&НаСервере
Процедура ЗаполнитьШаблонНаСервере()
    
    Результат = СформироватьТекстПоШаблону(ШаблонДляПодстановки, ДанныеДляЗагрузки);
    
КонецПроцедуры

// Заполняет шаблон значениями параметров из табличного документа.
//
// В первой строке табличного документа указываются имена параметров в том виде,
// в котором они записаны в шаблоне (например, "[ИНН]"), в каждой следующей строке -
// значения параметров. Для каждой строки формируется свой заполненный шаблон,
// заполненные шаблоны разделяются пустой строкой.
//
// Параметры:
//  Шаблон - Строка - текст шаблона, параметры в котором заключены в квадратные скобки.
//  ТаблицаПараметров - ТабличныйДокумент - таблица параметров.
//
// Возвращаемое значение:
//  Строка - заполненные шаблоны, разделенные пустой строкой.
//
&НаСервере
Функция СформироватьТекстПоШаблону(Шаблон, ТаблицаПараметров)
    
    Высота = ТаблицаПараметров.ВысотаТаблицы;
    Ширина = ТаблицаПараметров.ШиринаТаблицы;
    
    ТекстРезультата = "";
    Для НомерСтроки = 2 По Высота Цикл
        ЗаполненныйШаблон = Шаблон;
        Для НомерКолонки = 1 По Ширина Цикл
            ИмяПараметра = СокрЛП(ТекстЯчейки(ТаблицаПараметров, 1, НомерКолонки));
            Если ПустаяСтрока(ИмяПараметра) Тогда
                Продолжить;
            КонецЕсли;
            ЗаполненныйШаблон = СтрЗаменить(ЗаполненныйШаблон, ИмяПараметра,
                ТекстЯчейки(ТаблицаПараметров, НомерСтроки, НомерКолонки));
        КонецЦикла;
        Если НЕ ПустаяСтрока(ТекстРезультата) Тогда
            ТекстРезультата = ТекстРезультата + Символы.ПС + Символы.ПС;
        КонецЕсли;
        ТекстРезультата = ТекстРезультата + ЗаполненныйШаблон;
    КонецЦикла;
    
    Возврат ТекстРезультата;
    
КонецФункции

// Возвращает текст ячейки табличного документа.
//
// Параметры:
//  ТаблицаПараметров - ТабличныйДокумент - документ, из которого читается ячейка.
//  НомерСтроки - Число - номер строки ячейки.
//  НомерКолонки - Число - номер колонки ячейки.
//
// Возвращаемое значение:
//  Строка - текст ячейки.
//
&НаСервере
Функция ТекстЯчейки(ТаблицаПараметров, НомерСтроки, НомерКолонки)
    
    ОбластьЯчейки = ТаблицаПараметров.Область(НомерСтроки, НомерКолонки);
    Если ОбластьЯчейки.СодержитЗначение Тогда
        Возврат Строка(ОбластьЯчейки.Значение);
    КонецЕсли;
    
    Возврат ОбластьЯчейки.Текст;
    
КонецФункции

#КонецОбласти