Tally Chapter 106 TDL for Bank Entry form By Rajiv Mishra Computer Class
--------------TDL CODE STARTS HERE----------------------------
[#Menu: Gateway of Tally]
Add: Item: Bank Details : Alter: BankDetailsReport
[Report:BankDetailsReport]
Variable : SVFromDate, SVToDate
Set : SVFromDate : ($BooksFrom:Company:##SVCurrentCompany)
Set : SVToDate : ($LastVoucherDate:Company:##SVCurrentCompany)
Form:BankDetailsReport
Title:$$LocaleString:"BANK DETAILS ENTRY FORM"
Object:Company
[Form:BankDetailsReport]
Background:Light Ochre Yellow
Height:100% page
Width:100% page
Space Top : If $$InPrintMode Then 0.5 Else 0 inches
Buttons : PrintButton, ExportButton
Add: Button: BankreportButton
Parts : BankDetailsTitlee,BankDetailsRP,BankStatement Tit,Bankopbal part,BankDetailsinfoPart,ClosingBalance Part
[Part : BankDetailsTitlee]
Space Bottom : 0.2 inch
Line : BankDetailsTitlee
[Line:BankDetailsTitlee]
Field:BankDetailsTitlee
Space Top:0.02
Border:thin bottom
[Field:BankDetailsTitlee]
Use:name field
Set as:$$LocaleString:"B A N K - D E T A I L S - E N T E R Y - F O R M"
Align : Center
Full Width : Yes
Local:Style:defualt:Height:15
Color:Black
Skip: Yes
Style:large bold
[Part : BankDetailsRP]
Line : BankDetailsRP
[Line:BankDetailsRP]
Left Field:BankDetailsRP1
Right Field:BankDetailsRP2
Border:thin bottom
Space Top:0.02
[Field:BankDetailsRP1]
Use:name field
Set as:$$LocaleString:"RECEIPT"
Local:Style:defualt:Height:10
Align : Center
Full Width : Yes
Color:Black
Skip: Yes
Style:large bold
[Field:BankDetailsRP2]
Use:name field
Set as:$$LocaleString:"PAYMENT"
Local:Style:defualt:Height:10
Align : Center
Full Width : Yes
Color:Black
Skip: Yes
Style:large bold
[Part : BankStatement Tit]
;Space Bottom : 0.2 inch
Line : BankStatementPeriod
[Line:BankStatementPeriod]
Field:BankStatementPeriod
;Space Top:0.2
Border:thin bottom
[Field:BankStatementPeriod]
Use:name field
Set as:$$LocaleString:"Details For the period " + $$String:##SVFromDate + " to " + $$String:##SVToDate
Align : Center
Full Width : Yes
Color:Black
Skip: Yes
Background:WHITE
[Part:BankDetailsinfoPart]
Left Part :Receipt part
Right Part :Payment part
Common Border : Yes
[Part:Bankopbal part]
Line:ReceiptopbalfldLeft
[Part:Receipt part]
Line:ReceiptTitleLeft,ReceiptDetailsLeft
Bottom Line:ReceiptClbalfieldtot
Repeat: ReceiptDetailsLeft : ReceiptDetailsAgg
Scroll: Vertical
Break On: $$IsEmpty:$LEDMParty
Total :LEDMAmt
[Line: ReceiptTitleLeft]
Fields: LEDMDate,LEDMParty,LEDMCHQNo,LEDMAmt
Right Fields:LEDMRemark
Local: Field: Default : Delete: Storage
Local: Field: Default : Skip: Yes
Local: Field: Default : Fixed: Yes
Local: Field: Default : Type: String
Local: Field: Default : Background: Yellow
Local: Field: LEDMDate : Set as: "Date"
Local: Field: LEDMParty : Set as: "Party Name"
Local: Field: LEDMCHQNo : Set as: "CHQ No"
Local: Field: LEDMAmt : Set as: "Amount"
Local: Field: LEDMRemark : Set as: "Remark"
Local: Field: LEDMAmt : Align: Center
Local: Field: LEDMRemark : Align: Center
Border : Flush Totals
[Line:ReceiptopbalfldLeft]
Fields:LEDMDate1,LEDMParty1,LEDMCHQNo1,LEDMAmt1,LEDMRemark1
Border: Thin BOttom
Local: Field: LEDMParty1 : Set as: "Opening Balance:"
Local: Field: LEDMParty1 :Background: DEEP COBALT BLUE
Local: Field: LEDMParty1 :color : WHITE
[Field: LEDMDate1]
Use : Name Field
Set as : ""
Width : 6% Screen
Align : Left
Border: ThiN Cover
Skip : Yes
[Field: LEDMParty1]
Use : Name Field
Set as : ""
Width : 16% Screen
Border: ThiN Cover
Skip : Yes
[Field: LEDMCHQNo1]
Use : Name Field
Set as : ""
Width : 5% Screen
Border: ThiN Cover
Skip : Yes
[Field: LEDMAmt1]
Use : Name Field
Set as : ""
Width : 8% Screen
Border: ThiN Cover
Skip : Yes
[Field: LEDMRemark1]
Use : Amount Field
Set as : $LEDMRemark1
Storage : LEDMRemark1
Format : Decimal : 2
Align : Right
Border: ThiN Cover
Background: DEEP COBALT BLUE
Color : WHITE
Width: 16% Screen
[Line:ReceiptDetailsLeft]
Border : Thin Left Right
Fields: LEDMDate,LEDMParty,LEDMCHQNo,LEDMAmt,LEDMRemark
[Field: LEDMDate]
Use : Uni Date Field
Set as : LEDMDate
Storage : LEDMDate
Width : 6% Screen
Align : Left
[Field: LEDMParty]
Use : Name Field
Set as : $$Value
Storage : LEDMParty
Width : 16% Screen
[Field: LEDMCHQNo]
Use : Name Field
Set as : $$Value
Storage : LEDMCHQNo
Width : 5% Screen
[Field: LEDMAmt]
Use : Amount Field
Set as : $$Value
Storage : LEDMAmt
Width : 8% Screen
Format : Decimal : 2
Align : Right
[Field: LEDMRemark]
Use : Name Field
Set as : $$Value
Storage : LEDMRemark
Full Width : Yes;15% Screen
[System: UDF]
ReceiptDetailsAgg : Aggregate : 2541
LEDMRemark1 : Amount : 2547
LEDMDate : Date : 2542
LEDMParty : String : 2543
LEDMCHQNo : String : 2544
LEDMAmt : Amount : 2545
LEDMRemark : String : 2546
[Line:ReceiptClbalfieldtot]
Fields:RTotalDate,RTotalParty,RTotalCHQNo,RTotalAmt,RTotalRemark
Border: Totals
Local: Field: RTotalParty : Set as: "Total"
Local: Field: RTotalParty :Background: misty rose
Local: Field: RTotalParty :Border : Thin Top
;Local: Field: RTotalParty :color : WHITE
[Field: RTotalDate]
Use : Name Field
Set as : ""
Width : 6% Screen
Align : Left
Border: ThiN Cover
Skip : Yes
[Field: RTotalParty]
Use : Name Field
Set as : ""
Width : 16% Screen
Border: ThiN Cover
Skip : Yes
[Field: RTotalCHQNo]
Use : Name Field
Set as : ""
Width : 5% Screen
Border: ThiN Cover
Skip : Yes
[Field:RTotalAmt]
Use : Amount Forex Field
Set as :$$Total:LEDMAmt
Skip : Yes
style : normal bold
Width : 8% Screen
Align:Right
Background: misty rose
[Field: RTotalRemark]
Use : Name Field
Set as : ""
Full Width : Yes
Border: ThiN Cover
Skip : Yes
;;;;;;;;;;;;;;;;;;;;;;PAYMENT PART START;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
[Part:Payment part]
Line:PaymentTitleRight,PaymentDetailsRight
Bottom Line:PaymentClbalfieldtot
Repeat: PaymentDetailsRight : PaymentDetailsAgg
Scroll: Vertical
Break On: $$IsEmpty:$PaymentTitleParty
Total :PaymentTitleAmt
[Line: PaymentTitleRight]
Border: Column Titles
Fields: PaymentTitleDate,PaymentTitleParty,PaymentTitleCHQNo,PaymentTitleAmt
Right Fields: PaymentTitleRemark
Local: Field: Default : Delete: Storage
Local: Field: Default : Skip: Yes
Local: Field: Default : Fixed: Yes
Local: Field: Default : Type: String
Local: Field: Default : Background: Yellow
Local: Field: PaymentTitleDate : Set as: "Date"
Local: Field: PaymentTitleParty : Set as: "Party Name"
Local: Field: PaymentTitleCHQNo : Set as: "CHQ No"
Local: Field: PaymentTitleAmt : Set as: "Amount"
Local: Field: PaymentTitleRemark : Set as: "Remark"
Local: Field: PaymentTitleAmt : Align: Center
Local: Field: PaymentTitleRemark : Align: Center
Border : Flush Totals
[Line:PaymentDetailsRight]
Border : Thin Right
Fields: PaymentTitleDate,PaymentTitleParty,PaymentTitleCHQNo,PaymentTitleAmt,PaymentTitleRemark
[Field: PaymentTitleDate]
Use : Uni Date Field
Set as : PaymentTitleDate
Storage : PaymentTitleDate
Width : 6% Screen
Align : Left
[Field: PaymentTitleParty]
Use : Name Field
Set as : $$Value
Storage : PaymentTitleParty
Width : 16% Screen
[Field: PaymentTitleCHQNo]
Use : Name Field
Set as : $$Value
Storage : PaymentTitleCHQNo
Width : 5% Screen
[Field: PaymentTitleAmt]
Use : Amount Field
Set as : $$Value
Storage : PaymentTitleAmt
Width : 8% Screen
Format : Decimal : 2
Align : Right
[Field: PaymentTitleRemark]
Use : Name Field
Set as : $$Value
Storage : PaymentTitleRemark
Full Width : Yes
[System: UDF]
PaymentDetailsAgg : Aggregate : 3541
PaymentTitleAmt1 : Amount : 3547
PaymentTitleDate : Date : 3542
PaymentTitleParty : String : 3543
PaymentTitleCHQNo : String : 3544
PaymentTitleAmt : Amount : 3545
PaymentTitleRemark : String : 3546
[Line:PaymentClbalfieldtot]
Fields:PTotalDate,PTotalParty,PTotalCHQNo,PTotalAmt,PTotalRemark
Border: Totals
Local: Field: PTotalParty : Set as: "Total"
Local: Field: PTotalParty :Background: misty rose
Local: Field: PTotalParty :Border : Thin Top
;Local: Field: PTotalParty :color : WHITE
[Field: PTotalDate]
Use : Name Field
Set as : ""
Width : 6% Screen
Align : Right
Border: ThiN Cover
Skip : Yes
[Field: PTotalParty]
Use : Name Field
Set as : ""
Width : 16% Screen
Border: ThiN Cover
Skip : Yes
[Field: PTotalCHQNo]
Use : Name Field
Set as : $$Value
Width : 5% Screen
Border: ThiN Cover
Skip : Yes
[Field:PTotalAmt]
Use : Amount Forex Field
Set as : $$Total:PaymentTitleAmt
Skip : Yes
style : normal Bold
Width : 8% Screen
Align:Right
Background: misty rose
[Field: PTotalRemark]
Use : Name Field
Set as : ""
Full Width : Yes
Border: ThiN Cover
Skip : Yes
[Part:ClosingBalance Part]
Line:FinalClbalfield
[Line:FinalClbalfield]
Left Fields:FTotalDate,FTotalParty,FTotalCHQNo,FTotalAmt,FTotalRemark
Right Fields:FTotalDate1,FTotalParty1,FTotalCHQNo1,FTotalAmt1,FTotalRemark1
Border: Totals
Local: Field: FTotalAmt1 : Set as: "Closing Balance :"
Local: Field: FTotalAmt1 :Background: DEEP COBALT BLUE
Local: Field: FTotalAmt1 :Border : Thin Top
Local: Field: FTotalAmt1 :color : WHITE
[Field: FTotalDate]
Use : Name Field
Set as : ""
Width : 6% Screen
Align : Left
;Border: ThiN Cover
Skip : Yes
[Field: FTotalParty]
Use : Name Field
Set as : ""
Width : 10% Screen
;Border: ThiN Cover
Skip : Yes
[Field: FTotalCHQNo]
Use : Name Field
Set as : ""
Width : 5% Screen
;Border: ThiN Cover
Skip : Yes
[Field:FTotalAmt]
Use : Name Field
Set as : ""
Width : 10% Screen
;Border: ThiN Cover
Skip : Yes
[Field: FTotalRemark]
Use : Name Field
Set as : ""
Width : 8% Screen
;Border: ThiN Cover
Skip : Yes
Full Width : Yes
Align:Right
[Field: FTotalDate1]
Use : Name Field
Set as : ""
Width : 6% Screen
Align : Left
;Border: ThiN Cover
Skip : Yes
[Field: FTotalParty1]
Use : Name Field
Set as : ""
Width : 10% Screen
;Border: ThiN Cover
Skip : Yes
[Field: FTotalCHQNo1]
Use : Name Field
Set as : ""
Width : 5% Screen
;Border: ThiN Cover
Skip : Yes
[Field:FTotalAmt1]
Use : Name Field
Set as : ""
Width : 15% Screen
;Border: ThiN Cover
Skip : Yes
Background : misty rose
[Field: FTotalRemark1]
Use : Amount Forex Field
Set as :#LEDMRemark1 + #RTotalAmt - #PTotalAmt
Skip : Yes
style : normal bold
Full Width : Yes
Align:Center
Background: DEEP COBALT BLUE
Color : WHITE
[Color:Medium Lavender Magenta]
RGB:221,160,221
[Color:misty rose]
RGB:255,228,225
[Button:BankreportButton]
Key : Alt+B
Action : Display: BankDetailsReport1
Title : Report
;;;;;;;;;;;;;;;;;;;;;;;;REPORT CODE START;;;;;;;;;;;;;;;;;;;;;;;;;;;;
[Color:Medium Lavender Magenta2]
RGB:221,160,221
[Color:misty rose2]
RGB:255,228,225
[Report: BankDetailsReport1]
Form : BankDetailsReport1
Title : "BANK DETAILS REPORT"
;Set : SVFromDate : ($BooksFrom:Company:##SVCurrentCompany)
;Set : SVToDate : ($LastVoucherDate:Company:##SVCurrentCompany)
Variable : SVFromDate,SVToDate
Set : SVfromDate : ##SVDate
Set : SVToDate : ##SVCurrentDate
Variables : ExplodeFlag, IsForexReport
Variable : DSPHasMultiLevel
Variable : IsMultiPage, InNewPages, ShowBillType, IsGrpBillReport
Variables: SVSelectAllToggle,DSPRepeatCollection
Set : SV Sort Method : @@Default
Export : Yes
[Form:BankDetailsReport1]
Use : DSP Template
Height : 100% screen
Width : 100% screen
Button : ExplodeFlag, F2ChangePeriod,ChangePeriod
;Keys : ChangePeriod
Background: @@SV_RELEASEDLEAFGREEN_PL; Very Light Sea Green
Bottom Toolbar Buttons : BottomToolBarBtn1, BottomToolBarBtn6, BottomToolBarBtn7, BottomToolBarBtn8,BottomToolBarBtn9, BottomToolBarBtn10, BottomToolBarBtn11, BottomToolBarBtn12
Local: Field : FormSubTitle : Info : $$LocaleString:"BANK DETAILS REPORT"
Local: Field : Form SubTitle : Color : Dark Red
Local: Field:Form SubTitle : Style : Large SerIf Bold
Add : Buttons : Remove Line, Restore Line, Restore All
Parts: BankDetailsTitlee2,BankDetailsRP2,BankStatement Tit2,Bankopbal part2,BankDetailsinfoPart2,ClosingBalance Part2
[Button : Remove Line]
Action : Remove Line : Remove Line
Key : Alt + R
[Button : Restore Line]
Action : Show Last Removed Line : Restore Line
Key : Alt + U
[Button : Restore All]
Action : Show Removed Lines : Restore All
Key : Ctrl + U
[Part : BankDetailsTitlee2]
Space Bottom : 0.2 inch
Line : BankDetailsTitlee2
[Line:BankDetailsTitlee2]
Field:BankDetailsTitlee2
Space Top:0.02
Border:thin bottom
[Field:BankDetailsTitlee2]
Use:name field
Set as:$$LocaleString:"B A N K - D E T A I L S - R E P O R T"
Align : Center
Full Width : Yes
Local:Style:defualt:Height:15
Color:Black
Skip: Yes
Style:large bold
[Part : BankDetailsRP2]
Line : BankDetailsRP2
[Line:BankDetailsRP2]
Left Field:BankDetailsRP12
Right Field:BankDetailsRP22
Border:thin bottom
Space Top:0.02
[Field:BankDetailsRP12]
Use:name field
Set as:$$LocaleString:"RECEIPT"
Local:Style:defualt:Height:10
Align : Center
Full Width : Yes
Color:Black
Skip: Yes
Style:large bold
[Field:BankDetailsRP22]
Use:name field
Set as:$$LocaleString:"PAYMENT"
Local:Style:defualt:Height:10
Align : Center
Full Width : Yes
Color:Black
Skip: Yes
Style:large bold
[Part : BankStatement Tit2]
;Space Bottom : 0.2 inch
Line : BankStatementPeriod2
[Line:BankStatementPeriod2]
Field:BankStatementPeriod2
;Space Top:0.2
Border:thin bottom
[Field:BankStatementPeriod2]
Use:name field
Set as:$$LocaleString:"Details For the period " + $$String:##SVFromDate + " to " + $$String:##SVToDate
Align : Center
Full Width : Yes
Color:Black
Skip: Yes
Background:WHITE
[Part:BankDetailsinfoPart2]
Left Part :Receipt part2
Right Part :Payment part2
Common Border : Yes
[Part:Receipt part2]
Line:ReceiptTitleLeft2,ReceiptDetailsLeft2
Bottom Line:ReceiptClbalfieldtot2
Repeat: ReceiptDetailsLeft2 : ReceiptDetailsColl
Scroll: Vertical
Total :LEDMAmt2
[Line: ReceiptTitleLeft2]
Fields: LEDMDate2,LEDMParty2,LEDMCHQNo2,LEDMAmt2
Right Fields:LEDMRemark2
Local: Field: Default : Delete: Storage
Local: Field: Default : Skip: Yes
Local: Field: Default : Fixed: Yes
Local: Field: Default : Type: String
Local: Field: Default : Background: Yellow
Local: Field: LEDMDate2 : Set as: "Date"
Local: Field: LEDMParty2 : Set as: "Party Name"
Local: Field: LEDMCHQNo2 : Set as: "CHQ No"
Local: Field: LEDMAmt2 : Set as: "Amount"
Local: Field: LEDMRemark2 : Set as: "Remark"
Local: Field: LEDMAmt2 : Align: Center
Local: Field: LEDMRemark2 : Align: Center
Border : Flush Totals
[Part:Bankopbal part2]
Line:ReceiptopbalfldLeft2
[Line:ReceiptopbalfldLeft2]
Fields:LEDMDate12,LEDMParty12,LEDMCHQNo12,LEDMAmt12,LEDMRemark12
Border: Thin BOttom
Local: Field: LEDMParty12 : Set as: "Opening Balance:"
Local: Field: LEDMParty12 :Background: DEEP COBALT BLUE
Local: Field: LEDMParty12 :color : WHITE
Local: Field: LEDMRemark12 : Info: $LEDMRemark1
[Field: LEDMDate12]
Use : Name Field
Set as : ""
Width : 6% Screen
Align : Left
Border: ThiN Cover
Skip : Yes
[Field: LEDMParty12]
Use : Name Field
Set as : ""
Width : 16% Screen
Border: ThiN Cover
Skip : Yes
[Field: LEDMCHQNo12]
Use : Name Field
Set as : ""
Width : 5% Screen
Border: ThiN Cover
Skip : Yes
[Field: LEDMAmt12]
Use : Name Field
Set as : ""
Width : 8% Screen
Border: ThiN Cover
Skip : Yes
[Field: LEDMRemark12]
Use : Amount Field
Set as : $LEDMRemark1
Format : Decimal : 2
Align : Right
Border: ThiN Cover
Background: DEEP COBALT BLUE
Color : WHITE
Width: 16% Screen
[Line:ReceiptDetailsLeft2]
Border : Thin Left Right
Fields: LEDMDate2,LEDMParty2,LEDMCHQNo2,LEDMAmt2,LEDMRemark2
[Field: LEDMDate2]
Use : Uni Date Field
Set as : $LEDMDate
Width : 6% Screen
Align : Left
[Field: LEDMParty2]
Use : Name Field
Set as : $LEDMParty
Width : 16% Screen
[Field: LEDMCHQNo2]
Use : Name Field
Set as : $LEDMCHQNo
Width : 5% Screen
[Field: LEDMAmt2]
Use : Amount Field
Set as : $LEDMAmt
Width : 8% Screen
Format : Decimal : 2
Align : Right
[Field: LEDMRemark2]
Use : Name Field
Set as : $LEDMRemark
Full Width : Yes;15% Screen
[Collection: ReceiptDetailsColl]
Type : ReceiptDetailsAgg : Company
Childof : ##SVCurrentCompany
Fetch : *, *.*
[Line:ReceiptClbalfieldtot2]
Fields:RTotalDate2,RTotalParty2,RTotalCHQNo2,RTotalAmt2,RTotalRemark2
Border: Totals
Local: Field: RTotalParty2 : Set as: "Total"
Local: Field: RTotalParty2 :Background: misty rose2
Local: Field: RTotalParty2 :Border : Thin Top
;Local: Field: RTotalParty :color : WHITE
[Field: RTotalDate2]
Use : Name Field
Set as : ""
Width : 6% Screen
Align : Left
Border: ThiN Cover
Skip : Yes
[Field: RTotalParty2]
Use : Name Field
Set as : ""
Width : 16% Screen
Border: ThiN Cover
Skip : Yes
[Field: RTotalCHQNo2]
Use : Name Field
Set as : ""
Width : 5% Screen
Border: ThiN Cover
Skip : Yes
[Field:RTotalAmt2]
Use : Amount Forex Field
Set as :$$Total:LEDMAmt2
Skip : Yes
style : normal bold
Width : 8% Screen
Align:Right
Background: misty rose2
[Field: RTotalRemark2]
Use : Name Field
Set as : ""
Full Width : Yes
Border: ThiN Cover
Skip : Yes
;;;;;;;;;;;;;;;;;;;;;;PAYMENT PART START;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
[Collection: PaymentDetailsColl]
ParmVAR: SVCurrentDate : Date : ##SVCurrentDate
ParmVar: SVFromDate : Date : ##SVFromDate
ParmVar: SVToDate : Date : ##SVToDate
Type : PaymentDetailsAgg : Company
Childof : ##SVCurrentCompany
Fetch : *, *.*
[Part:Payment part2]
Line:PaymentTitleRight2,PaymentDetailsRight2
Bottom Line:PaymentClbalfieldtot2
Repeat: PaymentDetailsRight2 : PaymentDetailsColl
Scroll: Vertical
Break On: $$IsEmpty:$PaymentTitleParty2
Total :PaymentTitleAmt2
[Line: PaymentTitleRight2]
Border: Column Titles
Fields: PaymentTitleDate2,PaymentTitleParty2,PaymentTitleCHQNo2,PaymentTitleAmt2
Right Fields: PaymentTitleRemark2
Local: Field: Default : Delete: Storage
Local: Field: Default : Skip: Yes
Local: Field: Default : Fixed: Yes
Local: Field: Default : Type: String
Local: Field: Default : Background: Yellow
Local: Field: PaymentTitleDate2 : Set as: "Date"
Local: Field: PaymentTitleParty2 : Set as: "Party Name"
Local: Field: PaymentTitleCHQNo2 : Set as: "CHQ No"
Local: Field: PaymentTitleAmt2 : Set as: "Amount"
Local: Field: PaymentTitleRemark2 : Set as: "Remark"
Local: Field: PaymentTitleAmt2 : Align: Center
Local: Field: PaymentTitleRemark2 : Align: Center
Border : Flush Totals
[Line:PaymentDetailsRight2]
Border : Thin Right
Fields: PaymentTitleDate2,PaymentTitleParty2,PaymentTitleCHQNo2,PaymentTitleAmt2,PaymentTitleRemark2
[Field: PaymentTitleDate2]
Use : Uni Date Field
Set as : $PaymentTitleDate
Width : 6% Screen
Align : Left
[Field: PaymentTitleParty2]
Use : Name Field
Set as : $PaymentTitleParty
Width : 16% Screen
[Field: PaymentTitleCHQNo2]
Use : Name Field
Set as : $PaymentTitleCHQNo
Width : 5% Screen
[Field: PaymentTitleAmt2]
Use : Amount Field
Set as : $PaymentTitleAmt
Width : 8% Screen
Format : Decimal : 2
Align : Right
[Field: PaymentTitleRemark2]
Use : Name Field
Set as : $PaymentTitleRemark
Full Width : Yes
[Line:PaymentClbalfieldtot2]
Fields:PTotalDate2,PTotalParty2,PTotalCHQNo2,PTotalAmt2,PTotalRemark2
Border: Totals
Local: Field: PTotalParty2 : Set as: "Total"
Local: Field: PTotalParty2 :Background: misty rose2
Local: Field: PTotalParty2 :Border : Thin Top
;Local: Field: PTotalParty :color : WHITE
[Field: PTotalDate2]
Use : Name Field
Set as : ""
Width : 6% Screen
Align : Right
Border : ThiN Cover
Skip : Yes
[Field: PTotalParty2]
Use : Name Field
Set as : ""
Width : 16% Screen
Border : ThiN Cover
Skip : Yes
[Field: PTotalCHQNo2]
Use : Name Field
Set as : ""
Width : 5% Screen
Border : ThiN Cover
Skip : Yes
[Field:PTotalAmt2]
Use : Amount Forex Field
Set as : $$Total:PaymentTitleAmt2
Skip : Yes
style : normal Bold
Width : 8% Screen
Align :Right
Background : misty rose
[Field: PTotalRemark2]
Use : Name Field
Set as : ""
Full Width : Yes
Border : ThiN Cover
Skip : Yes
;;;;;;;;;CLOSING BALANCE PART;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
[Part:ClosingBalance Part2]
Line:FinalClbalfield2
[Line:FinalClbalfield2]
Left Fields:FTotalDate2,FTotalParty2,FTotalCHQNo2,FTotalAmt2,FTotalRemark2
Right Fields:FTotalDate12,FTotalParty12,FTotalCHQNo12,FTotalAmt12,FTotalRemark12
Border: Totals
Local: Field: FTotalAmt12 : Set as: "Closing Balance :"
Local: Field: FTotalAmt12 :Background: DEEP COBALT BLUE
Local: Field: FTotalAmt12 :Border : Thin Top
Local: Field: FTotalAmt12 :color : WHITE
[Field: FTotalDate2]
Use : Name Field
Set as : ""
Width : 6% Screen
Align : Left
;Border: ThiN Cover
Skip : Yes
[Field: FTotalParty2]
Use : Name Field
Set as : ""
Width : 10% Screen
;Border: ThiN Cover
Skip : Yes
[Field: FTotalCHQNo2]
Use : Name Field
Set as : ""
Width : 5% Screen
;Border: ThiN Cover
Skip : Yes
[Field:FTotalAmt2]
Use : Name Field
Set as : ""
Width : 10% Screen
;Border: ThiN Cover
Skip : Yes
[Field: FTotalRemark2]
Use : Name Field
Set as : ""
Width : 8% Screen
;Border: ThiN Cover
Skip : Yes
Full Width : Yes
Align:Right
[Field: FTotalDate12]
Use : Name Field
Set as : ""
Width : 6% Screen
Align : Left
;Border: ThiN Cover
Skip : Yes
[Field: FTotalParty12]
Use : Name Field
Set as : ""
Width : 10% Screen
;Border: ThiN Cover
Skip : Yes
[Field: FTotalCHQNo12]
Use : Name Field
Set as : ""
Width : 5% Screen
;Border: ThiN Cover
Skip : Yes
[Field:FTotalAmt12]
Use : Name Field
Set as : ""
Width : 15% Screen
;Border: ThiN Cover
Skip : Yes
Background : misty rose2
[Field: FTotalRemark12]
Use : Amount Forex Field
Set as :#LEDMRemark1 + #RTotalAmt2 - #PTotalAmt2
Skip : Yes
style : normal bold
Full Width : Yes
Align:Center
Background: DEEP COBALT BLUE
Color : WHITE
-------------------------------CODE ENDED HERE--------------------------
टिप्पणियाँ
एक टिप्पणी भेजें