Интересно получилось - вчера задавал вопрос по этой задаче, а сегодня попалась на экзамене.
решать приблизительно надо так:
Со 104 агрегат на 1522 забираем "СписаниеОС"
С 207 запчасть передаем "Передача оборудования в монтаж" - документы стандартные - все работает правильно
Дальше "Ввод в эксплуатацию" - доработанный Дописаны проводки по движению в Дт по забалансовому регистру "Агр" с субконто ОсновныеСредства, АгрегатыЗапчасти (добавил - тип составной ОсновноеСредство/Номенклатура), Склад. Признаки учета Количественный, Налоговый, счет Активный
Дальше списание ОС - дописаны проводки по движению по Кт по счету "Агр" - зануляем остатки.
Дальше Обработка Раскомплектация, которая по введенному ОС формирует документы -
СписаниеОС по Оборудованию ВводВЭксплуатациюОС по агрегатам ОприходованиеТоваров по Запчастям
Расчет стоимостей агрегатов по вводу в эксплуатацию и тд.
Ну и отчет отбирам Кт обороты по счету Агр (периодичность день) и дальше пляшем - накидывая движнякиДтКт по амортизации, по вводуВЭксплуатацию агрегатов и оприходованию товаров.
Всем желаю успеха. Если возникли вопросы более детально - давайте в личку или на greenfoxСОБАКАukrТОЧКАnet
Нашла на просторах интернета как сделал этот билет человек, которому он попался на экзамене:
"Сдал недавно. Приблизительно излагаю суть задачи. Есть оборудование, которое учитывается как необоротный актив на счете 104. Это оборудование состоит из нескольких частей - нескольких агрегатов и нескольких запчастей. В процессе эксплуатации такое оборудование может быть разобрано. Агрегаты будут учитываться на счете 1522 а запчасти попадут на склад счет 207. Изначальная стоимость оборудования равна начальной стоимости агрегатов + стоимости запчастей. Амортизируются агрегаты и запчасти пропорционально стоимости. В задаче требуется автоматизировать процесс разборки.
Как делал. Добавил в справочник ОС табличную часть Составляющие, с колонками Составляющая(тип Объект строительства, Номенклатура) и стоимость. Изменил процедуру ОбработкаПроведения документа СписаниеОС. После того как движения сформированы я отбираю движения Дт1522 - Кт 104, и раскладываю его на составляющие Дт1522 - Кт104 и Дт207 - Кт104. Надо еще не забыть сделать запись в регистре ПартииТоваровНаСкладах, предварительно добавив этот регистр в движения документа. По партиям оприходуем только запчасти. Обязательно надо сделать отчет. Он не сложный, делается в консоли отчетов или с помощью компоновки.
Как сдавал. Преподаватель был в хорошем настроении. Код не смотрел. Смотрел движения документа и формы справочников. Спрашивал про то как делал . Смотрел отчет"
Результаты тестирования Название: Программирование в 1С:Предприятие 8 Баллы: 90 Баллы в рейтинг: 60.3 Время сдачи: 13 мин. 0 сек. Среднее время на вопрос: 19 сек. Сдал лучше, чем: 96%
Вы могли бы внятно сформулировать задачу, а то Вам на Ваш первый вопрос ответили - поиск всех документов с заданным номером осуществляется запросом и это работает независимо от периодичности, но потом выясняется, что это не вся задача ибо там задействованы еще ТЗ.
Сформулируйте задачу полностью, и Вам помогут, я например из того что тут написано ничего не понял, хотя болваном в 1С себя не считаю.
Вопрос закрыт - в типовой конфигурации УТП нельзя делать поэтапный выпуск продукции и последующую его комплектацию, либо наоборот. Тоесть надо дописывать свой код либо переходить на УПП.
Доброго дня всім! Підкажіть будь-ласка така ситуація: Особа на єдиному податку, ставка ПДВ - Не ПДВ, в обліковій політиці вказала на єдиному податку, при заповнені за допомогою стартового помошніка вказала не ПДВ, але чомусь в касові ордера кидає 20%, і в налаштуванях користувачів вказала не пдв. Дякую!
Скажіть яка база? Бухгалтерія, торг, УТП. Яка операція у касовому ордері?
Блин ... Ну сколько уж твердят в миру ... Для разработки СУБД важны винты! И только винты! Берите нынешний целерон и ССД диск последнего поколения и икоре с сата ... целек и ссд уделают на разы ...
Да-да даже при какихто регламентных работах на базе проц особо не задействован, а вот память и винт на полную катушку
МестоХраненияВЭксплуатации, и МестоХранения - это реквизиты шапки
тогда действительно цикл по строкам не нужен
Процедура Выполнить() Док=СоздатьОбъект("Документ"); Док.ВыбратьДокументы(НачДата,КонДата); Пока Док.ПолучитьДокумент()=1 Цикл Если (Док.Вид() = "ВводВЭксплуатацию") Тогда Состояние("Обрабатываю документ "+Док.ТекущийДокумент()); Попытка Если ПустоеЗначение(Док.МестоХраненияВЭксплуатации) = 0 Тогда СтарМестоХранения = Док.МестоХранения; СтарМестоХраненияВЭксплуатации = Док.МестоХраненияВЭксплуатации; Док.МестоХранения=СтарМестоХраненияВЭксплуатации; Док.МестоХраненияВЭксплуатации=СтарМестоХранения; иначе Сообщить(Пустое значение МестоХраненияВЭксплуатации в документе: "+СокрЛП(Док.Вид())+" №"+Док.НомерДок+" от "+Док.ДатаДок); Продолжить; КонецЕсли; ГлПользователь=Док.Автор; Док.Записать(); исключение Сообщить("Ошибка в документе: "+СокрЛП(Док.Вид())+" №"+Док.НомерДок+" от "+Док.ДатаДок); Сообщить(ОписаниеОшибки()); КонецПопытки; КонецЕсли; КонецЦикла; Предупреждение("Обработка завершена!"); КонецПроцедуры
GreenFox, сделала как вы писали, никаких сообщений не выдал, но и по прежнему не все документы поменял
Да в том то и дело, что все документы проведены, нет пометок на удаление, а как дату можно проследить?
Вы уж извините, но давайте еще попробуем так:
Процедура Выполнить() Док=СоздатьОбъект("Документ"); Док.ВыбратьДокументы(НачДата,КонДата); Пока Док.ПолучитьДокумент()=1 Цикл Если (Док.Вид() = "ВводВЭксплуатацию") Тогда Состояние("Обрабатываю документ "+Док.ТекущийДокумент()); Попытка Док.ВыбратьСтроки(); Пока Док.ПолучитьСтроку() = 1 Цикл Если ПустоеЗначение(Док.МестоХраненияВЭксплуатации) = 0 Тогда СтарМестоХранения = Док.МестоХранения; СтарМестоХраненияВЭксплуатации = Док.МестоХраненияВЭксплуатации; Док.МестоХранения=СтарМестоХраненияВЭксплуатации; Док.МестоХраненияВЭксплуатации=СтарМестоХранения; иначе Сообщить(Пустое значение МестоХраненияВЭксплуатации в документе: "+СокрЛП(Док.Вид())+" №"+Док.НомерДок+" от "+Док.ДатаДок); Продолжить; КонецЕсли; ГлПользователь=Док.Автор; КонецЦикла; Док.Записать(); исключение Сообщить("Ошибка в документе: "+СокрЛП(Док.Вид())+" №"+Док.НомерДок+" от "+Док.ДатаДок); Сообщить(ОписаниеОшибки()); КонецПопытки; КонецЕсли; КонецЦикла; Предупреждение("Обработка завершена!"); КонецПроцедуры
И еще: МестоХраненияВЭксплуатации, и МестоХранения - это реквизиты шапки или табличной части?
Ещё как влияет. Например обновление доработаной 1с на медленном компе занимает 4 часа. А на быстром 1 час. В результате в первом случае зарабатываеш 4 часа, а во втором сумму минимального выезда.
Полностью с Вами согласен, когда совести нет то можно и так зарабатывать, но долго ли? Я не люблю тратить деньги клиентов впустую, и обновление делаю как правило на сервере клиентов - ноут как машина для разработки. Так что особо переплачивать за навороты смысла не вижу. А вот батарея это да...
Процедура Выполнить() Док=СоздатьОбъект("Документ"); Док.ВыбратьДокументы(НачДата,КонДата); Пока Док.ПолучитьДокумент()=1 Цикл Если (Док.Вид() = "ВводВЭксплуатацию") Тогда Состояние("Обрабатываю документ "+Док.ТекущийДокумент()); Попытка Док.ВыбратьСтроки(); Пока Док.ПолучитьСтроку() = 1 Цикл Если ПустоеЗначение(Док.МестоХраненияВЭксплуатации) = 0 Тогда СтарМестоХранения = Док.МестоХранения; СтарМестоХраненияВЭксплуатации = Док.МестоХраненияВЭксплуатации; Док.МестоХранения=СтарМестоХраненияВЭксплуатации; Док.МестоХраненияВЭксплуатации=СтарМестоХранения;
КонецЕсли; ГлПользователь=Док.Автор; КонецЦикла; Док.Записать(); исключение Сообщить("Ошибка в документе: "+СокрЛП(Док.Вид())+" №"+Док.НомерДок+" от "+Док.ДатаДок); Сообщить(ОписаниеОшибки()); КонецПопытки; КонецЕсли; КонецЦикла; Предупреждение("Обработка завершена!"); КонецПроцедуры
Ага, если досмотреть строку до конца (никак не привыкну что она вся в окне не вида, извините), то в ячейках Налоговое назначение НДС: Обл. НДС Налоговое назначение доходов и затрат: ПУСТО и активировать эту ячейку дабы подвязать Хоз д-ть неполучается...я так понимаю оно подтянивает это значение откудато? Неподскажите откуда?!
Посмотрите что у Вас стоит в Номенклатурной группе, которую Вы выбираете для аналитики по услуге.
Можно но нужно дописывать что бы из пользователя вытягивал префикс и впихывал в номер и при этом надо будет или переписать или написать новую процедуру нумерациии.
Да и собственно в каких документах это надо делать во всех или в некоторых...
Полностью, согласен, без программирования не обойтись. Попробуйте отработать событие - ПриУстановкеНовогоНомера - если для одного документа или подписку на событие ПриУстановкеНовогоНомераДокумента (если типовую допиливаете, если самописка - создайте) - если нужно для всех или нескольких.
Не стоит так драмматизировать, просто надо было 5 лет не пытаться изучать, а просто изучать, а про то чем отличается структура от соответствия написано в справке.
Согласен! Я изучил по книгам и по примерам в интернете, потом правда прошел стандартные 1с-вские курсы по программированию для того чтоб в голове упорядочилась информация.
И еще други мои - практика это для программиста главное. Изучать ради процесса изучения - по моему никчемное занятие.
Тип: Число. Определяет число знаков дробной части, до которых производится округление. Если параметр отрицательный, то число округляется до соответствующего разряда в целой части, начиная с младших разрядов. Параметр обязательный, если указан параметр <РежимОкругления>. Значение по умолчанию: 0 <РежимОкругления> (необязательный)
Тип: РежимОкругления. Определяет режим округления. Помимо системного перечисления допускается использование числового параметра: 0 - если при округлении 1.5 = 1; 1 - если при округлении 1.5 = 2. Значение по умолчанию: Окр15как20 Возвращаемое значение:
Тип: Число. Число, полученное в результате округления. Описание:
Округляет исходное число до нужной разрядности в соответствии с заданным режимом округления.
Да я как бы не жалуюсь на нового. Просто спрашиваю спецов, у кого как это настроено/работает. Это ладно я продвинут слегка, а тетки постарше повесили бы его.
Первая заповедь нормального програмиста - не трогай то, что хорошо работает.
А Ваш новый админ по ходу хотел выпендриться, а это уже признак ненормальности.
Нормальна книжка, прочитав на одному диханні, все більш розжоване і доступніше пояснено ніж в "Проф розробці". Рекомендую, але бажано мати якийсь початковий багаж знань.
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!