• Техподдержка
  • Условия
  • Вопрос-ответ
  • Договор-оферта
0 руб.
Вход Регистрация

+7 902 503-46-20
Меню
  • Наши разработки
    ОСНОВНЫЕ 1С РАЗРАБОТКИ ДЛЯ ЗАГРУЗКИ В 1С ДЛЯ ВЫГРУЗКИ ИЗ 1С 1С: Зарплата 8 УСЛУГИ ПО 1С ИНТЕРНЕТ МАГАЗИН + 1С ПОДСИСТЕМЫ ПАРСЕРЫ САЙТОВ ПЕЧАТНЫЕ ФОРМЫ ДЛЯ 1С ДЛЯ 1С:ПРЕДПРИЯТИЕ 7.7 1С:БИТРИКС РАЗНОЕ БЕСПЛАТНО
  • Контакты
    О компании | Контакты Отзывы клиентов Скидки. Бонусы IT Услуги Вакансии Партнерство Акции Новости Кейсы Согласие на обработку персональных данных Политика защиты персональных данных Договор-оферта
  • Инструкции
  • Форум
  • Отзывы
  • Помощь
    Общая информация Видео-уроки Статьи и инструкции по 1С Форум 1C Техподдержка Условия техподдержки Вопрос-ответ Документация по нашим разработкам
  • Главная
  •  - 
  • Форум
  •  - 
  • ТЕХПОДДЕРЖКА
  •  - 
  • ЭВОДОК - Мастер печатных форм
  •  - 
  • СКРИПТ - Краткое ФИО

СКРИПТ - Краткое ФИО

Поиск  Правила  Войти
Страницы: 1
RSS
СКРИПТ - Краткое ФИО
 
Администратор
Администратор
Сообщений: 2484 Регистрация: 28.08.2013
#1
3  
07.11.2016 21:42:36
В последних релизах большинства конфигураций, разработчики убрали поле содержащее краткое ФИО клиентов, или ответственных, или других элементов справочников содержащих персональные данные людей.

Представляем вашему вниманию готовый скрипт для программы "Мастер печати документов по шаблонам", которые формирует из полного ФИО краткое.
Просто скопируйте его и внесите небольшую корректировку.
Вместо текста "Параметры.Документ_Контрагент" укажите название Параметра которое содержит полное ФИО у вас в 1С.

////////////////////////////////////////////////////////////­
Результат = Параметры.Документ_Контрагент;

тмп = Результат;
Поз = Найти(тмп, " ");
Если Поз>0 Тогда
   Фам = СокрЛП(Лев(тмп, Поз));
   тмп = Сред(тмп, Поз + 1);
   Поз = Найти(тмп, " ");
   Если Поз=0 Тогда
       Имя = тмп;
       Отч = "";
   Иначе
       Имя = СокрЛП(Лев(тмп, Поз));
       Отч = Сред(тмп, Поз + 1);
   КонецЕсли;
   
   Результат = Фам;
   Если ЗначениеЗаполнено(Имя) Тогда
       Результат = Результат + " " + Лев(Имя, 1) + ".";
       Если ЗначениеЗаполнено(Отч) Тогда
           Результат = Результат + Лев(Отч, 1) + ".";
       КонецЕсли;
   КонецЕсли;
КонецЕсли;
////////////////////////////////////////////////////////////­
 
 
 
INXXSS
Пользователь
Сообщений: 29 Регистрация: 22.05.2016
#2
3.7037  
08.11.2016 05:50:15
Добрый день!  

Спасибо, проверил, работает!
 
 
 
Александр Школьник
Пользователь
Сообщений: 1 Регистрация: 01.04.2019
#3
0  
03.04.2019 15:53:15
Здравствуйте! Скрипт отличный, все работает.

НО в Украине сейчас нужно писать вот так - И.О. Фамилия.

Если можно, сделайте, пожалуйста еще такой скрипт.

Заранее благодарен.
 
 
 
Администратор
Администратор
Сообщений: 2484 Регистрация: 28.08.2013
#4
3  
04.04.2019 06:27:40
Цитата
Александр Школьник написал:
НО в Украине сейчас нужно писать вот так - И.О. Фамилия. Если можно, сделайте, пожалуйста еще такой скрипт.

