Подключение весов "Масса-К" к 1С без драйверов и обработок



Для весов серии «Масса-К», имеющих интерфейс RS-232 для связи весов с ПК, возможна простая процедура подключения к 1С.

Для этого используется программа поддержки весов "МАССА-К" от разработчика (massa-k.exe — 794кб) 

http://massa.ru/help/drivers.php

Программа запускается при старте операционной системы стандартными способами. 

Далее необходима разовая начальная настройка программы на номер COM-порта и порядок (коэффициент веса).  При появлении груза на площадке весов, программа отправляет вес в активное окно на экране ПК. Это может быть, к примеру, блокнот, либо что-то другое.

На примере конфигурации "Розница" версия 1.х показан процесс передачи веса в чек.

При продаже весового товара, выбирается товар, затем нажимается кнопка "Получить вес" в меню РМК (рабочее место кассира).

Далее на весы помещается товар, и вес передается в окно вызанное функцией "ВвестиЧисло".

После передачи значения веса идёт пересчет по стоимости за единицу веса.

Процедура для кнопки "Получить вес" на панели РМК

/////////////////////////////////////////////////////////////////////////////////////////////

Процедура КнопкаПолучитьВесНажатие(Элемент)
ПолученныйВес = 0;
Если ВвестиЧисло(ПолученныйВес, "Положите товар на весы!", 10, 3) Тогда
ПолученныйВес =ПолученныйВес * 0,01; // перевод граммы в килограммы и т.д.
КонецЕсли;

ТекущиеДанные = ЭлементыФормы.Товары.ТекущиеДанные;
Если ПолученныйВес <> 0 Тогда
ТекущиеДанные.Количество = ПолученныйВес;
ТоварыПриИзмененииКоличества(ТекущиеДанные);
КонецЕсли;

УстановитьАктивныйЭлемент();

КонецПроцедуры

Процедура (типовая) определяющая торговое оборудование (весы)

Процедура УстановитьВесы()

// т.к. процедура в данном случае не используется, то она закомментирована.
//...
КонецПроцедуры

 

10 Comments

  1. alexey_kurdyukov

    Ошибка загрузки компоненты (8.3.10.2699, Windows 10 64 bit),

    Reply
  2. user1064610

    http://massa.ru/help/drivers.php ссылка битая. Хорошая контора, за сайтом не кому присмотреть….

    Reply
  3. user957429

    не выпендривайся, они софт обновляют и не обязаны поддерживать эту ссылку актуальной … гы-гы.

    Поищи на сайте внимательно, найдёшь больше, чем просто ссылку.

    Удачи.

    Reply
  4. porese

    Там на сайте куча всего нового появилось и не только для 1с, даже для опенофиса загрузка товара и шаблонов.

    Reply
  5. usersed

    Без дописки обработки будет ли работать в 1С Розница 2.2?

    Reply
  6. grafit

    Это не обработка, а небольшие изменения в самой конфигурации. В 2.2 не проверялось, но принципиальной разницы нет. Должно работать.

    Reply
  7. user630351_dimm-vir

    дрова тута https://massa.ru/soft/peredacha-vesa-v-uchetnye-programmy/scalesview-100/?idProductAcu=7988 нужен он— ScalesMassaK.dll тока зарегите regsvr32 ScalesMassaK.dll

    Процедура Взвесить()  // для 1с77
    М1 = Scales.Weight*0.001;
    res = Scales.READWeight();  // без него не хочет весить никого
    КонецПроцедуры
    
    Процедура ПриОткрытии()
    Scales = СоздатьОбъект(«ScalesMassaK.Scale») ;
    Scales.Connection=»COM1″;   //скорости портов в ней и настроек по битности нет, поэтому пойдет под все весы
    res = Scales.OpenConnection();
    Если res = 0 Тогда
    Сообщение=(«Весы по COM1 успешно подключены»);
    Иначе
    Сообщение=(«Ошибка подключения к весам:COM1» + «, OpenConnection() = » + res);
    КонецЕсли;
    М1 = Scales.Weight*0.001;  //умножал на граммы, а то телефон весил 200кг
    Взвесить();
    КонецПроцедуры 

    Показать

    НРАВИТСЯ RS232 ХОРОШО НА СЕРВАКЕ ПОД ТЕРМИНАЛЬНЫМ КЛИЕНТОМ ПРОБРАСЫВАЕТСЯ.

    Reply
  8. user630351_dimm-vir

    ЭАБЫЛ ОПИСАНИЕ К НЕЙ СКИНУТЬ. ЛОВИТЕ

    Reply
  9. user630351_dimm-vir

    ПОВТОРЮ DLL-КУ С МОЕЙ КРИВОЙ НО РАБОЧЕЙ ПРОГОЙ ПОД 1С7

    Reply
  10. user630351_dimm-vir

    пОЙДЕТ ПОД ЛЮБЫЕ ВЕСЫ RS 232 Т.К. СКОРОСТИ НЕ СПРАШИВАЕТ. ПРОСТО COM1-33 И. СЕ. У СЕБЯ ПОСТАВИЛ МАКС. СКОРОСТЬ ПОРТА И НОРМ. ГЛАВНОЕ ЗАРЕГИТЕ.

    Reply

Leave a Comment

Ваш адрес email не будет опубликован. Обязательные поля помечены *