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

Установить вид отгрузки в расходной накладной

28.08.2008, 16:41. Показов 20622. Ответов 6
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Создаю обработкой документ РасходнаяНакладная.
Все реквизиты заполняю без проблем, кроме одного - надо выбрать какой-нибудь вид отгрузки из списка "СписокВидовОтгрузки".
Как это сделать программно?

Процедура Сформировать()
Отгрузка=СоздатьОбъект("Документ.Расходн аяНакладная");
Отгрузка.Новый();
// ...
Отгрузка.СписокВидовОтгрузки.ТекущаяСтро ка(1);


Т.е. я хотел сделать в списке первую строку текущей.
1С выдает ошибку:
Отгрузка.СписокВидовОтгрузки.ТекущаяСтро ка(1);
Поле агрегатного объекта не обнаружено (СписокВидовОтгрузки)

Если я эту строку вообще уберу, то будет другая ошибка:


Если ВидОтгрузки <> СписокВидовОтгрузки.ПолучитьЗначение(Спи сокВидовОтгрузки.ТекущаяСтрока()) Тогда
{Документ.РасходнаяНакладная.Форма.Модул ь(1167)}: Индекс не входит в границы списка значений.
ВидОтгрузки = СписокВидовОтгрузки.ПолучитьЗначение(Спи сокВидовОтгрузки.ТекущаяСтрока());
{Документ.РасходнаяНакладная.Форма.Модул ь(1168)}: Индекс не входит в границы списка значений.
Подскажите, каким образом сделать выбранным элемент в списке?
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
28.08.2008, 16:41
Ответы с готовыми решениями:

Ошибка при печати расходной накладной
Привет всем! Очень нужна помощь вчера своими шаловливыми ручками залезла в конфигурацию и удалила в модуле строку теперь не могу найти...

Как добавить колонку кодТиС в расходной накладной
Всем здравствуйте! В бухгалтерии 7.7. 4.5. при работе в расходной накладной и выборе Товар, открывается Номенклатура, в которой не...

Проверка количества доступного товара при проведении расходной накладной
Все привет. Подскажите пожалуйста. Сделал приходную и расходную накладную, регистр накопления остаток. как проверять сколько товара на...

6
0 / 0 / 0
Регистрация: 14.09.2007
Сообщений: 428
28.08.2008, 16:51
очень интересный подход!!! а для чего тебе надо со списком то ковырятся (который к тому же предназначен для удобства пользователя ... ) тебе же нужно переменная "ВидОтгрузки" посмотри как заполняется списокзначений в документе и устанавливай соответствующие значения для себя :blink:
0
0 / 0 / 0
Регистрация: 15.05.2007
Сообщений: 152
28.08.2008, 16:56
СписокВидовОтгрузки НЕ ЯВЛЯЕТСЯ реквизитом расходной накладной. Отсюда и ошибка Отгрузка.СписокВидовОтгрузки.
А в шапке накладной есть реквизит ВидОтгрузки. Ему и надо присваивать значение (Отгрузка.ВидОтгрузки =11, например). Если же необходимо при создании накладной интерактивно выбирать это значение - надо создать СписокВидовОтгрузки, заполнить его аналогично тому, как это сделано в форме документа, и использовать метод "ВыбратьЗначение"
0
0 / 0 / 0
Регистрация: 12.08.2008
Сообщений: 28
28.08.2008, 17:45
Штаны через голову надевал, ага :blink:
Это я уже от отчаяния :wacko:
Я сначала и так и сяк пробовал...
Отгрузка.ВидОтгрузки = Отгрузка.СписокВидовОтгрузки.ПолучитьЗна чение(1);
и т.п.

А оказалось что можно было обойтись строкой:
Отгрузка.ВидОтгрузки = 11;

Ну тогда пусть другим останется.

Isabela, спасибо и Вам за ответ.
Теперь почитав ваши ответы и код модуля формы мне стало все более-менее понятно.

