Надо написать 50 тестов(в виде строк) на языке 1С с функциями работы со Структурой. Последним должно быть присвоение к переменной Результат(для проверки).

Форум Программирование Тестирование ПО (Testing)

1. Patriot1S 99 15.02.19 16:15 Сейчас в теме

Надо написать 50 тестов(в виде строк) на языке 1С с функциями работы со структурой. Последним должно быть присвоение к переменной Результат(для проверки).
Результат = Новый Структура("Дата, Клиент"); Результат = Результат.Свойство("Дата");
Отбор = Новый Структура("Дата, Клиент"); Отбор.Вставить("Дата", ТекущаяДата()); Отбор.Удалить("Дата"); Результат = Отбор.Дата;
Отбор = Новый Структура("Дата, Клиент"); Отбор.Вставить("Клиент", "ТекКлиент"); Отбор.Вставить("Дата", ТекущаяДата()); Результат = Отбор.Дата;

Предыдущее задание сделано ;) https://forum.infostart.ru/forum26/topic210382/

Вознаграждение за ответ

Сумма: 0 $m

Добавили:
Patriot1S (5.00 $m)

Получили:

login1020 (5 $m)

Показать полностью

Найденные решения

4. login1020 133 16.02.19 15:21 Сейчас в теме +5 $m

(3) Да

Прикрепленные файлы:

Structure.txt

Остальные ответы

Подписаться на ответы Инфостарт бот

Свернуть все

