646 lines
20 KiB
C++
646 lines
20 KiB
C++
//---------------------------------------------------------------------------
|
|
|
|
|
|
#pragma hdrstop
|
|
|
|
#include "PrinterOPOS.h"
|
|
#include "OposFiscalPrinter_1_7_Lib_OCX.h"
|
|
#include "ud_Module.h"
|
|
#include <Registry.hpp>
|
|
#include <Math.h>
|
|
#include <DateUtils.hpp>
|
|
#include <Dialogs.hpp>
|
|
//---------------------------------------------------------------------------
|
|
|
|
#pragma package(smart_init)
|
|
//---------------------------------------------------------------------------
|
|
PrinterOPOS* printerOPOS;
|
|
//---------------------------------------------------------------------------
|
|
char * kkm_err_msg_ru[] = {
|
|
"OK", //0
|
|
"ÔÏ ID îøèáêà", //1 FM ID Error
|
|
"Îøèáêà çàïèñè â ÔÏ ", //2 FM Rec Error
|
|
"Flash Chip íå ìîæåò áûòü î÷èùåí", //3 Flash Chip cant clear
|
|
"ÔÏ íå ïóñòà", //4 FM not empty
|
|
"Äàííûå â ÔÏ ðàçðóøåííû", //5 FM Data destroyed
|
|
"Ðåæ ïðèíòåð èãíîðèð êìä", //6 Cmd ignor prn mode
|
|
"Íåò êîäà îïåðàòîðà", //7 Oper code is absent
|
|
"Íåò òèïà äîêóìåíòà", //8 Doc type is absent
|
|
"Ñåð. íîìåð ÊÊÌ", //9 Ser num CR
|
|
"Îøèáêà ïàðîëÿ", //10 Password error
|
|
"Îøèáêà äàòà/âðåìÿ", //11 Data/Time error
|
|
"Çàâîä. ðåã. ðàíåå", //12 Factory registration has already pass
|
|
"Ñåð íîì ÊÊÌ ðàçðóøåí", //13 Ser num CR destroyed
|
|
"Ôèñêàëèçàöèÿ ðàíåå", //14 Fiscalize has already pass
|
|
"ÊÊÌ íå ôèñê ðåæèì", //15 Not fisc mode CR
|
|
"Ôèñêàë ÊÊÌ ðàçðóøåí", //16 Fiscalize Data destroyed
|
|
"Ïåðåðåã ÊÊÌ èñ÷åðïàí", //17 Rewrite is conclude
|
|
"Ïåðåðåã ÊÊÌ ðàçðóøåí", //18 Rewrite is destroyed
|
|
"Ñìåíà îòêðûòà", //19 Shift already open
|
|
"Ñì íå áûëà îòêðûòà", //20 Shift not opened
|
|
"Ìíîãî òîâàðà â ÷åêå", //21 Many goods in receipt
|
|
"ÑÌ â ÔÏ ðàçðóøåííà", //22 EOD data in FM destroyed
|
|
"Ôîðìàò äîêóìåíòà", //23 Document format error
|
|
"Ïåðåçàïèñü òåêñòà", //24 Text rewrite
|
|
"Ìíîãî ïàð-ðîâ äîê", //25 Many parameters in document
|
|
"Îø ïàðàìåòð äîê-òà", //26 Document parameters error
|
|
"Îø çíà÷åíèÿ ïàð-ðà", //27 Parameters value error
|
|
"Íåñóùåñòâóþù îáúåêò", //28 Object non-existent
|
|
"Äîê íå áûë çàâåðøåí", //29 Document is not finished
|
|
"Òîâàð/îïåð íå ïîëíî", //30 goods/operation description not enough
|
|
"Êîíòðîë ñóììà ïàêåòà", //31 Check sum packet
|
|
"Ïðèíòåð íå ãîòîâ", //32 Prn not ready
|
|
"Âëîæåííûå ïðåðûâàíèÿ", //33 Nested interrupts
|
|
"Áàéò ïîäòâ ïðèåì äàííûõ", //34 Check Sum Error
|
|
"Ïåðåïîëíåííèå â ÔÏ", //35 Overflow if FM
|
|
"Íåèçâåñòíàÿ êîììàíäà", //36 Unknown command
|
|
"CRC ÎÇÓ", //37 CRC RAM
|
|
"CRC ÔÏ", //38 CRC FM
|
|
"Ïîðò äàííûõ íåèñïðàâ", //39 Data port defective
|
|
"Ïîðÿäîê ðåêâ ÷åêà", //40 Receipts parameters sequence
|
|
"0xy äëÿ îáÿçàò ðåêâ", //41 0xy for required properties
|
|
"Äëèííà çàïðîñà", //42 Length request
|
|
"Ðàçðÿäíîñòü ÷èñëà", //43 number capacity
|
|
"Ïåðåïîëíåíèå", //44 Overflow
|
|
"Íåò ÷èñëà", //45 Number is absent
|
|
"Íåò îòâåòà", //46 Not response
|
|
"Îøèáêà ïåðåäà÷è", //47 Transmission error
|
|
"Ìàò. ïåðåïîëíåíèå", //48 Math overflow
|
|
"Íåò áóìàãè...", //49 Paper out...
|
|
"ÊÊÌ íå ãîòîâà!!!", //50 CR not ready!!!
|
|
"Ñáîé ïàìÿòè!!", //51 Memory error!!
|
|
"Ïðèíòåð âûêëþ÷åí", //52 Printer off
|
|
"Íåäîñòàòî÷íî ïàìÿòè", //53 Insufficient memory
|
|
"Äëèííà íîìåðà ìåíüøå", //54 Lenght number less
|
|
"Íóëåâàÿ äëèííà íîìåðà", //55 Zero lenght number
|
|
"Äëèííà ïàðîëÿ ìåíüøå äîïóñòèìîé", //56 Password lenght less permissible
|
|
"Íóëåâàÿ äëèííà ïàðîëÿ", //57 Zero lenght password
|
|
"Íåäîïóñòèìàÿ âåëè÷èíà", //58 Impossible value
|
|
"Ïðåâûøåí òàéì-àóò", //59 Time-out overdraw
|
|
"",
|
|
"Îø.ÝÊËÇ",
|
|
"Íåäîïóñòèìîå ñîñòîÿíèå ÝÊËÇ",
|
|
"Äàííûå ó÷òåíû",
|
|
"","","","","","",//69
|
|
"","","","","","","","","","",//79
|
|
"","","","","","","","","","",//89
|
|
"","","","","","","","","","",//99
|
|
"","","","","","","","","","",//109
|
|
"","","","","","","","","","",//119
|
|
"","","","","","","","","","",//129
|
|
"","","","","","","","","","",//139
|
|
"","","","","","","","","","",//149
|
|
"","","","","","","","","","",//159
|
|
|
|
"","","","","","","","","","",//169
|
|
"","","","","","","","","","",//179
|
|
"","","","","","","","","","",//189
|
|
"","","","","","","","","","",//199
|
|
"","","","","","","","","","",//209
|
|
"","","","","","","","","","",//219
|
|
"","","","","","","","","","",//229
|
|
"","","","","","","","","","",//239
|
|
"Êîìàíäû íåò",//240 Cmd not init
|
|
"Îø. ïîñûëêè êîìàíäû",//241 Cmd write err
|
|
"Êîìàíäà íå îòîñëàíà ÊÊÌ-íåãîòîâ(DSR=0)",//242 Prn not ready (DSR=0)
|
|
"Êîìàíäà îòîñëàíà, íî îòâåò ÷òî ÊÊÌ-íåãîòîâ",//243 Cmd ok
|
|
"Ïðåâûøåíî âðåìÿ îæèäàíèÿ îòâåòà",//244 Cmd resp timeout
|
|
"Îøèáêà",//245 Prn error
|
|
"Ïðèøëî áîëüøå äàííûõ, ÷åì îæèäàëè",//246 Cmd resp large
|
|
"Ïðèøëî ìåíüøå äàííûõ, ÷åì îæèäàëè",//247 Cmd resp small
|
|
"Ïðèøëè íåêèå äàííûå",//248
|
|
"Ïîðò çàêðûò",//249
|
|
"Ïîðò çàêðûò âî âðåìÿ âûïîëíåíèÿ",//250 Cmd break
|
|
"ÊÊÌ âûêëþ÷åí èëè ñëîìàí",//251
|
|
"ÊÊÌ íåãîòîâ",//252
|
|
"Îøèáêà â ïàðàìåòðàõ êîìàíäû",//253
|
|
"Íåñóùåñòâóþùèé íîìåð êîìàíäû",//254
|
|
"ÊÊÌ çàíÿò(ïðåäûäóùàÿ êîìàíäà)!"//255 Previous cmd run
|
|
};
|
|
//---------------------------------------------------------------------------
|
|
PrinterOPOS::PrinterOPOS(TComponent* AOwner)
|
|
{
|
|
Crashed=false;
|
|
fp=new TOPOSFiscalPrinter(AOwner);
|
|
fp->DeviceEnabled = False;
|
|
FListGoods= new TList();
|
|
LoadSetup();
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
PrinterOPOS::~PrinterOPOS()
|
|
{
|
|
delete FListGoods;
|
|
delete fp;
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
void PrinterOPOS::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","");
|
|
delete ini;
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
void PrinterOPOS::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",CheckId);
|
|
ini->WriteString("Printer","HeadLine",HeadLine);
|
|
delete ini;
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
bool PrinterOPOS::Start() //Ñîåäåíèòüñÿ ïî COM ïîðòó è ïðîèíèöèàëèçèðîâàòü ïðèíòåð
|
|
{
|
|
if(fp->DeviceEnabled) return true;
|
|
|
|
FState = fp->Open(L"MbsFiscalPrinter");
|
|
if(FState!=0)
|
|
{
|
|
saveLog(IntToStr(FState)+"(PrinterOPOS::Start)"+GetStatusDescription(FState));
|
|
return false;
|
|
}
|
|
FState = fp->ClaimDevice(1000);
|
|
if(FState!=0)
|
|
{
|
|
saveLog(IntToStr(FState)+"(PrinterOPOS::Start)"+GetStatusDescription(FState));
|
|
return false;
|
|
}
|
|
fp->DeviceEnabled = True;
|
|
return true;
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
void PrinterOPOS::setHeader(TStrings* Text)
|
|
{
|
|
//if(fp->DayOpened){FState=19; return;}
|
|
|
|
long err;
|
|
for(int i=0;i<Text->Count;i++)
|
|
{
|
|
WideString str=Text->Strings[i];
|
|
err=fp->SetHeaderLine(i+1,str,false);
|
|
if(err!=0)
|
|
{
|
|
saveLog(IntToStr(err)+"(PrinterOPOS::setHeader)"+GetStatusDescription(err));
|
|
break;
|
|
}
|
|
}
|
|
err=fp->ResetPrinter();
|
|
if(err!=0) saveLog(IntToStr(err)+"(PrinterOPOS::setHeader)"+GetStatusDescription(err));
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
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)
|
|
{
|
|
//if(fp->DayOpened){FState=19; return;}
|
|
long err;
|
|
for(int i=0;i<Text->Count;i++)
|
|
{
|
|
WideString str=Text->Strings[i];
|
|
err=fp->SetTrailerLine(i+1,str,false);
|
|
if(err!=0)
|
|
{ saveLog(IntToStr(err)+"(PrinterOPOS::setTrailer)"+GetStatusDescription(err));
|
|
break;
|
|
}
|
|
}
|
|
err=fp->ResetPrinter();
|
|
if(err!=0) saveLog(IntToStr(err)+"(PrinterOPOS::setTrailer)"+GetStatusDescription(err));
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
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;
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
void PrinterOPOS::addGoods(Goods* goods)
|
|
{
|
|
FListGoods->Add(goods);
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
void PrinterOPOS::ClearGoods()
|
|
{
|
|
try
|
|
{
|
|
while(FListGoods->Count>0)
|
|
{
|
|
Goods* g=(Goods*)FListGoods->Items[0];
|
|
delete g;
|
|
FListGoods->Delete(0);
|
|
}
|
|
FListGoods->Clear();
|
|
}catch(...)
|
|
{
|
|
Crashed=true;
|
|
}
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
int PrinterOPOS::getGoodsPrice()
|
|
{
|
|
int sum=0;
|
|
for(int i=0;i<FListGoods->Count;i++)
|
|
sum+=((Goods*)FListGoods->Items[i])->price;
|
|
return sum;
|
|
}
|
|
//------------------------------------------------------------------------------
|
|
int PrinterOPOS::getNextCheckId()
|
|
{
|
|
CheckId++; //Íîìåð ÷åêà
|
|
SaveSetup(); //ñîõðàíÿåì íîìåð ÷åêà
|
|
return CheckId;
|
|
}
|
|
//------------------------------------------------------------------------------
|
|
bool PrinterOPOS::SaveCheck(int CheckId) //Ñîõðàíåíèå ÷åêà äëÿ ïîñëåäóþùåé ðàñïå÷àòêè (ñóììû)
|
|
{
|
|
if(dModule->UserType) //true - Þðåäè÷åñêîå ëèöî; false - ôèçè÷åñêîå ëèöî
|
|
dModule->SaveCheck(CheckId,dModule->UserId,0,getGoodsPrice());
|
|
else
|
|
dModule->SaveCheck(CheckId,0,dModule->UserId,getGoodsPrice());
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
bool PrinterOPOS::deleteCheck(int CheckId) //Óäàëåíèå ÷åêà
|
|
{
|
|
dModule->UpdateChek(CheckId);
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
bool PrinterOPOS::PrintLine(WideString line)
|
|
{
|
|
//Íå ôèñêàëüíàÿ ïå÷àòü
|
|
long err = fp->PrintNormal(2, WideString(WCHAR(0x1B)) + WideString(WCHAR(0x7C)) + line + L"\n");
|
|
return err==0;
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
//sales - true ïðîäàæà, false - âîçâðàò
|
|
//check - íîìåð ÷åêà åñëè íå çàäàí =0 òî ãåíåðèòüñÿ
|
|
//TODO Ôè÷à ýòî ôèêñèðîâàòü íå ðàñïå÷àòàííûå ÷åêè ïîòîì ïå÷àòàòü èõ
|
|
bool PrinterOPOS::PrintCheck(bool sales, int check) //Òåñòîâàÿ ïå÷àòü
|
|
{
|
|
long err=0;
|
|
Currency cur=0;
|
|
Currency cAllPrice=0;
|
|
bool bOk=true;
|
|
|
|
try
|
|
{
|
|
//Ñ÷èòàåì ñóììó â ÷åêå (çàðàíåå íà ñëó÷àé îøèáêè)
|
|
cAllPrice=getGoodsPrice();
|
|
|
|
if(check==0) //åñëè íå çàäàí íîìåð ÷åêà òî ãåíåðèì ñäåñü
|
|
{
|
|
CheckId++; //Íîìåð ÷åêà
|
|
check=CheckId;
|
|
SaveSetup(); //ñîõðàíÿåì íîìåð ÷åêà
|
|
}
|
|
|
|
if(fp->RecEmpty) throw Exception("Íåò áóìàãè!");
|
|
if(!DayOpened())
|
|
if(!OpenShift()) throw Exception("Íå óäàëîñü îòêðûòü ñìåíó");
|
|
|
|
Currency UnitPrice,AllPriceDrb,AllPrice;
|
|
long Qnt,vat;
|
|
BSTR* bstr;
|
|
WideString sStr;
|
|
BSTR sTmp=new OLECHAR[255];
|
|
sTmp=L"";
|
|
long MbsResponceCode;
|
|
CURRENCY Amount1,Amount2;
|
|
|
|
//Óñòàíîâêà íîìåðà îòäåëà
|
|
//vat=11; sTmp=L"îòäåë";
|
|
//err = fp->DirectIO(4, &vat, &sTmp);
|
|
//if (err) goto ErrHandler;
|
|
|
|
if(sales) fp->FiscalReceiptType = FPTR_RT_SALES; //×åê ïðîäàæè
|
|
else fp->FiscalReceiptType=FPTR_RT_SERVICE; //×åê âîçâðàòà
|
|
|
|
//Ôèñêàëüíàÿ ïå÷àòü (ñ çàãîëîâêîì èëè áåç)
|
|
err = fp->BeginFiscalReceipt(true);
|
|
if (err) throw Exception(getLastError(&err)); //251
|
|
|
|
//Òîâàðû èç ñïèñêà â äðàéâåð
|
|
for(int i=0;i<FListGoods->Count;i++)
|
|
{
|
|
Goods* goods=(Goods*)FListGoods->Items[i];
|
|
VarCyFromR8(goods->price*100,&Amount1);
|
|
Amount2.int64=0;
|
|
err=fp->PrintRecItem(goods->name+L"-/--/-0", Amount1, goods->count, goods->VatInfo, Amount2, L"Øò");
|
|
if (err) throw Exception(getLastError(&err));
|
|
}
|
|
ClearGoods();
|
|
|
|
//óñòàíîâêà íîìåðà ÷åêà (Ïåðåä PrintRecTotal)
|
|
err = fp->DirectIO(3, &CheckId, &sTmp);
|
|
if (err) throw Exception(getLastError(&err));
|
|
|
|
//Óñòàíîâêà çíà÷åíèé ìàññèâà íàëîãîâûõ ñòàâîê
|
|
//setNalog(1,12);
|
|
|
|
//Ôîðìèðîâàíèÿ èòîãà â ÷åêå
|
|
Amount2.int64=0;
|
|
VarCyFromR8(cAllPrice*100,&Amount1);
|
|
err=fp->PrintRecTotal(Amount1, Amount1, L"na");
|
|
if (err) throw Exception(getLastError(&err));
|
|
|
|
|
|
err = fp->EndFiscalReceipt(True); //Îêîí÷àíèÿ ïå÷àòè, â íåì ïðîèñõîäèò ïå÷àòü äîïîëíèòåëüíîãî òðåéëåðà (AdditionalTrailer) è îáðåçêà áóìàãè
|
|
if(err) throw Exception(getLastError(&err));
|
|
}
|
|
catch(Exception &exception)
|
|
{
|
|
printerOPOS->ClearGoods();
|
|
if(err==251) Crashed=true; //Êàáçäåö
|
|
saveLog("Îøèáêà ïðè ïå÷àòè ÷åêà: N: "+IntToStr(dModule->UserId)+" ñóììà: "+CurrToStr(cAllPrice)+" ×åê: "+IntToStr(CheckId)+". "+exception.Message);
|
|
dModule->SendError(err,"Îøèáêà ïðè ïå÷àòè ÷åêà: N: "+IntToStr(dModule->UserId)+" ñóììà: "+IntToStr(cAllPrice)+" ×åê: "+IntToStr(CheckId)+". "+exception.Message);
|
|
bOk=false;
|
|
}
|
|
catch(...)
|
|
{
|
|
printerOPOS->ClearGoods();
|
|
if(err==251) Crashed=true; //Êàáçäåö
|
|
saveLog("Íå îïîçíàííàÿ îøèáêà ïðè ïå÷àòè ÷åêà: N: "+IntToStr(dModule->UserId)+" ñóììà: "+IntToStr(cAllPrice)+" ×åê: "+IntToStr(CheckId));
|
|
dModule->SendError(1,"Íå îïîçíàííàÿ îøèáêà ïðè ïå÷àòè ÷åêà: N: "+IntToStr(dModule->UserId)+" ñóììà: "+IntToStr(cAllPrice)+" ×åê: "+IntToStr(CheckId));
|
|
bOk=false;
|
|
}
|
|
//ñáðîñ ÷åêà
|
|
if(!bOk)
|
|
{
|
|
fp->PrintRecVoid(L"");
|
|
}
|
|
|
|
return bOk;
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
void PrinterOPOS::Cut() //Îòðåçàòü áóìàãó
|
|
{
|
|
FState = fp->PrintNormal(2, WideString(WCHAR(0x1B)) + WideString(WCHAR(0x7C)) + "75P"); //îáðåçêà áóìàãè
|
|
if(FState!=0) saveLog(IntToStr(FState)+"(PrinterOPOS::Cut)"+GetStatusDescription(FState));
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
//Ïîëó÷èòü òåêóùåå ñîñòîÿíèå ïðèíòåðà (÷òîá ïðîâåðèòü ãîòîâíîñòü ïå÷àòè)
|
|
int PrinterOPOS::GetState()
|
|
{
|
|
if(!fp->DeviceEnabled)FState=245;
|
|
//if(FState!=0) return FState;
|
|
//ïðîâåðÿåì
|
|
//Íàäî äîáàâèòü ëîã
|
|
// fp->ResultCodeExtended
|
|
return 0;
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
//Ïðîâåðêà ðîáîòîñïîñîáíîñòè ïðèíòåðà
|
|
bool PrinterOPOS::isOk()
|
|
{
|
|
long err=0;
|
|
try
|
|
{
|
|
if(Crashed) throw Exception("Äðàéâåð ïðèíòåðà ðàçðóøåí!");
|
|
if(fp->RecEmpty) throw "Íåò áóìàãè!";
|
|
|
|
AnsiString str;
|
|
if(!DayOpened())
|
|
OpenShift();
|
|
if(DayOpened())
|
|
{
|
|
//Ïðîâåðêà íà äëèíó ñìåíû
|
|
TDateTime dt=getDateOpenShift();
|
|
str=getLastError(&err);
|
|
if(err) throw Exception(getLastError(&err));
|
|
|
|
dModule->getDate();
|
|
if(HoursBetween(dt,dModule->date)>24) //Ðàçíèöà íå áîëåå 24 ÷àñîâ
|
|
throw Exception("[1]Ñìåíà íå çàêðûòà");
|
|
} else throw Exception("Ïðèíòåð íå ðàáîòàåò!");
|
|
BSTR bstr=new OLECHAR[50];
|
|
err=fp->GetDate(&bstr);
|
|
if(err) throw Exception(getLastError(&err));
|
|
}
|
|
catch(Exception &exception)
|
|
{
|
|
if(err==251) Crashed=true; //Êàáçäåö
|
|
saveLog("(PrinterOPOS::isOk)"+exception.Message);
|
|
dModule->SendError(1,"(PrinterOPOS::isOk)"+exception.Message);
|
|
return false;
|
|
}
|
|
catch (...)
|
|
{
|
|
if(err==251) Crashed=true; //Êàáçäåö
|
|
saveLog("(PrinterOPOS::isOk)Íåîïîçíàííàÿ îøèáêà");
|
|
dModule->SendError(1,"(PrinterOPOS::isOk)Íåîïîçíàííàÿ îøèáêà");
|
|
return false;
|
|
}
|
|
return true;
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
//Ïîëó÷èòü äàòó îòêðûòèÿ ñìåíû
|
|
TDateTime PrinterOPOS::getDateOpenShift()
|
|
{
|
|
long iTmp,err;
|
|
BSTR sTmp=new OLECHAR[50];
|
|
err = fp->DirectIO(13, &iTmp, &sTmp);
|
|
if(err!=0) return 0;
|
|
return StrToDateTime(sTmp);
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
//Îïèñàíèå ñòàòóñà
|
|
AnsiString PrinterOPOS::GetStatusDescription(long err)
|
|
{
|
|
AnsiString str;
|
|
try
|
|
{
|
|
if(err<256)
|
|
str=kkm_err_msg_ru[err];
|
|
if(str=="") str="Íåò îïèñàíèÿ îøèáêè";
|
|
}catch(...)
|
|
{
|
|
saveLog("(PrinterOPOS::GetStatusDescription) Íåò îïèñàíèÿ îøèáêè");
|
|
return "Íåò îïèñàíèÿ îøèáêè";
|
|
}
|
|
return str;
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
//Ïîëó÷èòü êîä ïîñëåäíåé îøèáêè
|
|
AnsiString PrinterOPOS::getLastError(long* err)
|
|
{
|
|
BSTR str=new OLECHAR[255];
|
|
str=L"Íåò îïèñàíèÿ îøèáêè!";
|
|
try
|
|
{
|
|
fp->DirectIO(1, err, &str);
|
|
}catch(...)
|
|
{
|
|
saveLog("(PrinterOPOS::getLastError) Íåò îïèñàíèÿ îøèáêè");
|
|
}
|
|
if(str==L"") return GetStatusDescription(*err);
|
|
return str;
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
AnsiString PrinterOPOS::getLastError()
|
|
{
|
|
long err;
|
|
return getLastError(&err);
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
int PrinterOPOS::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;
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
void PrinterOPOS::setCOMPort(int n)
|
|
{
|
|
TRegistry* reg=new TRegistry;
|
|
reg->RootKey = HKEY_LOCAL_MACHINE;
|
|
if(reg->OpenKey("\\SOFTWARE\\OLEforRetail\\ServiceOPOS\\FiscalPrinter\\MbsFiscalPrinter",true))
|
|
{
|
|
reg->WriteInteger("COM Num",n);
|
|
}
|
|
delete reg;
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
int PrinterOPOS::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;
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
void PrinterOPOS::setBaudRate(int val)
|
|
{
|
|
TRegistry* reg=new TRegistry;
|
|
reg->RootKey = HKEY_LOCAL_MACHINE;
|
|
if(reg->OpenKey("\\SOFTWARE\\OLEforRetail\\ServiceOPOS\\FiscalPrinter\\MbsFiscalPrinter",true))
|
|
{
|
|
reg->WriteInteger("COM Speed",val);
|
|
}
|
|
delete reg;
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
//Ïå÷àòü îò÷¸òà è çàêðûòèå ñìåíû
|
|
bool PrinterOPOS::PrintZReport()
|
|
{
|
|
int sum=getDaySum();
|
|
long err=fp->PrintZReport();
|
|
if(err==0)
|
|
{
|
|
dModule->addZReport(sum);//Ïîñëàòü íà ñåðâåð âðåìÿ ñíÿòèÿ Z îò÷¸òà
|
|
dModule->addPaper(-142*2);//Äëÿ ïîäñ÷¸òà êîíöà áóìàãè
|
|
}else
|
|
{
|
|
saveLog("Îøèáêà ïå÷àòè Z îò÷¸òà");
|
|
dModule->SendError(1,"Îøèáêà ïå÷àòè Z îò÷¸òà");
|
|
}
|
|
return err==0;
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
//Ïå÷àòü ñóòî÷íîãî îò÷¸òà áåç çàêðûòèÿ ñìåíû
|
|
void PrinterOPOS::PrintXReport()
|
|
{
|
|
fp->PrintXReport();
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
//Îòêðûòèå ñìåíû
|
|
bool PrinterOPOS::OpenShift()
|
|
{
|
|
long n=1;
|
|
BSTR str=L"Ïëàò¸æíûé òåðìèíàë 1";
|
|
long err=fp->DirectIO (6,&n,&str); //Ïåðåäàë íîìåð è íàçâàíèå êàññèðà
|
|
if(err!=0) saveLog(IntToStr(err)+"(PrinterOPOS::OpenShift)"+GetStatusDescription(err));
|
|
|
|
err=fp->SetVatValue(1,L"120");
|
|
|
|
return err==0;
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
bool PrinterOPOS::DayOpened()
|
|
{
|
|
return fp->DayOpened;
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
bool PrinterOPOS::setTrainingMode(bool val)
|
|
{
|
|
if(getTrainingMode()==val) return true;
|
|
long err;
|
|
if(val) err=fp->BeginTraining(); else err=fp->EndTraining();
|
|
|
|
AnsiString str=getLastError(&err);
|
|
if(err!=0) saveLog(IntToStr(err)+"(PrinterOPOS::setTrainingMode)"+str);
|
|
|
|
return err==0;
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
bool PrinterOPOS::getTrainingMode()
|
|
{
|
|
return fp->TrainingModeActive;
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
//Çàïîëíåíèå ìàññèâà ñ ñóììàìè ïî íàëîãîâûì ñòàâêàì
|
|
bool PrinterOPOS::setNalog(long n,float stavka)
|
|
{
|
|
// long s=stavka*100;
|
|
// WideString str=IntToStr(s);
|
|
BSTR s1=L"120";
|
|
long err = fp->DirectIO(2, &n, &s1);
|
|
if(err!=0) saveLog(IntToStr(err)+"(PrinterOPOS::OpenShift)"+GetStatusDescription(err));
|
|
|
|
return err==0;
|
|
}
|
|
//---------------------------------------------------------------------------
|
|
//Äíåâíîé èòîã
|
|
int PrinterOPOS::getDaySum()
|
|
{
|
|
try
|
|
{
|
|
long n=1;
|
|
BSTR str=new OLECHAR[20];
|
|
long err=fp->DirectIO (300,&n,&str);
|
|
if(err!=0)throw Exception("["+IntToStr(err)+"]"+GetStatusDescription(err));
|
|
return StrToInt(str)/100.0;
|
|
}catch(...)
|
|
{
|
|
saveLog("(PrinterOPOS::getDaySum) Íåò îïèñàíèÿ îøèáêè");
|
|
dModule->SendError(1,"(PrinterOPOS::getDaySum) Íåò îïèñàíèÿ îøèáêè");
|
|
return 0;
|
|
}
|
|
}
|