Сообщения без ответов | Активные темы Текущее время: Чт мар 28, 2024 10:35 pm



Эта тема закрыта, вы не можете редактировать и оставлять сообщения в ней.  [ Сообщений: 189 ]  На страницу Пред.  1 ... 9, 10, 11, 12, 13  След.
Delphi и Штрих-ФР-К 
Автор Сообщение
Новичок

Зарегистрирован: Чт фев 07, 2013 5:33 pm
Сообщения: 3
Сообщение Re: Delphi и Штрих-ФР-К
Спасибо огромное.
Можно вопрос?
У меня фискальный чек печатается сейчас в таком виде:
Код:
ООО "Тыр-Пыр"
ККМ 238723786 ИНН 239483209482 #0050
22.02.13 14:14  СИСТ.АДМИНИСТРАТОР
ПРОДАЖА                         №0013
1.Зелень на подложке. Россия
                                  2 Х 14.70
                                      =29.40
2.Картофель свежий. Россия
                             2.584 Х 10.90
                                      =28.12
ИТОГ                              =57.52
НАЛИЧНЫМИ                    =57.12
==========ФП==============
                      ЭКЛЗ 4290660106
                      0000000021 #9993


А мне надо:

Код:
ООО "Тыр-Пыр"
ККМ 238723786 ИНН 239483209482 #0050
22.02.13 14:14  СИСТ.АДМИНИСТРАТОР
ПРОДАЖА                         №0013
1.Зелень на подложке. Россия
Код: 223......................2 Х 14.70
                                      =29.40
2.Картофель свежий. Россия
Код: 4566...............2.584 Х 10.90
                                      =28.12
ИТОГ                              =57.52
НАЛИЧНЫМИ                    =57.12
==========ФП==============
                      ЭКЛЗ 4290660106
                      0000000021 #9993

КАк это сделать? Вот мой код в Делфи:
Код:
procedure TRAForm_WOSpec.BitBtn_FiscalCheckClick(Sender: TObject);
var
 FRowCount:integer;
 FSumItog: Currency;
begin
 if Self.OraDataSet_WOSpec.RecordCount>0 then begin
    Self.OraDataSet_WOSpec.DisableControls;
    Self.OraDataSet_WOSpec.First;
    FRKDriver.Password := FRKPassword;
    while not Self.OraDataSet_WOSpec.Eof do begin
        FRKDriver.Connect;
        FRKDriver.StringforPrinting := Copy(AnsiUpperCase(Self.OraDataSet_WOSpec.FieldByName('ITEM').AsString+'.'+Self.OraDataSet_WOSpec.FieldByName('CARDNAME').AsString),1,36);
        FRKDriver.Quantity := RoundTo(Self.OraDataSet_WOSpec.FieldByName('QUANTITY').AsFloat,-3);
        FRKDriver.Price    := RoundTo(Self.OraDataSet_WOSpec.FieldByName('AWAITPRICE').AsCurrency,-2);
        FSumItog:=FSumItog+RoundTo(FRKDriver.Quantity*FRKDriver.Price,-2);
        FRKDriver.Sale;
        FRowCount:=FRowCount+1;
      end;
      Self.OraDataSet_WOSpec.Next;
    end;
    if FRowCount>0 then
      begin
        FRKDriver.Summ1    := FSumItog;
        FRKDriver.StringforPrinting := ' ';
        FRKDriver.PrintString;
        if FRKDriver.CloseCheck<>0 then showmessage('Ошибка печати'+chr(13)+'  Код ошибки: '+IntToStr(FRKDriver.ResultCode)+chr(13)+'  Описание: '+VarToStr(FRKDriver.ResultCodeDescription))
      end;
 Self.OraDataSet_WOSpec.EnableControls;
 end;
end;



Извиняюсь за избыточность примера кода, но я думаю спецам все понятно. Мне надо в строке с количеством и суммой прописать строку свою(в данном случае код товара).
И еще вопрос как я понял я каждую транзакцию делаю отдельной продажей? как сделать все транзакции прошли одной продажей, чтобы в фискал просто залить все суммы и количества и потом закрыть чек. Я думаю это будет быстрее.