2. login1020 133 15.02.19 17:31 Сейчас в теме

 СТР = Новый Структура("Дата, Клиент"); Результат = стр.Свойство("Дата"); 
	
	 СТР = Новый Структура("Дата, Клиент"); стр.Очистить();Результат = стр; 
	
	 СТР = Новый Структура("Дата, Клиент"); Результат = стр.Количество(); 
	
	 СТР = Новый Структура("Дата, Клиент"); стр.Удалить("Дата");Результат = Стр;	
	
	 СТР = Новый Структура("Дата, Клиент"); стр.Вставить("Поставщик","Новый Поставщик");Результат = стр.Поставщик;
	
	 СТР = Новый Структура("Дата, Клиент"); Стр.Вставить("Поставщик","Новый Поставщик"); стр.Удалить("Клиент");Результат = стр;
	
	 СТР = Новый Структура("Дата, Клиент"); Стр.Вставить("Поставщик","Новый Поставщик"); Результат = стр.Свойство("Поставщик"); 
	
	 СТР = Новый Структура("Дата, Клиент");  Стр.Вставить("Поставщик","Новый Поставщик"); Результат = стр.Количество(); 
	
	 СТР = Новый Структура("Дата, Клиент");  Стр.Вставить("Поставщик","Новый Поставщик"); стр.Очистить(); Результат = стр.Количество(); 
	
	 СТР = Новый Структура("Дата, Клиент"); Стр.Вставить("Поставщик","Новый Поставщик");стр.Удалить("Клиент"); Результат = стр.Количество(); 
	
	 СТР = Новый Структура("Дата, Клиент"); Стр.Вставить("Поставщик","Новый Поставщик");стр.Очистить(); Результат = стр.Свойство("Поставщик");
	 
	 СТР = Новый Структура("Дата, Клиент"); Стр.Вставить("Поставщик","Новый Поставщик");стр.Удалить("Клиент"); Результат = стр.Свойство("Клиент"); 
	
	 СТР = Новый Структура("Дата, Клиент"); СТР.Вставить("Дата", ТекущаяДата()); СТР.Удалить("Дата"); Результат = СТР.Клиент; 
	
	 СТР = Новый Структура("Дата, Клиент"); СТР.Вставить("Поставщик", "ООО"); СТР.Удалить("Поставщик"); Результат = СТР; 
	
	 СТР = Новый Структура("Дата, Клиент"); СТР.Вставить("Поставщик", "ООО"); Результат = СТР.Поставщик; 
	
	 СТР = Новый Структура("Дата, Клиент"); СТР.Вставить("Поставщик", "ООО"); Результат = стр.Свойство("Предприятие");
	
	 СТР = Новый Структура("Дата, Клиент"); СТР.Вставить("Поставщик", "ООО"); Результат = стр.Свойство("Поставщик");

	 стр = Новый Структура("Дата, Клиент"); стр.Удалить("Дата"); стр.Вставить("ДатаНов"); Результат = стр.Количество();
	
	 стр = Новый Структура("Дата, Клиент"); стр.Удалить("Дата"); стр.Вставить("ДатаНов"); Результат = стр.ДатаНов;
	
	 стр = Новый Структура("Дата, Клиент"); стр.Удалить("Дата"); стр.Вставить("ДатаНов",ТекущаяДата()); Результат = стр.ДатаНов;
	
	 стр = Новый Структура("Дата, Клиент"); стр.Удалить("Дата"); стр.Вставить("ДатаНов",ТекущаяДата()); Результат = стр.Клиент;
	
	 стр = Новый Структура("Дата, Клиент"); Стр = Неопределено; Результат = Стр; 
	
	 стр = Новый Структура("Дата, Клиент"); стр.Вставить("ДатаНов",ТекущаяДата()); стр.Вставить("ДатаСтр",ТекущаяДата()-1); Результат = Стр.Количество();
	
	 стр = Новый Структура("Дата, Клиент"); стр.Вставить("ДатаНов",ТекущаяДата()); стр.Вставить("ДатаСтр",ТекущаяДата()-1); Стр.очистить(); Результат = Стр;
	
	 стр = Новый Структура("Дата, Клиент"); стр.Вставить("ДатаНов",ТекущаяДата()); стр.Вставить("ДатаСтр",ТекущаяДата()-1); Результат = Стр.Свойство("Клиент");
	
	 стр = Новый Структура("Дата, Клиент"); стр.Вставить("ДатаНов",ТекущаяДата()); стр.Вставить("ДатаСтр",ТекущаяДата()-1); Результат = Стр.Свойство("Поставщик");

	 стр = Новый Структура("Дата, Клиент"); стр.Вставить("ДатаНов",ТекущаяДата()); стр.Вставить("ДатаСтр",ТекущаяДата()-1); Стр.ДатаСтр = Год(ТекущаяДата()); Результат = Стр.ДатаСтр;
	
	 стр = Новый Структура("Дата, Клиент"); стр.Вставить("ДатаНов",ТекущаяДата()); стр.Вставить("ДатаСтр",ТекущаяДата()-1); Стр.ДатаСтр = Год(ТекущаяДата()); Результат = Стр.Свойство("ДатаСтр");
	
	 стр = Новый Структура("Дата, Клиент"); стр.Вставить("ДатаНов",ТекущаяДата()); стр.Вставить("ДатаСтр",ТекущаяДата()-1); Стр.Очистить(); Результат = Стр.Свойство("ДатаСтр");
	
	 стр = Новый Структура("Дата, Клиент"); Стр.Очистить(); Стр.Вставить("Поставщик","Новый Поставщик"); Результат = Стр.Количество(); 
	
	 стр = Новый Структура("Дата, Клиент"); Стр.Очистить(); Стр.Вставить("Поставщик","Новый Поставщик"); Результат = Стр.Свойство("Поставщик");
	
	 стр = Новый Структура("Дата, Клиент"); Стр.Очистить(); Стр.Вставить("Поставщик","Новый Поставщик"); Результат = Стр;
	
	 Стр = Новый Структура("Дата, Клиент"); Стр.Очистить(); Стр.Вставить("Поставщик","Новый Поставщик"); Результат = Стр.Поставщик;
	
	 Стр = Новый Структура("Дата, Клиент"); Стр.Очистить(); Стр.Вставить("Поставщик","Новый Поставщик"); Результат = Стр.Свойство("Дата");
	
	 Стр = Новый Структура("Дата, Клиент"); Стр.Очистить(); Стр.Вставить("Поставщик","Новый Поставщик"); Стр.Удалить("Поставщик");  Результат = Стр;
	
	 Стр = Новый Структура("Дата, Клиент"); Стр.Очистить(); Стр.Вставить("Поставщик","Новый Поставщик"); Стр.Удалить("Поставщик"); Результат = Стр.Количество();
	
	 Стр = Новый Структура("Дата, Клиент"); Стр.Очистить(); Стр.Вставить("Поставщик","Новый Поставщик"); Стр.Удалить("Поставщик"); Результат = Стр.Свойство("Поставщик");
	
	 Стр = Новый Структура("Дата, Клиент"); Стр.Очистить(); Стр.Вставить("Поставщик","Новый Поставщик"); Стр.Удалить("Поставщик"); Стр.Вставить("ТекДата",ТекущаяДата()); Результат = Стр;
	
	 Стр = Новый Структура("Дата, Клиент"); Стр.Очистить(); Стр.Вставить("Поставщик","Новый Поставщик"); Стр.Удалить("Поставщик"); Стр.Вставить("ТекДата",ТекущаяДата()); Результат = Стр.ТекДата;
	
	 Стр = Новый Структура("Дата, Клиент"); Стр.Очистить(); Стр.Вставить("Поставщик","Новый Поставщик"); Стр.Удалить("Поставщик"); Стр.Вставить("ТекДата",ТекущаяДата()); Результат = Стр.Свойство("ТекДата");
	
	 Стр = Новый Структура("Дата, Клиент"); Колво = Стр.Количество();Стр.Вставить("Сумма",50);Результат = Колво + Стр.Сумма; 
	
	 Стр = Новый Структура("Дата, Клиент"); Колво = Стр.Количество();Стр.Вставить("Сумма",50);Результат = Колво + Стр.Сумма + Стр.Количество(); 
	
	 Стр = Новый Структура("Дата, Клиент"); Колво = Стр.Количество();Стр.Вставить("Сумма",50);Результат = Стр.Свойство("Сумма"); 
	
	 Стр = Новый Структура("Дата, Клиент");Стр.Вставить("Сумма",50); Тип = ТипЗнч(Стр); Результат = Тип;	
	
	 Стр = Новый Структура("Дата, Клиент"); Поле1 = стр.Свойство("Дата"); Поле2 = Стр.Свойство("Дата2"); Результат = Поле1 + Поле2;	
	
	 Стр = Новый Структура("Дата, Клиент"); Поле1 = стр.Свойство("Дата"); Поле2 = Стр.Свойство("Дата2"); Результат = Поле1 * Поле2;
	
	 Стр = Новый Структура("Дата, Клиент"); Поле1 = стр.Свойство("Дата"); Поле2 = Стр.Свойство("Дата2"); Стр.Удалить("Клиент"); Результат = Стр;
	
	 Стр = Новый Структура("Дата, Клиент"); Стр.Удалить("Клиент"); Результат = Стр.Количество();
	
	 Стр = Новый Структура("Дата, Клиент"); Стр.Удалить("Клиент"); Результат = Стр.Дата;
	
	 Стр = Новый Структура("Дата, Клиент"); Стр.Дата = "20120104"; Стр.Клиент = "новый Клиент"; Результат = Стр.Дата  + " " + Стр.Клиент;

Показать

3. Patriot1S 99 16.02.19 14:52 Сейчас в теме

(2) А сможешь промежуточные пустые строки убрать? И выложить просто файлом?

4. login1020 133 16.02.19 15:21 Сейчас в теме +5 $m

(3) Да

Прикрепленные файлы:

Structure.txt

Оставьте свое сообщение

E-mail: