;; Design Your Own Invoice Printing Only Thru Tally Mani Blog

[#Form: Comprehensive Invoice]
Add : Option : My Invoice : @@IsSales

[#Form: Simple Printed Invoice]
Add : Option : My Invoice : @@IsSales

[! Form : My Invoice]
Delete : Parts
Delete : Bottom Parts
Delete : PageBreak
Space Top : 0
Space Bottom: 0
Space Left : 0
Space Right : 0

Add : Parts : My Invoice Top Part, My Invoice Body Part
Add : Bottom Part: My Invoice Bottom Part
Add : Pagebreak : CLPGBrk,OPGBrk

[Part: My Invoice Top Part]
Line : MI CmpName,MI VCHDate,MI PartyName,MI PartyAdd1, MI ColumnTitles
Repeat: MI PartyAdd1:PartyAddress

[Line: MI CmpName]
Field : MI CmpName

[Field: MI CmpName]
Use : Name Field
Set as : @@CMPMailNAme
FullWidth : yes
Align : Centre

[Line: MI VCHDate]
Field : Short Prompt, MI VCHDate
Right Field : Simple Prompt, MI VCHNo
Local : Field : Short Prompt : Set as : "Voucher Date : "
Local : Field : Simple Prompt : Set as : " Voucher No : "

[Field: MI VCHDate]
Use : Short Date Field
Set as : $Date

[Field: MI VCHNo]
Use : Short Name Field
Set as : $VoucherNumber

[Line: MI PartyName]
Field : Short Prompt, MI PartyNAme
Local : Field : Short Prompt : Set as : "Party Name : "

[Field: MI PartyName]
Use : Name Field
Set as : $PartyLedgerName

[Line: MI PartyADd1]
Field : MI PartyADd1

[Field: MI PartyADd1]
Use : Name Field
Set as : $Address
Indent : 10

[Line: MI Column Titles]
Use : IE Details
Local : Field : Default : Lines : 2
Local : Field : Default : Type : String
Local : Field : Default : Style : Normal Bold
Local : Field : Ie SRNo : Set as : "Sr No"
Local : Field : IE SiName : Set as : "Name"
Local : Field : IE Qty : Set as : "Billed Qty"
Local : Field : IE Rate : Set as : "Rate"
Local : Field : IE Amount : Set as : "Amount"
Border: Column Titles

[Part : My Invoice Body Part]
Part : IE Details, LE Details
Vertical : Yes
Scroll : Vertical
Common Border : yes

[Part : IE Details]
Line :IE Details
Repeat : IE Details : Inventory Entries
Total : IE Qty, IE Amount

[Line : IE Details]
Field : IE SrNo, IE SiName
Right Field : IE Qty, IE Rate, IE Amount
Explode : Item Desc : $$NumItems:UserDescription > 0

[Part : Item Desc]
Line : Item Desc
Repeat : Item Desc : UserDescription

[Line : Item Desc]
Field : Item Desc

[Field : Item Desc]
Use : Name Field
Width : 40
Indent : 8
Set as : $UserDescription
Style : Normal Italic


[Field : IE SrNo]
Use : Short Name Field
Set as : $$Line
Border : Thin Left
Width : 4

[Field : IE SIName]
Use : Name Field
Set as : $StockItemName
Border : Thin Left
FullWIdth : Yes
[Field : IE Qty]
Use : Number Field ;; Qty Primary Field
Set as : $BilledQty
Border : Thin Left
Format : "NoSymbol,Primary"
Align : Right

[Field : IE rate]
Use : Rate Price Field
Set as : $Rate
Border : Thin Left

[Field : IE Amount]
Use : Amount Field
Set as : $Amount
Border : Thin Left Right
Format : "NoComma,NoZero"

[Part : LE Details]
Line : LE Details
Repeat : LE Details : Ledger Entries
Scroll : Vertical

[Line : LE Details]
Use : IE Details
Local : Field : IE SrNo : Set as : ""
Local : Field : IE SiName: Set as : $LedgerName
Local : Field : IE Qty : Set as : ""
Local : Field : IE Rate : Set as : +
$$String: $RateOfInvoiceTax +“%”
Local : Field : IE Amount: Set as : $Amount
Local : Field : IE SiName: Align : Right
Local : Field : IE Qty : Format : "NoZero"
Local : Field : IE Rate : InActive: $RateOfInvoiceTax = 0
Local : Field : IE Rate : Type : String
Empty : $LedgerName = $PartyLedgerName


[Part : My Invoice Bottom Part]
Line : MI Total Line, MI AmtInWords, MI ForCmp, MI AuthSign

[Line : MI Total Line]
Use : IE Details
Local : Field : Default : Style : Normal Bold
Local : Field : IE SrNo : Set as : ""
Local : Field : IE SiName: Set as : "Totals"
Local : Field : IE Qty : Set as : $$Total:IEQty
Local : Field : IE Rate : Set as : ""
Local : Field : IE Amount: Set as : $Amount
Border : Totals

[Line : MI AmtInWords
Field : Short Prompt, MI AmtInWords
Local : Field : Short Prompt : Set as : "Amount in words : "

[Field : MI AmtInWords]
Use : Name Field
Set as : $$InWords:$Amount
FullWidth : yes
Style : Small

[Line : MI ForCmp]
Right Field : MI ForCmp
[Field : MI ForCmp]
Use : Name Field
Set as : "For " + @@CMPMailNAme
Align : Right
Width : 0

[Line : MI AuthSign]
Right Field : MI AuthSign
Space Top : 2

[Field : MI AuthSign]
Use : Name Field
Set as : "Authorised Signatory"
Width : 0
Align : Right
[Part : CLPGBrk]
Line : CLPGBrkln
[Line :CLPGBrkln]
Right Field : CLPG Brkfld
[Field :CLPG Brkfld]
Use : Name Field
Set as :” Continued………………….”
[Part: OPGBrk]
Use : My Invoice Top Part