_________________
-----
С Уважением, Моторин Сергей.


Пт фев 22, 2013 11:06 pm
Профиль
Постоянный участник
Аватара пользователя

Зарегистрирован: Пт май 19, 2006 6:26 pm
Сообщения: 10424
Откуда: Штрих-М
Сообщение Re: Delphi и Штрих-ФР-К
Вам надо воспользоваться таблицой 9 - текст в чеке (хотя незнаючи туда мы лезть не советуем).
См. ряд 1 и 2 - Наименование в операции и КОЛИЧЕСТВО X ЦЕНУ В ОПЕРАЦИИ поля 1 и 2 - номер строки и смещение в строке, т.е. по сути Вам в ряде 2 поле 1 - номер строки надо поставить также 1, но тогда на уровне ПО уже контролировать длину наименование чтобы не было наложения полей, иначе ФР будет выдавать ошибку.

_________________
С уважением, Селихов Дмитрий Юрьевич
Инженер технической поддержки ЗАО "Штрих-М"
mailto: support@shtrih-m.ru
тел. (495) 787-60-96
ВНИМАНИЕ:
Работает Официальный Интернет-Магазин от компании Штрих-М
Shels-m.ru


Пн фев 25, 2013 8:35 am
Профиль
Новичок

Зарегистрирован: Чт фев 07, 2013 5:33 pm
Сообщения: 3
Сообщение Re: Delphi и Штрих-ФР-К
Спасибо!

_________________
-----
С Уважением, Моторин Сергей.


Вт фев 26, 2013 2:25 pm
Профиль
Постоянный участник
Аватара пользователя

Зарегистрирован: Пт май 19, 2006 6:26 pm
Сообщения: 10424
Откуда: Штрих-М
Сообщение Re: Delphi и Штрих-ФР-К
Пожалуйста.

_________________
С уважением, Селихов Дмитрий Юрьевич
Инженер технической поддержки ЗАО "Штрих-М"
mailto: support@shtrih-m.ru
тел. (495) 787-60-96
ВНИМАНИЕ:
Работает Официальный Интернет-Магазин от компании Штрих-М
Shels-m.ru


Вт фев 26, 2013 3:17 pm
Профиль
Новичок

Зарегистрирован: Ср июл 25, 2012 2:39 am
Сообщения: 4
Сообщение Re: Delphi и Штрих-ФР-К
Можно и мне пример x.amirkhan$yandex.ru вместо $ - @


Пн апр 15, 2013 8:30 pm
Профиль
Постоянный участник
Аватара пользователя

Зарегистрирован: Пт май 19, 2006 6:26 pm
Сообщения: 10424
Откуда: Штрих-М
Сообщение Re: Delphi и Штрих-ФР-К
Выслал.

_________________
С уважением, Селихов Дмитрий Юрьевич
Инженер технической поддержки ЗАО "Штрих-М"
mailto: support@shtrih-m.ru
тел. (495) 787-60-96
ВНИМАНИЕ:
Работает Официальный Интернет-Магазин от компании Штрих-М
Shels-m.ru


Вт апр 16, 2013 8:36 am
Профиль
Новичок

Зарегистрирован: Ср авг 27, 2014 8:26 am
Сообщения: 2
Сообщение Re: Delphi и Штрих-ФР-К
Здравствуйте! Будьте добры, и мне вышлите пример, если можно, на deamon.me@mail.ru. Заранее благодарю.


Ср авг 27, 2014 9:06 am
Профиль
Постоянный участник
Аватара пользователя

Зарегистрирован: Пт май 19, 2006 6:26 pm
Сообщения: 10424
Откуда: Штрих-М
Сообщение Re: Delphi и Штрих-ФР-К
Отправил.

_________________
С уважением, Селихов Дмитрий Юрьевич
Инженер технической поддержки ЗАО "Штрих-М"
mailto: support@shtrih-m.ru
тел. (495) 787-60-96
ВНИМАНИЕ:
Работает Официальный Интернет-Магазин от компании Штрих-М
Shels-m.ru


Чт авг 28, 2014 10:11 am
Профиль
Новичок

