Demondark86
28.05.2010, 10:50
Тут знакомый программер приколол разбирая код 1С приведу весь код для того что бы попонятнее было =)
СчетаУчета = БухгалтерскийУчетРасчетовСКонтрагентами.ПолучитьСч етаРасчетовСКонтрагентом(Организация, Контрагент, ДоговорКонтрагента);
//Проверим какие же счета будем изменять
ЗаполнятьСчетаРасчета = Ложь; //Заполнять ли счета расчетов
ЗадаватьВопрос = Ложь; //Если заполнять то Задавать ли вопрос о его перезаполнении
ЗаполнятьСчетаНУБУ = Ложь; //Если заполнять надо, то Ложь - только Бу, Истина - Ну и Бу
ЗадаватьВопросНУБУ = Ложь; //Заполнять ли счета Ну или Бу
Если ПоказыватьВДокументахСчетаУчета Тогда
СтруктураОбязательныхПолей = Новый Структура;
СтруктураНеОбязательныхПолей = Новый Структура;
СтруктураОбязательныхПолей.Вставить("СчетУчетаДоходовБУ", СчетаУчета.СчетУчетаДоходовПоТареБУ);
СтруктураОбязательныхПолей.Вставить("СчетУчетаРасходовБУ", Сч
да же среди бухгалтеров есть НуБы =)
а по теме НУБУ расшифровывается как Налоговый Учет, Бухгалтерский Учет
если у ково есть что выложить похожее милости прошу
СчетаУчета = БухгалтерскийУчетРасчетовСКонтрагентами.ПолучитьСч етаРасчетовСКонтрагентом(Организация, Контрагент, ДоговорКонтрагента);
//Проверим какие же счета будем изменять
ЗаполнятьСчетаРасчета = Ложь; //Заполнять ли счета расчетов
ЗадаватьВопрос = Ложь; //Если заполнять то Задавать ли вопрос о его перезаполнении
ЗаполнятьСчетаНУБУ = Ложь; //Если заполнять надо, то Ложь - только Бу, Истина - Ну и Бу
ЗадаватьВопросНУБУ = Ложь; //Заполнять ли счета Ну или Бу
Если ПоказыватьВДокументахСчетаУчета Тогда
СтруктураОбязательныхПолей = Новый Структура;
СтруктураНеОбязательныхПолей = Новый Структура;
СтруктураОбязательныхПолей.Вставить("СчетУчетаДоходовБУ", СчетаУчета.СчетУчетаДоходовПоТареБУ);
СтруктураОбязательныхПолей.Вставить("СчетУчетаРасходовБУ", Сч
да же среди бухгалтеров есть НуБы =)
а по теме НУБУ расшифровывается как Налоговый Учет, Бухгалтерский Учет
если у ково есть что выложить похожее милости прошу