Имя: Пароль:
1C
1С v8
Шаблон 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
М = Новый Массив;
Пока Выборка.Следующий() Цикл
   М.Добавить(Содержание);
КонецЦикла

Для Каждого Эл из М Цикл

...
КонецЦикла;