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
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 ??
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
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