/ КОМПЬЮТЕРЫ И ПО / Языки программирования / 1С для программиста

Выпуск № 623
от 10.10.2007, 16:35

Вопрос № 104.380

Зравствуйте, уважаемые коллеги! Решил готовиться к экзаменам по 1С:Предприятие 7.7 и с сайта 1С скачал примеры экзаменационных заданий по Торговле и Складу (http://www.1c.ru/rus/partners/training/questions.htm). На первом же задании споткнулся на организации учёта FIFO, LIFO и по-среднему. При том, что конфигурацию нужно написать самому, а в готовых (ТиС, ПУБ) я не совсем (вернее, совсем) не понимаю, как это организовано. Т.е. в типовых есть условие если FIFO, то делаем так, если по-среднему, то так... Подскажите мне, пожалуйста, с чего начать или какие объекты нужно добавить, чтобы организовать такой учёт? С документами и их проведением я разобрался, движение по регистрам делают, отчёты тоже по регистрам написал, показывают всё правильно, а вот партионный учёт не даётся. С уважением, Владимир.

Отправлен: 05.10.2007, 07:46 Вопрос задал: Владимир (1С) (статус: 5-ый класс) Всего ответов: 4 Мини-форум вопроса >>> (сообщений: 1)

Отвечает: Angeliccare LIFO/FIFO/по среднему - отличаются тем, какая партия будет списана первой и по какой себестоимости. LIFO - выборка партий с конца списка, FIFO - с начала списка, по среднему - берётся итог и вычисляется себестоимость. Различие - несколько строк кода без различий в структуре объектов.

Ответ отправил: Angeliccare (статус: 1-ый класс) Ответ отправлен: 05.10.2007, 07:53

Отвечает: Яна Здравствуйте, Владимир (1С)! Партионный учет - это движения по регистру партий товаров. Точнее, движение в минус, списание товаров. Каждая партия имеет свою себестоимость. Если на складе есть несколько партий перед списанием нужно выбрать какие из них списывать. вот алгоритм этого выбора бывает различный (фифо, лифо, по среднему). Фифо - первый пришел - первый ушел, т.е. Вы списываете первую партию, если нехватает списываете со второй и т.д., лифо - наоборот, сначала списываете последнюю партию, потом предпоследннюю, если последней нехватает и т.д. По среднему- самый простой вариант, Вы считаете среднюю себестоимость (считаем общую стоимость всех партий и делим на общее количество товаров) и по этой себестоимости списываете товар.

Ответ отправила: Яна (статус: Студент) Ответ отправлен: 05.10.2007, 09:07 Оценка за ответ: 4 Комментарий оценки: Спасибо, вот только не пойму, что добавлять в конфигурацию.

Отвечает: Dmitry Stashenko Здравствуйте, Владимир (1С)! Партия - это по сути себестоимость. Списание партии - списание себестоимости, необходнимое для определения разницы между доходом и себестоимостью. В типовых конфигурациях это делается примерно так: есть константа, в которой определяем метод списания себестоимости (ЛИФО, ФИФО, По средней - эти методы установлены стандартами бух учета и другие не могут использоваться в бухгалтерии). Для не бухгалтерских конфигураций можно создать еще например ПоСамойБольшойСебестоимости, чтобы ТМЦ с большей себестоимостью списывался первым и его остатки на складе стремились к нулю. Также есть Справочник.Партии, подчиненный Справочнику.ТМЦ. Справочник.Партия содержит Название партии, дату партии и цену партии. При создании нового ТМЦ автоматически создается так называемая "Партия по умолчанию" с кодом "0", дата и цена пустые. Остальные партии создаются Документом.ПриходнаяНакладная. Название соответственно либо просто "Партия1", "Партия2", либо исходя из наименования контрагента, либо "Приходная накладная № ... от ...", вообщем любое для тебя понятное. Цена и дата - цена ТМЦ и ДатаДок. Спис ание партии осуществляется документом РасходнаяНакладная. Это происходит так: создается ТаблицаЗначений, куда загоняются все партии данного ТМЦ с остатками, затем исходя из метода списания таблица сортируется либо по дате, либо по цене (для не бухгалтерии), либо берется средняя цена всех партий. Затем получая строки из этой ТЗ и зная, сколько надо списать ТМЦ, мы вычисляем, сколько каких именно партии надо списать. Ну а движение партий тоже либо по регистру Партии, либо по субконто Партии. Ну вкратце все. Если что-то непонятно - пиши. Удачи

Ответ отправил: Dmitry Stashenko (статус: 10-ый класс) Ответ отправлен: 05.10.2007, 10:47 Оценка за ответ: 5 Комментарий оценки: Спасибо, прояснил абзац про сортировку, и регистр Партии.

Отвечает: Elric Здравствуйте, Владимир (1С)! Дополню немного ответы предыдущих экспертов. Партия товара -- это количество товара, которое пришло на склад по одному конкретному документу. Обычно Партия ассоциируется с Приходной накладной. Допустим, к нам пришел Товар по накладным: ПН1(01.01.07) - 10 шт. - Цена $10 - Сумма $100 ПН1(02.01.07) - 15 шт. - Цена $20 - Сумма $300 Итого у нас на складе 25 шт. на общую сумму $400 Далее мы продаем этот Товар Расходной накладной: РН1(03.01.07) - 20 шт. От того, какой метод списания мы выберем, будет зависеть какая сумма будет списана. Рассмотрим разные методы списания на примерах. FIFO - кто первый пришел тот первый ушел Списывается с партии ПН1 10 шт. на сумму 10*$10=$100, затем остальные 10 шт. с партии ПН2 на сумму 10*$20=$200. Итого спишется 20 шт. на сумму $300, и после этого останется на складе 5 шт. на сумму 5*20=$100 по партии ПН2. LIFO - кто последний пришел тот первый ушел Списывается с партии ПН2 15 шт. на сумму 15*$20=$300, затем остальные 5 шт. с партии ПН1 на сумму 5*$10=$50. Итого спишется 20 шт. на сумму $350, и после этого останется на складе 5 шт. на сумму 5*10=$50 по партии ПН1. По средневзвешенной цене (или просто "по средневзвешенной") Последовательность партий вообще не учитывается, просто сумма остатка делится на количество остатка и таким образом получается средняя цена остатка, по этой цене и списываем. Цена = $400/25 = $16 Списываем 20 шт. на сумму 20*$16=$320, и после этого останется на складе 5 шт. на сумму 5*$16=$80. Т.о. для методов FIFO и LIFO в регистре остатков нужен дополнительное измерение Партия (в 1С ей может выступать приходный документ, либо справочник, ссылающийся на документ). Соответственно, при списании нужен алгоритм списания по этим методам. Для метода "по средневзвешенной цене" измерение Партия должно игнорироваться как при приходовании товара, так и при списании. Обычно метод списания партий задается один раз в начале работы бухгалтера (или менеджера) и потом в процессе работы не меняется. Переходы от одного метода к другому предусматривать не обязательно, это выходит за рамки задачи. --------- В творчестве рождается истина

Ответ отправил: Elric (статус: Специалист) Ответ отправлен: 05.10.2007, 11:23 Оценка за ответ: 5 Комментарий оценки: Измерение регистра "Партия" - именно то, что надо! Теперьвсё понятно. Спасибо.

Вопрос № 104.402

Здравствуйте, уважаемые Эксперты! Необходимо выбрать CRM под 1С 8.0. Кто сталкивался с этим посоветуйте где можно прочитать про конфигурации CRM или какие-то материалы или примеры (кроме 1С:Предприятие 8.0. CRM ПРОФ). Может кто-то сам писал, короче интересует все! Жду ссылок.

Отправлен: 05.10.2007, 11:22 Вопрос задала: Маргарита (статус: 1-ый класс) Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Igor_L Здравствуйте, Маргарита! По этой ссылке http://slil.ru/24938241 вы найдете книгу "Методика Внедрения 1С:CRM ПРОФ" и доп.материалы.

Ответ отправил: Igor_L (статус: 2-ой класс) Ответ отправлен: 05.10.2007, 11:50 Оценка за ответ: 4 Комментарий оценки: Здравствуйте Игорь! К сожалению Ваша ссылка у меня выдает ошибку. Начинает выкачивать, а потом ошибка. Не могли бы Вы еще раз выложить или отправить мне на почту? Заранее большое спасибо.

Отвечает: Яна Здравствуйте, Маргарита! Небольшой CRM есть в Управлении Торговлей, и в некоторых других конфигурациях. Чтобы было о чем конкретно говорить, нужно более конкретно поставить задачу, т.е. какие конкретно задачи Вы хотите решать? 1С:Предприятие 8.0. CRM ПРОФ недостаточно доработана, насколько я знаю, возможны серьезные трудности при внедрении из-за большого количества багов.

Ответ отправила: Яна (статус: Студент) Ответ отправлен: 05.10.2007, 12:12 Оценка за ответ: 4 Комментарий оценки: Если коротко, то необходимо создать такую базу данных клиентов, чтобы менеджер мог посмотреть когда какие переговоры велись с ним, чем клиент интересовался и т.п. Ну и возможность интеграции в нетиповую конфигурацию будет необходима.

Вопрос № 104.416

Доброго времени суток! Вопрос такого плана. 1C 7.7 Есть документ "Списание". У него реквизиты: "Контрагент", "Договор", "Цех", "Документ". Надо чтобы при выборе ячейки "Документ" открывался подбор с отфильтрованным списком по конкретному Контрагенту, конкретному Договору, конкретному Цеху. В принципе если делать отбор по связке Контрагент-Договор проблем нет. Так как Справочник Договоры подчиненный Справочнику Контрагенты. Процедура "УстановитьОтбор" по реквизиту "Договор" фильтрует автоматом и по Контрагентам, но тогда полный набор цехов и соответственно Документов. Если еще сделать "ЗакладкиОтбора" по реквизиту "Цех", то тогда в закладке пропадает фильтр по Контрагенту+Договору и там полный перечень документов по данному цеху. Как сделать отбор по всем трем параметрам?

Отправлен: 05.10.2007, 13:31 Вопрос задал: Игорь К. (статус: 5-ый класс) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: svsrus Здравствуйте, Игорь К.! Можно организовать выборку документов за определенный период и проверять на условия. Но лучше сделать Запрос. Примерный запрос смотрите ниже. Результаты запроса выгружаем в таблицу значений, которую потом вызываем для выбора нужного документа. Немного поколдовать над этим кодом и можно добиться хороших результатов:) УДАЧИ! Приложение: Запрос = СоздатьОбъект("Запрос"); ТекстЗапроса = "//{{ЗАПРОС(Сформировать) |Период с НачДата по КонДата; |Без итогов; |Док = Документ.Списание.ТекущийДокумент; |ДокКонтрагент = Документ.Списание.Контрагент; |ДокДоговор = Документ.Списание.Договор; |ДокЦех = Документ.Списание.Цех; |Группировка Списание упорядочить по Списание.ДатаДок;"; Если Контрагент.Выбран() = 1 Тогда ТекстЗапроса = ТекстЗапроса +" |Условие((ДокКонтрагент = Контрагент);" КонецЕсли; Если Договор.Выбран() = 1 Тогда ТекстЗапроса = ТекстЗапроса +" |Условие((ДокДоговор = Договор);" КонецЕсли; Если Цех.Выбран() = 1 Тогда ТекстЗапроса = ТекстЗапроса +" |Условие((ДокЦех = Цех);" КонецЕсли; // Если ошибка в запросе, то выход из процедуры Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда Возврат; КонецЕсли; ТЗ = СоздатьОбъект("ТаблицаЗначений"); Запрос.Выгрузить(ТЗ); Если ТЗ.КоличествоСтрок()>0 Тогда НомСтр = 0; Если ТЗ.ВыбратьСтроку(НомСтр,"Выберите документ")=0 Тогда Возврат; КонецЕсли; Документ = ТЗ.ПолучитьЗначение(НомСтр,"Док"); КонецЕсли;

