´@ORIENTATION=0 PAPERSIZE=1  Courier New wallnotepadBTahoma!empty(wallnotepad)subst(ALLT(DESC),1,46)BTahomaALLT(STR(ENT,12)) Courier Newallt(subst(ALLT(note),46,50))B Yekan%!empty(allt(subst(ALLT(note),46,50)))"ريال""@J"B Titrm!empty(allt(TRANSFORM((factsel->selprice+factsel->service-factsel->deduce-factsel->e1)*1,'999,999,999,999')))"قلم""@J"B Titr!empty(ALLT(STR(wkitent,12)))ALLT(STR(wkitent,12)) Courier Newپallt(TRANSFORM(factsel->selprice+factsel->service+factsel->dishprice-factsel->deduce-factsel->e1+factsel->tax,'999,999,999,999')) Courier New!empty(wweslah)wweslahB TitrOROOZ(st(allt(Ffactdate)))+' '+allt(Ffactdate)+' '+' '+'ساعت'+' '+LEFT(TIME(),5)B Titr "شرح كالا""@J"B Titr"تعداد""@J"B Titr ":كداشتراك""@J"B Titrval(wpercode)>0&iif(empty(wboncode),wpercode,wboncode)B Titrval(wpercode)>0 wpaddress1Tahoma wpaddress2TahomawpernameTahomawdescB Titrr New'*'+' '+'قبض آشپزخانه'+' '+'*'B Titr wtabledeskB Titr9right('000'+alltrim(str(FACTNO,10)),3)+' : '+'شماره نوبت'B Titr)alltrim(str(FACTNO,10))+' : '+'ش. فاکتور'B Titr RESTBARFILE  RESTBARCODEwkitentent0 Courier NewBTahomaBTahoma Courier NewB YekanB TitrB Titr Courier NewB TitrB TitrTahomaB TitrB Titrdataenvironment~Top = 179 Left = 27 Width = 520 Height = 200 Visible = .F. TabStop = .F. DataSource = .NULL. Name = "Dataenvironment" ORIENTATION=0 PAPERSIZE=1  Courier New wallnotepadBTahoma!empty(wallnotepad)subst(ALLT(DESC),1,46)BTahomaALLT(STR(ENT,12)) Courier Newallt(subst(ALLT(note),46,50))B Yekan%!empty(allt(subst(ALLT(note),46,50)))"ريال""@J"B Titrm!empty(allt(TRANSFORM((factsel->selprice+factsel->service-factsel->deduce-factsel->e1)*1,'999,999,999,999')))"قلم""@J"B Titr!empty(ALLT(STR(wkitent,12)))ALLT(STR(wkitent,12)) Courier Newپallt(TRANSFORM(factsel->selprice+factsel->service+factsel->dishprice-factsel->deduce-factsel->e1+factsel->tax,'999,999,999,999')) Courier New!empty(wweslah)wweslahB TitrOROOZ(st(allt(Ffactdate)))+' '+allt(Ffactdate)+' '+' '+'ساعت'+' '+LEFT(TIME(),5)B Titr "شرح كالا""@J"B Titr"تعداد""@J"B Titr ":كداشتراك""@J"B Titrval(wpercode)>0&iif(empty(wboncode),wpercode,wboncode)B Titrval(wpercode)>0 wpaddress1Tahoma wpaddress2TahomawpernameTahomawdesc Courier New'*'+' '+'قبض آشپزخانه'+' '+'*'B Titr wtabledeskB Titr9right('000'+alltrim(str(FACTNO,10)),3)+' : '+'شماره نوبت'B Titr)alltrim(str(FACTNO,10))+' : '+'ش. فاکتور'B Titr RESTBARFILE  RESTBARCODEwkitentent0 Courier NewBTahomaBTahoma Courier NewB YekanB TitrB Titr Courier NewB TitrB TitrTahomaB TitrB Titrdataenvironment~Top = 179 Left = 27 Width = 520 Height = 200 Visible = .F. TabStop = .F. DataSource = .NULL. Name = "Dataenvironment"