Форум программистов, компьютерный форум, киберфорум
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
 
Рейтинг 4.50/18: Рейтинг темы: голосов - 18, средняя оценка - 4.50
0 / 0 / 0
Регистрация: 11.05.2011
Сообщений: 30

Документы в 1С

12.01.2013, 01:19. Показов 3482. Ответов 42
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Здраствуйте
Нужна помощь, задача состоит в следущем:
Есть справочниик ПРОДУКЦИЯ, в котором есть поля Название и Количество, нужно создать документ, при проведении которого выбранный нами товар будет продан, грубо говоря, нужно чтобы в поле Количество отнялось то значение, которое мы ввели.Например если у нас есть Продукция - Часы, Количество их - 5.Мы вводим при проведении документа количество которое продаем, например - 2, то в поле Количество должно остаться 3.
Спасибо за помощь!!!


Вот я пытался сделать, помогите пожалуйста:

1C
1
2
3
4
5
6
7
Процедура ОбработкаПроведения()
спр=создатьобъект("Справочник.Продукция");   
если спр.НайтиПоНаименованию(Наименование)=0 
тогда предупреждение("Нет такой продукции",0);
иначе спр.НайтиПоНаименованию(Количество)-СпрПродукция.Количество 
конецесли;
КонецПроцедуры
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
12.01.2013, 01:19
Ответы с готовыми решениями:

Пропали все документы из корня папки "Мои документы"
Здравствуйте! Возникла указанная в теме проблема. В инете нашла ссылку на данный форум , на похожую тему, перешла по ссылке в ней в Правила...

документы на SE
У меня телефон SE k660i, обычно открываю .doc файлы DocViewer-ом, но проблема в том что он не открывает картинки в файле, чтобы бывает...

Документы в 1С 7
Суть проблемы нужно в Таблицузначений выгрузить МногоСтрочнуюЧасть документа: в обработке проверяется является ли Форма.параметр документом...

42
6 / 6 / 0
Регистрация: 13.03.2010
Сообщений: 34
12.01.2013, 07:57
Бросайте 7-ку. А то потом пожалеете о потраченном времени.
0
 Аватар для fimbulwinter
309 / 309 / 1
Регистрация: 16.01.2011
Сообщений: 1,073
12.01.2013, 10:48
для решения таких задач существуют регистры.
не бросайте 7-ку, отличная платформа
0
6 / 6 / 0
Регистрация: 13.03.2010
Сообщений: 34
12.01.2013, 10:53
Платформа то отличная, но зачем ее учить?
0
 Аватар для fimbulwinter
309 / 309 / 1
Регистрация: 16.01.2011
Сообщений: 1,073
12.01.2013, 10:55
потому что для определенных задач это отличная платформа, очень быстрая и обладает хорошим функционалом.
а 8-ка это неповоротливый монстр.
0
0 / 0 / 0
Регистрация: 11.05.2011
Сообщений: 30
12.01.2013, 13:23  [ТС]
на данный момент нужно сделать именно в 7-ке)
а может кто нибудь подсказать как реализовать данныу задачу, подправьте код если можно)
0
858 / 657 / 111
Регистрация: 01.11.2012
Сообщений: 2,411
12.01.2013, 17:20
Цитата Сообщение от Cas01 Посмотреть сообщение
на данный момент нужно сделать именно в 7-ке)
а может кто нибудь подсказать как реализовать данныу задачу, подправьте код если можно)
Регистрами пользуйся, тебе же написали уже.
0
0 / 0 / 0
Регистрация: 11.05.2011
Сообщений: 30
12.01.2013, 17:36  [ТС]
я понял что нужно пользоваться регистрами, только если бы я знал как ими пользоваться
0
858 / 657 / 111
Регистрация: 01.11.2012
Сообщений: 2,411
12.01.2013, 18:04
Литературку по 1С скачай и почитай, там не сложно
0
0 / 0 / 0
Регистрация: 11.05.2011
Сообщений: 30
12.01.2013, 18:47  [ТС]
по данному вопросу теории нашел много, разобрался как взаимодействуют документы и регистры, но как реализовать это в виде кода так и не понял(
0
858 / 657 / 111
Регистрация: 01.11.2012
Сообщений: 2,411
12.01.2013, 19:32
В обработкепроведения перебираешь строки документа и записываешь движения прихода или расхода по регистру в соответствии с ресурсами и измерения этого регистра.
0
0 / 0 / 0
Регистрация: 11.05.2011
Сообщений: 30
12.01.2013, 20:06  [ТС]
Я создал документ Продажа_продукции, Реквизиты шапки - наименование, количество
создал форму, в модуле документа прописал:
1C
1
2
3
4
5
6
7
8
Процедура ОбработкаПроведения() 
ВыбратьСтроки(); 
Пока ПолучитьСтроку()=1 Цикл 
 Регистр.Остатки.Наименование=Наименование; 
 Регистр.Остатки.Количество=Количество; 
 Регистр.Остатки.ДвижениеПриходВыполнить(); 
КонецЦикла; 
КонецПроцедуры
До этого создал регистр Остатки с :
Измерения - Продукция
Ресурсы - Количество

Так?
0
858 / 657 / 111
Регистрация: 01.11.2012
Сообщений: 2,411
12.01.2013, 20:25
Угу.
измерение продукция и Наименование должны иметь один тип - Справочник.Продукция

Добавлено через 6 минут
И если измерение называется Продукция, То Регистр.Остатки.Продукция=Наименование;

Ну и в первом посте ты пишешь про продажу. сответственно если это регистр остатков, то при приходе надо приходовать, а при продаже расходовать.
0
0 / 0 / 0
Регистрация: 11.05.2011
Сообщений: 30
12.01.2013, 20:40  [ТС]
Понятно, а какие мои дальнейшие действия?)
0
 Аватар для fimbulwinter