Зарегистрирован: Ср авг 27, 2014 8:26 am
Сообщения: 2
Сообщение Re: Delphi и Штрих-ФР-К
Спасибо большое =)


Пт авг 29, 2014 3:55 am
Профиль
Постоянный участник
Аватара пользователя

Зарегистрирован: Пт май 19, 2006 6:26 pm
Сообщения: 10424
Откуда: Штрих-М
Сообщение Re: Delphi и Штрих-ФР-К
Пожалуйста.

_________________
С уважением, Селихов Дмитрий Юрьевич
Инженер технической поддержки ЗАО "Штрих-М"
mailto: support@shtrih-m.ru
тел. (495) 787-60-96
ВНИМАНИЕ:
Работает Официальный Интернет-Магазин от компании Штрих-М
Shels-m.ru


Пт авг 29, 2014 10:53 am
Профиль
Новичок

Зарегистрирован: Вт сен 02, 2014 9:04 am
Сообщения: 2
Сообщение Re: Delphi и Штрих-ФР-К
Добрый день. Если есть возможно, пожалуйста, скиньте мне на почту исходники работы с Штрих-ФР-К в Delphi. Спасибо.


Вт сен 02, 2014 9:50 am
Профиль
Постоянный участник
Аватара пользователя

Зарегистрирован: Пт май 19, 2006 6:26 pm
Сообщения: 10424
Откуда: Штрих-М
Сообщение Re: Delphi и Штрих-ФР-К
Укажите e_mail или напишите запрос нам на почту.

_________________
С уважением, Селихов Дмитрий Юрьевич
Инженер технической поддержки ЗАО "Штрих-М"
mailto: support@shtrih-m.ru
тел. (495) 787-60-96
ВНИМАНИЕ:
Работает Официальный Интернет-Магазин от компании Штрих-М
Shels-m.ru


Вт сен 02, 2014 1:22 pm
Профиль
Новичок

Зарегистрирован: Вт сен 02, 2014 9:04 am
Сообщения: 2
Сообщение Re: Delphi и Штрих-ФР-К
Selihov Dmitry писал(а):
Укажите e_mail или напишите запрос нам на почту.

rdg.2_yandex.ru, вместо _ @


Вт сен 02, 2014 3:00 pm
Профиль
Постоянный участник
Аватара пользователя

Зарегистрирован: Пт май 19, 2006 6:26 pm
Сообщения: 10424
Откуда: Штрих-М
Сообщение Re: Delphi и Штрих-ФР-К
Выслал.

_________________
С уважением, Селихов Дмитрий Юрьевич
Инженер технической поддержки ЗАО "Штрих-М"
mailto: support@shtrih-m.ru
тел. (495) 787-60-96
ВНИМАНИЕ:
Работает Официальный Интернет-Магазин от компании Штрих-М
Shels-m.ru


Вт сен 02, 2014 4:23 pm
Профиль
Новичок

Зарегистрирован: Вт окт 28, 2014 4:56 pm
Сообщения: 1
Сообщение Re: Delphi и Штрих-ФР-К
Доброго времени суток.
Пришлите пожалуйста на 8613344@rambler.ru примеры работы на Delphi.

И сразу еще один вопрос.
В ноябре нам необходимо менять кассовый аппарат.
Склоняемся к покупке продукции Штрих-ФР.
Задача стоит к интеграции существующего ПО с аппаратом. (из задач только печать чека и отмена чека из программы)
1. Какие аппараты Вы можете посоветовать (корректная работа из примеров на Delphi)
2. Есть ли какие нибудь средства (эмулятор кассового аппарата), что бы до покупки можно было бы проверить код
Заранее спасибо.


Ср окт 29, 2014 1:23 pm
Профиль
Показать сообщения за:  Поле сортировки  
Эта тема закрыта, вы не можете редактировать и оставлять сообщения в ней.   [ Сообщений: 189 ]  На страницу Пред.  1 ... 9, 10, 11, 12, 13  След.

Кто сейчас на конференции

Сейчас этот форум просматривают: Google [Bot] и гости: 1


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Перейти:  
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group.
Designed by STSoftware for PTF.
Русская поддержка phpBB