[#Menu :Gate way of Tally]
Add :Button :Refresh TDL
[Button :Refresh TDL]
Title :"Refresh TDL"
Key :F5
Action :Refresh TDL
[System :Form keys]
Key :Refresh TDL
[System :Menu Keys]
Key :Refresh TDL
[#Form :Default]
Key :Refresh TDL
;;Rajiv Balance Sheet
[#Menu: Gate Way Of Tally]
Add : Item : Rajiv Balance Sheet : Display : Rajiv Balance Sheet
[Report: Rajiv Balance Sheet]
Use : DSP Template
; Set : SV From Date : ##SVFromDate ;;$$MonthStart:##SVCurrentDate
; Set : SV To Date : ##SVToDate ;;$$MonthEnd:##SVCurrentDate
[Form: Rajiv Balance Sheet]
Use : DSP Template
Part : Rajiv Balance Sheet
Width : 100% Page
Height : 100% Page
[Part: Rajiv Balance Sheet]
Line : Rajiv Balance Sheet,bd
Repeat:bd:ledgerout
Scroll : Both
[Line : Rajiv Balance Sheet]
Fields : partynem,Month Field
Repeat:Month Field: Monthcoll
[Field:partynem]
Use:name field
Set as:"Party Name"
[Line:bd]
Add:Field:bd,amtd
Repeat : amtd : Monthcoll
[Field:bd]
Use:name field
Set as:$na
[Field:amtd]
Use:amount field
Set as:$$amtfn:#bd:mad:DFrom:mad:DTo
DFrom : $$PeriodDateFrom
DTo : $$PeriodDateTo
[Function:amtfn]
Parameter : PartyName :String
Parameter : PerFrom :Date
Parameter : PerTo :Date
Variable : SVFromDate : Date
Variable : SVToDate : Date
Variable : RetAmt : Amount
Return : Amount
05: Log: ##PerFrom
06: Log: ##PerTo
08: Set : RetAmt : ($$AsAmount:0)
09: Log: ##RetAmt
01:Set:SVFromDate : ##SVFromDate
02:Set:SVToDate : ##PerTo
03:Set:RetAmt: ($$FilterAmtTotal:SaleVchsSum:SelLedName:$Amount) - ($$FilterAmtTotal:RecptVchsSum:SelLedName:$Amount)
07: Log: ##RetAmt
04: Return : ##RetAmt
[Collection: Rajiv Balance SheetLedCol]
Type : Ledger
Fetch: Name, ClosingBalance
Filter: SelLedName
[Collection: SaleVchs]
Type : Vouchers : VoucherType
Child Of : $$VchTypeSales
[Collection: SaleVchsSum]
Source Collection : SaleVchs
Walk : Ledger Entries
By : LedgerName : $LedgerName
By : Date : $..Date
Aggr Compute : Amount : Sum : $Amount
[Collection: RecptVchs]
Type : Vouchers : VoucherType
Child Of : $$VchTypeReceipt
[Collection: RecptVchsSum]
Source Collection : RecptVchs
Walk : Ledger Entries
By : LedgerName : $LedgerName
By : Date : $..Date
Aggr Compute : Amount : Sum : $Amount
[System: Formulae]
SelLedName : $LedgerName = ##PartyName
[Field:Month Field]
Use: Name Field
Set as : $MonthName
[Collection: Monthcoll]
Type : Period
Repeat : Month
ClientOnly : Yes
Compute : MonthName: $$FullMonthName:$$PeriodDateFrom
[Collection:ledgerout]
Type:ledger
Child Of:$$GroupSundryDebtors
Compute:na:$name
Compute:bal:$closingbalance
;; select $na,$bal from ledgerout
कोई टिप्पणी नहीं:
एक टिप्पणी भेजें