******* Sales Invoice Header , Define PrintDuplicate=.t. to print duplictae massage} ******* SortedItems:=.t. for sorted printing,SortedBy=>"G" for Group Wise Sorting , SortedBy="T" for Tax Wise Sorting ,SortedBy="PDSH" for ShelfWise Sorting ******* PrintAllPendingOrder:=.t. will be used for Showing all pending order of a customer ******* PrnShdCode:=.t. will be used for Print Schedule Flag and mShdcode and mShdDesc for code and schedule print. ******* MrpValue,FMrpValue,SI_AdScAmt,SI_CrNoteAmt,SI_FMrpValue,SI_FTaxableAmt,SI_FTaxAmt,SI_InvDiscAmt,SI_MrpValue,SI_NetAmt,SI_ProdDiscAmt,SI_SaleAmt,SI_ScAmt,SI_TaxableAmt,SI_TaxAmt {||topline:=20,itemline:=1,CFline:=0,BFLine:=0,sireturn:=5,SiRetDtl:=2,SiRepl:=0,CnLine:=0,DiscLine:=0,taxline:=0,frtline:=0,; replline:=0,crline:=0,netline:=0,GridLine:=0,bottomline:=19,msgline:=0,SortedItems:=.f.,Blnkline:=1,PrintAllPendingOrder:=.f.,POrderLine:=0,PrnShdCode:=.f.,printocd:=.t.} ******* Print Header {||ROut(""),; BarOut(_TLCBAR),; BarOut(_HZBAR,PageWidth()-2),; BAROUT(_HZBAR,2.4),; BarOut(_TRCBAR)} {||ROut(""),; BarOut(_BAR),; RROut(AllTrim(mname),(Pagewidth()-3)/2,_CENTER,_EXPLARGE),; RROUT("",2.4),; RROut("",1),; BarOut(_BAR),IIF(MTOTVALUE=0,CARGO1:=0,NIL)} {||ROut(""),; BarOut(_BAR),; RROut(ALLTRIM(MADDRESS1),Pagewidth()-2,_CENTER),; RROUT("",2.4),; BarOut(_BAR),ACCOUNTTBL:SEEK(FV(HDRTBL,"SISTOCKIST"))} {||ROut(""),; BarOut(_BAR),; RROut(ALLTRIM(MADDRESS2)+", "+AllTrim(MSTATION)+" "+ALLTRIM(MPIN),Pagewidth()-2,_CENTER),; RROUT("",2.4),; BarOut(_BAR)} {||ROut(""),; BarOut(_BAR),; RROut("Phone.No.:- "+"(O): "+AllTrim(MPHONE1)+" (R): "+AllTrim(MPHONE2) ,Pagewidth()-2,_CENTER),; RROUT("",2.4),; BarOut(_BAR)} {||ROut(""),; BarOut(_BAR),; RROut("GSTIN:"+alltrim(MGSTNO) ,25),; RROUT("Email : "+alltrim(memail),PAGEWIDTH()-50,_CENTER),; RROUT("TIN No.:"+ALLTRIM(MRSTNO),23),; RROUT("",2.4),; barOut(_BAR)} {||ROut(""),; BarOut(_BAR),; RROut("DL No.:- "+AllTrim(MLICNO)+","+alltrim(mlicno2),32),; RROUT("",PAGEWIDTH()-57,_CENTER),; RROUT("F. L.No:"+ALLTRIM(MFOODLIC),25.4),; BarOut(_BAR)} {||ROut(""), BarOut(_bar), Barout(_HZBAR,Pagewidth()-38), BarOut(_TBAR), BarOut(_HZBAR,35), BAROUT(_HZBAR,2.4), BarOut(_bar)} {||ROut(""),; BarOut(_BAR),; RROut("Name & Address of Consginee : ",Pagewidth()-45,_LEFT,_ul),; rrout("",7),; BarOut(_BAR),; RROut("Invoice No. ",12,_LEFT,_EMPH_DS),; RROut(AllTrim(Str(PRNINVNO,6)),7),; RROUT("Date :",6),; rrout(dtoc(invdate),10),; RROUT("",2.4),; BarOut(_BAR)} {||ROut(""),; BarOut(_BAR),; RROut(AllTrim(FV(CUSTTBL,"CUname")),Pagewidth()-38,_LEFT),; BarOut(_BAR),; RROut("Order No.",9,_LEFT),; RROut(FV(HDRTBL,"SIorderno"),10),; RROut("Date :",6,_LEFT),; RROut(DToC(FV(HDRTBL,"SIordate")),10),; RROUT("",2.4),; BarOut(_BAR)} {||ROut(""),; BarOut(_BAR),; RROut(fv(CUSTTBL,"CUaddress1")+","+(fv(custtbl,"cuaddress2")),Pagewidth()-38,_LEFT),; BarOut(_BAR),; RROut("G.R. No. ",9,_LEFT,_EMPH_DS),; RROut(FV(HDRTBL,"SIMTRNO"),10),; RROUT("Date :",6),; RROut(DToC(FV(HDRTBL,"SImtrdate")),10),; RROUT("",2.4),; BarOut(_BAR)} {||ROut(""),; BarOut(_BAR),; RROut(fv(CUSTTBL,"CUstation"),Pagewidth()-38,_LEFT),; BarOut(_BAR),; RROut("Cases. ",9,_LEFT,_EMPH_DS),; RROut(mSICases,10),; RROUT("Weight :",8),; RROut("",8),; RROUT("",2.4),; BarOut(_BAR)} {||ROut(""),; BarOut(_BAR),; RROut("Phone."+ALLTRIM(FV(CUSTTBL,"CUPHONE")),Pagewidth()-38,_LEFT),; BarOut(_BAR),; RROut("Delivery. ",9,_LEFT),; RROut("",18),; RROut("",8),; RROUT("",2.4),; BarOut(_BAR)} {||ROut(""),; BarOut(_BAR),; RROut("State Code: "+ALLTRIM(MCUSTATECD)+" GSTIN :- "+ALLTRIM(FV(CUSTTBL,"CUGSTNO")),PageWidth()-38),; BarOut(_BAR),; RROut("Transport.",10,_LEFT),; RROut(FV(HDRTBL,"SITRANS"),27.4),; BarOut(_BAR)} {||ROut(""),; BarOut(_BAR),; rrout("DL No. :"+ALLTRIM(FV(CUSTTBL,"CUDLNO"))+", "+Alltrim(FV(CUSTTBL,"CUDLNO1")),Pagewidth()-38,_LEFT),; BarOut(_BAR),; RROut("Document.",10,_LEFT),; RROut(FV(HDRTBL,"SIbank"),27.4),; BarOut(_BAR)} {||ROut(""),; BarOut(_BAR),; rrout("Phone. :"+FV(CUSTTBL,"CUPhone"),Pagewidth()-38,_LEFT),; BarOut(_BAR),; RROut("Due Date.",9,_LEFT),; RROut(DToC(FV(HDRTBL,"siduedate")),10),; RROUT("S.MAN",6),; RROUT(FV(SPTBL,"SPNAME"),12.4,_LEFT,_NORMAL),; BarOut(_BAR)} {||ROut(""),; BarOut(_LMCONNECT),; BarOut(_HZBAR,23.5,,_ELITE),; BarOut(_TBAR),; BarOut(_HZBAR,4,,_ELITE),; BarOut(_TBAR),; BarOut(_HZBAR,7,,_ELITE),; BarOut(_TBAR),; BarOut(_HZBAR,6,,_ELITE),; BarOut(_TBAR),; BarOut(_HZBAR,12,,_ELITE),; BarOut(_TBAR),; BarOut(_HZBAR,6,,_ELITE),; BarOut(_TBAR),; BarOut(_HZBAR,8,,_ELITE),; BarOut(_TBAR),; BarOut(_HZBAR,8,,_ELITE),; BarOut(_TBAR),; BarOut(_HZBAR,8,,_ELITE),; BarOut(_TBAR),; BarOut(_HZBAR,6,,_ELITE),; BarOut(_TBAR),; BarOut(_HZBAR,10,,_ELITE),; BarOut(_TBAR),; BarOut(_HZBAR,10,,_ELITE),; BarOut(_TBAR),; BarOut(_HZBAR,7,,_ELITE),; BarOut(_TBAR),; BarOut(_HZBAR,6,,_ELITE),; BarOut(_RMCONNECT)} {||ROut(""),; BarOut(_BAR),; RROut("Description",23.5,_CENTER,_ELITE),; BarOut(_BAR),; RROut("HSN",4,_CENTER,_ELITE),; BarOut(_BAR),; RROut("Qty ",7,_CENTER,_ELITE),; BarOut(_BAR),; RROut("Unit ",6,_CENTER,_ELITE),; BarOut(_BAR),; RROut("Batch",12,,_ELITE),; BarOut(_BAR),; RROut("Exp.",6,_CENTER,_ELITE),; BarOut(_BAR),; RROut("MRP",8,_Right,_ELITE),; BarOut(_BAR),; RROut("PTS",8,_Right,_ELITE),; BarOut(_BAR),; RROut("PTR",8,_CENTER,_ELITE),; BarOut(_BAR),; RROut("Disc",6,_Right,_ELITE),; BarOut(_BAR),; RROut("Total",10,_Right,_ELITE),; BarOut(_BAR),; RROut("Taxable",10,_Right,_ELITE),; BarOut(_BAR),; RROut("CGST ",7,_CENTER,_ELITE),; BarOut(_BAR),; RROut("SGST",6,_CENTER,_ELITE),; BarOut(_BAR)} {||ROut(""),; BarOut(_LMCONNECT),; BarOut(_HZBAR,23.5,,_ELITE),; BarOut(_plusBAR),; BarOut(_HZBAR,4,,_ELITE),; BarOut(_plusBAR),; BarOut(_HZBAR,7,,_ELITE),; BarOut(_plusBAR),; BarOut(_HZBAR,6,,_ELITE),; BarOut(_plusBAR),; BarOut(_HZBAR,12,,_ELITE),; BarOut(_plusBAR),; BarOut(_HZBAR,6,,_ELITE),; BarOut(_plusBAR),; BarOut(_HZBAR,8,,_ELITE),; BarOut(_plusBAR),; BarOut(_HZBAR,8,,_ELITE),; BarOut(_plusBAR),; BarOut(_HZBAR,8,,_ELITE),; BarOut(_plusBAR),; BarOut(_HZBAR,6,,_ELITE),; BarOut(_plusBAR),; BarOut(_HZBAR,10,,_ELITE),; BarOut(_plusBAR),; BarOut(_HZBAR,10,,_ELITE),; BarOut(_plusBAR),; BarOut(_HZBAR,7,,_ELITE),; BarOut(_plusBAR),; BarOut(_HZBAR,6,,_ELITE),; BarOut(_RMCONNECT)} {||iif(!NewStart,ROut(""),.t.),; iif(!NewStart,BarOut(_hzbar),.t.),; iif(!NewStart,rROut("",PageWidth()-28),.t.),; iif(!NewStart,RROut("Total b/f",17),.t.),; iif(!NewStart,RROut(Tran(totamt,"999999.99"),9,_RIGHT),.t.),; iif(!NewStart,BarOut(_hzbar),.t.)} {||ROut(""),; BarOut(_BAR),; RROut(ALLTRIM(FV(PRODTBL,"PDNAME")),23.5,_left,_ELITE),; BarOut(_BAR),; RROut(ALLTRIM(FV(PRODTBL,"PDHSN")),4,_CENTER,_ELITE),; BarOut(_BAR),; RROut(ALLTRIM(MQTY),7,_CENTER,_ELITE),; BarOut(_BAR),; RROut(ALLTRIM(MPACK),6,_CENTER,_ELITE),; BarOut(_BAR),; RROut(ALLTRIM(FV(STOCKTBL,"STBHNO")),12,,_ELITE),; BarOut(_BAR),; RROut(MDT,6,_CENTER,_ELITE),; BarOut(_BAR),; RROut(TRAN(FV(BATCHTBL,"BHMRP"),"9999.99"),8,_Right,_ELITE),; BarOut(_BAR),; RROut(TRAN(FV(STOCKTBL,"STRATE"),"9999.99"),8,_Right,_ELITE),; BarOut(_BAR),; RROut(TRAN(FV(BATCHTBL,"BHTPRICE"),"9999.99"),8,_Right,_ELITE),; BarOut(_BAR),; RROut(TRAN(FV(STOCKTBL,"STDISCOUNT"),"99.99"),6,_Right,_ELITE),; BarOut(_BAR),; RROut(TRAN(MVALUE,"999999.99"),10,_Right,_ELITE),; BarOut(_BAR),; RROut(TRAN(MAMT,"999999.99"),10,_Right,_ELITE),; BarOut(_BAR),; RROut(TRAN(FV(TAXTBL,"TXSCHRG"),"99%"),7,_CENTER,_ELITE),; BarOut(_BAR),; RROut(CTAXRATE,6,_CENTER,_ELITE),; BarOut(_BAR),CARGO1:=CARGO1+MAMT} ******Borrow Forward Line*** *********Description Line*** ******* Sals Invoice : Print C/f Amount and Continued on next page. ******* Sals Invoice : Print b/f Amount on next page. ******* Sales Invoice : Print Total Amount *********Abatment Line*** *********Discount detail Item Line*** *********Discount Detail Footer Line*** ******* Sales Invoice : Print Discount in Header {||ROUT(""),; BAROUT(_BAR),; RROUT("SALE RETURN",PAGEWIDTH()-2),; RROUT("",1.5),; BAROUT(_BAR)} {||.T.} {||.T.} {||ROut(""),; BarOut(_BAR),; RROut(ALLTRIM(FV(DTBL,"CDTYPE"))+" "+ALLTRIM(FV(PRODTBL,"PDNAME")),23.5,_CENTER,_ELITE),; BarOut(_BAR),; RROut(ALLTRIM(FV(PRODTBL,"PDHSN")),4,_CENTER,_ELITE),; BarOut(_BAR),; RROut(TRAN(FV(DTBL,"CDQTY"),"9999"),7,_CENTER,_ELITE),; BarOut(_BAR),; RROut(ALLTRIM(MPACK),6,_CENTER,_ELITE),; BarOut(_BAR),; RROut(ALLTRIM(FV(DTBL,"CDBHNO")),12,,_ELITE),; BarOut(_BAR),; RROut(MDT,6,_CENTER,_ELITE),; BarOut(_BAR),; RROut(TRAN(FV(DTBL,"CDMRP"),"9999.99"),8,_Right,_ELITE),; BarOut(_BAR),; RROut(TRAN(FV(DTBL,"CDPRICE"),"9999.99"),8,_Right,_ELITE),; BarOut(_BAR),; RROut("",8,_Right,_ELITE),; BarOut(_BAR),; RROut(TRAN(FV(DTBL,"CDDISCOUNT"),"99.99"),6,_Right,_ELITE),; BarOut(_BAR),; RROut(TRAN(FV(DTBL,"CDAMOUNT"),"999999.99"),10,_Right,_ELITE),; BarOut(_BAR),; RROut("",10,_Right,_ELITE),; BarOut(_BAR),; RROut(TRAN(FV(TAXTBL,"TXSCHRG"),"99.9"),7,_CENTER,_compress),; BarOut(_BAR),; RROut(TRAN(FV(TAXTBL,"TXRSTRATE"),"99.9"),6,_CENTER,_compress),; BarOut(_BAR)} {||.T.} {||ROut(""),; BarOut(_LMCONNECT),; BarOut(_HZBAR,23.5,,_ELITE),; BarOut(_INVTBAR),; BarOut(_HZBAR,4,,_ELITE),; BarOut(_INVTBAR),; BarOut(_HZBAR,7,,_ELITE),; BarOut(_INVTBAR),; BarOut(_HZBAR,6,,_ELITE),; BarOut(_INVTBAR),; BarOut(_HZBAR,12,,_ELITE),; BarOut(_invtBAR),; BarOut(_HZBAR,6,,_ELITE),; BarOut(_invtBAR),; BarOut(_HZBAR,8,,_ELITE),; BarOut(_INVTBAR),; BarOut(_HZBAR,8,,_ELITE),; BarOut(_INVTBAR),; BarOut(_HZBAR,8,,_ELITE),; BarOut(_PLUSBAR),; BarOut(_HZBAR,6,,_ELITE),; BarOut(_PLUSBAR),; BarOut(_HZBAR,10,,_ELITE),; BarOut(_PLUSBAR),; BarOut(_HZBAR,10,,_ELITE),; BarOut(_PLUSBAR),; BarOut(_HZBAR,7,,_ELITE),; BarOut(_PLUSBAR),; BarOut(_HZBAR,6,,_ELITE),; BarOut(_RMCONNECT)} {||ROut(""),; BarOut(_BAR),; RROut("",3,,_ELITE),; RROUT("",1),; RROut("",23.5,,_ELITE),; RROUT("",1),; RROut("",4,,_ELITE),; RROUT("",1),; RROut("Total ",7,,_ELITE),; RROUT("",1),; RROut("",6,,_ELITE),; RROUT("",1),; RROut("",12,,_ELITE),; RROUT("",1),; RROut("",8,,_ELITE),; RROUT("",1),; RROut("",8,,_ELITE),; RROUT("",1),; RROut("",11,,_ELITE),; BarOut(_PLUSBAR),; RROut(TRAN(MDISCOUNT,"999.99"),6,_CENTER,_ELITE),; BarOut(_PLUSBAR),; RROut(TRAN(TOTAMT,"999999.99"),10,_CENTER,_ELITE),; BarOut(_PLUSBAR),; RROut(TRAN(CARGO1,"999999.99"),10,_CENTER,_ELITE),; BarOut(_PLUSBAR),; RROut(TRAN(MSCAMT,"9999.99"),7,_CENTER,_ELITE),; BarOut(_PLUSBAR),; RROut(TRAN(TAX,"999.99"),6,_CENTER,_ELITE),; BarOut(_RMCONNECT)} {||ROut(""),; BarOut(_LMCONNECT),; BAROUT(_HZBAR,PageWidth()-2),; BAROUT(_HZBAR,2.4),; BarOut(_RMCONNECT)} {||ROUT(""),; BAROUT(_BAR),; RROUT("Current Due Balance :- "+TRAN(abs(FV(ACCOUNTTBL,"ACCURBAL")),"9999999.99"),PAGEWIDTH()-28),; RROut(iif(finished,"TOTAL :","Total c/f "),17),; RROut(Tran(totamt,"999999.99"),9,_RIGHT),; RROUT("",2.4),; BAROUT(_BAR)} {||ROut(""), BarOut(_LMCONNECT), Barout(_HZBAR,Pagewidth()-38), BarOut(_HZBAR,36), BAROUT(_HZBAR,2.4), BarOut(_RMCONNECT)} {||IIF(FINISHED,ROUT(""),.T.),; IIF(FINISHED,BAROUT(_BAR),.T.),; iif(Finished,rROut("Freight "+tran(INVFREIGHT,"99999.99"),PAGEWIDTH()-28),ROut("",PageWidth()-28,_LEFT,_NORMAL)),; iif(Finished,RROut("DISCOUNT : ",17,_LEFT),.t.),; iif(Finished,RROut(Tran(mDiscount+mCDiscAmt,"999999.99"),9,_RIGHT),.t.),; RROUT("",2.4),; IIF(FINISHED,BAROUT(_BAR),.T.)} {||IIF(FINISHED,ROUT(""),.T.),; IIF(FINISHED,BAROUT(_BAR),.T.),; iif(Finished,rROut(SURTAXSTRING,PageWidth()-28,_LEFT,_NORMAL),.t.),; iif(Finished,RROut("CGST :",18,_LEFT),.t.),; iif(finished,RROut(Tran(mscamt,"99999.99"),8,_RIGHT),.t.),; RROUT("",2.4),; IIF(FINISHED,BAROUT(_BAR),.T.)} {||IIF(FINISHED,ROUT(""),.T.),; IIF(FINISHED,BAROUT(_BAR),.T.),; iif(Finished,rROut("SGST"+SUBSTR(VTAXSTRING,14),PageWidth()-28,_LEFT,_NORMAL),.t.),; iif(Finished,RROut("SGST :",18,_LEFT),.t.),; iif(finished,RROut(Tran(tax,"99999.99"),8,_RIGHT),.t.),; iif(finished,rrout("",2.4),.t.),; IIF(FINISHED,BAROUT(_BAR),.T.)} {||IIF(FINISHED,ROUT(""),.T.),; IIF(FINISHED,BAROUT(_BAR),.T.),; iif(Finished,rROut("Insurance",PAGEWIDTH()-28),ROut("",PageWidth()-28,_LEFT,_NORMAL) ),; iif(Finished,RROut("CR/DR Note :",17,_LEFT),.t.),; iif(finished,RROut(Tran(Abs(totcdamt-INVFreight-INVOctroi),"999999.99"),9,_RIGHT),.t.),; iif(!finished,ROut("Continued on "+Str(PageCount()+1,2),PageWidth()/2,_RIGHT,_EXP),.t.),; iif(finished,rrout("",2.4),.t.),; IIF(FINISHED,BAROUT(_BAR),.T.)} {||IIF(FINISHED,ROUT(""),.T.),; IIF(FINISHED,BAROUT(_BAR),.T.),; IIF(FINISHED,RROUT("Amt. of Tax Reverse Charges 0.00",PAGEWIDTH()-28),.T.),; iif(finished,RROUT("Round Off :",17,_left),.t.),; iif(finished,rrout(tran(mrnddiff,"999999.99"),9,_RIGHT),.T.),; iif(finished,rrout("",2.4),.t.),; IIF(FINISHED,BAROUT(_BAR),.T.)} {||IIF(FINISHED,ROUT(""),.T.),; IIF(FINISHED,BAROUT(_BAR),.T.),; IIF(FINISHED,rROut(mamtwords,PageWidth()-28),.T.),; iif(finished,RROut("G. Total(Rs.) :",17),.T.),; iif(finished,RROut(Tran(PRNNETAMT+INVOTHADJ,"999999.99"),9,_RIGHT),.t.),; iif(finished,rrout("",2.4),.t.),; IIF(FINISHED,BAROUT(_bAR),.T.)} {||ROut(""), BarOut(_LMCONNECT), Barout(_HZBAR,Pagewidth()-38), BarOut(_HZBAR,36), BAROUT(_HZBAR,2.4), BarOut(_RMCONNECT)} {||IIF(FINISHED,ROUT(""),.T.),; IIF(FINISHED,BAROUT(_BAR),.T.),; IIF(FINIShED,rROUT("Declaration",Pagewidth()-28),.t.),; IIF(FINIShED,rROUT("Signature",26,_CENTER),.t.),; iif(finished,rrout("",2.4),.t.),; IIF(FINISHED,BAROUT(_BAR),.T.)} {||IIF(FINISHED,ROUT(""),.T.),; IIF(FINISHED,BAROUT(_BAR),.T.),; IIF(FINIShED,rROUT(" ",Pagewidth()-28),.t.),; IIF(FINIShED,rROUT(" ",26,_CENTER),.t.),; iif(finished,rrout("",2.4),.t.),; IIF(FINISHED,BAROUT(_BAR),.T.)} {||IIF(FINISHED,ROUT(""),.T.),; IIF(FINISHED,BAROUT(_BAR),.T.),; IIF(FINIShED,rROUT("Signatory",Pagewidth()-28),.t.),; IIF(FINIShED,rROUT("Name of Designation/Status",26,_CENTER),.t.),; iif(finished,rrout("",2.4),.t.),; IIF(FINISHED,BAROUT(_BAR),.T.)} {||IIF(FINISHED,ROUT(""),.T.),; IIF(FINISHED,BAROUT(_BAR),.T.),; IIF(FINIShED,rROUT(" ",Pagewidth()-28),.t.),; IIF(FINIShED,rROUT(" ",26,_CENTER),.t.),; iif(finished,rrout("",2.4),.t.),; IIF(FINISHED,BAROUT(_BAR),.T.)} {||IIF(FINISHED,ROUT(""),.T.),; IIF(FINISHED,BAROUT(_BAR),.T.),; IIF(FINIShED,rROUT("Electronic Reference Number",Pagewidth()-28),.t.),; IIF(FINIShED,rROUT("Date",26,_CENTER),.t.),; iif(finished,rrout("",2.4),.t.),; IIF(FINISHED,BAROUT(_BAR),.T.)} {||ROut(""),BarOut(_BLCBAR),BarOut(_HZBAR,PageWidth()-2), barout(_hzbar,2.4), BarOut(_BRCBAR)} {||IIF(FINISHED,ROUT(""),.T.)} {||ROut(""),; BarOut(_LMCONNECT),; RROut("",23.5,_CENTER,_ELITE),; BarOut(_BAR),; RROut("",4,_CENTER,_ELITE),; BarOut(_BAR),; RROut(" ",7,_CENTER,_ELITE),; BarOut(_BAR),; RROut(" ",6,_CENTER,_ELITE),; BarOut(_BAR),; RROut(" ",12,_Right,_ELITE),; BarOut(_BAR),; RROut(" ",6,_RIGHT,_ELITE),; BarOut(_PLUSBAR),; RROut("",8,_Right,_ELITE),; BarOut(_PLUSBAR),; RROut("",8,_Right,_ELITE),; BarOut(_PLUSBAR),; RROut(" ",8,_Center,_ELITE),; BarOut(_PLUSBAR),; Rrout(" ",6,_CENTER,_ELITE),; BarOut(_PLUSBAR),; Rrout(" ",10,_CENTER,_ELITE),; BarOut(_PLUSBAR),; Rrout(" ",10,_CENTER,_ELITE),; BarOut(_PLUSBAR),; Rrout(" ",7,_CENTER,_ELITE),; BarOut(_PLUSBAR),; Rrout(" ",6,_CENTER,_ELITE),; BarOut(_RMCONNECT)}