Имя: Пароль:
1C
1С v8
ФИО регистр большой
0 franchisees
 
04.12.12
22:13
Понимаю вопрос глупый , но не могу понять, как прописать, чтоб ФИО было, например Иванов Иван Иванович ИВАНОВ ИВАН ИВАНОВИЧ


-----
Строка = ЛС+""+стр.Счет+";"+стр.Фамилия+";"+стр.Имя+";"+стр.Отчество+";"+Формат(стр.Сумма,"ЧГ=0;ЧДЦ=2;ЧРД=.");
1 Amra
 
04.12.12
22:13
врег
2 БАМБР2013
 
04.12.12
22:14
есть типовая функция, ничего писать не нужно
3 БАМБР2013
 
04.12.12
22:16
УправлениеНебольшойФирмойСервер.ПолучитьФамилиюИмяОтчество(ДанныеФизЛица.Фамилия, ДанныеФизЛица.Имя,ДанныеФизЛица.Отчество, Ложь)
4 franchisees
 
04.12.12
22:18
Спасибо за ответы
5 БАМБР2013
 
04.12.12
22:22
(4) вот те образец, учись

Для ш = 0 По ТЗФизЛиц.Количество() - 1 Цикл
       СтрокаТабЧасти = ТЗФизЛиц[ш];
       
       Если СтрокаТабЧасти.ФизическоеЛицо.Пустая() Тогда Продолжить КонецЕсли;
       СчетчикВыводимыхФизлиц = СчетчикВыводимыхФизлиц + 1;
       
       ДанныеФизЛица = УправлениеНебольшойФирмойСервер.ДанныеФизЛица(СсылкаДоговорБронирования.Организация, СтрокаТабЧасти.ФизическоеЛицо, ТекущаяДата(), Ложь);                                    
       
       МассивИменПокупателей.Добавить(УправлениеНебольшойФирмойСервер.ПолучитьФамилиюИмяОтчество(ДанныеФизЛица.Фамилия, ДанныеФизЛица.Имя,ДанныеФизЛица.Отчество, Ложь));
       
       Структура.Вставить("ФИО_ПокупателяПолностью"+Строка(ш),УправлениеНебольшойФирмойСервер.ПолучитьФамилиюИмяОтчество(ДанныеФизЛица.Фамилия, ДанныеФизЛица.Имя,ДанныеФизЛица.Отчество, Ложь));
       
       Структура.Вставить("ФИО_ПокупателяКратко"+Строка(ш),УправлениеНебольшойФирмойСервер.ПолучитьФамилиюИмяОтчество(ДанныеФизЛица.Фамилия, ДанныеФизЛица.Имя,ДанныеФизЛица.Отчество, Истина));
       
       Структура.Вставить("УдостоверениеЛичностиПокупателя"+Строка(ш),ДанныеФизЛица.ПредставлениеДокумента);
       
       Структура.Вставить("АдресФизЛицаПоПрописке"+Строка(ш),ПолучитьПредставлениеКИФизЛица(СтрокаТабЧасти.ФизическоеЛицо,Справочники.ВидыКонтактнойИнформации.АдресФизЛицаПоПрописке,Перечисления.ТипыКонтактнойИнформации.Адрес));
       
       Структура.Вставить("АдресПроживанияФизЛица"+Строка(ш),ПолучитьПредставлениеКИФизЛица(СтрокаТабЧасти.ФизическоеЛицо,Справочники.ВидыКонтактнойИнформации.АдресПроживанияФизЛица,Перечисления.ТипыКонтактнойИнформации.Адрес));
       
       Если СтрокаТабЧасти.ОсновноеЛицо Тогда
           
           Структура.Вставить("ОсновнойТелефонПокупателя",ПолучитьПредставлениеКИФизЛица(СтрокаТабЧасти.ФизическоеЛицо,Справочники.ВидыКонтактнойИнформации.ТелефонФизЛица,Перечисления.ТипыКонтактнойИнформации.Телефон));            
           
           ВидКИМобильныйТелефонПокупателя = Справочники.ВидыКонтактнойИнформации.НайтиПоНаименованию("Телефон мобильный",Истина,ГруппаФизлица);
           Структура.Вставить("МобильныйТелефонПокупателя",ПолучитьПредставлениеКИФизЛица(СтрокаТабЧасти.ФизическоеЛицо,ВидКИМобильныйТелефонПокупателя,Перечисления.ТипыКонтактнойИнформации.Телефон));            
           
           //ДомашнийТелефонПокупателя                        
           ВидКИЕМЕЙЛ = Справочники.ВидыКонтактнойИнформации.НайтиПоНаименованию("Email",Истина,ГруппаФизлица);
           АдресЭлектроннойПочтыПокупателя = ПолучитьПредставлениеКИФизЛица(СтрокаТабЧасти.ФизическоеЛицо,ВидКИЕМЕЙЛ,Перечисления.ТипыКонтактнойИнформации.АдресЭлектроннойПочты);
           
           Если НЕ ПустаяСтрока(АдресЭлектроннойПочтыПокупателя) Тогда
               Структура.Вставить("АдресЭлектроннойПочтыПокупателя",АдресЭлектроннойПочтыПокупателя);        
           КонецЕсли;
           
       КонецЕсли;
       
   КонецЦикла;
Пользователь не знает, чего он хочет, пока не увидит то, что он получил. Эдвард Йодан