VPF::выбор документа основания - Форум программистов

max1985

Дата 6.8.2007, 14:06 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 66
Регистрация: 19.3.2007

Репутация: нет
Всего: 1

Снова здравствуйте!!!

Как сделать чтобы документ-основание выбирался в фиксированном списке видов документов. А то мне надо сделать так чтобы в вышеназванном списке отображался только один вид документа.

Мне надо только задать направление, а там сам доперу.

Zero

Дата 6.8.2007, 20:16 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2169
Регистрация: 23.10.2004
Где: Россия, г. Рязань

Репутация: 15
Всего: 24

ВидыДляВыбора(<СписокВидов>) + Выбрать(<Подсказка>,<ФормаЖурнала>,<КомуПодч>) -- методы документов

max1985

Дата 7.8.2007, 05:52 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 66
Регистрация: 19.3.2007

Репутация: нет
Всего: 1

Нет не получается , не допер я, возможно не знаю каких то нюансов
ниже фрагмент кода

Код


                  Процедура ВводНаОсновании(ДокОсн)
                  ДокОсн.ВидыДлявыбора("МесяцДома")  ;
     ДокОсн.Выбрать("Выбор документа","Журнал.ОБН");    
             
        // выбираем строки из таб.части предварительного заказа
    ДокОсн.ВыбратьСтроки();
  Пока ДокОсн.ПолучитьСтроку() =  1 цикл
    НоваяСтрока();
    НомерСтроки = ДокОсн.НомерСтроки;
    ФИО = ДокОсн.ФИО;
    КЧ = ДокОсн.КЧ;
    S  = ДокОсн.S;
    Пр = ДокОсн.Долг;
  КонецЦикла;
   
КонецПроцедуры

Это сообщение отредактировал(а) max1985 - 8.8.2007, 04:02

max1985

Дата 8.8.2007, 03:59 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 66
Регистрация: 19.3.2007

Репутация: нет
Всего: 1

Не получается у меня.
Привожу ниже код

Код


 Процедура ВводНаОсновании(ДокОсн)
                  ДокОсн.ВидыДлявыбора("МесяцДома")  ;
     ДокОсн.Выбрать("Выбор документа","Журнал.ОБН");    
             
        // выбираем строки из таб.части предварительного заказа
    ДокОсн.ВыбратьСтроки();
  Пока ДокОсн.ПолучитьСтроку() =  1 цикл
    НоваяСтрока();
    НомерСтроки = ДокОсн.НомерСтроки;
    ФИО = ДокОсн.ФИО;
    КЧ = ДокОсн.КЧ;
    S  = ДокОсн.S;
    Пр = ДокОсн.Долг;
  КонецЦикла;
   
КонецПроцедуры

То ли код неправильный толи в глобальный модуль залезать надо ,не знаю.
Кстати, я кодю в 1С версии 7.7 Комплексная конфигурация.

SaschaL

Дата 8.8.2007, 08:38 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 880
Регистрация: 13.12.2006
Где: Челябинская обл г .Нязепетровcк

Репутация: 8
Всего: 9

Добавь условие

Цитата

Если ДокОсн.Выбран() = 1 тогда
        // выбираешь реквизиты шапки, если они нужны и загоняешь из значение если нужно.
       ........
       // далее делаешь одход строк документа основания
       ДокОсн.ВыбратьСтроки();
      Пока ДокОсн.ПолучитьСтроку() = 1 цикл
               .......... // дальше присваивешь строкам этого документа , значения из документа основания
      КонецЦикла;
конецЕсли;

Добавлено через 10 минут и 43 секунды
Могу скинуть реальную процедуру ВводаНаОсновании()
Которая работает, а выбор вида документа доделаешь сам.

max1985

Дата 8.8.2007, 10:02 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 66
Регистрация: 19.3.2007

Репутация: нет
Всего: 1

Не откажусь.

Zero

Дата 8.8.2007, 20:09 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2169
Регистрация: 23.10.2004
Где: Россия, г. Рязань

Репутация: 15
Всего: 24

Цитата(max1985 @ 8.8.2007, 10:02

)

Не откажусь

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

max1985

Дата 9.8.2007, 05:43 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 66
Регистрация: 19.3.2007

Репутация: нет
Всего: 1

Цитата

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

SaschaL

Дата 9.8.2007, 06:19 (ссылка)

(нет голосов)

Загрузка ...

Опытный

КАк и обещал скидываю листинг рабочей процедуры Ввода на основании

Цитата

// ***********************************
Процедура ВводНаОсновании(ДокОсн)
    Если (ДокОсн.Вид() = "ПредварительныйЗаказ") тогда
  Контрагент = ДокОсн.Покупатель;
  СуммаАванса = ДокОсн.АвансПоЗаказу;
  ОстатокСуммы = ДокОсн.ОстПлатежа;
  СуммаЗаказа = ДокОсн.СуммаЗаказа;
  // выбираем строки из таб.части предварительного заказа
  ДокОсн.ВыбратьСтроки();
  Пока ДокОсн.ПолучитьСтроку() =  1 цикл
    НоваяСтрока();
    Товар = ДокОсн.Товар;
    ЕдИзм = ДокОсн.ЕдИзм;
    Количество = ДокОсн.Количество;
    Цена  = ДокОсн.ЦенаПродажи;
    Сумма = ДокОсн.Сумма;
  КонецЦикла;
    КонецЕсли;

КонецПроцедуры
все это проверено и работает.
В втоем случае её нужно будет немного доработать. поскольку у тебя основание документа слущит несколько видов документа, надеюсь что это не составит трудности.
Удачи! smile

max1985

Дата 11.8.2007, 08:32 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 66
Регистрация: 19.3.2007

Репутация: нет
Всего: 1

Спасибо SaschaL, но у меня процедуоа ввода основания написана таким же образом как у тебя.
Я исправил проблему, определив тип ДокОсн как Документ.МесяцДома(нужный мне док), а был тип просто "документ". Теперь документ основание выбирается сразу просто в журнале документов.
Все равно благодарю за всех за внимание.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| 1C: Предприятие, SAP, ERP и учётные системы \| Следующая тема »