Мария 301 мтм! Кто настраивал печать чека через 1С на етот апарат! Помогите #327284


#0 by Bezik
Помогите плиииз! По примерам посмотрел.......... поработал ........ а в итоге нифига ! Печать производится с РН! Щас стоит Датекс , но завтра его заберут! и мне пипец!
#1 by Злой Бобр
Ну и что неполучается? Или просто лень вникать?
#2 by mikecool
щас нажал на букву Я(красную), подкорректировал запрос - в результате увидел, что для машки требуется дополнительное ПО... исчи и найдешь!
#3 by Bezik
Дополнительное по у меня есть ! Это M301ManagerPlus и M301Admin! Вот .... а по примерам которые я изучил оно типа должно работать через Cashtrade! Но может кто еще знает другие способы?
#4 by СтаршинаПолищук
На сайте Резонанса лежит пример в виде конфы для 7.7.
#5 by Bezik
Я так понимаю что никто не шарит в этом! лдано, кому интересно посмотреть на пример с которым я работаю -
#6 by Злой Бобр
Какай еще кештрейд??? м...да, совсем печально. Запускай менеджер. Создавай в 1С объект и вперед. ДрайверЭККА=СоздатьОбъект("M301Mansger.Application"); ...
#7 by Злой Бобр
ДрайверЭККА=СоздатьОбъект("M301Manager.Application");
#8 by Bezik
это я заметил ....... с ним я тоже немало промудохался!
#9 by FreeFin
Не плакай перед праздником.))) Зырь в мыло. Не обещаю что спасет, но на время может помочь. Потом доразгребешь, если запустится. Да, чуть не забыл, он (экка мария) у тебя отфискален?Иначе будет малевать бяки в каждой строке типа (Нефискальный чек)...
#10 by СтаршинаПолищук
он в полне рабочий Консоль администратора Марусю видит?
#12 by Bezik
Да!
#13 by Bezik
- ет глобальный модуль А ет РН Процедура НапечататьЧек
#14 by СтаршинаПолищук
И что? .Init Маруськин отрабатывает?
#15 by Bezik
непонял вопрос
#16 by Bezik
Да ! Менеджер все видит и конектит , но дальше нифига ! Пишет что не удалось создать компоненту ! Я вот не пойму как его дальше переделать!
#17 by СтаршинаПолищук
Чтобы чтото напечатать на марусе нужно СоздатьОбъект("M301Manager.Application") подключиться Init(порт, ... ); всех параметров не помню вот метод Init что возвращает?
#18 by СтаршинаПолищук
то есть на СоздатьОбъект("M301Manager.Application") спотыкаеться ? Блин ну каленным железом выпытывать надо.
#19 by Bezik
нет ! Спотыкается на другом ! На самом документе
#20 by Bezik
HRESULT Init([in] LONG PortNumber, [in] BSTR CashierName, [in] BSTR CashierPassword, [in] LONG ShowStatusDialogs, [in] BSTR CallerApplicationName) Инициализация сервера и подключение принтера. ВОЗВРАЩАЕТ: S_OK в случае успеха, E_FAIL в случае неудачи. Port - номер коммуникационного порта 1 для COM1, 2 для COM2 и т.д. если передан 0, то будет выведен диалог с запросом номера порта. Если порт по умолчанию установлен, то он будет взят из Registry; CashierIdent - идентификатор кассира. Не более 4-х символов в длину (не более 9-ти символов в длину для версии принтера М301-МТМ). Если передана пустая строка, то будет выведен диалог с запросом; CashierPassword - пароль кассира. Не более 10 символов в длинну. Если передана пустая строка, то будет выведен диалог с запросом. Если пароль по умолчанию установлен, то он будет взят из Registry. ShowStatusDialogs – 1 показывать состояние принтера и диалог с информацией из принтера при подключении. CallerApplicationName – Название приложения, которое подключается к принтеру. Передавайте в этом параметре название Вашего приложения.
#21 by Bezik
Чтото еще ?
#22 by FreeFin
могу еще парочку полешек подкинуть... но работать-то надо с одним!
#23 by Bezik
Незнаю.... но такое есть в примере! Вот как датекс ето делает
#24 by Bezik
а вот пример
#25 by СтаршинаПолищук
В примере от Резонанса есть обработка там где табличка на форме с накладными. Вроде АРМ касира называеться. У меня работало.
#26 by Bezik
AddIn ет создание внешней компоненты!
#27 by Bezik
Печать чека с Розничной накладной Функция НапечататьЧек
#28 by FreeFin
Это кто из нас пьян? накой мне про самсунги мегатексты смотреть... Еще раз медленно: экка (мария в частности) может быть подключена (проинициализирована) в программе 1С при помощи: 1. исполняемого файла .exe (com bat) 2. OLE сервера 3. Драйвером как на устройство 4. "Прямой" записью в порт строк(и) текста протокола.=напиши свой драйвер 5. може еще как Но не одновременно кашу с гвоздями. Ибо порт один. и будет занят. кста мыло смотрел? там через экзешник выводится. ОЛе сервант для марии (покупной) требует ключа, мож и есть у кого отвязанный от жадности (10 уев кста) то поправьте. Определяйся ЧЕМ печатать будем.
#29 by Bezik
А как проще ?
#30 by Bezik
Набор инструментов тебе известен!
#31 by Bezik
Руки немного кривоваты , и поетому я туплю!
#32 by СтаршинаПолищук
И что? У тебя есть кештрейд проинсталеный? И вообще нафига кештрейд если еть ОЛЕ от Маруси.
#33 by Bezik
незнаю! Как работать с етим ОЛЕ от маруси ?
#34 by Bezik
Подключится я то подключился... а вот вывод чека на печать ХЗ!
#35 by СтаршинаПолищук
Непомню:) Давно было. Но я начал с примера и доков на сайте "Резонанса".
#36 by Bezik
Так как щас ет работает я выложил
#37 by Bezik
*Взял веревку, мыло, стул и пошел вешатся (
#38 by FreeFin
мдя... железобетонное дерево. не лень же мне копипасту из примера выкладывать (но надоел таки автор) ((( но практисски все функции для распечатки чека присутствуют. в глобальном: (а оч хочется весь выложить))) В докуме:    Если ЗначениеВФайл(КаталогИБ+"Artics.sys",Артикулы,1)=0 Тогда        Предупреждение("Не удалось сохранить базу артикулов в программе! а что такое ТЗО табличка на форме в которую... прочем лучше согласиться на писец...
#39 by Гений 1С
Неплохое название для аппарата, хоть приятно т...ся с этим агрегатом...
#40 by Bezik
Не понял куда пихануть это - И как это все подогнать под шаблон
#41 by Bezik
Кому как ! Мне хоть мария хоть мрия - побарабану! всеравно уволить могут
#42 by Bezik
Щас постараюсь подогнать под общий шаблон! Если не заработает то напишу Заявление!
#43 by Bezik
С этим разобрался
#44 by Bezik
If ТЗО<<?>>.КоличествоСтрок>0 Then {Документ.РасходнаяНакладная.Форма.Модуль}: Переменная не определена (ТЗО) Если ВидЧека<<?>>="Чек продажи" Тогда   {Документ.РасходнаяНакладная.Форма.Модуль}: Переменная не определена (ВидЧека) ТЗО<<?>>.ВыбратьСтроки; {Документ.РасходнаяНакладная.Форма.Модуль}: Переменная не определена (ТЗО) Пока ТЗО<<?>>.ПолучитьСтроку>0 Цикл {Документ.РасходнаяНакладная.Форма.Модуль}: Переменная не определена (ТЗО) Price=Окр(ТЗО<<?>>.ЦенаСНДС*100,0); {Документ.РасходнаяНакладная.Форма.Модуль}: Переменная не определена (ТЗО) Если ТЗО<<?>>.ТМЦ.Делимость=Перечисление.ДаНет.Да  Тогда {Документ.РасходнаяНакладная.Форма.Модуль}: Переменная не определена (ТЗО) Qty=ТЗО<<?>>.Кво*1000; //в граммах {Документ.РасходнаяНакладная.Форма.Модуль}: Переменная не определена (ТЗО) Qty=Окр(ТЗО<<?>>.Кво,0);  //в штуках {Документ.РасходнаяНакладная.Форма.Модуль}: Переменная не определена (ТЗО) Article=?(ВидЧека<<?>>="Чек продажи",ОбработкаАртикула(ТЗО.КодТов,ТЗО.ТМЦ,Делимость),0); {Документ.РасходнаяНакладная.Форма.Модуль}: Переменная не определена (ВидЧека) DiscountDirection=ТЗО<<?>>.оСкидка; {Документ.РасходнаяНакладная.Форма.Модуль}: Переменная не определена (ТЗО) DiscountName=СокрЛП(ТЗО<<?>>.ИмяСкидки); {Документ.РасходнаяНакладная.Форма.Модуль}: Переменная не определена (ТЗО) Discount=?(ТЗО<<?>>.СумСкидки>0,ТЗО.СумСкидки*100,-ТЗО.СумСкидки*100); {Документ.РасходнаяНакладная.Форма.Модуль}: Переменная не определена (ТЗО) Налог=?(ТЗО<<?>>.ТМЦ.СтавкаНДС.Ставка.Получить(ДатаДок)<>0,1,0);//если у товара ставка НДС>0- считаем, что он облагается налогом 1 {Документ.РасходнаяНакладная.Форма.Модуль}: Переменная не определена (ТЗО) СумСтр=M301.FiscalLineEx(Строка(ТЗО<<?>>.ТМЦ),Qty,Price,Делимость,Налог,0,Article,DiscountDirection,DiscountName,Discount); {Документ.РасходнаяНакладная.Форма.Модуль}: Переменная не определена (ТЗО) СумСтр=M301.FiscalLineEx(Строка(ТЗО.ТМЦ)<<?>>,Qty,Price,Делимость,Налог,0,Article,DiscountDirection,DiscountName,Discount); СумСтр=M301.FiscalLineEx(Строка(ТЗО.ТМЦ),Qty,Price,Делимость,Налог,0,Article,DiscountDirection,DiscountName,Discount)<<?>>; {Документ.РасходнаяНакладная.Форма.Модуль}: Ожидается ключевое слово 'КонецЦикла' ('EndDo') СумСтр=M301.FiscalLineEx(Строка(ТЗО.ТМЦ),Qty,Price,Делимость,Налог,0,Article,DiscountDirection,DiscountName,Discount)<<?>>; {Документ.РасходнаяНакладная.Форма.Модуль}: Ожидается ключевое слово 'КонецЕсли' ('EndIf') СумСтр=M301.FiscalLineEx(Строка(ТЗО.ТМЦ),Qty,Price,Делимость,Налог,0,Article,DiscountDirection,DiscountName,Discount)<<?>>; {Документ.РасходнаяНакладная.Форма.Модуль}: Ожидается ключевое слово 'КонецЕсли' ('EndIf') If    СумСтр<<?>>=-1 Тогда   {Документ.РасходнаяНакладная.Форма.Модуль}: Переменная не определена (СумСтр) ДелАртик<<?>>; {Документ.РасходнаяНакладная.Форма.Модуль}: Процедура не обнаружена (ДелАртик) Возврат<<?>>; {Документ.РасходнаяНакладная.Форма.Модуль}: Оператор Return (Возврат) не может употребляться вне процедуры или функции Сум2=Сум2+СумСтр<<?>>;   {Документ.РасходнаяНакладная.Форма.Модуль}: Переменная не определена (СумСтр) СумСтр=0;<<?>> {Документ.РасходнаяНакладная.Форма.Модуль}: Обнаружено логическое завершение исходного текста модуля <<?>>КонецЦикла;     {Документ.РасходнаяНакладная.Форма.Модуль}: Процедура или функция с указанным именем объявлена, но не определена в текущем модуле (ИзмВидТорговли) При проверке модуля обнаружены синтаксические ошибки!
#45 by Bezik
неплохие перспективы !!! ((((
#46 by FreeFin
в глобальник в самое начало Перем M301 Экспорт; и в процедурь ПриЗавершенииРаботы... И все это перелопатить (лишнее выкинуть нужное добавить) потому как это=не готовый набор для дятла чтобы чек на печать выдать. Вникай, может когда и распечатает. У меня всьо, устало... чуть бодрее (за денюшку любой одноэсник это за пару часов наваяет и отладит) и напосошок: еще раз напоминаю, если Мменагер требует регистрации(ключика)=них печать не пойдет.
#47 by Bezik
все это я еще вчера в глобальном разместил, а вот сама печать меня самого изморила шописец! Менеджер регистр не требует! Согласен - за денющку!
#48 by Bezik
выходные прошли ...... а мы ниче так с кассой и не сделали ! КТО чем и за сколько МОЖЕТ ПОМОЧЬ???????????????????????????????????????????????????????????????
#49 by Bezik
Але !!!!
#50 by Mashinist
Да... Как все запущено... Хорошо, что я от резононсовых драйверов много лет назад отказался. Все равно быстро не будет... К тому же ты так и не ответил на вопрос Мария ФИСКАЛИЗИРОВАНА? Я тут пользуюсь специфическим драйвером, который стоит денег. Но зато проблем не имею. Простой пример
#51 by FreeFin
А в чем проблема? Практически весь коммандный набор печати чека для M301Manager.Application вылоожен... Или кроме копи-паста них конфигурить в 1Се никто у вас не умеет? ЗЫ на сколько дозрели?
#52 by Bezik
Да она ФИСКАЛИЗИРОВАНА! Но щас пытаюсь попробовать печетать на левую , подогнал шеф на пару дней, но она имеет неприемлемый серийный номер! я же пользуюсь ток прогой "Центр керування фыксальними ЕККР "Марія" всіх модифікацій"
#53 by Bezik
Нет .... никто не умеет ! Я только недавно начал раздуплятся... потихоньку и понемногу! Насколько дозрел ненаю.... Скоро предстоит изучить 8, так что 7,7 учить перестал!
#54 by Bezik
Вот так как оно работает сейчас ! Может договоримся както за работу!? Глобалку отработал
#55 by FreeFin
Нельзя же быть таким дебилом, чтобы пятый раз постить сюда херь, которая не работает с данным типом ЭККА и никогда работатиь не будет!!! Пойди башкой в сенку лучше постучи, или тупо скопипасти текст ниже:(дстал чесслово). 1 ЧИТАЙ и 2 ВНИМАТЕЛЬНО (отличия и ошибки не учтены, ибо автор так и не удосужился сообщить конфигурацию (подозреваю, что ответ будет: "версия 7.7")                            ДобавленАртикул=0;                            Предупреждение("Таблица артикулов переполнена! Чек распечатан быть не может!        Если ЗначениеВФайл(КаталогИБ+"Artics.sys",Артикулы,1)=0 Тогда            Предупреждение("Не удалось сохранить базу артикулов в программе!
#56 by Bezik
Ет показал как сейчас он у меня печатает на Датексе 3530!!!!! Его скоро увезут , и поетому купили ету кончи. Марию и дали мне задачку! Усек ?
#57 by Bezik
А пример привел потому как там есть заданные данные которые нужны походу для вывода чека!
#58 by Bezik
Я готов отблагодарить ......... Просто если я ет щас не запущу сам , то побегу за вазел-м ((
#59 by Mashinist
Почем Марию обидел? Вполне нормальный аппарат... Лично я его использую уже много лет. Все клиенты довольны. Драйвер нужно правильный использовать :-) И быстро ничего не делается... Лично я имею дома Марию для отладки своих "нетленок" :-)
#60 by Bezik
Ну немного не шарю я в этом ! Да еще й заливаю с 7 марта... сення в 4 ночи прилез а в 7.30 поехал на работу... Щас вот сижу и засыпаю за моником.
#61 by Anderson
сто бакинских и завтро все работает
#62 by Bezik
Шутка ?
#63 by Anderson
когда созреешь пиши в аську
#64 by Bezik
10 бакинских! Торг не хоч
#65 by Anderson
:-)
#66 by Bezik
(
#67 by Bezik
Пошел ка я искать на фирме вазелинчик.
#68 by Bezik
А зачем там ети Артикулы ?
#69 by FreeFin
В память экка залазят. связкой Товар-цена-кво-сумма. "Очищается" это снятием z-отчета (сдача смены или переоценка). так устроено.
#70 by Bezik
Бррррр.  Я так понимаю без него никак ?!!!
#71 by Bezik
Воообще........ нифига не получается и не работает (((((((
#72 by Bezik
еще й ети Артикулы!
#73 by Злой Бобр
Ну как - вазелин помог?
#74 by Господин ПЖ
афтора еще не уволили?
#75 by Огурцы
Нахрена вабще такие аппараты покупать? на них больше затрат уйдет при подключении и обслуживании, чем сразу купить нормальный, тот же Меркурий.
#76 by Огурцы
Пригласи специалиста и реши вопрос.
#77 by big
"... тот же Меркурий..." :)))) Посмеялцо!! Маладец! :))
#78 by Огурцы
Не, я серьезно, Меркурий MS-K хороший аппарат, подключается без проблем, и может работать если надо без компьютера
#79 by Огурцы
И дешевый
#80 by big
(78,79) Я знаю, что у него есть такие плюсы. НО! Насколько там дурацкое управление драйвером - ПИПЕЦ! Как говорится - большое спасибо Инкотексу :)) Да и внешний вид (габариты) не везде поставить можно.
#81 by Огурцы
Так то Штрих самый оптимальный
#82 by Злой Бобр
гы. ветка медленно, но уверенно переходит в пеар. ненапрягайтесь - кто с мозгами дружит возьмет то что уже проверено опытом, а не красивую упаковку (как в 1С).
#83 by big
А теперь расскажи, мозговой наш, что же конкретно хотел сказать?
#84 by Bezik
Ну я еще работаю, касса еще не печатает, Вазелин заменил на парочку новых цитат с баша) ! Вчера в полуживом состоянии склепал кое что но всерано нихира не пашет!
#85 by Bezik
Херня с етими артикулами получается, коих небыло в Датексе!
#86 by Злой Бобр
Ну артикулы и в датексах есть, только их больше чем тут - соотв. товары нормально пробиваются до пересменки, т.е. снятия Z отчета. Поэтому и заморочек особых нету.
#87 by Bezik
Злой Бобр - помоги раз раздупляешь ету тему! Не стыдно назвать себя ламером в етой теме, но помочь то некому и обяснить тоже(( Да и примеры не очень, еще й разные!
#88 by Bezik
вот что вчера у мну получилось с примера , запуск менеджера оставил в глобалке, там же его проверка и отключение! Хорошо хоть Датекс еще не забрали! Ага, Датекс работает так !
#89 by Злой Бобр
Чем тебе помочь? В мануале все расписано подробно, даже демка 1С есть. Там все нормально расписано и ничего сложного. Прочитай и сделай как пишут. Если есть желание копаться в чужом коде, вечерком могу скинуть куски кода из своей МД.
#91 by Bezik
Задолбся копатся в етих емдешниках..... писец просто!
#92 by Огурцы
Значит тебе не дано разбиратся с аппаратами - вот и все!
#93 by Огурцы
Я например принтеры этикеток не перевариваю
#94 by Bezik
А у тя емдешника нету етого примера ?
#95 by Bezik
Вообщем... позвонил в компанию... сказал что отимел свой моск и емдешник по полной но ничего не вышло... согласились сами все подключить .. и подправить емдешник
Тэги:
Ответить:
Комментарии доступны только авторизированным пользователям