Не хочу показаться надоедливым, но возник еще вопрос по данному документу.
Вроде и темы плодить не хочется, но и решение проблемы очень хотелось бы узнать.

После того, как я записал в базу созданный документ, я вижу, что не заполнены колонки НДС и ВСЕГО.
Этого и следовало ожидать, так как я заполняю в таблице документа только товар, кол-во и сумму. А как же сделать, чтобы рассчитывались все колонки?

мой код:
Отгрузка.ВариантРасчетаНалогов=ВариантРа счетаНалогов;
ТЗ.ВыбратьСтроки();
Пока ТЗ.ПолучитьСтроку()=1 Цикл
Отгрузка.НоваяСтрока();
Отгрузка.Товар=ТЗ.Товар;
Отгрузка.Количество=ТЗ.Количество;
Отгрузка.Цена=ТЗ.Сумма/ТЗ.Количество;
Отгрузка.Сумма=ТЗ.Сумма;
КонецЦикла;


В документе за пересчет отвечает соответствующая процедура (Пересчет). Но я же не могу ее вызвать из своей обработки.
0
0 / 0 / 0
Регистрация: 15.05.2007
Сообщений: 152
28.08.2008, 18:00
Можно примерно так :
Отгрузка.НДС = глПоказательДокумента(Отгрузка, "НДС");
Отгрузка.Всего = глПоказательДокумента(Отгрузка, "СуммаСНалогами");
0
0 / 0 / 0
Регистрация: 12.08.2008
Сообщений: 28
28.08.2008, 18:17
Дааа, мне еще учиться и учиться...
Isabela, спасибо вам большое! Вы мне очень помогли.
0
0 / 0 / 0
Регистрация: 15.05.2007
Сообщений: 152
28.08.2008, 18:25
мы все учились понемногу - чему-нибудь и как-нибудь
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
28.08.2008, 18:25
Помогаю со студенческими работами здесь

Бонусы в печатной форме расходной накладной УТ 11
Здравствуйте! Стоит задача, клиентам которые заказали товара на определенную сумму, выдавать бонусы товаром. Хотел спросить Вашего совета....

Выбор срока годности по номенклатуре в расходной накладной
Решаю задачку по БУ. В ТЗ написано, что в ТЧ Документа надо проставлять срок годности товара. Для Приходной и Расходной накладной. Для...

1С УНФ 8.3. Локализация печатных форм Расходной накладной.
Здравствуйте. 1С УНФ 8.3. По умолчанию установлен русский язык. При установке украинского языка для пользователя 1С в печатных формах...

Не полностью выводит на печать все реквизиты контрагентов в документе расходной накладной
Добрый день, прошу помочь с таким вопросом... Есть такая конфигурация : Управление небольшой фирмой для Украины, редакция 1.2...

УНФ, печать Расходной накладной: вывод номера телефона в параметр <ПредставлениеПолучателя>
Здравствуйте. Помогите, пожалуйста, отредактировать &lt;ПредставлениеПолучателя&gt; в макете печатной формы. Необходимо, чтоб еще телефоны...


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

Или воспользуйтесь поиском по форуму:
7
Ответ Создать тему
Новые блоги и статьи
Программный контроль заполнения реквизита табличной части документа
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать контроль заполнения реквизита "ПричинаСписания". . .
wmic не является внутренней или внешней командой
Maks 02.04.2026
Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/
Программная установка даты и запрет ее изменения
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .
Вывод данных в справочнике через динамический список
Maks 01.04.2026
Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .
Программное заполнения текстового поля в реквизите формы документа
Maks 01.04.2026
Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .
К слову об оптимизации
kumehtar 01.04.2026
Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .
Идея фильтра интернета (сервер = слой+фильтр).
Hrethgir 31.03.2026
Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .
Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда
anaschu 31.03.2026
В прикрепленном документе раздумья о том, как можно поменять модель в будущем
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru