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
.jpg)
कोई टिप्पणी नहीं:
एक टिप्पणी भेजें