Вот, пожалуйста, скрипт для вывода И.О. Фамилия
Код
////////////////////////////////////////////////////////////­
Результат = Параметры.Документ_Контрагент;

тмп = Результат;
Поз = Найти(тмп, " ");
Если Поз>0 Тогда
   Фам = СокрЛП(Лев(тмп, Поз));
   тмп = Сред(тмп, Поз + 1);
   Поз = Найти(тмп, " ");
   Если Поз=0 Тогда
       Имя = тмп; 
       Отч = "";
   Иначе
       Имя = СокрЛП(Лев(тмп, Поз));
       Отч = Сред(тмп, Поз + 1);
   КонецЕсли;
   
   Результат = Фам;
   Если ЗначениеЗаполнено(Имя) Тогда
       
       Если ЗначениеЗаполнено(Отч) Тогда
           Результат = Лев(Имя, 1) + "." + Лев(Отч, 1) + ". " + Результат;
       Иначе
           Результат = Лев(Имя, 1) + ". " + Результат;
       КонецЕсли;

   КонецЕсли;
КонецЕсли;
////////////////////////////////////////////////////////////­
 
 
 
Страницы: 1


ПОСЛЕДНИЕ СООБЩЕНИЯ

ЭКСЕЛОН - Загрузка в 1С из EXCEL - Сопоставление свойств Илья Дрючин
25.09.23 14:55
ЭКСЕЛОН - Загрузка в 1С из EXCEL - Номер ГТД Администратор
25.09.23 13:21
ПАРСЕР ЯНДЕКС.МАРКЕТ для 1С - При загрузке по списку перестал парсить Администратор
22.09.23 13:14
ЭКСЕЛОН - Загрузка в 1С из EXCEL - Не читает файл Администратор
13.09.23 16:47
ПЕЧАТЬ ПРАЙС-ЛИСТОВ из 1С - Установка 1с прайс Администратор
13.09.23 16:45
ЭКСЕЛОН - Загрузка в 1С из EXCEL - Как при загрузке изображений к номенклатуре, заменять ее а не добавлять Администратор
13.09.23 16:45
ЭКСЕЛОН - Загрузка в 1С из EXCEL - Экселон не видит свойства номенклатуры. Администратор
13.09.23 16:43
ПАРСЕР ЯНДЕКС.МАРКЕТ для 1С - Парсер в настройках сопоставления не видит общие реквизиты номенклатуры. УНФ 3.0 Администратор
13.09.23 16:43
Комментарии к статьям - Учет бонусных карт в 1С УТ10-11, УПП, КА, Розница, УНФ Администратор
13.09.23 16:40
Комментарии к статьям - Мастер загрузки из Excel в 1С - номенклатура, цены, документы Администратор
21.08.23 7:27
ЭКСЕЛОН - Загрузка в 1С из EXCEL - Не создается иерархия категорий. Администратор
14.08.23 11:15
ЭКСЕЛОН - Загрузка в 1С из EXCEL - Не загружается прайс Администратор
09.08.23 15:35
ЭКСЕЛОН - Загрузка в 1С из EXCEL - Не получается записать цену номенклатуру Администратор
01.08.23 6:54
ЭКСЕЛОН - Загрузка в 1С из EXCEL - обновление Мастер загрузки из Excel в 1С Администратор
31.07.23 13:25
ПЕЧАТЬ ПРАЙС-ЛИСТОВ из 1С - Ошибка при работе с характеристиками товара Алексей Николаев
25.07.23 14:57

Сейчас на форуме (гостей: 60)
Всего зарегистрированных пользователей: 2331
Приняло участие в обсуждении: 376
Всего тем: 846
Всего сообщений: 6272
© «APPLIX.RU» 2008 - 2023
Сопровождение и доработка 1С.
Все права защищены.
Копирование материалов, без обратной ссылки, запрещено.
Компания
О компании | Контакты
Отзывы клиентов
Скидки. Бонусы
IT Услуги
Вакансии
Партнерство
Акции
Новости
Кейсы
Согласие на обработку персональных данных
Политика защиты персональных данных
Договор-оферта
Помощь
Общая информация
Видео-уроки
Статьи и инструкции по 1С
Форум 1C
Техподдержка
Условия техподдержки
Вопрос-ответ
Документация по нашим разработкам
+7 902 503-46-20


Яндекс.Метрика