Для тех кто не в курсе - это микроконтроллер для связки кассовых аппаратов. Кто "случал" его с 1С-ой? В этой версии связь и управление идёт по ОЛЕ через каштановский ОЛЕ-сервер. интересует пример реализации.

прогоним ещё разок

off ИМХО, Андрей а не ты ли утверждал, что хохол - это оскобительное слово?

(2) и я же утверждал, что всё зависит от контекста. подними первоисточники и убедись

(3) В плане от кого оно звучит?

(4) у тебя по теме есть что сказать? ветка тематическая и отстань. если ты не понимаешь что значит "контекст" не в терминах 1С то я ничем помочь не могу....

(5) Ну спасибо, что хоть ... не послал, счастливо

(0) лично я: хохлом не был, к работе с "Каштаном Р9" не привлекался, вообше впервые слышу а таком типе ракетной установки :-)

А мне говорили что это устройство очень распространено особенно в Киеве.....

(8) дык а в чем проблема?

(9) в том, что сейчас приходится писать сервис "в слепую". Прибор то есть, но касс сам понимаешь нет. кроме того....... хотелось бы глянуть какую часть управления 1С берёт на себя а какую оставляет за сервисной программой.

(11) а руководства на софтину каштановскую нету? имхо, там должен быть перечень комманд, которые она воспринимает, прописывай их в 1С да и все?

ой ессно (11) для (10) ))))

(11) есть конечно.... но хотелось бы глянуть просто на реализацию..... чтобы не лажануться у клиента..... да видно прийдётся на "авось" расчитывать

Упрощенно:

Перем мКэштанОЛЕ, мКэштанСервер, мКэштанСекция;

// ===============================
// Назначение:
//        
// Аргументы:
//        
Процедура фЭкспортАртикулов()
   лтб = фтб;    // фтб - таблица на форме

   лТаблицаТоваров = мКэштанСекция.NewGoodsList;
   
   лНомерСтроки = 0;
   лтб.ВыбратьСтроки();
   Пока лтб.ПолучитьСтроку() = 1 Цикл
       лНомерСтроки = лНомерСтроки + 1;
       Если лтб.Пометка = мЗначениеНеПометки Тогда
           Продолжить;
       КонецЕсли;
       лЦена = лтб.Цена;
       Если лЦена = 0 Тогда
           Сообщить("Пропускаем! Цена = 0, Код: "+Строка(лтб.Код)+", "+СокрЛП(лтб.Наименование),"!!!");
           Продолжить;
       КонецЕсли;

       лТаблицаТоваров.AddRecord(лтб.Код,лтб.Отдел,лтб.Делимость,
                               Число(лтб.ШтрихКод),СокрЛП(лтб.Наименование),
                                 лтб.Цена,лтб.Кво);
   КонецЦикла;
                             
   // загрузка в секцию
   лТаблицаТоваров.Upload();
   
КонецПроцедуры //фЭкспортАртикулов


Состояние("Инициализация сервера CashTANP9 ...");
Попытка
   мКэштанОЛЕ=СоздатьОбъект("CashTANP9.Application");
Исключение
   Предупреждение("Не удалось создать объект CashTANP9.Application!",4);
   СтатусВозврата(0);
   Возврат;
КонецПопытки;

мКэштанСервер = мКэштанОЛЕ.Cashtans(1);
мКэштанСекция = мКэштанСервер.Sections(1);

(14) о сенькс...... а можно чуть по больше.... или ноу-хау? можно в мыло ;))))

ещё вопрос - Штрих-код - число.... а строку никак нельзя? импортные товары имеют штрих-код начинающийся с "0" и соответственно касса их при типе "число" не считает

В документации у них (ТФПК - разработчик) довольно подробно описаны свойства и методы.

Вот инициируем обмен с устройством:
// ===============================
// Назначение:
//        
// Аргументы:
//        
Процедура фОбмен()
   лИдСоединения = мКэштанСервер.ConnectionId;

   мКэштанСервер.StartConnection();

   ctIdle = 0;
   лСтатус = мКэштанСервер.ConnectionState;
   Пока лСтатус <> ctIdle Цикл
       лСтатус = мКэштанСервер.ConnectionState;

   КонецЦикла;
   
   Если мКэштанСервер.LastSucceededConnectionId = мКэштанСервер.ConnectionId Тогда
       лСостояние = "Завершено без ошибок";
   Иначе
       лОшибка = мКэштанСервер.LastConnectionError;
       лСостояние = "Завершено с ошибкой № " + Строка(лОшибка) +":"+ РазделительСтрок +
                       """" + лВернутьОписаниеОшибки(лОшибка) + """";
   КонецЕсли;
   //...
КонецПроцедуры //фОбмен

Ладно.. спасибо. общее направление мне понятно...

ещё вопрос - всем ли управляли из 1С или что то оставляли на управление из их программы ("сервера")?

(16) Этот вопрос я задавал на сайте разработчика:
http://www.cashtan.com/forum/thread.phtml?id=283

(19) лажу тебе ответили......

(18) Выгружал артикулы, загружал протоколы, преобразовывал протоколы в документы продажи. Обмен инициировал из 1С.
Мыло ушло.

(21) С меня пиво......

(21) мыло пришло... спасибо за предложение.. если что - свистну ;))

(20) При записи товара проверка штрихкода на существование такого же,
если есть, значит не записываем, а генерируем свой, печатаем этикетку и лепим на товар