Ответ отправил: svsrus (статус: 7-ой класс) Ответ отправлен: 06.10.2007, 08:44 Оценка за ответ: 5 Комментарий оценки: Великолепно! Именно так и сделал. Спасибо за верное направление мысли!

Вопрос № 104.419

Добрый день! Помогите разобраться. Есть печатная форма справочника (ведется информация по успеваемости детей), есть несколько колонок мне нужно сделать так, чтобы в конце списка сумировались значения каждой колонки, т.е: Предмет кол-во пропусков Русский язык 1 Математика 2 Итого 3 Нужно чтобы "Итого" считалась автоматически. Как это сделать? Только если можно объясните подробнее в 1с я еще только учусь. Зарание спасибо за ответы. С уважением, Сергей. Приложение: 1с 7.7 (конфигурация на базе Торговля и склад)

Отправлен: 05.10.2007, 13:46 Вопрос задал: Serega_artem (статус: 7-ой класс) Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 18)

Отвечает: Dmitry Stashenko Здравствуйте, Serega_artem! Немного непонятно, что такое "печатная форма справочника", но предположим, что есть Справочник.Ученики, в котором есть реквизиты Ученик, Предмет, КоличествоПропусков, а также есть обработка, которая отбирает учеников и выводит печатную форму с предметами и пропусками. Тогда можно поступить следующим образом: 1) при выборке элементов из справочника заносить их в таблицу значений, а потом методом таблицы значений Итог() делать итог по колонке КоличествоПропусков. 2) просто завести переменную ИтогоПропусков и при выборке из справочника увеличивать ее на количество попусков в справочнике: ИтогоПропусков = ИтогоПропусков + Спр.КоличествоПропусков Удачи.

