<% logedin=.t. crlf=chr(13)+chr(10) thekot=orequest.form('kot') if isnull(thekot) thekot=orequest.querystring('kot') endif hotelelements=[] imagepath=addbs(oprop.appstartpath)+[images\] IF isnull(thekot) or EMPTY(thekot) thekot=[AUTO] txtKOTID=thekot lkpSaleman=[140000] txtTBLID=[] tsql=[select almara,CNT(almara) from (']+dbclocation+[itemmast') group by almara where packing='HOTEL MENU' order by almara into cursor menus] &tsql tsql=[SELECT itemid, name, sale, almara,extra FROM (']+dbclocation+[itemmast') where packing='HOTEL MENU' order by almara INTO CURSOR menuitems] &tsql thealmara=[Miscellaneous] scan menuhead=[] if not allt(almara)==thealmara thealmara=allt(almara) select [menus] locate for allt(almara)==thealmara midcol=[] if file(imagepath+thealmara+'.png') imgsource=[] else imgsource=iif(empty(almara),'Miscellaneous',allt(almara)) endif midcol=midcol+imgsource+[] menuhead=[
]+iif(empty(thealmara),'Miscellaneous',allt(thealmara))+[
] else midcol=[] endif select 'menuitems' therowid=[row_]+allt(itemid) theqtid=[qt_]+allt(itemid) theslid=[sl_]+allt(itemid) thettid=[tt_]+allt(itemid) menuitem=menuhead+[
] menuitem=menuitem+[]+allt(itemid)+[] menuitem=menuitem+[]+allt(name)+[] menuitem=menuitem+[]+allt(transform(round(Sale,2)))+[] menuitem=menuitem+[
] menuitem=menuitem+[] menuitem=menuitem+[
] menuitem=menuitem+[0] menuitem=menuitem+[]+allt(extra)+[]+midcol *cmdtext="delete " *menuitem=menuitem+[]+cmdtext+[] menuitem=menuitem+[
]+chr(13)+chr(10) hotelelements=hotelelements+menuitem endscan ELSE thekot=allt(transform(thekot)) tsql=[SELECT * FROM (']+dbclocation+[kot') WHERE allt(kotid)==']+thekot+[' INTO CURSOR otcsdata READWRITE] &tsql txtKOTID=kotid lkpSaleman=Saleman txtTBLID=opt ENDIF tsql=[SELECT * FROM (']+dbclocation+[accounts') ORDER BY name INTO CURSOR salemen where left(accountid,2)='14'] &tsql selectopts=[] do while not eof() selectopts=selectopts+[]+allt(name)+[]+crlf skip enddo *select [otcsdata] %>
Transfer
KOT Amount: <%=iif(empty(xcompany.currency),'Rs.',allt(xcompany.currency))%> 0
Waiter
Table/Room#
Item
QTY
Price

ID# | Details | Price |  | Qty |  | Total | LOC | type
--- | --- | --- | --- | --- | --- | --- | --- | ---
<%=hotelelements%>