標籤: POS

POS收銀發票紙安裝?

好像常被問到POS機器上的發票要如何更換收執跟存根這件事！乾脆就拍了些照片分享出來

10615497_10152372365721541_4102564396419321322_n
一、發票機上蓋打開後，會發現有二個槽，右邊的叫做發票存根聯（存根聯是店家自己留存用的，而且應依稅捐稽徵機關管理營利事業會計帳簿憑證辦法第27條規定，除應永久保存或有關未結會計事項者外，於會計年度決算程序辦理終了後，至少保存5年。）；左邊的叫做發票收執聯（收執聯是店家給消費者保管,對獎用）。

10348600_10152372365756541_1593691220301017020_n

二、我們先裝存根聯，把黑色定位點朝上

10440967_10152372365801541_2805259296329859052_n

三、接下來按照方向從箭頭處穿入，壓住旁邊的壓桿穿出（沒壓住的話會被擋住）
10615525_10152372365936541_1208175994699616437_n

 

四、接著把紙張插入存根捲紙軸中，記得是順時針方向

 

983827_10152372365981541_8942709199697736152_n

五、完成存根聯安裝

 

10647239_10152372366046541_6579798124903263254_n

六、收執聯也一樣是黑色定位點朝上

10343654_10152372366111541_7844571347815681004_n

七、依照箭頭穿入紙張，按住旁邊的壓桿讓紙張穿出

1240091_10152372369436541_6840354904454565874_n

八、完成後，蓋回上蓋，按住存根進紙以及收執進紙不放讓二聯定位完成即可

1901594_10152372366186541_2042713172510746853_n

九、就可以印出漂亮的發票了

 
相關法令：　營業人使用收銀機辦法
http://law.moj.gov.tw/LawClass/LawContent.aspx?PCODE=G0340084

餐飲控菜系統遇到的多國語系問題

 

 

支援多國語言有許多方法，像是透過ini或是直接在資料庫。

昨天搞了餐廳用的廚房控菜系統後，今天再讓它支援多國語系。因為介面上不多，所以使用ini方式，不過如果使用Delphi7開發的朋友都會知道，遇到不是ansi編碼的ini file會掛掉。

XE後能使用TMemIniFile取代TIniFile，就能克服儲存成unicode讀不出來的問題了！

英 繁 簡

Delphi寫餐飲硬體標準ESC/POS與醫療檢驗儀器連線ASTM通訊有感

下午到舊公司討論電子發票格式相關問題，跟舊同事聊天聊到電子發票支援的硬體時，舊同事也抱怨到POS相關的硬體廠商雖然”宣稱”支援”標準的ESC/POS指令”，但實測起來每台機器還是會呈現出不同的結果。

突然想到之前在做醫療檢驗儀器連線時，即使設備商提到是使用ASTM格式傳輸，但不管是尿液、血液…..適用什麼immuLite、AXSYM、Alastat….最後在做連線通訊時也是不一樣。

這也是做軟硬體結合時，寫程式的悲哀吧XDDD不過寫出來時又是另一種雀躍的心情了～～

早餐店、餐廳、飲料店餐飲POS系統

許多朋友選擇自己創業做老闆時，最常見的創業就是餐飲業為主的方式。無論是自行創業或是加盟，都需要軟硬體設備及架構，當然也有許多人會評估使用餐飲POS系統。

餐飲POS系統依結帳流程不同主要分為先結帳及後結帳二種版本。先結帳版本常見於飲料店或一般早餐店；而後結帳版本主要於餐廳為主。而使用POS系統主要的原因除了提高點餐的正確性、便利性，也可以方便以電腦做管理以及瞭解營業狀況等分析。

目前POS系統價格平均一套在50,000元上下，一套系統大約包含１、POS主機一部　２、出單機　３、標籤機　４、發票機　５、錢櫃 6、餐飲系統軟體。而除了買斷外，亦有每月3000元月租方案的POS系統商。當然除了期初的硬體成本外，出單機、標籤機、發票機也會有耗材(紙張、碳粉)的成本。以及每年與系統廠商的維護合約。

Delphi 多螢幕程式

在設計餐飲程式時，會遇到外接第二螢幕做為客戶顯示或展示廣告。在Delphi如何撰寫?

判斷系統螢幕數量
[pascal]
screen.MonitorCount
[/pascal]

將畫面移至第N螢幕(第一螢幕為0、第二螢幕為1…..)
[pascal]
self.Top := screen.Monitors[0].Top;
self.left := screen.Monitors[0].left;
[/pascal]

餐飲POS雲端叫號系統

好久沒更新部落格了！最近正陷入結案地獄中，不過在網路上看到之前曾提過的取餐叫號器的廠商，引進了新的雲端叫號系統。對於餐飲POS系統的服務又更加升級了，可以先電話預約訂購後，再透過網路知道目前的叫號，在接近時再繞過去拿就行了！這也可以運用在醫療系統上，在預約掛號後，知道目前的叫號號碼。分享給大家！

http://www.ehanway.com.tw/

1246dfb156eb4e0cbbee277485d18ecc

03a5a0f4e4654b9790791d76ee6d649b

Delphi POS – fastreport出單機不固定長度單據

POS餐飲系統開發時，許多朋友常會遇到報表長度問題。像是出單機會依照內容多寡而出現長短不一的狀況。那在報表長度如何設定呢？

fastreport裡的page options內有一個Endless page height　打勾就行了!

未命名 - 1

Delphi POS – 透過USB Printer打開錢櫃

[pascal]
procedure USBOpenCashDrawer(PrinterName: String);
var
// use winspool
Handle, hDeviceMode: THandle;
N: DWORD;
DocInfo1: TDocInfo1;
Device, Driver, Port: array [0 .. 255] of char;
ThePrinter: string;
code:ansistring;
begin
ThePrinter := PrinterName;
Code := chr(27) + chr(64)+ chr(27) + chr(112) + chr(0) + chr(50) + chr(200);

Printer.PrinterIndex := Printer.Printers.Indexof(ThePrinter);
Printer.GetPrinter(Device, Driver, Port, hDeviceMode);
PrinterName := Format(‘%s’, [Device]);
if not WinSpool.OpenPrinter(PChar(PrinterName), Handle, nil) then
begin
// ShowMessage(‘Error : ‘ + IntToStr(GetLastError));
Exit;
end;
with DocInfo1 do
begin
pDocName := ‘Test’;
pOutputFile := nil;
pDataType := ‘RAW’;
end;

WinSpool.StartDocPrinter(Handle, 1, @DocInfo1);
WinSpool.StartPagePrinter(Handle);
WinSpool.WritePrinter(Handle, PAnsiChar(Code), Length(Code), N);
WinSpool.EndPagePrinter(Handle);
WinSpool.EndDocPrinter(Handle);
WinSpool.ClosePrinter(Handle);

end;
[/pascal]