Customizing Invoice

What You mean...

 

I want purchase invoice format in simple format please help me.

 

I want purchase invoice format in simple format please help me.

 

Mr. Kuber, Thanks for your share and your feedback at every stage. You are very good to spread the knowledge among all the members. Thanks again and Bye

 

DEAR EXPERTS,

I WANT TO PRINT A VOCHER AFTER SAVED ONLY. HOW TO DISABLE BEFORE SAVE A VOUCHER.

 

Hello,

Can you help in below code to save my option and use this invoice code like Simple and comp.


[#Part: IPCFG Left]
Add: Lines: SANew

[Line: SANew]
Field: Medium Prompt, Logical Field
Local: Field: Medium Prompt: Set As: "Print in New Format ?"
Local: Field: Logical Field: Storage: IsCustomize
Local: Field: Medium Prompt: Inactive: NOT @@SVPixelMode OR (@@IsExciseTraderOn AND @@IsSalesConfig AND (@@IsTraderSVInvoice OR @@IsExciseVoucherType) AND NOT @@IsTraderSVCommercialInvoice AND NOT #SATraderCommercial)
Local: Field: Logical Field: Inactive: NOT @@SVPixelMode OR (@@IsExciseTraderOn AND @@IsSalesConfig AND (@@IsTraderSVInvoice OR @@IsExciseVoucherType) AND NOT @@IsTraderSVCommercialInvoice AND NOT #SATraderCommercial)
Invisible: NOT @@SVPixelMode

[System : UDF]
IsCustomize: Logical: 1000

[System : Formula]
IsCustomize: $IsCustomize:VoucherType:##SVVoucherType = "Yes"

[#Form: Sales Color]
Add: Option: GE Invoice: @@IsSales

[!Form: GE Invoice]
Add: Print: Global Invoice

[Report: Global Invoice]

Use : Printed Invoice
Delete : Form
Add : Form : Global Invoice1

[Form: Global Invoice1]

Use : STD Invoice Dimensions
Space Left : @@InvSpaceLeft inch
Space Right : 0
Space Bottom: 0
Parts : STD Invoice Top, GI OpPgBrk, Global Invoice Body
Bottom Parts: Global Invoice Bottom

Page Break : GI ClPgBrk, GI OpPgBrk

[Part: GI ClPgBrk]

Lines : GI ClPgBrk

[Line: GI ClPgBrk]

Fields : Simple Field
Local: Field: Simple Field : Set As : "Continued..."
Local: Field: Simple Field : FullWidth : Yes
Local: Field: Simple Field : Align : Right
Border : Full Thin Top

[Part: GI OpPgBrk]

Parts : Global Invoice Top, Global Invoice Add, GI Inventory Title
Vertical : Yes

[Part: Global Invoice Top]

Lines : GI Cmp Name, GI Title
Space Bottom : 1
Border : Thin Cover

[Line: GI Cmp Name]

Fields : Simple Field
Local: Field: Simple Field : Set As : @@CmpMailName
Local: Field: Simple Field : Align : Center
Local: Field: Simple Field : FullWidth : Yes
Local: Field: Simple Field : WideSpaced: Yes
Local: Field: Simple Field : Style : Cmp Style

[Line: GI Title]

Use : GI Cmp Name
Space Top : 1
Local: Field: Simple Field : Set As : "INVOICE"
Local: Field: Simple Field : Style : Normal Bold

[Part: Global Invoice Add]

Parts : Global Invoice BillAdd, Global Invoice ShipAdd
Right Parts : Global Invoice InvDet
Space Top : 1
Border : Thin Left Right Bottom
Height : 12% Page

[Part: Global Invoice BillAdd]

Lines : Global Invoice BillAddTitle, Global Invoice BillName, Global Invoice BillAdd
Repeat : Global Invoice BillAdd : Address
Width : 28% Page

[Line: Global Invoice BillAddTitle]

Fields : Name Field
Local: Field: Name Field : Set as : "Billing Name & Address"
Local: Field: Name Field : Align : Center

[Line: Global Invoice BillName]

Fields : Name Field
Local: Field: Name Field : Set as : $PartyLedgerName

[Line: Global Invoice BillAdd]

Fields : Name Field
Local: Field: Name Field : Set as : $Address
Local: Field: Name Field : Style : Normal

[Part: Global Invoice ShipAdd]

Use : Global Invoice BillAdd
Repeat : Global Invoice BillAdd : BasicBuyerAddress
Delete : Line : Global Invoice BillName
Local : Line : Global Invoice BillAddTitle :Local : Field : NameField : Set As : "Shipping Address"
Local : Line : Global Invoice BillAdd : Local : Field : Name Field: Set As : $BasicBuyerAddress

[Part: Global Invoice InvDet]

Lines : Global Invoice InvNo, Global Invoice InvDt, Global Invoice InvTerms, Global Invoice DueDt, +
Global Invoice ShipDt, Global Invoice ShipVia

[Line: Global Invoice InvNo]

Fields : Medium Prompt, Name Field
Local : Field : Medium Prompt : Set as : "Inv No"
Local : Field : Name Field : Set as : $VoucherNumber

[Line: Global Invoice InvDt]

Use : Global Invoice InvNo
Local : Field : Medium Prompt : Set as : "Inv Dt"
Local : Field : Name Field : Set as : $Date

[Line: Global Invoice InvTerms]

Use : Global Invoice InvNo
Local : Field : Medium Prompt : Set as : "Terms of Delivery"
Local : Field : Name Field : Set as : $BasicOrderTerms

[Line: Global Invoice DueDt]

Use : Global Invoice InvNo
Local : Field : Medium Prompt : Set as : "Due Dt"
Local : Field : Name Field : Set as : $$String@DueDtCalc

[Line: Global Invoice ShipDt]

Use : Global Invoice InvNo
Local : Field : Medium Prompt : Set as : "Shipped Dt"
Local : Field : Name Field : Set as : $BasicShippingDate

[Line: Global Invoice ShipVia]

Use : Global Invoice InvNo
Local : Field : Medium Prompt : Set as : "Ship Via"
Local : Field : Name Field : Set as : $BasicShippedBy

[Part: GI Inventory Title]

Lines : GI Inventory Title
Border : Thin Left Right

[Line: GI Inventory Title]

Use : GI Inventory Details

Local : Field : Default : Type : String
Local : Field : Default : Style : Normal Bold

Local : Field : GI SI No : Set as: "SI. No."
Local : Field : GI Item Name : Set as: "Item Name"
Local : Field : GI Qty : Set as: "Quantity"
Local : Field : GI Rate : Set as: "Rate"
Local : Field : GI Amount : Set as: "Amount"

Border : Thick Bottom
SpaceTop: 0

[Part: Global Invoice Body]

Lines : GI Inventory Details
Repeat : GI Inventory Details : Inventory Entries
Scroll : Vertical
Border : Thin Left Right Bottom
Common Borders : Yes

[Line: GI Inventory Details]

Fields : GI SI No, GI Item Name
Right Fields: GI Qty, GI Rate, GI Amount

Space Top : if $$Line = 1 then 1 else 0

[Field: GI SI No]

Use : Number Field
Set as : $$Line
Border : Thin Right

[Field: GI Item Name]

Use : Name Field
Set as : if NOT $$IsSysName:$StockItemName then @@InvItemName else ""
FullWidth : Yes

[Field: GI Qty]

Use : Qty Primary Field
Set as : $BilledQty
Border : Thin Left

[Field: GI Rate]

Use : Rate Field
Border : Thin Left
Set as : $Rate

[Field: GI Amount]

Use : Amount Forex Field
Border : Thin Left
Set as : $Amount

[Part: Global Invoice Bottom]

Parts : GI Acc Det, GI Net Amt, GI Invoice Bottom
Vertical: Yes
Border : Thin Left Right Bottom

[Part: GI Acc Det]

Lines : GI Inventory Total, GI Acc Det
Repeat : GI Acc Det : Ledger Entries
Height : 10% Page
Common Borders : Yes

[Line: GI Inventory Total]

Right Fields: GI Rate, GI Amount
Local : Field : GI Rate : Type : String
Local : Field : GI Rate : Delete: Border
Local : Field : GI Rate : Width : 20
Local : Field : GI Rate : Set as: "Sub Total"
Local : Field : GI Amount : Set as: $$CollAmtTotal:InventoryEntries:$Amount
Local : Field : GI Amount : Style : Normal Bold
Local : Field : GI Amount : Border: Thin Left

[Line: GI Acc Det]

Use : GI Inventory Total
Right Fields: GI Rate, GI Amount
Local : Field : GI Rate : Set as: $LedgerName
Local : Field : GI Amount : Set as: $Amount
Local : Field : GI Amount : Style : Normal
Local : Field : GI Amount : Border: Thin Left

[Part: GI Net Amt]

Lines : GI Inventory Total
Local : Line : GI Inventory Total : Local : Field : GI Rate : Set as: "Net Amount"
Local : Line : GI Inventory Total : Local : Field : GI Amount : Set as: $Amount
Border : Thin Bottom


[Part: GI Invoice Bottom]

Parts : GI Address, GI Other Details, GI Signatory


[Part: GI Address]

Lines : GI Address Title, GI Address
Repeat : GI Address : Company Address

[Line: GI Address Title]
Use : GI Address
Local : Field : Name Field : Style : Normal Bold
Local : Field : Name Field : Set as : "Address"
Indent : 1

[Line: GI Address]

Fields : Name Field
Local : Field : Name Field : Style : Normal
Local : Field : Name Field : Set as : $Address

[Part: GI Other Details]

Lines : GI Phone, GI Fax, GI Email


[Line: GI Phone]

Fields : Medium Prompt, Simple Field
Local : Field : Medium Prompt : Set as : "Phone"
Local : Field : Simple Field : Set as : $PhoneNumber:Company:##SVCurrentCompany

[Line: GI Fax]

Fields : Medium Prompt, Simple Field
Local : Field : Medium Prompt : Set as : "Fax"
Local : Field : Simple Field : Set as : $Fax:Company:##SVCurrentCompany

[Line: GI Email]

Fields : Medium Prompt, Simple Field
Local : Field : Medium Prompt : Set as : "Email"
Local : Field : Simple Field : Set as : $Email:Company:##SVCurrentCompany

[Part: GI Signatory]

Bottom Line : GI Signatory
Border : Thin Left

[Line: GI Signatory]

Field : Name Field
Local : Field : Name Field : Set as : "for " + @@CmpMailName
Local : Field : Name Field : Full width: Yes


;; Style Definition

[Style: Cmp Style]

Font Name : "Arial"
Height : 15

[System: Formula]

DueDtCalc : $Date + $$Number:$BasicDueDateofPymt

;; End-of-File

 

dear sir ,
i need an extra colomn in sales invoice for ulternate unit ,can u plz give me the code for that ??

 

will u pls help in format customize invoice?
pls mail me mehul.p.ambavat@gmail.com

 

Can format customized invoice?pls help

 

In "invoice.txt" format the company name is reflected twice.
Code error for "09 - Invoice Printing.txt"
Please correct.

 

Hi,

I have a tdl to print the company name in Bold and again the company name is getting printed below that as shown in the attached picture.
Please tell me how to delete this.

 

Invoice.txt is printing company name twice. First one is as per customization and the second name is by default.

 

Hi Experts,
Can any one guide me how to add a POP up screen in Dispaly---> Accounts books ------> Ledger.....the screen should appear after POP up screen...

 

Hi sir, Please correct my TDL Code. Im unable to get the company address in top of the invoice.

[#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: Top Parts : INV,EXPSMPtitle1
Add : Parts : My Invoice Top Part, My Invoice Body Part
Add : Bottom Part: My Invoice Bottom Part
Add : Pagebreak : CLPGBrk,OPGBrk

[Part: INV]
Line: MIINV,MI CmpName,MI PartyADd1
[Line:MIINV]
Field: MIINV
Space Top: 1
[Field:MIINV]
Use : Name Field
Set as : "INVOICE"
Full Width :Yes
Align :Centre
Style :newSTY1

[Style:newSTY1 ]
Use : Normal Bold
Height :11


[Line: MI CmpName]
Field : MI CmpName
Space Top: 0
[Field: MI CmpName]
Use : Name Field
Set as : @@CMPMailNAme
FullWidth : yes
Align : Centre
Style :newSTY1

[Style:newSTY2 ]
Use : Normal Bold
Height :11

[Line: MI PartyADd1]
Field : MI PartyADd1

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


;My Code


;------------------------

[Part: EXPSMPtitle1]
Lines : EXPINV Logo1
Graph Type : "D:\TDL path\Tallylogo2.bmp"
Height: 30 mms
Width: 40 mms
Invisible : If $$InPrintMode OR ($$InExportMode And $$IsSysNameEqual:HTML:##SVExportFormat) then No Else Yes
[Line: EXPINV Logo1]
Field : EXPINV Logo1
[Field: EXPINV Logo1]
Set as : ""

[Part: My Invoice Top Part]
Line : MI VCHDate,MI PartyName, MI ColumnTitles


[Line: MI VCHDate]
Field : Simple Prompt, MI VCHNo
Right Field : Short Prompt, MI VCHDate
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 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 : "Stock Item Name"
Local : Field : IE Qty : Set as : "Billed Qty"
Local : Field : IE Rate : Set as : "Rate"
Local : Field : IE PERUNIT: Set as: "Per"
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 PERUNIT,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 PERUNIT]
Use : Rate Price Field
Set as : $BaseUnits:StockItem:#IESIName
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 : $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


[Collection:VCHCollection1]
Type: Stock Item

 

Hi sir, Please correct my TDL Code. Im unable to get the company address in top of the invoice.

[#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: Top Parts : INV,EXPSMPtitle1
Add : Parts : My Invoice Top Part, My Invoice Body Part
Add : Bottom Part: My Invoice Bottom Part
Add : Pagebreak : CLPGBrk,OPGBrk

[Part: INV]
Line: MIINV,MI CmpName,MI PartyADd1
[Line:MIINV]
Field: MIINV
Space Top: 1
[Field:MIINV]
Use : Name Field
Set as : "INVOICE"
Full Width :Yes
Align :Centre
Style :newSTY1

[Style:newSTY1 ]
Use : Normal Bold
Height :11


[Line: MI CmpName]
Field : MI CmpName
Space Top: 0
[Field: MI CmpName]
Use : Name Field
Set as : @@CMPMailNAme
FullWidth : yes
Align : Centre
Style :newSTY1

[Style:newSTY2 ]
Use : Normal Bold
Height :11

[Line: MI PartyADd1]
Field : MI PartyADd1

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


;My Code


;------------------------

[Part: EXPSMPtitle1]
Lines : EXPINV Logo1
Graph Type : "D:\TDL path\Tallylogo2.bmp"
Height: 30 mms
Width: 40 mms
Invisible : If $$InPrintMode OR ($$InExportMode And $$IsSysNameEqual:HTML:##SVExportFormat) then No Else Yes
[Line: EXPINV Logo1]
Field : EXPINV Logo1
[Field: EXPINV Logo1]
Set as : ""

[Part: My Invoice Top Part]
Line : MI VCHDate,MI PartyName, MI ColumnTitles


[Line: MI VCHDate]
Field : Simple Prompt, MI VCHNo
Right Field : Short Prompt, MI VCHDate
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 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 : "Stock Item Name"
Local : Field : IE Qty : Set as : "Billed Qty"
Local : Field : IE Rate : Set as : "Rate"
Local : Field : IE PERUNIT: Set as: "Per"
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 PERUNIT,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 PERUNIT]
Use : Rate Price Field
Set as : $BaseUnits:StockItem:#IESIName
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 : $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


[Collection:VCHCollection1]
Type: Stock Item

 

its not coming in print its coming only in entry screen

 

dear waheed can u set invoice with two added columns (text columns) in which we can feed any description of items in sale invoice tia

 

hi
i require in Purchase Order name in (Voucher No ) as to be Purchase order No plz help for the report

 

hi,
what is the system formula for GCC(UAE) TRN(Tax Registration number) and Emirate(state) ? i tired $VATTINNumber, this is not giving any output of TRN number. i want to display Customers Name, Emirates and TRN in invoice.

Thank you

 

I have tdl but I need to add Vat line can yo u help me. I attached below tdl file and invoice formate

[#Form : Sales Color]
Delete : Print : Printed INVOICE
Print : AMF Invoice

[Report : AMF Invoice]
Object : Voucher
Filtered : Yes
Form : AMFInvoice

[Form :AMFinvoice]
Parts :jtop, AMFINVTOP2,AMFINVMID
Bottom Parts : jaccpart,AMFINVBOT1
HEIGHT : 100% PAGE
WIDTH : 100% PAGE
SPACETOP : 21% PAGE
SPACELEFT : 1.50% PAGE
SPACERIGHT : 2% PAGE
; SPACEBOTTOM :4% PAGE
PAGE BREAK : AMFINVCLBREAK,AMFINVOPBREAK

[PART : AMFINVCLBREAK]
PARTS : AMFINVMID,AMFINVCONTINUED
VERTICAL : YES

[PART : AMFINVCONTINUED]
LINE : AMFINVCONTINUED

[LINE : AMFINVCONTINUED]
FIELDS : AMFINVVAL1,AMFINVVAL2,AMFINVVAL3,AMFINVVAL6,AMFINVVAL7
LOCAL : FIELD : AMFINVVAL1 : SETAS : " "
LOCAL : FIELD : AMFINVVAL1 : DELETE : BORDER
LOCAL : FIELD : AMFINVVAL2 : SETAS : " "
LOCAL : FIELD : AMFINVVAL2 : DELETE : BORDER
LOCAL : FIELD : AMFINVVALware : SETAS : " "
LOCAL : FIELD : AMFINVVALware : DELETE : BORDER
LOCAL : FIELD : AMFINVVAL3 : SETAS : " "
LOCAL : FIELD : AMFINVVAL3 : DELETE : BORDER
LOCAL : FIELD : AMFINVVAL8 : SETAS : " "
LOCAL : FIELD : AMFINVVAL8 : DELETE : BORDER
LOCAL : FIELD : AMFINVVAL6 : SETAS : " "
LOCAL : FIELD : AMFINVVAL6 : DELETE : BORDER
LOCAL : FIELD : AMFINVVAL7 : SETAS : " "
LOCAL : FIELD : AMFINVVAL7 : DELETE : BORDER




[PART : AMFINVOPBREAK]
PARTS : jtop, AMFINVTOP2
VERTICAL : YES


;;--------------------------------------------top 2 start


[PART : AMFINVTOP2]
HEIGHT : 16% PAGE
; WIDTH : 70% PAGE
PARTS : AMFINVTOP2PARTY
RIGHT PARTS : AMFINVTOP2RT



[PART : AMFINVTOP2PARTY]
HEIGHT : 16% PAGE
WIDTH : 50% PAGE
LINES : AMFINVPNAME,AMFINVPADD ;;;,amfinvyourref,amfinvatt
REPEAT : AMFINVPADD : buyerADDRESS
SPACE LEFT: 1% PAGE

[LINE : AMFINVPNAME]
space top : 1
FIELD :AMFINVPNAME

[FIELD : AMFINVPNAME]
SETAS : IF $LEDGERNAME="CASH A/C" THEN "CASH CUSTOMER" ELSE $LEDGERNAME
; WIDTH : 50% PAGE
STYLE : normal bold
ALIGN : LEFT
SPACE LEFT :5% PAGE
;; space left : .97% page




[style : lll]
font : ariel bold
height : 14
bold : yes

[LINE : AMFINVPADD]
FIELD : AMFINVPADD


[FIELD : AMFINVPADD]
SETAS : $buyerADDRESS
; WIDTH : 50% PAGE
STYLE : normal
ALIGN : LEFT
SPACE LEFT : 5% PAGE



;;-------
[PART : AMFINVTOP2RT]
HEIGHT :16% PAGE
WIDTH :20% PAGE
LINES : amfinvdte,AMFINVINVNO,AMFINVDO,AMFINVSM


[line : amfinvdte]
field : amfinvdt


[FIELD : AMFINVDT]
SET AS : $$STRING:$DATE
ALIGN : LEFT
; space left : 16 mms
style : normal


[LINE : AMFINVINVNO]
Spacetop : .50% Page
field : AMFINVINVNO

space top:1.5 mms

[FIELD : AMFINVINVNO]

SETAS : $vouchernumber
ALIGN : LEFT
; space left : 16 mms
style : LARGE


[LINE : AMFINVSM]


FIELD : AMFINVSM
SPACE top: 2 MMS


[FIELD : AMFINVSM]
set as : $purchaseorderno
ALIGN : LEFT
style : normal

; space left : 16 mms

[LINE : AMFINVDO]
; Spacetop : 1.50% Page
FIELD :AMFINVDO
SPACE top: 2 MMS

[FIELD : AMFINVDO]

Set as : if NOT $$IsSysName:$ShipDeliveryNote then $ShipDeliveryNote else ""
ALIGN : LEFT

style : normal
; space left : 16 mms




[LINE : AMFINVpay]
; Spacetop : 1.50% Page
FIELD :AMFINVpay
; SPACE : 3 MMS

[FIELD : AMFINVpay]

Set as : $duedateofpymt
ALIGN : LEFT

style : newstyle1
; space left : 16 mms

[Style : NEWSTYLE1]
Font : "arial"
height : 8
Bold : no
;; ALIGN : RIGHT


;;-------------------END OF TOP1



[style : ll]
Font : "Ariel Black"
Height : 10



;;------------------------------------------------MID

[PART : AMFINVMID]

; HEIGHT : 55% PAGE
; WIDTH : 100% PAGE
LINES : AMFINVDET
REPEAT : AMFINVDET : InventoryEntries
; TOTAL : AMFINVVAL7
Total : amfinvval3,AMFINVVAL7 ;;;OPINVQuantiTY
SCROLL : VERTICAL
FLOAT : NO
SPACE TOP: 4% PAGE


[LINE : AMFINVDET]
FIELDS : AMFINVVAL1,AMFINVVAL2
RIGHT FIELD :AMFINVVAL3,AMFINVVAL6,AMFINVVAL7
SPACE top: 1.20 MMS



;;--------------------------------

; Explode : CGInvDet AddDesc

;[Part : CGInvDet AddDEsc]
; Line : CGInvDet AddDesc
; Repeat : CGInvDet AddDesc : User Description
; space bottom : 1% page
;[Line : CGInvDet AddDesc]
; FIELDS : AMFINVVAL1,AMFINVVAL2,AMFINVVAL3exp,AMFINVVAL3,AMFINVVAL6,AMFINVVAL7
; Local : Field : AMFINVVAL1 : Set as : ""
; Local : Field : AMFINVVAL1 : DELETE : BORDER
; Local : Field : AMFINVVAL2: Set as : ""
; Local : Field : AMFINVVAL2: DELETE : BORDER
; Local : Field : AMFINVVAL3 : Set as : ""
; Local : Field : AMFINVVAL3 : DELETE : BORDER
; Local : Field : AMFINVVAL5 : Set as : ""
; Local : Field : AMFINVVAL5 : DELETE : BORDER
; Local : Field : AMFINVVAL6 : Set as : ""
; Local : Field : AMFINVVAL6 : DELETE : BORDER
; Local : Field : AMFINVVAL7 : Set as : ""
; Local : Field : AMFINVVAL7 : DELETE : BORDER
;
; Empty : User Description


;[Field : AMFINVVAL3exp]
; Width : 30% page
; Set as : $UserDescription
; LINES : 0
; space left : 9% page
;;;----------------------------------------







[FIELD : AMFINVVAL1]
SETAS : $$line ;;;partno:stockitem:$stockitemname
WIDTH : 5% PAGE
STYLE : normal
ALIGN : right

[FIELD : AMFINVVAL2]
set as : $stockitemname:stockitem:$stockitemname

; WIDTH : 38% PAGE
STYLE : normal
ALIGN : left
SPACE LEFT : 4


[FIELD : AMFINVVAL21]
set as : $batchname

;; WIDTH : 58% PAGE
STYLE : normal
ALIGN : left
SPACE LEFT : 2
Inactive : NOT @@HasBatchWise


[FIELD : AMFINVVAL3]
USE : QTY FIELD
SETAS : $BILLEDQTY
; WIDTH : 8% PAGE
STYLE : normal
ALIGN : center
Format : "No Symbol"




[FIELD : AMFINVVAL6]
USE : RATE PRICE FIELD
SETAS : $RATE
WIDTH : 14.5% PAGE
STYLE : normal
ALIGN : right
Format : "No Symbol,FOREX"
; space left : 2 mms




[FIELD : AMFINVVAL7]
USE : AMOUNT FOREX FIELD
SETAS : $AMOUNT
WIDTH : 15.5% PAGE
STYLE : normal
ALIGN : RIGHT
; SPACE right : 7 mms







;;-------------------------------------END OF MID







;;-------------------------

[Part : AMFINVBOT1]
Height : 13.50% Page ;;6%
Line : AMFINVBOT3,salman ;;;,amfinvsale ;;,AMFINVBOT2






[Line : AMFINVBOT3]
spacetop : 0.5% Page
field : AMFINVTotalAmtWrds
right Fields : AMFINVtot



[Field : AMFINVTotalAmtWrds]
type : string
; width : 85% page
set as : $$Inwords:#AMFINVtot:"Forex" + " Only" ;;:"NoSymbol"
Style : normal BOLD
FORMAT : "NOSYMBOL"
ALIGN : LEFT
SPACE LEFT:22 mms
;; space right : 7.5 mms



[Field : amfinvtot]
Use : Amount forex Field
Set as : if $$IsPurchase:##SVVoucherType then $$NettAmount:$Amount:$AddlAmount else $Amount


style : LARGE BOLD


[Line : salman]
space top : 1.5
field :saltit, salman




[Field : salman]

set as : ##svautocost
Style : normal BOLD
ALIGN : LEFT


[Field : saltit]

set as : "SalesMan :"
Style : normal BOLD
ALIGN : LEFT
SPACE LEFT:15 mms




;--------------------------------


[Part : JACCPart]
height : 5% page
Lines : JAccLines
Repeat : JAccLines : Ledger Entries
Total : JAFld7
Float : No


[Line : JACCLines]

Fields : JAFld1, JAFld2, JAFld3, JAFld4, JAFld5, JAFld6
Right Field : JAFld7


[Field : JAFld1]

Type : String
Width : @@widthCol1 mms
Set as : " "
; Style : DraftBold2
Align : Left


[Field : JAFld2]

Width : @@widthcol2 mms
Align : Left
Set As : if $Amount < 0 then "Less : "+ $LedgerName else if $$IsSysName:$LedgerName then " " else $LedgerName
Style : normal
space left : 13


[Field : JAFld3]

Width : @@WidthCol3 mms
Set As : " "
Align : Right


[Field : JAFld4]

Width : @@WidthCol4 mms
Set As : " "
Align : Right

[Field : JAFld5]

Width : @@WidthCol5 mms
Set As : " "
Align : Right

[Field : JAFld6]

Width : @@WidthCol6 mms
Set As : " "
Align : Right

[Field : JAFld7]

Use : Amount Field
Width : @@widthCol7 mms
Set as : $Amount
;; Space Right : 6 mms


Style : large





[Part : JTOP]

Lines : JTOP

[Line:JTOP]

Fields : EXPINVPartyLedName ;; This is an invisible required field

 

I want only the calculation of opening balance