helpf.pro
Регистрация

Аналог Форма.Параметр в 1С v8

bless18
24.09.2010 08:17Прочитано: 3209
Здравствуйте!
Пишу код с семерки на восьмерку, столкнулась со свойством формы справочника Форма.Параметр. Какое аналог этого метода в восьмерке? И есть ли он?
Код 1C v 8.х
 	Если ТипЗначенияСтр(Форма.Параметр)="ГрупповойКонтекст" Тогда
Если (Форма.Параметр.Вид() = "СчетФактура") Или
(Форма.Параметр.Вид() = "НакладнаяНаРозничныйСклад") Или
(Форма.Параметр.Вид() = "НакладнаяСРозничногоСклада") Тогда
ИспСклад=Форма.Параметр.Склад;
Форма.Параметр.ВыбратьСтроки();
Пока Форма.Параметр.ПолучитьСтроку()=1 Цикл
ДобавитьСтроку();
ВыбТов.Код=Форма.Параметр.Товар.Код;
ВыбТов.Товар=Форма.Параметр.Товар;
ВыбТов.Количество=Форма.Параметр.Количество;
ВыбТов.Счет=Форма.Параметр.ВидТМЗ.СчетТМЗ;
КонецЦикла;
ИначеЕсли (Форма.Параметр.Вид() = "ПеремещениеТМЗ") Или
(Форма.Параметр.Вид() = "ВнутреннееСписаниеТМЗ") Тогда
ИспСклад=Форма.Параметр.Отпустил;
Форма.Параметр.ВыбратьСтроки();
Пока Форма.Параметр.ПолучитьСтроку()=1 Цикл
ДобавитьСтроку();
ВыбТов.Код=Форма.Параметр.Товар.Код;
ВыбТов.Товар=Форма.Параметр.Товар;
ВыбТов.Количество=Форма.Параметр.Количество;
ВыбТов.Счет=Форма.Параметр.ВидТМЗ.СчетТМЗ;
КонецЦикла;
КонецЕсли;
КонецЕсли;
Yandex
Возможно, вас также заинтересует
Реклама на портале
bless18
24.09.2010 08:19Ответ № 1
Написала пока что такое только:
Код 1C v 8.х
 	СтрокаТЗ = ЭлементыФормы.ВыбранныйТовар.ТекущиеДанные;
ТекущийСчет();
ТекущийОстаток();
Строка = ЭлементыФормы.ВыбранныйТовар.ТекущиеДанные;
ЭлементыФормы.ВыбранныйТовар.Колонки.Добавить("Счет");
ЭлементыФормы.ВыбранныйТовар.Колонки.Добавить("Код");
ЭлементыФормы.ВыбранныйТовар.Колонки.Добавить("Товар");
ЭлементыФормы.ВыбранныйТовар.Колонки.Добавить("Количество");
ЭлементыФормы.ВыбранныйТовар.Колонки.Добавить("Остаток");
Пока ЭтаФорма.ВыбранныйТовар.ВыбратьСтроку() = 1 Цикл
ЭлементыФормы.ВыбранныйТовар.ДобавитьСтроку();
СтрокаТЗ.Код =
КонецЦикла;;

А дальше Форма.Параметр.Код.. Как это на 8-ку переписать не могу разобраться
E_Migachev
24.09.2010 09:07Ответ № 2
Используй ЭлементыФормы и ЭтотОбъект
bless18
24.09.2010 09:19Ответ № 3
Использую вот так:
Код 1C v 8.х
 
СтрокаТЗВыбТовар = ЭлементыФормы.ВыбранныйТовар.ТекущиеДанные;
СтрокаТЗОстатТов = ЭлементыФормы.ОстаткиТовара.ТекущиеДанные;

ТекущийСчет();
ТекущийОстаток();
ЭлементыФормы.ВыбранныйТовар.ДобавитьСтроку();
ЭлементыФормы.ВыбранныйТовар.Колонки.Добавить("Счет");
ЭлементыФормы.ВыбранныйТовар.Колонки.Добавить("Код");
ЭлементыФормы.ВыбранныйТовар.Колонки.Добавить("Товар");
ЭлементыФормы.ВыбранныйТовар.Колонки.Добавить("Количество");
ЭлементыФормы.ВыбранныйТовар.Колонки.Добавить("Остаток");
//Пока ЭтаФорма.ВыбранныйТовар.Получить() = 1 Цикл

СтрокаТЗВыбТовар.Код = СтрокаТЗОстатТов.Код;
СтрокаТЗВыбТовар.Товар = СтрокаТЗОстатТов.Товар;


Дает ошибку Значение не является значением объектного типа (Код)
СтрокаТЗВыбТовар.Код = СтрокаТЗОстатТов.Код; И закрывает предприятие
E_Migachev
24.09.2010 10:48Ответ № 4
судя по семерошному коду, должно быть:
СтрокаТЗВыбТовар.Код = СтрокаТЗОстатТов.Товар.Код;
bless18
24.09.2010 10:52Ответ № 5
Так вот так и пишу, вылетает..
и помимо ошибки выводит окно, что память не может быть прочитана и закрывается предприятие
bless18
24.09.2010 10:57Ответ № 6
Определила Строку как
СтрокаТЗОстатТов = ЭлементыФормы.ОстаткиТовара.Значение.Колонки
Не вылетает пока
E_Migachev
24.09.2010 11:49Ответ № 7
память не может быть прочитана и закрывается предприятие - это уже другая ошибка, самой платформы!
AndreyVl
11.10.2010 15:20Ответ № 8
У формы есть реквизиты (3-я закладка). Туда можно ввести что угодно.
Например, сделаем форму. Сделаем реквизит формы "СтрокаНаша" с типом текст. Разместим на форме поле ввода , впишем в "данные" - "СтрокаНаша".
Код 1C v 8.х
 	Форма=ПолучитьОбщуюФорму("ФормаТест");
Форма.СтрокаНаша="Ляляляля";
Форма.ОткрытьМодально();
ТеперьСтрокаСодержит=Форма.СтрокаНаша;
Подсказка: Вы можете приложить к ответу файл или изображение щелкнув по значку или в редакторе.
Вы не можете отправить комментарий анонимно, пожалуйста войдите или зарегистрируйтесь.