Tally Chapter 223 TDL for Debtor Sales Reciept Balance Report date wise By Rajiv Mishra Computer Class
Few lines are Missing Here.
Pls watch the full video to get full coding.
[#Menu:Gateway of Tally]
Add: Key Item: At End: Party Activity Date Wise : Y : Display : CAB Ledger List : $$IsInventoryOn:$$CurrentCompany
[Report: CAB Ledger List]
Form : CAB Ledger Form
Title : "Debtor Activities Date wise"
[Form: CAB Ledger Form]
Use : DSP Template
Parts : CAB Ledger Part
Height : 50% screen
Width : 100% screen
[Part: CAB Ledger Part]
Lines : CAB Ledger Title, CAB Ledger Line
Repeat : CAB Ledger Line : CAB My Ledgers
Scroll : Vertical
[Line: CAB Ledger Title]
Use : CAB Ledger Line
Local : Field : Default : Type : String
Local : Field : Default : Align : Centre
Local : Field : Default : Style : Normal Bold
Local : Field : CAB Led No : Set as : "Sr. No"
Local : Field : CAB Led Name : Set as : "Ledger Name"
Local : Field : CAB Led Name : Align : Left
Local : Field : CAB Led SalesOn: Set as : "Sales on"
Local : Field : CAB Led Sales: Set as : "Sales"
Local : Field : CAB Led ReceiptOn : Set as : "Receipt on"
Local : Field : CAB Led Receipt : Set as : "Receipt"
Local : Field : CAB Balance: Set as : "Balance"
[Line: CAB Ledger Line]
Fields : CAB Led No, CAB Led Name, CAB Led SalesOn, CAB Led Sales, CAB Led ReceiptOn, CAB Led Receipt, CAB Balance;, CAB Led Cont,total Bill Value
Option : AlterOnEnter
Local:Field:default:Style: Large Bold
[Field: CAB Led No]
Set as : $$Line
Width : 5
Align : Centre
Alter : Ledger
[Field: CAB Led Name]
; Use : Name Field
Set as : $Name
Full Width: Yes
Background : light Blue
[Field: CAB Led SalesOn]
Use : Uni Date Field
Set as :$LastSalesdate;$LedgerLastSalesdate
Width : 15
Align : Centre
Background : Lily Yellow
[Field: CAB Led Sales]
Use : Name Field;AMount Forex field
Set as : $LedgerSalesTotal
Width : 15
Align : Centre
Background : light Yellow
[Field: CAB Led ReceiptOn]
Use : Uni Date Field
Set as :$LastRecdate;$LedgerLastreceiptdate
Width : 15
Align : Centre
Background : light Blue
[Field: CAB Led Receipt]
Use : Amount forex Field
Set as :$LedgerReceiptTotals
Width : 15
Align : Centre
Background : light Orange
[Field: CAB Balance]
Use : Amount forex Field
Set as :
Width : 15
Align : Centre
Background : light Grey
;;;;RECEIPT COLL;;;;;;;;;;
[Collection:AllRcptVchrs]
Type : Vouchers
Sort : -$Date
Filter : MySalesEntries
Fetch : Amount, AllLedgerEntries.Amount, Date, AllLedgerEntries.Date, VoucherTypeName, AllLedgerEntries.VoucherTypeName
[Collection : MyPartyColl]
Source Collection : AllRcptVchrs
Fetch : Rate, Date, VoucherTypeName, PartyLedgerName, StockItemName
Filter : MyPartyFltr
Sort : Default : -$Date
[System : Formula]
MyPartyFltr : $PartyLedgerName = #CabLedName
LastSalesdate: $$CollectionField:$Date:1:MyPartyColl
MySalesEntries : $$IsSales:$VoucherTypeName
[#Object: Ledger]
LedgerSalesTotal : $$FilterAmtTotal:MySalesVouchers:ForThisParty:$Amount
LedgerReceiptTotals : $$FilterAmtTotal:MyReceiptVouchers:ForThisParty:$Amount
LedgerLastreceiptdate : $$CollectionField:MyReceiptVouchers:ForThisParty:Date;$$FilterAmtTotal:AllRcptVchrs:ForThisParty:$Amount
[System: Formulae]
MySalesEntries : $$IsSales:$VoucherTypeName
[System: Formulae]
MyRcptEntries : $$IsReceipt:$VoucherTypeName
[System: Formula]
ForThisParty : $PartyLedgerName = @@ReqObjName
[Collection: My Sales Vouchers]
Type : Vouchers : Voucher Type
Child Of : $$VchTypeSales
Sort : -$Date
;Fetch : *.*
Fetch : PartyLedgerName, LedgerEntries.Amount,Amount, Date, AllLedgerEntries.Date
[Collection: My Receipt Vouchers]
Type : Vouchers : Voucher Type
Child Of : $$VchTypeSales
;Fetch : *.*
Fetch : PartyLedgerName,Amount
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
[Collection: CAB My Ledgers]
Type : Ledger
Child of : $$GroupSundryDebtors
Belongs to : Yes
;; 'Belongs To' includes the Ledgers pertaining to the subgroups of the group
;; mentioned in Attribute 'Child Of'.
Fetch : *.*
;; Fetch attribute required for remoting 2.0
;Filter:MyfltrTds
;; End-of-File
[System:Formulas]
MyfltrTds:$IsTDSApplicable="Yes";if $$IsSysName:##Myvariable then yes Else ##Myvariable = $agentname
[Collection:AllRcptVouchers]
Type : Vouchers
Sort : -$Date
Filter : MyRcptEntries
Fetch : Amount, AllLedgerEntries.Amount, Date, AllLedgerEntries.Date, VoucherTypeName, AllLedgerEntries.VoucherTypeName
[Collection : MyPartyCollection]
Source Collection : AllRcptVouchers
Fetch : Rate, Date, VoucherTypeName, PartyLedgerName, StockItemName
Filter : MyPartyFltr
Sort : Default : -$Date
[System : Formula]
MyPartyFltr : $PartyLedgerName = #CabLedName
LastRecdate: $$CollectionField:$Date:1:MyPartyCollection
MyRcptEntries : $$IsReceipt:$VoucherTypeName
[#Object: Ledger]
LedgerReceiptTotal : $$FilterAmtTotal:MyReceiptVouchers1:ForThisParty:$Amount
LedgerReceiptTotals : $$FilterAmtTotal:MyReceiptVouchers1:ForThisParty:$Amount
LedgerLastreceiptdate : $$CollectionField:MyReceiptVouchers1:ForThisParty:Date;$$FilterAmtTotal:AllRcptVouchers:ForThisParty:$Amount
[System: Formulae]
MyRcptEntries : $$IsReceipt:$VoucherTypeName
[System: Formula]
ForThisParty : $PartyLedgerName = @@ReqObjName
[Collection: My Sales Vouchers1]
Type : Vouchers : Voucher Type
Child Of : $$VchTypeSales
Sort : -$Date
;Fetch : *.*
Fetch : PartyLedgerName, LedgerEntries.Amount,Amount, Date, AllLedgerEntries.Date
[Collection: My Receipt Vouchers1]
Type : Vouchers : Voucher Type
Child Of : $$VchTypeReceipt
;Fetch : *.*
Fetch : PartyLedgerName,Amount
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
[Collection: CAB My Ledgers1]
Type : Ledger
Child of : $$GroupSundryDebtors
Belongs to : Yes
;; 'Belongs To' includes the Ledgers pertaining to the subgroups of the group
;; mentioned in Attribute 'Child Of'.
Fetch : *.*
;; Fetch attribute required for remoting 2.0
;Filter:MyfltrTds
;; End-of-File
[System:Formulas]
MyfltrTds:$IsTDSApplicable="Yes";if $$IsSysName:##Myvariable then yes Else ##Myvariable = $agentname
;;-----------Amount
टिप्पणियाँ
एक टिप्पणी भेजें