Когда я слышу (и вижу) подобные утверждения - мне уже не хочется плакать от необходимости в сотый раз объяснять, а просто развернуться и уйти, так как собака зарыта глубже, чем кажется. Попробую в 101 раз: Автор не указал, какая у него конфигурация. Судя по приведенному примеру - или ТиС, или Комплексная. Встречал также, что и в Бухию добавляли регистры. Будем считать, что у автора ТиС. В ТиС существуют сл.методы учета: управленческий и финансовый. Они м.б. включены как оба, так и по отдельности. Включение управленческого метода учета производится сл.образом: идем в константы, ищем константу "Метод расчета себестоимости управленческого учета", и выбираем один из методов: FIFO, LIFO, По среднему. Включение финансового метода учета производится сл.образом: справочник Фирмы, выбираем нужную фирму, вкладка Дополнительно, рамка "Элементы учетной политики", и задаем метод ведения финансового учета: Не вести фин.учет, FIFO, LIFO, По среднему. Обращаю внимание на следующее: метод ведения финансового учета может меняться ТОЛЬКО для отдельно взятой фирмы. Управленческий учет может меняться для фирм (корпорации) в целом. Отсюда и возникают два движения: одно по фирме (финансовый учет), второе - без указания фирмы (управленческий учет). Теперь главный вопрос: когда нужно включать управленческий учет? Если вы ведете в одной базе несколько НЕЗАВИСИМЫХ фирм, управленческий учет нужно выключить. Для чего? При включенном управленческом учете, при проведении расходных документов происходит списание партий товаров. При этом партии могут списываться не только Вашей фирмы, но и любой ДРУГОЙ, если найденная партия вписывается в выбранную стратегию списания (FIFO/LIFO). Это Вам надо?! НО, если у вас корпорация, то вам нужен будет консолидированный учет по всем входящим в корпорацию фирмам. Вот здесь и нужен управленческий учет. Но при этом помните, что фирмы уже не независимы, а входят в корпорацию.
в целом задача: определить продажи и себестоимость по каждому товару. через итоги не иду. нет аналитики(товар) по продажам. запрос составлен по документам и операциям, связан по ТМЦ. работает. но! Нужно вычесть Перемещения
Попробую угадать, что Вы там ваяете. Отчет "Книга учета доходов и расходов предпринимателя". Верно?
Данные для квартального отчета 1-ПП. Непрезентабельный, но полезный. Конфигурация "Бухучет для Украины" 292, платформа 7.70. [attachment=608:Forma_1_PP.rar]
Отчет "Лист-расшифровка банка по счету", конфигурация "Бухучет для Украины", версия 292, платформа 7.7. М.б. название не очень удачное, предложите свое, но у нас он так называется. Назначение отчета: показать, кто/кому/когда за что платили, с номером платежки, с группировкой по р/сч и счетам б/учета. [attachment=606:ListTass...vkaBanka.rar]
Отчет "Оборотная ведомость товаров" для конфигурации "Торговля и склад", платформа 7.7. Выбор группировки по четырем уровням: Менеджер (Автор), Склад, Товар, Контрагент. В любой последовательности. Также можно выбирать конкретные значения для каждого уровня группировки в качестве фильтра. Работает только в конфигурации ТиС. Отчет не универсальный, т.к.использует только документы ПриходнаяНакладная и РасходнаяНакладная, а не регистры. При желании можно доработать. [attachment=604:OborotiTMC.rar]
Тест проверки использования оперативной памяти вложенными (цепочками) таблицами или списками. [attachment=593:MemoryTest.rar] В ответ на тему http://pro1c.org.ua/index.php?showtopic=6733&hl= Там же смотрите результат теста. Исправил и перезалил: [attachment=594:MemoryTest.rar]
// Обработка, позволяющая делать много чего со справочниками. // (с) 1С:Рарус 1999 // Версия - 1.0 // контактное лицо - Плякин Александр // e-mail - plaa@rarus.msk.ru
// Доработка: Волков Вадим Петрович 20..21 Марта 2012г // Основные изменения: // - список реквизитов заменен на поле со списком для работы только с одним реквизитом // - при добавлении элементов справочника разрешен выбор группы справочника со всем его содержимым // - в "Режимы работы" добавлен переключатель "Перенумеровать реквизит" // - добавлено "Начальное значение" перенумерации // - добавлен флажок "Пропускать заполненные". При установленном этом флажке элементы справочника с заполненным реквизитом // не только пропускаются, но и генерируется уникальное новое значение для заполнения // ВАЖНО:перенумерация "заточена"под реквизиты типа Число, т.к. решалась конкретная задача: перенумерация (донумерация) инвентарных номеров в справочнике "Необоротные активы" // Изменена версия обработки с 1.0 на 2.0
Милые женщины! Программистки и пользовательши 1С всех платформ и версий! Поздравляю вас с первым весенним праздником - 8 Марта! Желаю, чтобы рядом с вами всегда были надежные мужчины, которые полностью бы вас обеспечивали. А ваша зарплата была разве что на женские шалости. Главное, чтобы вы могли себя реализовать и работали в удовольствие.
Отчет "Износ по группам учета", Бухия 291, платформа 1C v.7.7. Что такое группы учета в ОС - знают все. Данный отчет формирует ... отчет о наличии и амортизации ОС по группам учета. Можно каждую группу "разбить" по местам хранения, отметив соответствующих флажок на форме отчета. Основная "фишка" - указание счета списания амортизации. Наши активно используют 94 счет. При этом в отчете будут показаны НА, амортизация которых списывается на этот счет. Данный отчет выкладывается "как есть", поэтому прошу обратить внимание на некоторые особенности: 1. Справочник "Налоги и отчисления", группа ОС_НМА_МБП. У нас присутствуют старые нормы амортизации, которые называются "Группа 1, норма амортизации". Новые нормы называются "С 01.01.2004, группа 1, амортизация". Для Налогового метода, который, кажется, канул в лету, отслеживается этот признак. Для других методов расчета признак устанавливается "По нормам амортизации, действующим с 01.04.2011г.", и отчет дополнительно группируется, на самом верхнем уровне, по этому признаку. 2. Некоторые реквизиты справочника НА сделаны периодическими, для возможности без проблем перепроводить документы прошлых периодов (Ну такая у нас бухгалтерия ). Не помню какие в стандартной конфигурации не периодические, но вот список наших периодических, которые используются в отчете: НА.МетодРасчетаИзноса НА.Группа НА.НормаАмортизацииПоНалоговомуМетоду НА.НормаАмортизацииПоНалоговомуМетоду.Ставка Привести в соответствие к стандартной конфигурации проблем нет: просто убрать команду ".Получить(ВыбКонПериода)" в конце строк вызова этих реквизитов. И последнее: отчет в основном нужен главному бухгалтеру для составления отчета по прибыли. Надеюсь, главным бухгалтерам скачавшим этот отчет он также понравится. 03.02.2012 Обновил архив - обнаружена небольшая неточность при определении мест хранения.
Обработка для импорта банковских выписок из интернет-банка ПУМБ в конфигурацию "Бухучет для Украины", рел.291, платформа 7.7. Особенности обработки импорта: 1. Указывается не файл, а каталог, в котором должны находиться файлы FUIB_HDR.DBF и FUIB_DET.DBF. 2. Т.к. в этих файлах имеется информация о дате выписки, и одна выписка м.б. за любой период, а не только на одну дату, то в форме обработки можно выбрать два варианта формирования БВ: - на заданную дату (обычно текущую): будет создана одна БВ на заданную дату, даже если в файлах экспорта несколько БВ на разные даты. - на дату из файла экспорта БВ: будет создано столько БВ, сколько дат обнаружится в файле экспорта БВ. Этот вариант установлен по умолчанию. 3. Можно указать кодировку, в которой ожидаются файлы импорта. По умолчанию - кодировка DOS. Это связано с тем, что в клиент-банке можно задавать разную кодировку экспортируемых файлов.
Внешняя обработка для загрузки курсов валют из клиент-банка ПУМБ в формате dbf. Платформа: 1С v.7.7, конфигурация "Бухучет для Украины". [attachment=520:Zagruzka...alutPUMB.zip]
Хотелось бы собрать воедино ошибки ввода пользователей, которые пропускаются в конфигурации (любой стандартной), но которые сильно влияют на сдачу отчетности. Для себя (нашего предприятия) после сдачи текущей отчетности я выявил пока две: 1. Длина кода ИНН в справочнике Контрагенты. Для юридического лица она должна быть ровно 11 знаков. Правильно? Для этого я ввел контроль на длину кода ИНН на 11 знаков для юридического лица. Вот код:
// =============================== Процедура ПриЗаписи() //! 18.01.2012 Проверка ИНН на количество символов Если ВидКонтрагента = Перечисление.ВидыКонтрагентов.Организация Тогда Если (СтрДлина(СокрЛП(ИНН)) <> 0) И (СтрДлина(СокрЛП(ИНН)) <> 11) Тогда Сообщить("Ошибка: длина ИНН не равна 11 символам!","!!!"); СтатусВозврата(0); Возврат; КонецЕсли; КонецЕсли; //! 12.08.2010 //! При сохранении нового элемента периодические реквизиты сохраняем по умолчанию на начало года Если Новый = 1 Тогда ИспользоватьДату(НачГода(ТекущаяДата())); Иначе //! Оригинальный код Если глЗаписьПериодическихРеквизитов(Контекст) = 0 Тогда СтатусВозврата(0); Возврат; КонецЕсли; КонецЕсли; //! Конец вставки Если ПустоеЗначение(ПолнНаименование) = 1 Тогда ПолнНаименование = Наименование; КонецЕсли; Если ПустоеЗначение(ПолнНаименованиеНал) = 1 Тогда ПолнНаименованиеНал = ПолнНаименование; КонецЕсли; //! 16.06.2009 Для контроля ввода повторных контрагентов Эл=?(Выбран()=1,ТекущийЭлемент(),""); Если глПоискПовторенийВСправочнике(Наименование, Эл)=0 Тогда СтатусВозврата(0); Возврат; КонецЕсли; Записать(); глВнестиКонтрагента(ТекущийЭлемент()); //! 16.06.2009 Конец вставки для контроля ввода повторных контрагентов УстановитьРС(); //! 08.07.2009 Запишем и больше не изменяем автора ввода контрагента Если ПустоеЗначение(Автор)=1 Тогда Автор = Пользователь; КонецЕсли; КонецПроцедуры
Здесь можно видеть ранее введенные дополнения: - При вводе нового элемента периодические реквизиты сохраняются по умолчанию на начало года, а не на текущую дату; - Введен контроль повторного ввода контрагентов; - Автором будет тот, кто ввел нового контрагента, а не любой случайно открывший справочник.
2. Как оказалось, нужен контроль установки флажка "Самостоятельно исправленная ошибка" в ЗКП. Если этот флажок установлен, то сумма НДС такой ЗКП не попадает в Декларацию по НДС. Мы долго искали две ЗКП, которые не попали в Декларацию, пока не выяснили причину. Сейчас в параллельной теме я выясняю критерии правильности установки данного флажка, после чего введу соответствующий контроль.
Конфа: Бухия для Украины, 290. Объясните, в чем фишка, что не раскрывается список видов договоров (вкладка дополнительно)? До обновления на 290 релиз было неполное обновление из 288 и 289 релизов, там список видов договоров раскрывался, и выбирался нужный вид договора. Текст процедура ЗаполнитьВидДоговора() изменился:
Процедура ЗаполнитьВидДоговора() // БЫЛО Если спВидДоговора.ВыбратьЗначение(ВидДоговора,"Выберите вид договора",2,0,1) = 0 Тогда Возврат; КонецЕсли; КонецПроцедуры
заменена на
Процедура ЗаполнитьВидДоговора() // СТАЛО спВидДоговора.УдалитьВсе(); спВидДоговора.ДобавитьЗначение("Договір постачання"); спВидДоговора.ДобавитьЗначение("Договір купівлі-продажу"); спВидДоговора.ДобавитьЗначение("Договір комісії"); спВидДоговора.ДобавитьЗначение("Договір аренди"); спВидДоговора.ДобавитьЗначение("Договір бартерної поставки"); спВидДоговора.ДобавитьЗначение("Договір консигнації"); спВидДоговора.ДобавитьЗначение("Договір поруки"); спВидДоговора.ДобавитьЗначение("Договір доручення"); спВидДоговора.ДобавитьЗначение("Договір довірчого управління"); спВидДоговора.ДобавитьЗначение("Договір відповідального зберігання"); спВидДоговора.ДобавитьЗначение("Договір складського зберігання"); спВидДоговора.ДобавитьЗначение("Договір про надання посередницьких послуг"); спВидДоговора.ДобавитьЗначение("Договір про виконання роботи"); спВидДоговора.ДобавитьЗначение("Договір про надання послуг"); спВидДоговора.ДобавитьЗначение("Договір про інформаційно-довідкове обслуговування"); спВидДоговора.ДобавитьЗначение("Договір поставки оптової партії"); // если есть в новом списке - спозиционируемся на него Инд = спВидДоговора.НайтиЗначение(СокрЛП(ВидДоговора)); Если Инд = 0 Тогда // нет такого в списке спВидДоговора.ТекущаяСтрока(1); ВидДоговора = спВидДоговора.ПолучитьЗначение(1); Иначе спВидДоговора.ТекущаяСтрока(Инд); КонецЕсли; КонецПроцедуры
Из текста процедуры видно, что список видов договоров и не должен раскрываться, а вид договора нужно ввести вручную, и если ошиблись, то будет выбран вид договора первый в списке. Бред какой-то. У кого какое мнение?
Функция ТребуетРегистрации() Если ПустоеЗначение(ТекущийДокумент) = 1 Тогда //! 17.12.2011 Vadim007 Возврат 0; КонецЕсли; Если (ТекущийДокумент.Вид() <> "Приложение1") Тогда Возврат ?(ТекущийДокумент.ТребуетВклВЕдРеестрНН=1,2,0) КонецЕсли; КонецФункции
// =============================== Функция ПиктограммаЕРНН() Если ПустоеЗначение(ТекущийДокумент) = 1 Тогда //! 17.12.2011 Vadim007 Возврат 0; КонецЕсли; Если (ТекущийДокумент.Вид() <> "Приложение1") Тогда Возврат ?(ТекущийДокумент.ЕРНН=1,2,0) КонецЕсли; КонецФункции
В документах предприятия часто употребляются фамилия, имя, отчество в родительном и дательном падежах. Например: выдать (кому?), назначить (кого?) и т.д. В типовой конфигурации не предусмотрена функция склонения ФИО. Предлагаемая функция позволяет выполнить склонение фамилий имен и отчеств в соответствии с правилами русского языка. Напомню, что мужские фамилии в русском языке склоняются всегда, кроме тех случаев, когда их вообще невозможно просклонять (фамилии типа Тёмных, Джугашвили, Беранже, Приходько и т.д.). В прочих случаях "экзотическая" мужская фамилия склоняется, а женская - нет. Например: господина Ганжу, но госпожу Ганжа; господина Веббера, но госпожу Веббер и т.д. Функция имеет три входных параметра: фамилия_имя_отчество полностью (или фамилия + инициалы), пол (М или Ж) и падеж (Р-родительный или Д-дательный). Выход функции: склонение в заданном падеже.
P.S. Функция была проверена на около 100 различных сочетаний (правильно склоняет даже такую "экзотику" как Кац Мойша Абрамович), но возможно на каких-то сочетаниях имеются "блохи". В таком случае надо добавить соответствующее условие. P.S.S. В тексте специально не употреблялись сложные конструкции "Если - Иначе" для удобства добавления новых условий.
Функция Склонять(ФИО, Пол, Падеж) экспорт ///Упорядочивание алфавита
Перем L[32];
L[1]="Б"; L[2]="В"; L[3]="Г"; L[4]="Д"; L[5]="Ж"; L[6]="З"; L[7]="К"; L[8]="Л"; L[9]="М"; L[10]="Н"; L[11]="П"; L[12]="Р"; L[13]="С"; L[14]="Т"; L[15]="Ф"; L[16]="Х"; L[17]="Ц"; L[18]="Ч"; L[19]="Ш"; L[20]="Щ"; //Гласные L[21]="А"; L[22]="Е"; L[23]="И"; L[24]="Й"; L[25]="О"; L[26]="У"; L[27]="Ы"; L[28]="Э"; L[29]="Ю"; L[30]="Я"; L[31]="Ь"; L[32]="Ъ"; /////////Выделение Фамилия, Имя, Отчество Пол=СокрЛП(Строка(Пол)); Пол=Врег(Пол); Если (Пол<>"М") И (Пол<>"Ж") Тогда Предупреждение ("Неверно задан пол: М или Ж"); Возврат " "; КонецЕсли; Падеж=СокрЛП(Строка(Падеж)); Падеж=Врег(Падеж); Если (Падеж<>"Р") И (Падеж<>"Д") Тогда Предупреждение ("Неверно задан падеж: Р или Д"); Возврат " "; КонецЕсли; ПолноеИмя=Строка(ФИО); ПолноеИмя=СокрЛП(ПолноеИмя); ПозицияПервогоПробела = Найти(ПолноеИмя, " "); Фамилия = Лев(ПолноеИмя, ПозицияПервогоПробела); Фамилия=СокрЛП(Фамилия); ИмяОтчество = Сред(ПолноеИмя, ПозицияПервогоПробела+1); ИмяОтчество = СокрЛП(ИмяОтчество); ПозицияТочки=Найти(ИмяОтчество,"."); Если ПозицияТочки>0 Тогда //если введены инициалы Имя=Сред(ИмяОтчество,1,ПозицияТочки); Отчество=Сред(ИмяОтчество,ПозицияТочки+1); Отчество=СокрЛ(Отчество); Иначе; ПозицияВторогоПробела = Найти(ИмяОтчество, " "); Имя = Сред(ИмяОтчество,1, ПозицияВторогоПробела-1); Имя=СокрЛП(Имя); Отчество = Сред(ИмяОтчество, ПозицияВторогоПробела+1); Отчество = СокрЛП(Отчество); КонецЕсли; //////////Склонение фамилии
Флаг=0; Для i=1 По 32 Цикл Если L[i]=Последняя Тогда Прервать; КонецЕсли; КонецЦикла; Если i<=20 Тогда ТипБуквы=1;//согласная ИНАЧЕ; ТипБуквы=2;//гласная КонецЕсли; //////////////// Исключения //////////////////// Если СтрДлина(Фамилия)<=2 Тогда Родительный=Фамилия;//фамилии типа Ге, Че Дательный=Фамилия; Перейти ~выход; КонецЕсли;
Если (ДвеПоследних="ИХ") ИЛИ (ДвеПоследних="ЫХ") Тогда Родительный=Фамилия;//сибирские фамилии Дательный=Фамилия; Перейти ~выход; КонецЕсли; Если Последняя="О" Тогда Родительный=Фамилия;//украинские фамилии Дательный=Фамилия; Перейти ~выход; КонецЕсли;
Если ДвеПоследних="УА" Тогда Родительный=Фамилия;//фамилии типа Стуруа Дательный=Фамилия; Перейти ~выход; КонецЕсли;
Если ДвеПоследних="ИА" Тогда Родительный=Фамилия;//фамилии типа Туташхиа Дательный=Фамилия; Перейти ~выход; КонецЕсли;
Если (ДвеПоследних="ЖА") И (Пол="Ж") Тогда Родительный=Фамилия;// женские фамилии типа Ганжа Дательный=Фамилия; Перейти ~выход; КонецЕсли;
Если ТриПоследних="ДЗЕ" Тогда Родительный=Фамилия;//грузинские фамилии типа Гогадзе Дательный=Фамилия; Перейти ~выход; КонецЕсли;
Если ТриПоследних="ИЛИ" Тогда Родительный=Фамилия;//грузинские фамилии типа Габошвили Дательный=Фамилия; Перейти ~выход; КонецЕсли;
Если (ДвеПоследних="ОЙ") И (Пол="М") И (СтрДлина(Фамилия)=3) Тогда Родительный=Сред(Фамилия,1,СтрДлина(Фамилия)-1)+"я";//фам. типа Цой Дательный=Сред(Фамилия,1,СтрДлина(Фамилия)-1)+"ю"; Перейти ~выход; КонецЕсли;
Если (ДвеПоследних="ОЙ") И (Пол="Ж") И (СтрДлина(Фамилия)=3) Тогда Родительный=Фамилия; //фам. типа Цой Дательный=Фамилия; Перейти ~выход; КонецЕсли; /////////////////////////////////////////////////////////////////////// Если (Пол="М") И (ТипБуквы=1) Тогда //мужскую склоняем Родительный=Фамилия+"а"; Дательный=Фамилия+"у"; Флаг=1; КонецЕсли;
Если (Пол="М") И (ДвеПоследних="ДЬ") Тогда //специально для губернатора Родительный=Сред(Фамилия,1,СтрДлина(Фамилия)-1)+"я";//Лебедя Дательный=Сред(Фамилия,1,СтрДлина(Фамилия)-1)+"ю"; Флаг=1; КонецЕсли;
Если (Пол="Ж") И (ТипБуквы=1) Тогда //женскую не склоняем Родительный=Фамилия; Дательный=Фамилия; Флаг=1; КонецЕсли;
Если (Пол="Ж") И (Последняя="А") Тогда Родительный=Сред(Фамилия,1,СтрДлина(Фамилия)-1)+"у"; Дательный= Сред(Фамилия,1,СтрДлина(Фамилия)-1)+"ой"; Флаг=1; КонецЕсли;
Если (Пол="М") И (Последняя="А") Тогда //фам. типа Соткилава Родительный=Сред(Фамилия,1,СтрДлина(Фамилия)-1)+"у"; Дательный= Сред(Фамилия,1,СтрДлина(Фамилия)-1)+"е"; Флаг=1; КонецЕсли; Если (ДвеПоследних="ОЙ") И (Пол="М") И (СтрДлина(Фамилия)>3) Тогда Родительный=Сред(Фамилия,1,СтрДлина(Фамилия)-1)+"го"; Дательный=Сред(Фамилия,1,СтрДлина(Фамилия)-1)+"му"; Флаг=1; КонецЕсли;
Если (ДвеПоследних="АЯ") И (Пол="Ж") И (СтрДлина(Фамилия)>3) Тогда Родительный=Сред(Фамилия,1,СтрДлина(Фамилия)-2)+"ую"; Дательный=Сред(Фамилия,1,СтрДлина(Фамилия)-2)+"ой"; Флаг=1; КонецЕсли; Если Флаг=0 Тогда //если не сработало ни одно условие Родительный=Фамилия; Дательный=Фамилия; КонецЕсли;
~выход: //////////////склонение имени//////// Если ПозицияТочки>0 Тогда РодительныйИмя=Имя; ДательныйИмя=Имя; РодительныйОтчество=Отчество; ДательныйОтчество=Отчество; Перейти ~выход1; КонецЕсли; Имя1=ВРЕГ(Имя); Последняя=Прав(Имя1,1); ДвеПоследних=Прав(Имя1,2); ТриПоследних=Прав(Имя1,3); Флаг=0;
Для i=1 По 32 Цикл Если L[i]=Последняя Тогда Прервать; КонецЕсли; КонецЦикла; Если i<=20 Тогда ТипБуквы=1;//согласная ИНАЧЕ; ТипБуквы=2;//гласная КонецЕсли; Если (Пол="М") И (ТипБуквы=1) Тогда ///Иван, Петр и т.д. РодительныйИмя=Имя+"а"; ДательныйИмя =Имя+"у"; Флаг=1; КонецЕсли; Если (Пол="М") И (Последняя="Й") Тогда ///Сергей, Дмитрий и т.д. РодительныйИмя=Сред(Имя,1,СтрДлина(Имя)-1)+"я"; ДательныйИмя =Сред(Имя,1,СтрДлина(Имя)-1)+"ю"; Флаг=1; КонецЕсли; Если (Пол="М") И (Последняя="А") Тогда ///Фома РодительныйИмя=Сред(Имя,1,СтрДлина(Имя)-1)+"у"; ДательныйИмя =Сред(Имя,1,СтрДлина(Имя)-1)+"е"; Флаг=1; КонецЕсли;
Если (Пол="М") И (Последняя="Я") Тогда ///Илья РодительныйИмя=Сред(Имя,1,СтрДлина(Имя)-1)+"ю"; ДательныйИмя =Сред(Имя,1,СтрДлина(Имя)-1)+"е"; Флаг=1; КонецЕсли; Если (Пол="М") И (Последняя="Ь") Тогда ///Игорь РодительныйИмя=Сред(Имя,1,СтрДлина(Имя)-1)+"я"; ДательныйИмя =Сред(Имя,1,СтрДлина(Имя)-1)+"ю"; Флаг=1; КонецЕсли; Если (Пол="Ж") И (Последняя="А") Тогда ///Татьяна, Людмила и т.д. РодительныйИмя=Сред(Имя,1,СтрДлина(Имя)-1)+"у"; ДательныйИмя =Сред(Имя,1,СтрДлина(Имя)-1)+"е"; КонецЕсли; Если (Пол="Ж") И (Последняя="Я") Тогда ///Зоя, Наталья и т.д. РодительныйИмя=Сред(Имя,1,СтрДлина(Имя)-1)+"ю"; ДательныйИмя =Сред(Имя,1,СтрДлина(Имя)-1)+"е"; Флаг=1; КонецЕсли; Если (Пол="Ж") И (ДвеПоследних="ИЯ") Тогда ///Наталия,Виктория и т.д. РодительныйИмя=Сред(Имя,1,СтрДлина(Имя)-1)+"ю"; ДательныйИмя =Сред(Имя,1,СтрДлина(Имя)-1)+"и"; Флаг=1; КонецЕсли; Если Флаг=0 Тогда РодительныйИмя=Имя; ДательныйИмя =Имя; КонецЕсли;
/////////склонение отчества/////// Если (Пол="М") Тогда РодительныйОтчество=Отчество+"а"; ДательныйОтчество =Отчество+"у"; КонецЕсли; Если (Пол="Ж") Тогда РодительныйОтчество=Сред(Отчество,1,СтрДлина(Отчество)-1)+"у"; ДательныйОтчество =Сред(Отчество,1,СтрДлина(Отчество)-1)+"е"; КонецЕсли; ~выход1: ///////////////////// Если Падеж="Д" Тогда ФИОВозврат=Дательный+" "+ДательныйИмя+" "+ДательныйОтчество; Иначе; ФИОВозврат=Родительный+" "+РодительныйИмя+" "+РодительныйОтчество; КонецЕсли; Возврат ФИОВозврат; КонецФункции
Сервис\обработка документов\переместить их в левую половину Обработка - пометка на удаление Выполнить
Не факт, что все документы удалятся. Например, Договора - на Договор есть ссылки из справочника Контрагенты.
Цитата(Александр7 @ 01.10.11, 0:32)
Можно ли вытереть всю базу данных? Просто у меня она специфическая, т.е. её дорабатывали. А я хотел бы иметь такую же, но чистую. Как можно взять копию базы и вытереть всю историю, ну, т.е. все накладные, все проводки и т.д.? Или это невозможно? Спасибо.
Если нужна чистая база, вообще без данных, то лучше создать новую. Но обычно, когда речь заходит о "чистой" базе из старой, то хотят только удалить документы, оставив справочники, особенно справочники Контрагенты, Номенклатура. Но как уже было сказано, справочники могут содержать ссылки на документы, и эти документы не удалятся без удаления таких элементов справочника. Так что, какая вам нужна новая база: именно чистая, или только без документов, но со старыми справочниками?
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!
« < 2 3 4 5 >
). Не помню какие в стандартной конфигурации не периодические, но вот список наших периодических, которые используются в отчете:
