Имя: Пароль:
1C
1С v8
Буха 2.0 Изменилось наименование организации
0 Noxvil
 
12.01.12
16:36
Необходимо печатать документы с новым и старым наименованием организации в зависимости от периода смены наименования, какие предложения (кроме менять наименование каждый раз, переписать механизм у всех печатных форм и отчетов, использовать 2 базы)?
1 GenV
 
12.01.12
16:37
(0) Сделай копию базы со старым наименованием. В обычной - переименовать.
2 Noxvil
 
12.01.12
16:40
(1) Написал, что этот вариант не предлагать.
3 GenV
 
12.01.12
16:44
(2) Думаешь могут быть другие без кардинальной переделки базы?
4 Noxvil
 
12.01.12
16:47
Предполагаю, т.к. я не первый, у кого могла возникнуть такая проблема...
5 ДенисЧ
 
12.01.12
16:49
(4) штатного механизма нет. Переписывай
6 DmitrO
 
12.01.12
16:53
(5)Альтернативное мнение, ничо не переписывай, просто поменяй наименование в базе. При печати старых документов бухгалтера отлично справятся с изменением наименования на старое руками. Не часто ведь они будут это делать.
7 hhhh
 
12.01.12
16:55
(6) тогда он бабок не заработает.
8 GenV
 
12.01.12
16:56
(6) Как показывает опыт - копия базы лучше и надежнее )
9 Noxvil
 
12.01.12
16:56
Я на фиксе )
10 DmitrO
 
12.01.12
16:57
(7)Предлагаю тогда еще предпринять попытку развода заказчика на периодическое наименование контрагента, номенклатуры и статей затрат.
11 and2
 
12.01.12
16:57
(0) послать накуй этих выдумщиков...
12 Noxvil
 
12.01.12
17:23
Итак, господа - специалисты.

Решением оказалось - доработка функции "СведенияОЮрФизЛице", которая находится в модуле "УправлениеКонтактнойИнформацией".

Вся доработка сводится к коду, где вам надо подставить свою дату и заполнить наименования:


   Сведения.Вставить("Представление",               СокрЛП(Данные.Наименование));
   
   /// New - Василюк_Василий_nef744_at_mail_ru_196429072, 12.01.2012 17:05:12
   //
   // => CUT
   
   // => ADD
   #Если Клиент Тогда
       
       Если ДатаПериода < ТекущаяДата() Тогда
           
           Сведения.Вставить("ПолноеНаименование",          "Старое наименование");
           Сведения.Вставить("СокращенноеНаименование",     "Старое наименование");
           Сведения.Вставить("НаименованиеДляПечатныхФорм", "Старое наименование");
           Сведения.Вставить("Представление",               "Старое наименование");
           
       КонецЕсли;    
       
       
   #КонецЕсли
   
   //
   /// End, 12.01.2012 17:05:12
   
   Сведения.Вставить("ИНН",              Данные.ИНН);
13 Artful Den
 
12.01.12
17:29
(12) А где у тебя дата хранится когда наименование поменялось?
14 Noxvil
 
12.01.12
17:32
Это фиксированная дата
15 GenV
 
12.01.12
17:33
(12) Хорошо, если везде поправили. У меня иногда всплывали в некоторых документах пропущенные вызовы, а просто наименование организации возвращалось.