Шаблон Word. Замена текста 2- раза
☑
0
starV
22.09.14
✎
10:20
Содержание1=" "
+Выборка.НомерСтроки+" "
+ ПодразделениеСтароеВРодительномПадеже + " "
//+ Сред(ПодразделениеСтароеВРодительномПадеже, 2) + " "
+ ДолжностьСтараяВТворительномПадеже + " "
+ СокрЛП(Выборка.Физлицо) + ", өзінің келісімімен, "
+Выборка.Оклад+ " лауазымдық жалақысымен "
//+ ТекстОплаты + " "
+ Подразделение + " "
+ ДолжностьВТворительномПадеже
+ " лауазымына.";
ТекстОзнакомления = ТекстОзнакомления + Символы.ПС + ОбщегоНазначения.ФамилияИнициалыФизЛица(Выборка.Физлицо);
Основание =Основание+ " Негіздеме: еңбек шарттарына қосымша келісім, " + ПросклонятьФамилиюВРодительныйПадежДляОснования(Выборка.Физлицо) + " өтініші.";
Замена = Документ.Content.Find;
Замена.Execute("[Содержание]", Ложь, Истина, Ложь, , , Истина, , Ложь,""+ Содержание1);
1
starV
22.09.14
✎
10:22
Пока Выборка.Следующий() Цикл
Содержание1=Содержание1+"Содержание1";
КонецЦикла
Пока Выборка.Следующий() Цикл
Содержание1=" "
+Выборка.НомерСтроки+" "
+ ПодразделениеСтароеВРодительномПадеже + " "
//+ Сред(ПодразделениеСтароеВРодительномПадеже, 2) + " "
+ ДолжностьСтараяВТворительномПадеже + " "
+ СокрЛП(Выборка.Физлицо) + ", өзінің келісімімен, "
+Выборка.Оклад+ " лауазымдық жалақысымен "
//+ ТекстОплаты + " "
+ Подразделение + " "
+ ДолжностьВТворительномПадеже
+ " лауазымына.";
ТекстОзнакомления = ТекстОзнакомления + Символы.ПС + ОбщегоНазначения.ФамилияИнициалыФизЛица(Выборка.Физлицо);
Основание =Основание+ " Негіздеме: еңбек шарттарына қосымша келісім, " + ПросклонятьФамилиюВРодительныйПадежДляОснования(Выборка.Физлицо) + " өтініші.";
Замена = Документ.Content.Find;
Замена.Execute("[Содержание]", Ложь, Истина, Ложь, , , Истина, , Ложь,""+ Содержание1);
2
starV
22.09.14
✎
10:27
мне нужно что бы слово Содержание1 в цикле замена счетчиком
Пока Выборка.Следующий() Цикл
Содержание1=Содержание1+"Содержание1";
КонецЦикла
а потом замена к чему оно ровна
второй цикл
3
Галахад
гуру
22.09.14
✎
10:29
Не проще в массив запихать?
4
starV
22.09.14
✎
10:36
а как
5
starV
22.09.14
✎
10:39
(3) что именно
6
Галахад
гуру
22.09.14
✎
10:41
М = Новый Массив;
Пока Выборка.Следующий() Цикл
М.Добавить(Содержание);
КонецЦикла
Для Каждого Эл из М Цикл
...
КонецЦикла;
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший