Универсальные функции с примерами использования

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

Функция ТаблицаЗначенийВТаблицуХТМЛ(ТабЗначений,СтруктураПараметрыТаблицыХТМЛ = Неопределено) Экспорт
   
   //СтруктураПараметрыТаблицыХТМЛ
   //
   //Общие параметры:
   //СтруктураПараметрыТаблицыХТМЛ.ШиринаТаблицы - общая ширина таблица
   //СтруктураПараметрыТаблицыХТМЛ.ЦветШапки - цвет шапки таблицы пример "eadbaf"
   //СтруктураПараметрыТаблицыХТМЛ.ПунктПорядкуИспользуется - по умолчанию ЛОЖЬ
   //
   //Индивиуальные для каждой колонки:
   //СтруктураПараметрыТаблицыХТМЛ.Заголовок1 - заголовок для первой колонки, цифра на конце обознает номер колонки (не с нуля)
   //СтруктураПараметрыТаблицыХТМЛ.Ширина1 - ширина для первой колонки, цифра на конце обознает номер колонки (не с нуля)
   //СтруктураПараметрыТаблицыХТМЛ.Положение1 - отвечает за положение текста в колонке (по умол. лево), передовать "center" или "right"
   
   //ТабЗначений = Новый ТаблицаЗначений;
   МассивИменКолонок = Новый Массив;
   
   Если ТипЗнч(СтруктураПараметрыТаблицыХТМЛ) <> Тип("Структура") Тогда
      СтруктураПараметрыТаблицыХТМЛ = Новый Структура;
   КонецЕсли;
   
   КоличествоКолонок = ТабЗначений.Колонки.Количество();
   ПунктПорядкуИспользуется = ?(СтруктураПараметрыТаблицыХТМЛ.Свойство("ПунктПорядкуИспользуется"),СтруктураПараметрыТаблицыХТМЛ.ПунктПорядкуИспользуется,ЛОЖЬ);   
   
   Если КоличествоКолонок < 0 Тогда
      Возврат Неопределено;
   КонецЕсли;
   
   ЦветШапки = ?(СтруктураПараметрыТаблицыХТМЛ.Свойство("ЦветШапки")," bgcolor=""#" + СтруктураПараметрыТаблицыХТМЛ.ЦветШапки + """","");
   ШиринаТаблицы = ?(СтруктураПараметрыТаблицыХТМЛ.Свойство("ШиринаТаблицы")," style=""width:" + СтруктураПараметрыТаблицыХТМЛ.ШиринаТаблицы + "px""",""); 
   ТаблицаХТМЛ = "<table border=""1"" cellpadding=""1"" cellspacing=""0"" " + ШиринаТаблицы + ">
   |<tbody>
   |<tr>";
   
   //Первым выводим столбик П/П если он задан в шапку
   Если ПунктПорядкуИспользуется Тогда
      ТаблицаХТМЛ = ТаблицаХТМЛ + "
      |<td" + ЦветШапки + " style=""width:30px"" align=""center"">п/п</td>";   
   КонецЕсли;
   
   //Формируем шапку
   Для Счетчик = 1 по КоличествоКолонок Цикл
      ИмяСвойстваШирина = "Ширина" + Счетчик;
      ШиринаСтолбца = ?(СтруктураПараметрыТаблицыХТМЛ.Свойство(ИмяСвойстваШирина)," style=""width:" + СтруктураПараметрыТаблицыХТМЛ[ИмяСвойстваШирина] + "px""","");
      ИмяКолонки = ТабЗначений.Колонки[Счетчик-1].Имя;
      ИмяСвойстваЗаголовок = "Заголовок" + Счетчик;
      ЗаголовокКолонки = ?(СтруктураПараметрыТаблицыХТМЛ.Свойство(ИмяСвойстваЗаголовок),СтруктураПараметрыТаблицыХТМЛ[ИмяСвойстваЗаголовок],ИмяКолонки);
      ТаблицаХТМЛ = ТаблицаХТМЛ + " 
      |<td" + ЦветШапки + ШиринаСтолбца + " align=""center"">" + ЗаголовокКолонки + "</td>";   
      МассивИменКолонок.Добавить(ИмяКолонки);
   КонецЦикла;
   ТаблицаХТМЛ = ТаблицаХТМЛ + "
   |</tr>";
   
   //Заполняем таблицу   
   ПунктПорядку = 0;
   Для каждого СтрокаТаблицы Из ТабЗначений Цикл
      ПунктПорядку = ПунктПорядку + 1;
      ТаблицаХТМЛ = ТаблицаХТМЛ + "
      |<tr>" + ?(ПунктПорядкуИспользуется, Символы.ПС + "<td align=""center"">" + ПунктПорядку + "</td>","") + "";
      Для Счетчик = 0 по КоличествоКолонок - 1 Цикл
         ИмяСвойстваПоложение = "Положение" + Строка(Счетчик + 1);
         Положение = " align=""" + ?(СтруктураПараметрыТаблицыХТМЛ.Свойство(ИмяСвойстваПоложение),СтруктураПараметрыТаблицыХТМЛ[ИмяСвойстваПоложение],"left") + """";
         ТаблицаХТМЛ = ТаблицаХТМЛ + "
         |<td " + Положение + ">" + СтрокаТаблицы[МассивИменКолонок[Счетчик]] + "</td>";         
      КонецЦикла;            
      ТаблицаХТМЛ = ТаблицаХТМЛ + "
      |</tr>";
   КонецЦикла;   
   
   ТаблицаХТМЛ = ТаблицаХТМЛ + " 
   |</tbody>
   |</table>";
   
   Возврат ТаблицаХТМЛ;
   
КонецФункции