309 / 309 / 1
Регистрация: 16.01.2011
Сообщений: 1,073
12.01.2013, 20:44
проконтролировать остатки

Добавлено через 56 секунд
и собрать отчет по закупкам, продажам, остаткам.
но думаю это должно было быть у вас в задании или что вы там делаете..
0
0 / 0 / 0
Регистрация: 11.05.2011
Сообщений: 30
12.01.2013, 20:46  [ТС]
а можете пояснить опоподробнее каким образом это сделать?
при проведении документа ничего не происходит, я так понимаю нужно какой то отчет как то создать, подскажи, а?)

Добавлено через 41 секунду
мне просто нужно чтобы в графе количество значение отнималось, если товар мы продали
0
858 / 657 / 111
Регистрация: 01.11.2012
Сообщений: 2,411
12.01.2013, 20:55
Заводишь в документе процедуру которая срабатывает при изменении поля количество (тык мышкой по колонке Количество, открываешь свойства, в закладке Дополнительно пишешь имя процедуры). Потом в Модуле формы пишешь эту процедуру, которая сравнивает введённое количество с остатком по Регистру.Остатки и если оно больше, то уменьшаешь количество.
0
0 / 0 / 0
Регистрация: 11.05.2011
Сообщений: 30
12.01.2013, 21:40  [ТС]
процедуру назвал Кол(), получился вот такой код:
1C
1
2
3
4
5
6
7
Процедура Кол()
спр=создатьобъект("Справочник.Продукция");
если спр.Количество > Регистр.Остатки 
тогда (спр.Количество)-(Регистр.Остатки);
иначе предупреждение("...");    
конецесли;
КонецПроцедуры
Что то напутал точно, исправишь?)
0
858 / 657 / 111
Регистрация: 01.11.2012
Сообщений: 2,411
12.01.2013, 22:34
Всё напутал. Двойка тебе. Сотри и не позорься
1. Причём тут справочник? Ты же со строкой документа работаешь, оттуда и бери значения.
2. Почитай как получать остаток по регистру.
0
0 / 0 / 0
Регистрация: 11.05.2011
Сообщений: 30
12.01.2013, 22:56  [ТС]
спасибо за справедливую оченку=)
Получение остатка такое будет?:
1C
1
2
3
4
Процедура ПолучитьОстаток(Наименование,Количество);
Рег.Остатки = СоздатьОбъект("Регистр.Остатки")
Количествово = РегОстатки.Остаток (ТекНаименование,"Количество");
КонецПроцедуры
думаю что тут тоже будет двойка=)

а вот 1-ый пункт можете мне помочь с кодом?)
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
12.01.2013, 22:56
Помогаю со студенческими работами здесь

XML-Документы
Здравствуйте. Помогите исправить ошибку в коде при вводе данных. Условие:Worker: Фамилия и инициалы, Должность, Год поступления на...

Не печатаются документы 1С
Доброе время суток. Ситуация следующая: имеем пользователя, который работает в 1С 8.2 локально на своем компе под управлением ХР (вдруг ...

Дочерние документы
Помогите кто может...Необходимо в коллекцию добавить все ответные документы,включаю ответные документы ответных документов....Ну т.е. у...

Вложенные документы
Есть такая задача... Написать небольшое приложение документооборота.. Есть MS SQL база (2005) и клиент на c#. В базке должна быть...

не открывает документы
Здравствуйте уважаемые мастера,наверное по этой логике я нашел правильным написать тут о проблемках почетным докторам цифирь..кои,да...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
20
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве
8Observer8 02.02.2026
Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .
Философия технологии
iceja 01.02.2026
На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .
SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf
8Observer8 01.02.2026
Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .
SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли
8Observer8 30.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm
8Observer8 30.01.2026
Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .
SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 29.01.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .
Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT
bedvit 28.01.2026
Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .
SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 28.01.2026
Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru