Хитрость. Использование БУЛЕВО при OLE обмене/подключении из 7.7 к 8

28.09.11

Интеграция - Перенос данных 1C

Как известно, при OLE обмене доступны только типы СТРОКА, ЧИСЛО, ДАТА. А вот БУЛЕВО (ИСТИНА, ЛОЖЬ) использовать при подключении из 7.7 к 8 не получается. Как же быть? Есть хитрость, как использовать тип булево в семерке при обмене с 1С8! :)

Дано:

В восьмерке читаем документ "РеализацияТоваровУслуг" у которого есть реквизит "СуммаВключаетНДС" типа булево и нам необходимо превратить его в семерочный СуммаВклНДС тип число (1 или 0). Например:

Если ОбъектРеализацияТоваровУслуг1С8.СуммаВключаетНДС = истина ....


- так не прокатит, в семерке нет понятия "истина".

Как выкрутился я:

В 77 завел две переменные:

Перем ИСТИНА_8
Перем ЛОЖЬ_8
ИСТИНА_8 = СоединениеСбАЗОЙ8.ЗначениеИзСтрокиВнутр("{""B"",1}")
ЛОЖЬ_8 = СоединениеСбАЗОЙ8.ЗначениеИзСтрокиВнутр("{""B"",0}")


Теперь в 7.7 есть булево! Теперь можно делать так:

Если ОбъектРеализацияТоваровУслуг1С8.СуммаВключаетНДС = истина_8 Тогда
   
Документ77.СуммаВклНДС = 1;
Иначе
   
Документ77.СуммаВклНДС=0
КонецЕсли;

P.S.

Если в восьмерке выполнить код "ЗначениеВстрокуВнутр(Истина)", то строковое значение будет={"B",1}"
Аналогично узнаем строковый "аналог" ЛОЖЬ = 
{"B",0}"
Пользуемся этим в семерке, делая обратное преобразование. :)

 

Конечно же, я не сам дошел до этого.. Где-то один раз на форумах видел.. по-моему, на мисте. Но больше не встречал нигде.
Решил донести в массы. Надеюсь, что не открыл Америки ))
Не судите строго. За плюсы, если заслужил - "респекты!" 

См. также

Перенос данных 1C Программист Бухгалтер Платформа 1С v8.3 Оперативный учет 7.7 1С:Торговля и склад 7.7 1С:Бухгалтерия 3.0 Россия Бухгалтерский учет Налоговый учет Управленческий учет Платные (руб)

Переносится из типовой конфигурации «Торговля и Склад», реакции 9.2 платформы «1С:Предприятие 7.7» в типовую конфигурацию «Бухгалтерия предприятия», редакции 3.0 платформы «1С: Предприятие 8.3» следующие документы и их операции (с соблюдением всех соответствующих проводок): Поступления товаров и услуг (в т.ч. комиссия), Реализации товаров и услуг (в т.ч. комиссия), ПКО и РКО, выписки банка, счета фактуры (выданные и полученный), Возвраты от покупателей и поставщику, Заявка Покупателя, Инвентаризация и другие (всего 28 видов документов, смотрите описание, приложенное к обработке)

11988 руб.

30.06.2014    65442    105    96    

113

Перенос данных 1C Программист Платформа 1С v7.7 Платформа 1С v8.3 1С:Торговля и склад 7.7 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 Россия Бухгалтерский учет Управленческий учет Платные (руб)

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

6000 руб.

18.05.2020    23644    64    39    

38

Перенос данных 1C Программист Платформа 1С v7.7 Платформа 1С v8.3 Платформа 1C v8.2 1С:Управление торговлей 10 1С:Комплексная 7.7 Россия Управленческий учет Платные (руб)

Начните вести учет в УТ 10.3! Перенесите все свои данные в УТ 10.3 в любом месяце года и продолжите вести учет! Программа перенесёт любое количество баз с документами и остатками в больших количествах. Обработка выгрузки выполнит проверку исходных данных и сформирует отчет о найденных ошибках в справочниках и документах. Партии переносятся с себестоимостью. Штрихкоды номенклатуры загружаются. Цена переносится. Автор консультирует.

8400 руб.

17.03.2021    16000    5    13    

6

Зарплата Перенос данных 1C Программист Бухгалтер Бухгалтерский учет 7.7 Сложные периодические расчеты 1С:Бухгалтерия 7.7 1С:Зарплата и Управление Персоналом 3.x Россия Бухгалтерский учет Платные (руб)

Как известно, Бухгалтерия 7.7 не имеет штатной возможности для обмена с ЗУП 3.1. Данная разработка пригодится тем, кто перешел с ЗиК 2.3 на ЗУП 3.1, но вынужден по каким-то своим причинам оставаться на Бухгалтерии 7.7.

18000 руб.

29.09.2020    13846    2    0    

5

SALE! 10%

Файловый обмен (TXT, XML, DBF), FTP Перенос данных 1C Программист Платформа 1С v7.7 Платформа 1С v8.3 1С:Бухгалтерия 7.7 1С:Бухгалтерия 3.0 Россия Бухгалтерский учет Платные (руб)

Перенос данных из 1С:Бухгалтерия 7.7 в БП 3.0 | Продукт является развитием и исправлением ошибок стандартной обработки для выгрузки данных из 1С Бухгалтерии 7.7 в Бухгалтерию 3.0 | Перенос из 7.7 является сложным, и на рынке сложно найти специалистов 1С по "семерке" - сотрудники помогут вам выполнить переход в рамках техподдержки предлагаемого переноса данных!

55778 50200 руб.

26.05.2020    35110    10    73    

16

Перенос данных 1C Программист Платформа 1С v7.7 Платформа 1С v8.3 1С:Конвертация данных Бесплатно (free)

При переходе на новую версию 1С в период параллельной эксплуатации может возникнуть необходимость обратной конвертации данных (по правилам КД версии 2.1) из 1С:Предприятие 8.3 в 1С:Предприятие 7.7 для переноса данных из 1С:Предприятие 8.3 в 7.7. Сделать это поможет следующая инструкция по КД2 о том, как создать новую конвертацию из 8.3 в 7.7, сохранить модуль и правила загрузки данных, сделать загрузку данных. КД2.

17.10.2019    15268    ksnik    0    

16

Универсальные функции Программист Платформа 1С v7.7 Конфигурации 1cv7 1С:Комплексная 7.7 Абонемент ($m)

Предлагается набор функций 1с 7.7 для формирования строки json стандартными средствами.

1 стартмани

10.12.2018    10780    malovandrey    7    

19
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. salexdv 2357 28.09.11 17:40 Сейчас в теме
К чему этот велосипед, нельзя просто написать
Если ОбъектРеализацияТоваровУслуг1С8.СуммаВключаетНДС = 1 Тогда
?
2. salexdv 2357 28.09.11 17:44 Сейчас в теме
Или (если проверка на ложь)
Если ОбъектРеализацияТоваровУслуг1С8.СуммаВключаетНДС <> 1 (=0) Тогда 

Уж куда проще и понятнее
3. TrinitronOTV 16 29.09.11 12:04 Сейчас в теме
Alxd пишет:

Или (если проверка на ложь)

согласен
4. demon_infernal 41 05.10.11 17:35 Сейчас в теме
нашел в справке по встроенному языку 7.7
В OLE Automation TRUE и FALSE имеют соответственно значе­ния: -1 (минус единица) и 0.
5. nicklson 05.10.11 19:12 Сейчас в теме
Сдается мне, что для данного примера правильнее будет так:


документ77.СуммаВклНДС = Число(Сред(СоединениеСбАЗОЙ8.ОбъектРеализацияТоваровУслуг1С8.СуммаВключаетНДС)8,1);
6. nicklson 05.10.11 19:14 Сейчас в теме
Пардон, вечно запятые забываю:

документ77.СуммаВклНДС = Число(Сред(СоединениеСбАЗОЙ8.ОбъектРеализацияТоваровУслуг1С8.СуммаВключаетНДС),8,1);
7. alon 171 07.10.11 11:31 Сейчас в теме
(6)С чего ты взял, что это вдруг заработает? Может нужно где-то ЗначениеВстрокуВнутр использовать?
8. nicklson 07.10.11 12:18 Сейчас в теме
9. пользователь 23.12.20 09:30
Сообщение было скрыто модератором.
...
Оставьте свое сообщение