Имя: Пароль:
1C
1С v8
Помощь с перечислением в 77 через COM.
0 zippygrill
 
19.07.13
16:17
Из 8.2 через COM соединяюсь к 7.7

ОбъектV77 = Новый COMОбъект("v77s.Application");
РезультатПодключения = ОбъектV77.Initialize(ОбъектV77.RMTrade,СтрокаПодключения,"NO_SPLASH_SHOW");

Создаю запрос
   
ЗапросАлкоПараметрыКонтрагентов = ОбъектV77.CreateObject("Запрос");
   ТекстЗапросаАлкоПараметрыКонтрагентов =
   "//{{ЗАПРОС(Сформировать)
   |Лицензия = Справочник.ЛицензииКлиентов.ТекущийЭлемент;
   |ЛицензияРозничная = Справочник.ЛицензииКлиентов.Розничная;
   |"//}}ЗАПРОС
   ;
   Пока ЗапросАлкоПараметрыКонтрагентов.Группировка(1) = 1 Цикл
       
       Стр                            = АлкоПараметрыКонтрагентов.Добавить();
       Стр.ЛицензияРозничная            = ЗапросАлкоПараметрыКонтрагентов.ЛицензияРозничная;

Стр.ЛицензияРозничная - Тип булево(в 8.2)
ЗапросАлкоПараметрыКонтрагентов.ЛицензияРозничная - это реквизит справочника с типом "Перечисление.Булево" с 2-мя значениями Да и Нет(в 7.7)

Никак не могу присвоить к Стр.ЛицензияРозничная нужный признак.
как?
1 pessok
 
19.07.13
16:22
(0) и шо, не хавает?
ну а если использовать магический символ "?"
2 zippygrill
 
19.07.13
16:26
(1) блин, естественно не хавает :)
3 pessok
 
19.07.13
16:28
?(Строка(ЗапросАлкоПараметрыКонтрагентов.ЛицензияРозничная) = "Да", Истина, Ложь); //пробовал?
4 zippygrill
 
19.07.13
16:28
а если в запросе поставлю так?
  |ЛицензияРозничная = Справочник.ЛицензииКлиентов.Розничная.Представление;
5 pessok
 
19.07.13
16:29
(4) или так, но потом все равно как в (3) :)
6 zippygrill
 
19.07.13
16:30
ЗапросАлкоПараметрыКонтрагентов.ЛицензияРозничная - сomОбъект. что мы полчим если ставим Строка(ЗапросАлкоПараметрыКонтрагентов.ЛицензияРозничная). ровно ничего :)
7 pessok
 
19.07.13
16:32
(6) ну дык представление же, представление ;)
8 pessok
 
19.07.13
16:33
+(7) кстати получим не ровно ничего, а везде FALSE :)
9 zippygrill
 
19.07.13
16:33
Строка(ЗапросАлкоПараметрыКонтрагентов.ЛицензияРозничная) - юморист блин :)
10 pessok
 
19.07.13
16:37
(9) ну дык пятница же :) получилось через представление?
11 zippygrill
 
19.07.13
16:38
(10) через представление нет :)
12 zippygrill
 
19.07.13
16:38
сирашным матом ругается :)
13 zippygrill
 
19.07.13
16:38
*страшным
14 pessok
 
19.07.13
16:39
ну ты отладчиком то посмотри, как добраться до заветного слова "ДА", а потом уже примени это к (3) ;)
15 zippygrill
 
19.07.13
16:41
ты не поверишь именно до слова "Да" или "Нет" хочу добратся. Как обработать дальше(на стороне 8.2) ясно и так
16 Jaap Vduul
 
19.07.13
16:46
ЗапросАлкоПараметрыКонтрагентов.ЛицензияРозничная.Идентификатор()
17 zippygrill
 
19.07.13
16:47
(16) пробовал
18 Serginio1
 
19.07.13
16:48
Можешь сравнить на порядковый номер
Перечисление.Булево.Да.ПорядковыйНомер() = 1
19 pessok
 
19.07.13
16:48
(17) слух, ну а что, реально если ком объект в отладчике развернуть - нет нужного поля?
20 zippygrill
 
19.07.13
16:48
и почему в начале всегда выдавал пустую строку. Теперь вот пару десятков строк пропустил в цикле и появились значении. спасибо.
21 Serginio1
 
19.07.13
16:49
или Идентификатор
22 Serginio1
 
19.07.13
16:50
Перечисление.Булево.Да.Идентификатор() = "Да"