Помощь - Поиск - Пользователи - Календарь
Полная версия этой страницы: ТиС Украина 7.7: Управленческий учет
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 > Пользователю 1С 7.7 > 1С Торговля и Склад 7.7 для Украины
fishing-shop
Подскажите, пожалуйста, как сделать в поле "Тип учета" в документах значение "Управленческий" по-умолчанию вместо "Общий".
Заранее большое спасибо!
Ardi
Перепрограммировать, подругому никак.
zetovich


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


думаем тута smile.gif
fishing-shop
Цитата(zetovich @ 29.09.09, 9:43) необходимо зарегистрироваться для просмотра ссылки


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


думаем тута smile.gif


Подумал тута - помогло smile.gif
Огромное спасибо!
Для просмотра полной версии этой страницы, пожалуйста, пройдите по ссылке.