Ответ отправил: Dmitry Stashenko (статус: 10-ый класс) Ответ отправлен: 06.10.2007, 10:14 Оценка за ответ: 5 Комментарий оценки: Спасибо большое! Вот только не совсем разобрался как правильно создать таблицу значений :( Может быть у Вас какой нибудь пример есть....Еще раз говорю, что в 1с я пока только учюсь. Еще раз спасибо за ответ!

Отвечает: Астафьев Александр Николаевич Здравствуйте, Serega_artem! Можно сделать как Вам написали а можно обойтись без создания Таблицы Значений: Процедура Сформировать() Спр = СоздатьОбъект("Справочник.Ученики"); Таб = СоздатьОбъект("Таблица"); Таб.ИсходнаяТаблица("Сформировать"); Таб.ВывестиСекцию("Шапка"); // подразумеваем что каждый элемент справочника - Ученик, //у элемента правочника есть реквизиты на каждый предмет // т.е. РусскийЯзык, Математика, Биология и т.д. // тип реквизита число - количество пропусков ИтогРусскийЯзык = 0; ИтогМатематика = 0; ИтогБиология = 0; //Спр.ВыборГруппы(0); можно так // а можно как ниже написано - Если Спр.ЭтоГруппа()=1 Тогда Спр.ВыбратьЭлементы(); Таб.Опции(0,0,Таб.ВысотаТаблицы(),0); Пока Спр.ПолучитьЭлемент()=1 Цикл Если Спр.ЭтоГруппа()=1 Тогда Продолжить; КонецЕсли; ИтогРусскийЯзык = ИтогРусскийЯзык + РусскийЯзык.Пропуски; ИтогМатематика = ИтогМатематика + Математика.Пропуски; ИтогБиология = ИтогБиология + Биология.Пропуски; // в секции выводим поля Ученик РусскийЯзык Математика // Биология и т.д. Таб.ВывестиСекцию("Строка_1"); КонецЦикла; // в подвале выводим поля ИтогРусскийЯзык ИтогМатематика // ИтогБиология и т.д. // и поле Общий итог по всем предметам если надо: // ИтогОбщий = ИтогРусскийЯзык + ИтогМатематика + ИтогБиология + и т.д. Таб.ВывестиСекцию("Подвал"); Таб.ТолькоПросмотр(1); Таб.Показать("Сформировать",""); КонецПроцедуры

Ответ отправил: Астафьев Александр Николаевич (статус: 2-ой класс) Ответ отправлен: 06.10.2007, 16:47 Оценка за ответ: 5 Комментарий оценки: Спасибо огромное! Интересный вариант. Правда у меня немножко по другому сделанна структура справочника... А в целом очень хороший ответ. Удачи Вам.

Вопрос № 104.421

существует LPT-ключ для 1С каким образом его можно подключить, если нет LPT потра? пробовали подключать через переходник PCI to LPT, ключ не определяется вариант обмена LPT ключа на USB ключ не подходит.

Отправлен: 05.10.2007, 15:24 Вопрос задал: Никулин Андрей Владимирович (статус: Посетитель) Всего ответов: 3 Мини-форум вопроса >>> (сообщений: 1)

Отвечает: Angeliccare Виртуальная машина с Nethasp. Стоимость варианта: ~120 у.е. Составляющие: * QEMU * ещё один лицензионный windows xp Home edition http://market.yandex.ru/search.xml?&cvredirect=1&text=windows%20xp%20home&hid=91139&how=rop * LPT to USB конвертер или PCI to LPT http://price.ru/bin/price/prodlist?pnam=%CF%E5%F0%E5%F5%EE%E4%ED%E8%EA+USB+to+LPT&incid=1&tid=&acod=&pmin=&pmax=&curr=2&base=1&cid=0908&vcid=010307&where=00&srch=1 http://ext6.price.ru/images/price/img/firms/orig_pics/0/3/1/1/1/2/2/3568187a14c5a776fe23aad2bd5f23d7.jpg * mapping порта LPT виртуальной машины на порт конвертера USB-LPT Конвертер без виртуальной машины скорее всего работать не будет. Осознайте - вы не ищите лёгких путей.

Ответ отправил: Angeliccare (статус: 1-ый класс) Ответ отправлен: 06.10.2007, 09:11

Отвечает: Астафьев Александр Николаевич Здравствуйте, Никулин Андрей Владимирович! Если вы использовали драйвер ключа только из стандарной поставки, то попробуйте с диска ИТС Франчайзи там есть папка 1CitsFrEXEHASP с драйверами ключей, попробуйте оттуда взять более новый или скачать с сайта Алладина.

Ответ отправил: Астафьев Александр Николаевич (статус: 2-ой класс) Ответ отправлен: 06.10.2007, 16:23

Отвечает: Igor_L Здравствуйте, Никулин Андрей Владимирович! Физической возможности подключения не существует. Единственным вариантом в Вашем случае (кроме обмена ключа) остается приобретение платы расширения с LPT-портом и установка ее в ПК. Хотя из собственного опыта знаю, что работают эти платы не всегда стабильно.

Ответ отправил: Igor_L (статус: 2-ой класс) Ответ отправлен: 07.10.2007, 21:25

© 2001-2007, Портал RusFAQ.ru, Россия, Москва. Авторское право: ООО "Мастер-Эксперт Про" Техподдержка портала, тел.: +7 (926) 535-23-31 Хостинг: "Московский хостер" Поддержка: "Московский дизайнер" Авторские права | Реклама на портале Версия системы: 4.60.13 от 06.10.2007
RusFAQ.ru | MosHoster.ru | MosDesigner.ru | RusIRC.ru Kalashnikoff.ru | RadioLeader.ru | RusFUCK.ru