;**********************************************************; ;*********************================*********************; ;*********************| Explore Busy |*********************; ;*********************================*********************; ;**********************************************************; [#Menu:Gateway of Tally] Add : Key Item : before : @@locQuit: User DashBoard : O : Display : EBDashBoard [Report:EBDashBoard] Form : EBDashBoard Object : Company [Form:EBDashBoard] Width : 99% Page Part : EBDashBoardMain [Part:EBDashBoardMain] Left Part : EBDashBoardLeft,EBDashBoardMidd2 Vertical : No [Part:EBDashBoardLeft] Part : EBDBCash,EBDBCashFlow,EBDBPS,EBDBOutstanding,EBDBFixed,EBDBLoan,EBDBProfitLoss,EBDBPS;EBDBFixed Space Left : 8 mm Space Right : 8 mm Width : 30% Page Vertical : Yes [Part:EBDashBoardMidd2] Part : EBBottItems Space Left : 8 mm Space Right : 8 mm Space Top : 8 mm Width : 30% Screen Vertical : Yes ;;======================== Top ======================= [Part:EBDBCash] Use : EBDBDefault Part Line : EBDBCashTitle,EBDBCash,EBDBBank,EBDBCashTot [Line:EBDBCashTitle] Field : EBDBTitle Field Local : Field : EBDBTitle Field : Set as : "Cash & Bank" [Line:EBDBCash] Field : EBDBMedium Prompt,EBDBAmount Field Local : Field : Default : Full Width: Yes Local : Field : EBDBMedium Prompt : Set as : "Cash Balance:" Local : Field : EBDBAmount Field : Set as : @@CashBalance Local : Field : EBDBAmount Field : Format : "DrCr" [Line:EBDBBank] Field : EBDBMedium Prompt,EBDBAmount Field Local : Field : Default : Full Width: Yes Local : Field : EBDBMedium Prompt : Set as : "Bank Balance:" Local : Field : EBDBAmount Field : Set as : @@BankBalance Local : Field : EBDBAmount Field : Format : "DrCr" [Line:EBDBCashTot] Field : EBDBMedium Prompt,EBDBAmount Field Local : Field : Default : Full Width: Yes Local : Field : EBDBMedium Prompt : Set as : "Total:" Local : Field : EBDBAmount Field : Set as : If $$IsDr:@@BankBalance AnD $$IsDr:@@CashBalance then @@BankBalance+@@CashBalance else + @@CashBalance-@@BankBalance Local : Field : EBDBAmount Field : Format : "DrCr" Local : Field : EBDBAmount Field : Border : Totals [Part:EBDBCashFlow] Use : EBDBDefault Part Line : EBDBCashFlowTitle,EBDBCashInFlow,EBDBCashOutFlow,EBDBCashFlowTot [Line:EBDBCashFlowTitle] Field : EBDBTitle Field Local : Field : EBDBTitle Field : Set as : "Cash Flow" [Line:EBDBCashInFlow] Field : EBDBMedium Prompt,EBDBAmount Field Local : Field : Default : Full Width: Yes Local : Field : EBDBMedium Prompt : Set as : "Cash-in-Flow:" Local : Field : EBDBAmount Field : Set as : @@CashInFlowTot Local : Field : EBDBAmount Field : Format : "DrCr" [Line:EBDBCashOutFlow] Field : EBDBMedium Prompt,EBDBAmount Field Local : Field : Default : Full Width: Yes Local : Field : EBDBMedium Prompt : Set as : "Cash-out-Flow:" Local : Field : EBDBAmount Field : Set as : @@CashOutFlowTot Local : Field : EBDBAmount Field : Format : "DrCr" [Line:EBDBCashFlowTot] Field : EBDBMedium Prompt,EBDBAmount Field Local : Field : Default : Full Width: Yes Local : Field : EBDBMedium Prompt : Set as : "Total:" Local : Field : EBDBAmount Field : Set as : If $$IsDr:@@CashInFlowTot AnD $$IsDr:@@CashOutFlowTot then @@CashInFlowTot+@@CashOutFlowTot else + @@CashInFlowTot-@@CashOutFlowTot Local : Field : EBDBAmount Field : Format : "DrCr" Local : Field : EBDBAmount Field : Border : Totals [Part:EBDBOutstanding] Use : EBDBDefault Part Line : EBDBOutctandingTitle,EBDBReceivable,EBDBPayable,EBDBOutstandingTot [Line:EBDBOutctandingTitle] Field : EBDBTitle Field Local : Field : EBDBTitle Field : Set as : "Outstandings" [Line:EBDBReceivable] Field : EBDBMedium Prompt,EBDBAmount Field Local : Field : Default : Full Width: Yes Local : Field : EBDBMedium Prompt : Set as : "Receivables:" Local : Field : EBDBAmount Field : Set as : @@OutstandingRec Local : Field : EBDBAmount Field : Format : "DrCr" [Line:EBDBPayable] Field : EBDBMedium Prompt,EBDBAmount Field Local : Field : Default : Full Width: Yes Local : Field : EBDBMedium Prompt : Set as : "Payables:" Local : Field : EBDBAmount Field : Set as : @@OutstandingPay Local : Field : EBDBAmount Field : Format : "DrCr" [Line:EBDBOutstandingTot] Field : EBDBMedium Prompt,EBDBAmount Field Local : Field : Default : Full Width: Yes Local : Field : EBDBMedium Prompt : Set as : "Total:" Local : Field : EBDBAmount Field : Set as : If $$IsDr:@@OutstandingPay AnD $$IsDr:@@OutstandingRec then @@OutstandingRec+@@OutstandingPay else + @@OutstandingRec-@@OutstandingPay Local : Field : EBDBAmount Field : Format : "DrCr" Local : Field : EBDBAmount Field : Border : Totals [Part:EBDBPS] Use : EBDBDefault Part Line : EBDBPSTitle,EBDBSales,EBDBPurchase [Line:EBDBPSTitle] Field : EBDBTitle Field Local : Field : EBDBTitle Field : Set as : "Purchase & Sales" [Line:EBDBSales] Field : EBDBMedium Prompt,EBDBAmount Field Local : Field : Default : Full Width: Yes Local : Field : EBDBMedium Prompt : Set as : "Total Sales" Local : Field : EBDBAmount Field : Set as : @@SalesTotVal Local : Field : EBDBAmount Field : Format : "DrCr" [Line:EBDBPurchase] Field : EBDBMedium Prompt,EBDBAmount Field Local : Field : Default : Full Width: Yes Local : Field : EBDBMedium Prompt : Set as : "Total Purchase" Local : Field : EBDBAmount Field : Set as : @@PurchaseTotVal Local : Field : EBDBAmount Field : Format : "DrCr" ;======================= Midd1 ============================== [Part:EBDBFixed] Use : EBDBDefault Part Line : EBDBFixedTitle,EBDBCapital,EBDBFixed;,EBDBOutstandingTot [Line:EBDBFixedTitle] Field : EBDBTitle Field Local : Field : EBDBTitle Field : Set as : "Capital & Fixed Assets" [Line:EBDBCapital] Field : EBDBMedium Prompt,EBDBAmount Field Local : Field : Default : Full Width: Yes Local : Field : EBDBMedium Prompt : Set as : "Capital Invested:" Local : Field : EBDBAmount Field : Set as : @@CapitalTotal Local : Field : EBDBAmount Field : Format : "DrCr" [Line:EBDBFixed] Field : EBDBMedium Prompt,EBDBAmount Field Local : Field : Default : Full Width: Yes Local : Field : EBDBMedium Prompt : Set as : "Fixed Assets:" Local : Field : EBDBAmount Field : Set as : @@FixedAssTotal Local : Field : EBDBAmount Field : Format : "DrCr" [Part:EBDBLoan] Use : EBDBDefault Part Line : EBDBLoanTitle,EBDBLoan,EBDBAdvance [Line:EBDBLoanTitle] Field : EBDBTitle Field Local : Field : EBDBTitle Field : Set as : "Loans" [Line:EBDBLoan] Field : EBDBMedium Prompt,EBDBAmount Field Local : Field : Default : Full Width: Yes Local : Field : EBDBMedium Prompt : Set as : "Loans & Liablity:" Local : Field : EBDBAmount Field : Set as : @@LoanLiabiltyTot Local : Field : EBDBAmount Field : Format : "DrCr" [Line:EBDBAdvance] Field : EBDBMedium Prompt,EBDBAmount Field Local : Field : Default : Full Width: Yes Local : Field : EBDBMedium Prompt : Set as : "Loans & Advances:" Local : Field : EBDBAmount Field : Set as : @@LoanAssetTot Local : Field : EBDBAmount Field : Format : "DrCr" [Part:EBDBProfitLoss] Use : EBDBDefault Part Line : EBDBProfitTitle,EBDBGProfit,EBDBNProfit [Line:EBDBProfitTitle] Field : EBDBTitle Field Local : Field : EBDBTitle Field : Set as : "Profit & Loss" [Line:EBDBGProfit] Field : EBDBMedium Prompt,EBDBAmount Field Local : Field : Default : Full Width: Yes Local : Field : EBDBMedium Prompt : Set as : "Gross Profit:" Local : Field : EBDBAmount Field : Set as : @@GrossProfitTot Local : Field : EBDBAmount Field : Format : "DrCr" [Line:EBDBNProfit] Field : EBDBMedium Prompt,EBDBAmount Field Local : Field : Default : Full Width: Yes Local : Field : EBDBMedium Prompt : Set as : "Net Profit:" Local : Field : EBDBAmount Field : Set as : @@NetProfitTot Local : Field : EBDBAmount Field : Format : "DrCr" ;=========================== Midd2 ======================== [Part:EBBottItems] Width : 35 Line : TopItemsTitle,TopItems Repeat : TopItems : TopItems Border : Thin Box Scroll : Vertical [Line:TopItemsTitle] Field : EBDBTitle Field Local : Field : EBDBTitle Field : Set as : "Fast Moving Items" [Line:TopItems] Left Field : TopItemName Empty : If $$Line>5 Then Yes Else No Space Bottom : 1 mm [Field:TopItemName] Use : Simple Field Set as : $$LocaleString:$$Line+". "+$IName+"("+$$LocaleString:$BilledQty+")" Full Width : Yes ;===================== Defaults ========================== [Part:EBDBDefault Part] Space Bottom : 5 mm Border : Thin Box Width : 25% Page [Field:EBDBTitle Field] Use : Simple Field Align : Center Width : 100 Style : Normal Bold Full Width : Yes Background : MenuTitleBGClr Color : White [Field:EBDBMedium Prompt] Use : Long Prompt Space Left : 3 mm [Field:EBDBLong Prompt] Align : Prompt Width : @@LongWidth+3 Skip : Yes Fixed : Yes [Field:EBDBAmount Field] Use : Amount Field Space Right : 5 mm [Collection: TopItemDefault] Type : Vouchers : VoucherType Child of : $$VchTypeSales Belongs to : Yes Fetch : Stock Item Name,PartyLedgerName,BilledQty,Rate,Amount [Collection:TopItems] Source Collection : TopItemDefault Walk : Inventory Entries By : IName : $StockItemName Aggr Compute : BilledQty : SUM : $BilledQty Sort : Asc : $BilledQty Fetch : PartyLedgerName [System:Formula] CashBalance : $$NettAmount:($BSClosing:Group:"Cash-in-Hand"):($ForexClosing:Group:"Cash-in-Hand") BankBalance : $$NettAmount:($BSClosing:Group:"Bank Accounts"):($ForexClosing:Group:"Bank Accounts") LoanLiabiltyTot : $$NettAmount:($BSClosing:Group:"Loans (Liability)"):($ForexClosing:Group:"Loans (Liability)") LoanAssetTot : $$NettAmount:($BSClosing:Group:"Loans & Advances (Asset)"):($ForexClosing:Group:"Loans & Advances (Asset)") CashInFlowTot : $CashInFlow:Company:##SVCurrentCompany CashOutFlowTot : $CashOutFlow:Company:##SVCurrentCompany CapitalTotal : $$NettAmount:($BSClosing:Group:"Capital Account"):($ForexClosing:Group:"Capital Account") FixedAssTotal : $$NettAmount:($BSClosing:Group:"Fixed Assets"):($ForexClosing:Group:"Fixed Assets") SalesTotVal : $ClosingBalance:Group:$$GroupSales PurchaseTotVal : $ClosingBalance:Group:$$GroupPurchase GrossProfitTot : $$AsPositive:$$Negative:$ClosingGrossProfit:Company:##SVCurrentCompany NetProfitTot : $$AsPositive:$$Negative:$ClosingProfit:Company:##SVCurrentCompany OutstandingRec : $$CollAmtTotal:NLCompanyReceivables:$ClosingBalance OutstandingPay : $$CollAmtTotal:NLCompanyPayables:$ClosingBalance ;**********************************************************; ;*********************================*********************; ;*********************| Explore Busy |*********************; ;*********************================*********************; ;**********************************************************;