первый

This commit is contained in:
2024-11-01 12:23:13 +05:00
parent 801d9d33fa
commit 0688c46a7e
226 changed files with 162921 additions and 0 deletions

View File

@ -0,0 +1,934 @@
//---------------------------------------------------------------------------
#pragma hdrstop
#include "PrinterOPOS.h"
#include "OposFiscalPrinter_1_7_Lib_OCX.h"
//#include "OposFiscalPrinter_CCO_OCX.h"
#include "ud_Module.h"
#include <Registry.hpp>
#include <Math.h>
#include <DateUtils.hpp>
#include <Dialogs.hpp>
//---------------------------------------------------------------------------
#pragma package(smart_init)
//---------------------------------------------------------------------------
FiscalPrinter* g_printer;
//---------------------------------------------------------------------------
char * kkm_err_msg_ru[] = {
"OK", //0
"<22><> ID <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //1 FM ID Error
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><> ", //2 FM Rec Error
"Flash Chip <20><> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //3 Flash Chip cant clear
"<22><> <20><> <20><><EFBFBD><EFBFBD><EFBFBD>", //4 FM not empty
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //5 FM Data destroyed
"<22><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>", //6 Cmd ignor prn mode
"<22><><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //7 Oper code is absent
"<22><><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //8 Doc type is absent
"<22><><EFBFBD>. <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>", //9 Ser num CR
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //10 Password error
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>/<2F><><EFBFBD><EFBFBD><EFBFBD>", //11 Data/Time error
"<22><><EFBFBD><EFBFBD><EFBFBD>. <20><><EFBFBD>. <20><><EFBFBD><EFBFBD><EFBFBD>", //12 Factory registration has already pass
"<22><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //13 Ser num CR destroyed
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>", //14 Fiscalize has already pass
"<22><><EFBFBD> <20><> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>", //15 Not fisc mode CR
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //16 Fiscalize Data destroyed
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //17 Rewrite is conclude
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //18 Rewrite is destroyed
"<22><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //19 Shift already open
"<22><> <20><> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //20 Shift not opened
"<22><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD>", //21 Many goods in receipt
"<22><> <20> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //22 EOD data in FM destroyed
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //23 Document format error
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //24 Text rewrite
"<22><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>-<2D><><EFBFBD> <20><><EFBFBD>", //25 Many parameters in document
"<22><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>-<2D><>", //26 Document parameters error
"<22><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>-<2D><>", //27 Parameters value error
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //28 Object non-existent
"<22><><EFBFBD> <20><> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //29 Document is not finished
"<22><><EFBFBD><EFBFBD><EFBFBD>/<2F><><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD>", //30 goods/operation description not enough
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //31 Check sum packet
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD>", //32 Prn not ready
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //33 Nested interrupts
"<22><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //34 Check Sum Error
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><>", //35 Overflow if FM
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //36 Unknown command
"CRC <20><><EFBFBD>", //37 CRC RAM
"CRC <20><>", //38 CRC FM
"<22><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //39 Data port defective
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>", //40 Receipts parameters sequence
"0xy <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>", //41 0xy for required properties
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //42 Length request
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>", //43 number capacity
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //44 Overflow
"<22><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>", //45 Number is absent
"<22><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //46 Not response
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //47 Transmission error
"<22><><EFBFBD>. <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //48 Math overflow
"<22><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>...", //49 Paper out...
"<22><><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!!!", //50 CR not ready!!!
"<22><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!!", //51 Memory error!!
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //52 Printer off
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //53 Insufficient memory
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //54 Lenght number less
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //55 Zero lenght number
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //56 Password lenght less permissible
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //57 Zero lenght password
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", //58 Impossible value
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>-<2D><><EFBFBD>", //59 Time-out overdraw
"",
"<22><>.<2E><><EFBFBD><EFBFBD>",
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>",
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>",
"","","","","","",//69
"","","","","","","","","","",//79
"","","","","","","","","","",//89
"","","","","","","","","","",//99
"","","","","","","","","","",//109
"","","","","","","","","","",//119
"","","","","","","","","","",//129
"","","","","","","","","","",//139
"","","","","","","","","","",//149
"","","","","","","","","","",//159
"","","","","","","","","","",//169
"","","","","","","","","","",//179
"","","","","","","","","","",//189
"","","","","","","","","","",//199
"","","","","","","","","","",//209
"","","","","","","","","","",//219
"","","","","","","","","","",//229
"","","","","","","","","","",//239
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>",//240 Cmd not init
"<22><>. <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>",//241 Cmd write err
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>-<2D><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>(DSR=0)",//242 Prn not ready (DSR=0)
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD>-<2D><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>",//243 Cmd ok
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>",//244 Cmd resp timeout
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>",//245 Prn error
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>",//246 Cmd resp large
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>",//247 Cmd resp small
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>",//248
"<22><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>",//249
"<22><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>",//250 Cmd break
"<22><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>",//251
"<22><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>",//252
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>",//253
"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>",//254
"<22><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>(<28><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>)!"//255 Previous cmd run
};
//------------------------------------------------------------------------------
bool FiscalPrinter::getNextCheckId(int &id)
{
CheckId++; //<2F><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
SaveSetup(); //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
id=CheckId;
return true;
}
//---------------------------------------------------------------------------
bool FiscalPrinter::SaveCheck(int CheckId) //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> (<28><><EFBFBD><EFBFBD><EFBFBD>)
{
if(dModule->UserType) //true - <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>; false - <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
dModule->SaveCheck(CheckId,dModule->UserId,0,getGoodsPrice());
else
dModule->SaveCheck(CheckId,0,dModule->UserId,getGoodsPrice());
return true;
}
//---------------------------------------------------------------------------
bool FiscalPrinter::deleteCheck(int CheckId) //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
{
dModule->UpdateChek(CheckId);
return true;
}
//---------------------------------------------------------------------------
int FiscalPrinter::getCOMPort()
{
int n=-1;
TRegistry* reg=new TRegistry;
reg->RootKey = HKEY_LOCAL_MACHINE;
if(reg->OpenKeyReadOnly("\\SOFTWARE\\OLEforRetail\\ServiceOPOS\\FiscalPrinter\\MbsFiscalPrinter"))
{
n = reg->ReadInteger("COM Num");
}
delete reg;
return n;
}
//---------------------------------------------------------------------------
bool FiscalPrinter::setBaudRate(int val)
{
bool result;
TRegistry* reg=new TRegistry;
reg->RootKey = HKEY_LOCAL_MACHINE;
if(reg->OpenKey("\\SOFTWARE\\OLEforRetail\\ServiceOPOS\\FiscalPrinter\\MbsFiscalPrinter",true))
{
reg->WriteInteger("COM Speed",val);
result = true;
} else result = false;
delete reg;
return result;
}
//---------------------------------------------------------------------------
int FiscalPrinter::getBaudRate()
{
int n=-1;
TRegistry* reg=new TRegistry;
reg->RootKey = HKEY_LOCAL_MACHINE;
if(reg->OpenKeyReadOnly("\\SOFTWARE\\OLEforRetail\\ServiceOPOS\\FiscalPrinter\\MbsFiscalPrinter"))
{
n = reg->ReadInteger("COM Speed");
}
delete reg;
return n;
}
//---------------------------------------------------------------------------
bool FiscalPrinter::setCOMPort(int n)
{
bool result;
TRegistry* reg=new TRegistry;
reg->RootKey = HKEY_LOCAL_MACHINE;
if(reg->OpenKey("\\SOFTWARE\\OLEforRetail\\ServiceOPOS\\FiscalPrinter\\MbsFiscalPrinter",true))
{
reg->WriteInteger("COM Num",n);
result = true;
} else result = false;
delete reg;
return result;
}
//---------------------------------------------------------------------------
void FiscalPrinter::LoadSetup()
{
TIniFile* ini=new TIniFile(ExtractFilePath(ParamStr(0))+"\\Setup.ini");
// cPort->port=ini->ReadString("Printer","Port","");
// cPort->BaudRate=ini->ReadInteger("Printer","BaudRate",0);
CheckId=ini->ReadInteger("Printer","CheckCount",0);
TestMode=ini->ReadBool("Printer","TestMode",true);
HeadLine=ini->ReadString("Printer","HeadLine","");
GoodsName=ini->ReadString("Printer","GoodsName","");
CasireName=ini->ReadString("Printer","CasireName","");
AutoOpenShift=ini->ReadBool("Printer","AutoOpenShift",false);
delete ini;
}
//---------------------------------------------------------------------------
void FiscalPrinter::SaveSetup()
{
TIniFile* ini=new TIniFile(ExtractFilePath(ParamStr(0))+"\\Setup.ini");
// ini->WriteString("Printer","Port",cPort->port);
// ini->WriteInteger("Printer","BaudRate",cPort->BaudRate);
ini->WriteInteger("Printer","CheckCount",CheckId);
ini->WriteBool("Printer","TestMode",TestMode);
ini->WriteString("Printer","GoodsName",GoodsName);
ini->WriteString("Printer","CasireName",CasireName);
ini->WriteBool("Printer","AutoOpenShift",AutoOpenShift);
delete ini;
}
//---------------------------------------------------------------------------
int FiscalPrinter::getGoodsPrice()
{
int sum=0;
for(int i=0;i<FListGoods->Count;i++)
sum+=((Goods*)FListGoods->Items[i])->price;
return sum;
}
//---------------------------------------------------------------------------
//---------------------------------------------------------------------------
//---------------------------------------------------------------------------
PrinterOPOS::PrinterOPOS(TComponent* AOwner):FiscalPrinter()
{
Crashed=false;
AutoOpenShift=false;
fp=new TOPOSFiscalPrinter(AOwner);
fp->DeviceEnabled = False;
LoadSetup();
}
//---------------------------------------------------------------------------
PrinterOPOS::~PrinterOPOS()
{
delete FListGoods;
delete fp;
}
//---------------------------------------------------------------------------
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> COM <20><><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
bool PrinterOPOS::Start()
{
if(fp->DeviceEnabled) return true;
FState = fp->Open(L"MbsFiscalPrinter");
if(FState!=0)
{
saveLog(1,AnsiString(FState)+"(PrinterOPOS::Start)"+GetStatusDescription(FState));
return false;
}
FState = fp->ClaimDevice(1000);
if(FState!=0)
{
saveLog(1,AnsiString(FState)+"(PrinterOPOS::Start)"+GetStatusDescription(FState));
return false;
}
fp->DeviceEnabled = True;
return true;
}
//---------------------------------------------------------------------------
void PrinterOPOS::setHeader(TStrings* Text)
{
long err=0;
try
{
if(Crashed) throw Exception("<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!");
for(int i=0;i<Text->Count;i++)
{
WideString str=Text->Strings[i];
err=fp->SetHeaderLine(i+1,str.c_bstr(),false);
if(err) throw Exception(getLastError(&err));
}
err=fp->ResetPrinter();
if(err)throw Exception(getLastError(&err));
}catch(Exception &exception)
{
if(err==251) Crashed=true; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
saveLog(err,"(PrinterOPOS::setHeader)"+exception.Message);
dModule->SendError(err,"(PrinterOPOS::setHeader)"+exception.Message);
}catch(...)
{
saveLog(1,"(PrinterOPOS::setHeader) <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
dModule->SendError(1,"(PrinterOPOS::setHeader) <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
}
}
//---------------------------------------------------------------------------
void PrinterOPOS::getHeader(TStrings* Text)
{
TIniFile* ini=new TIniFile(ExtractFilePath(ParamStr(0))+"\\Setup.ini");
Text->Add(ini->ReadString("Printer","HeadLine1",""));
Text->Add(ini->ReadString("Printer","HeadLine2",""));
Text->Add(ini->ReadString("Printer","HeadLine3",""));
Text->Add(ini->ReadString("Printer","HeadLine4",""));
Text->Add(ini->ReadString("Printer","HeadLine5",""));
delete ini;
for(int i=Text->Count-1;i>=0;i--)
if(Text->Strings[i]=="")Text->Delete(i); else break;
}
//---------------------------------------------------------------------------
void PrinterOPOS::setTrailer(TStrings* Text)
{
long err=0;
try
{ if(Crashed) throw Exception("<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!");
for(int i=0;i<Text->Count;i++)
{
WideString str=Text->Strings[i];
err=fp->SetTrailerLine(i+1,str.c_bstr(),false);
if(err) throw Exception(getLastError(&err));
}
err=fp->ResetPrinter();
if(err) throw Exception(getLastError(&err));
}catch(Exception &exception)
{
if(err==251) Crashed=true; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
saveLog(err,"(PrinterOPOS::setTrailer)"+exception.Message);
dModule->SendError(err,"(PrinterOPOS::setTrailer)"+exception.Message);
}catch(...)
{
saveLog(1,"(PrinterOPOS::setTrailer) <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
dModule->SendError(1,"(PrinterOPOS::setTrailer) <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
}
}
//---------------------------------------------------------------------------
void PrinterOPOS::getTrailer(TStrings* Text)
{
TIniFile* ini=new TIniFile(ExtractFilePath(ParamStr(0))+"\\Setup.ini");
Text->Add(ini->ReadString("Printer","TailLine1",""));
Text->Add(ini->ReadString("Printer","TailLine2",""));
Text->Add(ini->ReadString("Printer","TailLine3",""));
Text->Add(ini->ReadString("Printer","TailLine4",""));
Text->Add(ini->ReadString("Printer","TailLine5",""));
delete ini;
for(int i=Text->Count-1;i>=0;i--)
if(Text->Strings[i]=="")Text->Delete(i); else break;
}
//---------------------------------------------------------------------------
bool PrinterOPOS::PrintLine(WideString line)
{
//<2F><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
long err=0;
try
{ if(Crashed) throw Exception("<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!");
err=fp->PrintNormal(2, WideString(WideString(WCHAR(0x1B)) + WideString(WCHAR(0x7C)) + line + L"\n").c_bstr());
if(err) throw Exception(getLastError(&err));
}catch(Exception &exception)
{
if(err==251) Crashed=true; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
saveLog(err,"(PrinterOPOS::PrintLine)"+exception.Message);
dModule->SendError(err,"(PrinterOPOS::PrintLine)"+exception.Message);
}catch(...)
{
saveLog(1,"(PrinterOPOS::PrintLine) <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
dModule->SendError(1,"(PrinterOPOS::PrintLine) <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
}
return err==0;
}
//---------------------------------------------------------------------------
//sales - true <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, false - <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
//check - <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD> =0 <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
//TODO <20><><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><>
bool PrinterOPOS::PrintCheck(bool sales, int check, WideString headLine) //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
{
long err=0;
Currency cur=0;
Currency cAllPrice=0;
bool bOk=true;
try
{ if(Crashed) throw Exception("<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!");
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD> (<28><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>)
cAllPrice=getGoodsPrice();
if(check==0) //<2F><><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>
{
CheckId++; //<2F><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
check=CheckId;
SaveSetup(); //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
}
if(fp->RecEmpty) throw Exception("<22><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!");
if(!DayOpened()) throw Exception("<22><><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
Currency UnitPrice,AllPriceDrb,AllPrice;
long Qnt,vat;
BSTR* bstr;
WideString sStr;
BSTR sTmp=new OLECHAR[255];
sTmp=L"";
long MbsResponceCode;
CURRENCY Amount1,Amount2;
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
//vat=11; sTmp=L"<22><><EFBFBD><EFBFBD><EFBFBD>";
//err = fp->DirectIO(4, &vat, &sTmp);
//if (err) goto ErrHandler;
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> TODO!!!
if(headLine.Length()>0)
PrintLine(headLine);
if(sales) fp->FiscalReceiptType = FPTR_RT_SALES; //<2F><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
else fp->FiscalReceiptType=FPTR_RT_SERVICE; //<2F><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
//setTrainingMode(true);
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> (<28> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD>)
err = fp->BeginFiscalReceipt(true);
if (err) throw Exception(getLastError(&err)); //251
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> (TODO <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>)
for(int i=0;i<FListGoods->Count;i++)
{
Goods* goods=(Goods*)FListGoods->Items[i];
VarCyFromR8(goods->price*100,&Amount1);
Amount2.int64=0;
WideString tmp=goods->name1+L"-/--/-0";
err=fp->PrintRecItem(tmp.c_bstr(), Amount1, goods->count, goods->VatInfo, Amount2, L"<22><>");
if (err) throw Exception(getLastError(&err));
}
ClearGoods();
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> (<28><><EFBFBD><EFBFBD><EFBFBD> PrintRecTotal)
err = fp->DirectIO(3, &CheckId, &sTmp);
if (err) throw Exception(getLastError(&err));
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
//setNalog(1,12);
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD>
Amount2.int64=0;
VarCyFromR8(cAllPrice*100,&Amount1);
err=fp->PrintRecTotal(Amount1, Amount1, L"na");
if (err) throw Exception(getLastError(&err));
err = fp->EndFiscalReceipt(True); //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> (AdditionalTrailer) <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
if(err) throw Exception(getLastError(&err));
}
catch(Exception &exception)
{
ClearGoods();
if(err==251) Crashed=true; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
saveLog(1,"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>: N: "+IntToStr(dModule->UserId)+" <20><><EFBFBD><EFBFBD><EFBFBD>: "+CurrToStr(cAllPrice)+" <20><><EFBFBD>: "+AnsiString(CheckId)+". "+exception.Message);
dModule->SendError(err,"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>: N: "+IntToStr(dModule->UserId)+" <20><><EFBFBD><EFBFBD><EFBFBD>: "+IntToStr(cAllPrice)+" <20><><EFBFBD>: "+AnsiString(CheckId)+". "+exception.Message);
bOk=false;
}
catch(...)
{
ClearGoods();
if(err==251) Crashed=true; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
saveLog(1,"<22><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>: N: "+IntToStr(dModule->UserId)+" <20><><EFBFBD><EFBFBD><EFBFBD>: "+IntToStr(cAllPrice)+" <20><><EFBFBD>: "+AnsiString(CheckId));
dModule->SendError(1,"<22><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>: N: "+IntToStr(dModule->UserId)+" <20><><EFBFBD><EFBFBD><EFBFBD>: "+IntToStr(cAllPrice)+" <20><><EFBFBD>: "+AnsiString(CheckId));
bOk=false;
}
//<2F><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
if(!bOk)
{
fp->PrintRecVoid(L"");
}
return bOk;
}
//---------------------------------------------------------------------------
bool PrinterOPOS::Cut() //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
{
long err=0;
try
{
if(Crashed) throw Exception("<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!");
err=fp->PrintNormal(2, WideString(WideString(WCHAR(0x1B)) + WideString(WCHAR(0x7C)) + "75P").c_bstr());
if(err) throw Exception(getLastError(&err));
}catch(Exception &exception)
{
if(err==251) Crashed=true; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
saveLog(err,"(PrinterOPOS::Cut)"+exception.Message);
dModule->SendError(err,"(PrinterOPOS::Cut)"+exception.Message);
}catch(...)
{
saveLog(1,"(PrinterOPOS::Cut) <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
dModule->SendError(1,"(PrinterOPOS::Cut) <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
}
}
//---------------------------------------------------------------------------
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> (<28><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>)
/*int PrinterOPOS::GetState()
{
if(!fp->DeviceEnabled)FState=245;
//if(FState!=0) return FState;
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
//<2F><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>
// fp->ResultCodeExtended
return 0;
} */
//---------------------------------------------------------------------------
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
bool PrinterOPOS::isOk()
{
long err=0;
try
{
if(Crashed) throw Exception("<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!");
if(fp->RecEmpty) throw "<22><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!";
err=fp->ResetPrinter();
if(err) throw Exception(getLastError(&err)); //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
AnsiString str;
if(!dModule->getDayShift())throw Exception("<22><><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!"); //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD>
bool dOpen=DayOpened();
if(!dOpen && AutoOpenShift && OpenShift()) dOpen=true;
if(!dOpen) throw Exception("<22><><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!");
if(DayOpened())
{
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>
TDateTime dt=getDateOpenShift();
str=getLastError(&err);
if(err) throw Exception(getLastError(&err));
dModule->getDate();
if(HoursBetween(dt,dModule->date)>24) //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD> 24 <20><><EFBFBD><EFBFBD><EFBFBD>
throw Exception("[1]<5D><><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
} else throw Exception("<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!");
BSTR bstr=new OLECHAR[50];
err=fp->GetDate(&bstr);
if(err) throw Exception(getLastError(&err));
}
catch(Exception &exception)
{
if(err==251) Crashed=true; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
saveLog(1,"(PrinterOPOS::isOk)"+exception.Message);
dModule->SendError(err,"(PrinterOPOS::isOk)"+exception.Message);
return false;
}
catch (...)
{
if(err==251) Crashed=true; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
saveLog(1,"(PrinterOPOS::isOk)<29><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
dModule->SendError(1,"(PrinterOPOS::isOk)<29><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
return false;
}
return true;
}
//---------------------------------------------------------------------------
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>
TDateTime PrinterOPOS::getDateOpenShift()
{
long err=0;
TDateTime date=0;
try
{
if(Crashed) throw Exception("<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!");
long iTmp;
BSTR sTmp=new OLECHAR[50];
err=fp->DirectIO(13, &iTmp, &sTmp);
if(err) throw Exception(getLastError(&err));
date=StrToDateTime(sTmp);
}catch(Exception &exception)
{
if(err==251) Crashed=true; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
saveLog(err,"(PrinterOPOS::getDateOpenShift)"+exception.Message);
dModule->SendError(err,"(PrinterOPOS::getDateOpenShift)"+exception.Message);
}catch(...)
{
saveLog(1,"(PrinterOPOS::getDateOpenShift) <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
dModule->SendError(1,"(PrinterOPOS::getDateOpenShift) <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
}
return date;
}
//---------------------------------------------------------------------------
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
AnsiString PrinterOPOS::GetStatusDescription(long err)
{
AnsiString str;
try
{
if(err<256)
str=kkm_err_msg_ru[err];
if(str=="") str="<22><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>";
}catch(...)
{
saveLog(1,"(PrinterOPOS::GetStatusDescription) <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
return "<22><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>";
}
return str;
}
//---------------------------------------------------------------------------
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
AnsiString PrinterOPOS::getLastError(long* err)
{
BSTR str=new OLECHAR[255];
str=L"<22><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!";
try
{
fp->DirectIO(1, err, &str);
}catch(...)
{
saveLog(1,"(PrinterOPOS::getLastError) <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
}
if(str==L"") return GetStatusDescription(*err);
return str;
}
//---------------------------------------------------------------------------
AnsiString PrinterOPOS::getLastError()
{
long err;
return getLastError(&err);
}
//---------------------------------------------------------------------------
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>
bool PrinterOPOS::PrintZReport()
{
long err=0;
try
{
if(Crashed) throw Exception("<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!");
int sum=getDaySum();
err=fp->PrintZReport();
if(err) throw Exception(getLastError(&err));
dModule->addZReport(sum);//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Z <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
dModule->addPaper(-142*2);//<2F><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
}catch(Exception &exception)
{
if(err==251) Crashed=true; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
saveLog(err,"(PrinterOPOS::PrintZReport)"+exception.Message);
dModule->SendError(err,"(PrinterOPOS::PrintZReport)"+exception.Message);
}catch(...)
{
saveLog(1,"(PrinterOPOS::PrintZReport) <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
dModule->SendError(1,"(PrinterOPOS::PrintZReport) <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
}
return err==0;
}
//---------------------------------------------------------------------------
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>
void PrinterOPOS::PrintXReport()
{
long err=0;
try
{ if(Crashed) throw Exception("<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!");
err=fp->PrintXReport();
if(err) throw Exception(getLastError(&err));
}catch(Exception &exception)
{
if(err==251) Crashed=true; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
saveLog(err,"(PrinterOPOS::PrintXReport)"+exception.Message);
dModule->SendError(err,"(PrinterOPOS::PrintXReport)"+exception.Message);
}catch(...)
{
saveLog(1,"(PrinterOPOS::PrintXReport) <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
dModule->SendError(1,"(PrinterOPOS::PrintXReport) <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
}
}
//---------------------------------------------------------------------------
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>
bool PrinterOPOS::OpenShift()
{
long err;
try
{ if(Crashed) throw Exception("<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!");
long n=1;
//if(CasireName==NULL) CasireName=L" ";
BSTR str=CasireName.c_bstr();
err=fp->DirectIO (6,&n,&str);
if(err) throw Exception(getLastError(&err)); //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
err=fp->SetVatValue(1,L"120");
if(err) throw Exception(getLastError(&err));
}catch(Exception &exception)
{
if(err==251) Crashed=true; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
saveLog(err,"(PrinterOPOS::OpenShift)"+exception.Message);
dModule->SendError(err,"(PrinterOPOS::OpenShift)"+exception.Message);
}catch(...)
{
saveLog(1,"(PrinterOPOS::OpenShift) <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
dModule->SendError(1,"(PrinterOPOS::OpenShift) <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
}
return err==0;
}
//---------------------------------------------------------------------------
bool PrinterOPOS::DayOpened()
{
return fp->DayOpened;
}
//---------------------------------------------------------------------------
bool PrinterOPOS::setTrainingMode(bool val)
{
long err;
try
{ if(Crashed) throw Exception("<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!");
if(getTrainingMode()==val) return true;
if(val) err=fp->BeginTraining(); else err=fp->EndTraining();
if(err) throw Exception(getLastError(&err));
}catch(Exception &exception)
{
if(err==251) Crashed=true; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
saveLog(err,"(PrinterOPOS::setTrainingMode)"+exception.Message);
dModule->SendError(err,"(PrinterOPOS::setTrainingMode)"+exception.Message);
}catch(...)
{
saveLog(1,"(PrinterOPOS::setTrainingMode) <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
dModule->SendError(1,"(PrinterOPOS::setTrainingMode) <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
}
return err==0;
}
//---------------------------------------------------------------------------
bool PrinterOPOS::getTrainingMode()
{
return fp->TrainingModeActive;
}
//---------------------------------------------------------------------------
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
bool PrinterOPOS::setNalog(long n,float stavka)
{
long err;
try
{ if(Crashed) throw Exception("<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!");
long s=stavka*10;
WideString str=AnsiString(s);
err = fp->DirectIO(2, &n, &str);
if(err) throw Exception(getLastError(&err));
}catch(Exception &exception)
{
if(err==251) Crashed=true; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
saveLog(err,"(PrinterOPOS::setNalog)"+exception.Message);
dModule->SendError(err,"(PrinterOPOS::setNalog)"+exception.Message);
return true;
}catch(...)
{
saveLog(1,"(PrinterOPOS::setNalog) <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
dModule->SendError(1,"(PrinterOPOS::setNalog) <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
return true;
}
return err==0;
}
//---------------------------------------------------------------------------
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
int PrinterOPOS::getDaySum()
{
long err;
try
{ if(Crashed) throw Exception("<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!");
long n=1;
BSTR str=new OLECHAR[20];
err=fp->DirectIO (300,&n,&str);
if(err) throw Exception(getLastError(&err));
return StrToInt(str)/100.0;
}catch(Exception &exception)
{
if(err==251) Crashed=true; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
saveLog(err,"(PrinterOPOS::getDaySum)"+exception.Message);
dModule->SendError(err,"(PrinterOPOS::getDaySum)"+exception.Message);
return 0;
}catch(...)
{
saveLog(1,"(PrinterOPOS::getDaySum) <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
dModule->SendError(1,"(PrinterOPOS::getDaySum) <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
return 0;
}
}
//---------------------------------------------------------------------------
//<2F><><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD>
int PrinterOPOS::getAllSum()
{
long err=0;
try
{ if(Crashed) throw Exception("<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!");
long n=2;
BSTR str=new OLECHAR[20];
err=fp->DirectIO (300,&n,&str);
if(err)throw Exception(getLastError(&err));
return StrToInt(str)/100.0;
}catch(Exception &exception)
{
if(err==251) Crashed=true; //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
saveLog(err,"(PrinterOPOS::getAllSum)"+exception.Message);
dModule->SendError(err,"(PrinterOPOS::getAllSum)"+exception.Message);
return 0;
}catch(...)
{
saveLog(1,"(PrinterOPOS::getAllSum) <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
dModule->SendError(1,"(PrinterOPOS::getAllSum) <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
return 0;
}
}
//---------------------------------------------------------------------------
//sales - true <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, false - <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
//check - <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD> =0 <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
//<2F><><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><>
bool FiscalPrinterPort::PrintCheck(bool sales, int check, WideString headLine )
{
//bool err=0;
double cur=0;
double cAllPrice=0;
bool bOk=true;
try
{
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD> (<28><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>)
cAllPrice=getGoodsPrice();
Currency UnitPrice,AllPriceDrb,AllPrice;
long Qnt,vat;
BSTR* bstr;
WideString sStr;
BSTR sTmp=new OLECHAR[255];
sTmp=L"";
long MbsResponceCode;
CURRENCY Amount1,Amount2;
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
if(sales) bOk = fp->OpenFiscalInv(1,"0000",1);
else bOk = fp->OpenBackInv(1,"0000",1);
if (!bOk) throw Exception(getLastError());
if(headLine.Length()>0)
PrintLine(headLine);
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
for(int i=0;i<FListGoods->Count;i++)
{
Goods* goods=(Goods*)FListGoods->Items[i];
bOk=fp->RegisterSale(goods->name1.c_bstr(),goods->name2.c_bstr(),0,"<22>",goods->price,goods->count,0,0); //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> (<28><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>)
if (!bOk) throw Exception(getLastError());
}
ClearGoods();
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD> (<28><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>)
double Change;
bOk=fp->Total("","","P",cAllPrice,Change);
if (!bOk) throw Exception(getLastError());
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>
bOk = fp->CloseFiscalInv();
if(!bOk) throw Exception(getLastError());
}
catch(Exception &exception)
{
ClearGoods();
saveLog(1,"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>: N: "+IntToStr(dModule->UserId)+" <20><><EFBFBD><EFBFBD><EFBFBD>: "+CurrToStr(cAllPrice)+" <20><><EFBFBD>: "+AnsiString(CheckId)+". "+exception.Message);
dModule->SendError(bOk,"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>: N: "+IntToStr(dModule->UserId)+" <20><><EFBFBD><EFBFBD><EFBFBD>: "+FloatToStr(cAllPrice)+" <20><><EFBFBD>: "+AnsiString(CheckId)+". "+exception.Message);
bOk=false;
}
catch(...)
{
ClearGoods();
saveLog(1,"<22><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>: N: "+IntToStr(dModule->UserId)+" <20><><EFBFBD><EFBFBD><EFBFBD>: "+FloatToStr(cAllPrice)+" <20><><EFBFBD>: "+AnsiString(CheckId));
dModule->SendError(1,"<22><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>: N: "+IntToStr(dModule->UserId)+" <20><><EFBFBD><EFBFBD><EFBFBD>: "+FloatToStr(cAllPrice)+" <20><><EFBFBD>: "+AnsiString(CheckId));
bOk=false;
}
//<2F><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
if(!bOk)
{
fp->CancelFiscalInv();
}
return bOk;
}
//---------------------------------------------------------------------------
bool FiscalPrinterPort::PrintZReport()
{
bool bOk;
try
{
double Amount=0,CashSum=0,ServIn=0,ServOut=0;
std::string ExitCode="";
bOk=fp->ParishOrConsumption(Amount,ExitCode,CashSum,ServIn,ServOut);
//bool ParishOrConsumption(std::string Oper,std::string Password,double Amount,std::wstring strH,std::wstring strF,std::string& ExitCode,double& CashSum,double& ServIn,double& ServOut); ///<<3C><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
if(!bOk) throw Exception(getLastError());
bOk=fp->PrintZReport();
if(!bOk) throw Exception(getLastError());
dModule->addZReport(CashSum);//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Z <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
}
catch(Exception &exception)
{
ClearGoods();
saveLog(1,"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Z <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> "+exception.Message);
dModule->SendError(bOk,"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Z <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> "+exception.Message);
bOk=false;
}
catch(...)
{
ClearGoods();
saveLog(1,"<22><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Z <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>.");
dModule->SendError(1,"<22><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Z <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>.");
bOk=false;
}
return bOk;
};
//---------------------------------------------------------------------------
bool FiscalPrinterPort::isOk()
{
try
{
if (!fp->DiagnosticInfo()) throw Exception(getLastError());
if(!dModule->getDayShift())throw Exception("<22><><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!"); //<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD>
}
catch(Exception &exception)
{
saveLog(1,"(PrinterOPOS::isOk)"+exception.Message);
dModule->SendError(1,"(PrinterOPOS::isOk)"+exception.Message);
return false;
}
catch (...)
{
saveLog(1,"(PrinterOPOS::isOk)<29><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
dModule->SendError(1,"(PrinterOPOS::isOk)<29><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
return false;
}
return true;
};
//---------------------------------------------------------------------------