HSN no & Description in single line while printing

Discussion in 'Free Source Codes' started by JObimon Arackal JOhn, Nov 2, 2013.

    
  1. JObimon Arackal JOhn

    JObimon Arackal JOhn Active Member


    This was done on my friends request
    His Requirement was to print HS Number in Export invoice while it is printed ( not in creation mode) and to print item description in one line or two line to save space while printing.( But when it is entered during item creation it must be Multiple line.


    0.png 1.png
     

    Attached Files:

    • 2.png
      2.png
      File size:
      144.6 KB
      Views:
      638
    • 3.jpg
      3.jpg
      File size:
      796.9 KB
      Views:
      773
    • HSN.txt
      File size:
      1,013 bytes
      Views:
      543
    VIKRAM PAREEK and Manoj Garg like this.


  2. Manoj Garg

    Manoj Garg Member


    Great.
     
    G Vijay likes this.


  3. G Vijay

    G Vijay Member


    great
     


  4. VIKRAM PAREEK

    VIKRAM PAREEK New Member


    Very Good one WELL DONE KEEP IT UP
     


  5. priya

    priya Member


    superb one.
     


  6. ABHIJIT HUI

    ABHIJIT HUI New Member


    in excise invoice tariff no. is printed but i want the tariff no. of each stock item while exporting the stock summary into excel format.this is urgent for excise return ER-1. please help me. --------------- Abhijit Hui. ( e-mail id : jeet6597@gmail.com )
     


  7. Rajan Pillai

    Rajan Pillai New Member


    Sir,

    I have the following code to print Simple Invoice.
    But I do not know how to show more Batchs of the same items with with expiry date, Qty, MRP, Rate etc..

    Please Help me... Thanks in Advance.

    ;; ==============


    [#Part: VTYP BehaviourMain]

    Add : Line : After : VTYP Dec: VTYP DECL2TL,VTYP DECL2


    [Line: VTYP DECL2TL]

    Field : Simple Prompt
    Local : Field: Simple Prompt : Set As : "Declaration 2"
    Local : Field: Simple Prompt : Style : Small Bold
    Local : Field: Simple Prompt : Border : Thin Bottom
    Local : Field: Simple Prompt : Width : 13

    [Line: VTYP DECL2]

    Field : VTYP DECL2
    Space Top : .50

    [Field: VTYP DECL2]

    Line : 4
    Full width : Yes
    Storage : VTYPDECL2
    Max : 500

    [System: UDF]

    VTYPDECL2 : String : 23102



    ;;;---
    [#Part: CMP Tax Info]

    Add : Line : At End : CMP DLNNoTL

    [Line: CMP DLNNoTL]

    Right Field : Medium Prompt
    Local : Field : Medium Prompt : Set as : "Drug Lic No. :"
    Option : Small Size Line
    Space Top : 0.4

    [#Part: CMP Tax Value]

    Add : Line : At End : CMP DLNNoVAL

    [Line: CMP DLNNoVAL]

    Field : Name Field
    Local : Field : Name Field : Storage : CMPDLNNoVAL
    Local : Field : Name Field : Full width : Yes
    Local : Field : Name Field : Max : 200
    Local : Field : Name Field : Line : 2
    Option : Small Size Line
    Space Top : 0.4


    [#Part: LED Other Details]

    Add : Lines : At End : LED DLNo

    [Line: LED DLNo]

    Fields : Medium Prompt, LED DLNo
    Local : Field : Medium Prompt : Set as : $$LocaleString:"Drug Lic. No :"
    Invisible : NOT @@IsIndian



    [Field: LED DLNo]

    Use : Name Field
    Storage : LEDDLNo
    Full width : YEs
    Line : 2
    Max : 200



    [#Form: Sales Color]

    Delete : Print
    Add : Print : SalesHInv

    [Report: SalesHInv]

    Object : Voucher

    [Form: SalesHInv]

    Part : SalesHInv,SalesHInv2,SalesHInv21,SalesHInv3,SalesHInvBdyTL,SalesHInvBdy
    Bottom Part: SalesHInvBTM
    Space Left : 3
    Space Right : 3
    Page Break : ClosnPgBrk,OpPgBrk

    [Part: ClosnPgBrk]

    Line : ClosnPgBrk

    [Line: ClosnPgBrk]

    Field : Simple Field
    Local : Field : Simple Field : Set As : "Continuee....."

    [Part: OpPgBrk]

    Part : SalesHInv,SalesHInv2,SalesHInv3,SalesHInvBdyTL
    Vertical : Yes

    [Part: SalesHInv]

    Line: SalesHInv,SalesHCmpAddress,SalesHInvTL,SalesHInvTxTL
    Repeat : SalesHCmpAddress : CompanyAddress

    [Line: SalesHInv]

    Field : Name Field
    Local : Field : Name Field: Set As :mad:@CMPMailName
    Local : Field : Name Field: Full Width : Yes
    Local : Field : Name Field: Align : Center
    Local : Field : Name Field: Style : sob1
    [Style: sob1]
    ; font:"Cooper Black"
    font:"Arial"
    Height : 28

    [Line:SalesHCmpAddress]

    Field : Name Field
    Local : Field : Name Field: Set As: $Address
    Local : Field : Name Field: Full width : Yes
    Local : Field : Name Field: Align : Center
    Local : Field : Name Field: Style : sob2

    [Style: sob2]
    font:"Courier New"
    Height : 14


    [Line: SalesHInvTL]

    Space Top : .20
    Field : Name Field
    Local : Field : Name Field: Set As :$VCHPrintTitle:VoucherType:##SVVoucherType
    Local : Field : Name Field: Align : Center
    Local : Field : Name Field: Full Width : Yes
    Local : Field : Name Field: Style : Large Bold

    [Line: SalesHInvTxTL]

    Field : Name Field
    Local : Field : Name Field: Set As :"(The Kerala Value Added Tax Rules 2005)"
    Local : Field : Name Field: Align : Center
    Local : Field : Name Field: Full Width : Yes
    Local : Field : Name Field: Style : Normal

    [Part: SalesHInv2]

    Space Top : 1
    Part: SalesHInv2C
    Right Part: SalesHInv2R


    [Part: SalesHInv2C]

    Line : SalesHInv2C
    Width : 50 % Page

    [Line: SalesHInv2C]

    Field : Name Field
    Local : Field : Name Field : Set As : "Cash/Credit"
    Local : Field : Name Field : Align : Right
    Local : Field : Name Field : Full Width: Yes
    Local : Field : Name Field : Style : Large

    [Part: SalesHInv2R]

    Line : SalesHInv2RTIN,SalesHInv2RCST
    Width : 33 % Page

    [Line: SalesHInv2RTIN]

    Field : Short Prompt,SalesHInv2RTIN
    Local : Field : Short Prompt : Set As : "T.I.N :"


    [Field: SalesHInv2RTIN]

    Use : Name Field
    Set As : $VATTINNumber:Company:##SVCurrentCompany


    [Line: SalesHInv2RCST]

    Field : Short Prompt,SalesHInv2RCST
    Local : Field : Short Prompt : Set As : "C.S.T :"




    [Field: SalesHInv2RCST]

    Use : Name Field
    Set As : $InterstateSTNumber:Company:##SVCurrentCompany

    [Part: SalesHInv21]

    Line: SalesHCmpDLicno

    [Line: SalesHCmpDLicno]

    Space Top : .50
    Field : Short Prompt,Name Field
    Local : Field : Short Prompt : Set As : "Drug Lic No. :"
    Local : Field : Name Field : Set As : $CMPDLNNoVAL:Company:##SVCurrentCompany
    Local : Field : Name Field : Full width : Yes
    Local : Field : Name Field : Style : Normal


    [System: UDF]

    CMPDLNNoVAL : String : 21110
    LEDDLNo : String : 21111
    STKI MFR : String : 21112

    [Part: SalesHInv3]

    Space Top : .50
    Border : Thin Top
    Part : SalesHInv3L
    Right Part: SalesHInv3R

    [Part : SalesHInv3L]

    Line : SalesBuyerName,SalesBuyerAddress,SalesBuyerPh,SalesBuyerTin,SalesBuyerDLIC
    Repeat : SalesBuyerAddress : BasicBuyerAddress

    [Line:SalesBuyerName]

    Field : Short Prompt,Name Field
    Local : Field : Short Prompt: Set As : "Buyer :"
    Local : Field : Short Prompt: Width : 7
    Local : Field : Name Field : Set As : $BasicBuyerName
    Local : Field : Name Field : Full width : Yes


    [Line:SalesBuyerAddress]

    Field : Short Prompt,Name Field
    Local : Field : Short Prompt: Width : 7
    Local : Field : Short Prompt: Delete : Align : Prompt
    Local : Field : Name Field : Set As : $BasicBuyerAddress
    Local : Field : Name Field : Full width : Yes


    [Line:SalesBuyerPh]

    Field : Short Prompt ,Name Field
    Local : Field : Short Prompt: Set As : "Phone :"
    Local : Field : Short Prompt: Width : 7
    Local : Field : Name Field : Set As : $LedgerPhone:Ledger:$PartyLedgerName


    [Line:SalesBuyerTin]

    Field : Short Prompt ,Name Field
    Local : Field : Short Prompt: Set As : "Tin :"
    Local : Field : Short Prompt: Width : 8
    Local : Field : Name Field : Set As : $BasicBuyersSalesTaxNo
    Local : Field : Name Field : Full width : Yes


    [Line: SalesBuyerDLIC]

    Field : Short Prompt ,Name Field
    Local : Field : Short Prompt: Set As : "Drug Lic No:"
    Local : Field : Short Prompt: Width : 8
    Local : Field : Name Field : Set As : $LEDDLNo:Ledger:$PartyLedgerName
    Local : Field : Name Field : Line : 0
    Local : Field : Name Field : Full width : Yes
    Local : Field : Name Field : Style : Normal




    [Part: SalesHInv3R]

    Line : SalesInvNo,SalesInvDate,SalesInvMOP,SalesInvDEL,SalesInvOrd,+
    SalesInvDest,SalesInvDThr

    [Line: SalesInvNo]

    Field : Medium Prompt,Name Field
    Local : Field : Medium Prompt : Set As : "Invoice No. :"
    Local : Field : Name Field : Style : Large Bold

    Local : Field : Name Field : Set As : $VoucherNumber
    Local : Field : Name Field : Style : Large Bold



    [Line: SalesInvDate]

    Field : Medium Prompt,Name Field
    Local : Field : Medium Prompt : Set As : "Invoice Date :"

    Local : Field : Name Field : Set As : $Date
    Local : Field : Name Field : Style : Large Bold



    [Line: SalesInvMOP]

    Field : Medium Prompt,Name Field
    Local : Field : Medium Prompt : Set As : "Mode of Payment :"
    Local : Field : Name Field : Set As : $BasicDueDateOfPymt
    Local : Field : Name Field : Style : Normal



    [Line: SalesInvDEL]

    Field : Medium Prompt,Name Field
    Local : Field : Medium Prompt : Set As : "DL Note No : "
    Local : Field : Name Field : Set As : $BasicShipDeliveryNote
    Local : Field : Name Field : Style : Normal



    [Line: SalesInvOrd]

    Field : Medium Prompt,Name Field
    Local : Field : Medium Prompt : Set As : "Order No : "
    Local : Field : Name Field : Set As : $BasicPurchaseOrderNo
    Local : Field : Name Field : Style : Normal



    [Line: SalesInvDest]

    Field : Medium Prompt,Name Field
    Local : Field : Medium Prompt : Set As : "Destination: "
    Local : Field : Name Field : Set As : $BasicFinalDestination
    Local : Field : Name Field : Style : Normal


    [Line: SalesInvDThr]

    Field : Medium Prompt,Name Field
    Local : Field : Medium Prompt : Set As : "Despatch Through: "
    Local : Field : Name Field : Set As : $BasicShippedBy
    Local : Field : Name Field : Style : Normal



    ;-SalesHInvBdy

    [Part: SalesHInvBdyTL]

    Line : SalesHInvBdyTL1,SalesHInvBdyTL2
    Border : Thin Top Bottom
    Space Bottom: .40
    Space Top : .40

    [Line: SalesHInvBdyTL1]

    Field : SalesHInvSl,SalesHInvDesc
    Right Field : SalesHInvMFR,SalesHInvBTH,SalesHInvExp,SalesHInvQty,SalesHInvRate,SalesHInvMRP,SalesHInvDIS,SalesHInvVAT1, SalesHInvAMT,IndQD
    Local : Field : SalesHInvSl : Set As : "Sl"
    Local : Field : SalesHInvDesc : Set As : "Description"
    Local : Field : SalesHInvMFR : Set As : "MFR"
    Local : Field : SalesHInvBTH : Set As : "Batch"
    Local : Field : SalesHInvExp : Set As : "Expiry"
    Local : Field : SalesHInvQty : Set As : "Quanty"
    Local : Field : SalesHInvRate : Set As : "Rate"
    Local : Field : SalesHInvMRP : Set As : "M.R.P"
    Local : Field : SalesHInvDIS : Set As : "Disc."
    Local : Field : SalesHInvVAT1 : Set As : "Tax"
    Local : Field : SalesHInvAMT : Set As : "Amount"
    Local : Field : IndQD : Set As : "Free"
    Local : Field : Default : Type : String
    Local : Field : Default : Align : Center

    [Line: SalesHInvBdyTL2]

    Field : SalesHInvSl,SalesHInvDesc
    Right Field : SalesHInvMFR,SalesHInvBTH,SalesHInvExp,SalesHInvQty,SalesHInvRate,SalesHInvMRP,SalesHInvDIS,SalesHInvVAT1, SalesHInvAMT,IndQD
    Local : Field : SalesHInvSl : Set As : "No"
    Local : Field : SalesHInvDesc : Set As : ""
    Local : Field : SalesHInvMFR : Set As : ""
    Local : Field : SalesHInvBTH : Set As : "Number"
    Local : Field : SalesHInvExp : Set As : "Date"
    Local : Field : SalesHInvQty : Set As : ""
    Local : Field : SalesHInvRate : Set As : ""
    Local : Field : SalesHInvMRP : Set As : ""
    Local : Field : SalesHInvDIS : Set As : "%"
    Local : Field : SalesHInvVAT1 : Set As : "%"
    Local : Field : SalesHInvAMT : Set As : ""
    Local : Field : IndQD : Set As : "Quanty"
    Local : Field : Default : Type : String
    Local : Field : Default : Align : Center



    [Part: SalesHInvBdy]

    Line : SalesHInvBdy
    Repeat : SalesHInvBdy : Inventory Entries
    Scroll : Vertical
    Common Border : Yes
    Float : No

    [Line: SalesHInvBdy]

    Field : SalesHInvSl,SalesHInvDesc
    Right Field : SalesHInvMFR,SalesHInvBTH,SalesHInvExp,SalesHInvQty,SalesHInvRate,SalesHInvMRP,SalesHInvDIS,SalesHInvVAT1, SalesHInvAMT,IndQD
    Space Top : .40
    Explode : EI DescExplosion : NOT $$IsEmpty:$StockItemName AND ##ICFGAddlDesc AND NOT $$IsEmpty:$UserDescription
    local :line: EI DescExplosion :spaceRight:10

    [Field: SalesHInvSl]

    Use : Name Field
    Set As : $$Line
    Width : 3
    Style : Normal
    Border : Thin LeftRight

    [Field: SalesHInvDesc]

    Use : Name Field
    Set As : $StockItemName
    Style : Normal

    [Field: SalesHInvMFR]

    Use : Name Field
    Set As : $Category:Stockitem:$StockITemName
    Width : 4
    Style : Normal
    Border : Thin Left
    Align : Center

    [Field: SalesHInvBTH]

    Use : Name Field
    Set As : $$CollectionField:$BatchName:1:BatchAllocations
    Width : 8
    Style : Normal
    Border : Thin Left
    Align : Center

    [Field: SalesHInvExp]

    Use : Due Date Field
    Set As : $$CollectionField:$EXPIRYPERIOD:1:BatchAllocations
    Border : Thin Left
    Style : Normal
    Width : 7
    Align : Center

    [Field: SalesHInvQty]

    Use : Qty Primary Field
    Set As : $BilledQty
    Width : 5
    Border : Thin Left
    Style : Normal
    Align : Centre

    [Field: SalesHInvRate]

    Use : Rate Price Field
    Set As : $Rate
    Style : Normal
    Border : Thin Left
    Align : centre
    Width : 6

    [Field: SalesHInvMRP]

    Use : Number Field
    Set As : $RATEOFMRP:Stockitem:$StockitemName
    Style : Normal
    Format : "NoZero"
    Width : 6
    Border : Thin Left
    Align : centre

    [Field: SalesHInvDIS]

    Use : Number Field
    Format : "Percentage"
    Set As : $Discount
    Width : 4
    Align : Center
    Style : Normal
    Border : Thin LeftRight


    [Field: SalesHInvVAT1]

    Use : Number Field
    Set As : $RateOfVat:StockItem:$StockItemName
    Style : Normal
    Align : Center
    Format : "NoZero"
    Border : Thin LeftRight
    Width : 5


    [Field: SalesHInvAMT]

    Use : Amount Field
    Set As : $Amount
    Style : Normal
    Width : 8
    Align : Right
    ;;; Center


    [Field : IndQD]

    Use : Qty Primary Field
    Set As : $ActualQty - $BilledQty
    Width : 4
    Border : Thin Left
    Style : Normal
    Format : "NoZero"
    Border : ThinLeftRight
    Align : Center




    [Part: SalesHInvBdyBTH]

    Line : SalesHInvBdyBTH
    Repeat : SalesHInvBdyBTH : Batch Allocations

    [Line: SalesHInvBdyBTH]

    Field : SalesHInvSl,SalesHInvDesc
    Right Field : SalesHInvMFR,SalesHInvBTH,SalesHInvExp,SalesHInvQty,SalesHInvRate,SalesHInvMRP,SalesHInvDIS,SalesHInvVAT1, SalesHInvAMT,IndQD

    Local : Field : SalesHInvDesc : Set As: ""
    Local : Field : SalesHInvMFR : Set As: ""
    Local : Field : SalesHInvBTH : Set As: ""
    Local : Field : SalesHInvExp : Set As: ""
    Local : Field : SalesHInvQty : Set As: ""
    Local : Field : SalesHInvRate : Set As: ""
    Local : Field : SalesHInvMRP : Set As: ""
    Local : Field : SalesHInvDIS : Set As: ""
    Local : Field : SalesHInvVAT1 : Set As: ""
    Local : Field : SalesHInvAMT : Set As: ""
    Local : Field : IndQD : Set As: ""

    [Part: SalesHInvBTM]

    Border : Thin Top
    Space Top : .50
    Part : SalesHInvBTML
    Right Part : SalesHInvBTMR

    [Part: SalesHInvBTML]

    Line : SalesHInvBTML1TL,SalesHInvBTML1Wrd,SalesHInvBTMLDeclTL,SalesHInvBTMLDecl,SalesHInvBTMLDecl2

    [Line: SalesHInvBTML1TL]

    Field : Name Field
    Local : Field : Name Field : Set As : "Amount Chargable (in words)"
    Local : Field : Name Field : Style : Normal
    Local : Field : Name Field : Full width : Yes

    [Line: SalesHInvBTML1Wrd]

    Field : Name Field
    Local : Field : Name Field : Set As : $$InWords:$Amount + " Only"
    Local : Field : Name Field : Full width : Yes

    [Line: SalesHInvBTMLDeclTL]

    Space Top : 1
    Field : Name Field
    Local : Field : Name Field : Set As : "Declaration:"
    Local : Field : Name Field : Full width : Yes
    Local : Field : Name Field : Style : Normal

    [Line: SalesHInvBTMLDecl]

    Space Top : 1
    Field : Name Field
    Local : Field : Name Field : Set As : $VCHPrintDecl:VoucherType:##SVVoucherType
    Local : Field : Name Field : Full width : Yes
    Local : Field : Name Field : Line : 0
    Local : Field : Name Field : Style : Normal

    [Line: SalesHInvBTMLDecl2]

    Space Top : 1
    Field : Name Field
    Local : Field : Name Field : Set As : $VTYPDECL2:VoucherType:##SVVoucherType
    Local : Field : Name Field : Full width : Yes
    Local : Field : Name Field : Line : 0
    Local : Field : Name Field : Style : Normal

    [Part: SalesHInvBTMR]

    Line : SalesHInvBTML1,SalesHInvLedger,SalesHInvToT,SalesHInvFor,SalesHInvForSigh
    Repeat : SalesHInvLedger : Ledger Entries
    Width : 40 % Page

    [Line: SalesHInvBTML1]

    Right Field : Name Field ,SalesHInvAMT
    Local : Field : Name Field : Set As : "Total :"
    Local : Field : Name Field : Style : Normal
    Local : Field : SalesHInvAMT : Set As : $$CollAmtTotal:InventoryEntries:$Amount
    Local : Field : SalesHInvAMT : Style : Normal Bold

    [Line: SalesHInvLedger]

    Right Field : Name Field,SalesHInvAMT
    Local : Field : Name Field : Set As : $LedgerName
    Local : Field : Name Field : Style : Normal
    Local : Field : SalesHInvAMT : Set As : $Amount
    Local : Field : SalesHInvAMT : Style : Normal Bold
    Empty: $LedgerName = $PartyLedgerName

    [Line: SalesHInvToT]

    Space Top : 1
    Right Field : Name Field,SalesHInvAMT
    Local : Field : Name Field : Set As : "Invoice Value"
    Local : Field : Name Field : Style : Large
    Local : Field : SalesHInvAMT : Set As : $Amount


    Local : Field : SalesHInvAMT : Style : Large Bold

    [Line: SalesHInvFor]

    Space Top : 1
    Right Field : Name Field
    Local : Field : Name Field : Set As : "For " + @@CMPMailName
    Local : Field : Name Field : Style : Large Bold

    [Line: SalesHInvForSigh]

    Space Top : 3
    Right Field : Name Field
    Local : Field : Name Field : Set As : "Authorised Signatory"
    Local : Field : Name Field : Style : Normal Bold


    ;; end of file
     


  8. Rajsrisrimal

    Rajsrisrimal Member


    Rajan Pillai sir
    If you have updated code of print Simple Invoice.
    Please share me at rajsrisrimal@gmail.com
     


  9. Ajeet Jain

    Ajeet Jain Member


    ;;Please find below correct code



    [#Part: VTYP BehaviourMain]

    Add : Line : After : VTYP Dec: VTYP DECL2TL,VTYP DECL2


    [Line: VTYP DECL2TL]

    Field : Simple Prompt
    Local : Field: Simple Prompt : Set As : "Declaration 2"
    Local : Field: Simple Prompt : Style : Small Bold
    Local : Field: Simple Prompt : Border : Thin Bottom
    Local : Field: Simple Prompt : Width : 13

    [Line: VTYP DECL2]

    Field : VTYP DECL2
    Space Top : .50

    [Field: VTYP DECL2]

    Line : 4
    Full width : Yes
    Storage : VTYPDECL2
    Max : 500

    [System: UDF]

    VTYPDECL2 : String : 23102



    ;;;---
    [#Part: CMP Tax Info]

    Add : Line : At End : CMP DLNNoTL

    [Line: CMP DLNNoTL]

    Right Field : Medium Prompt
    Local : Field : Medium Prompt : Set as : "Drug Lic No. :"
    Option : Small Size Line
    Space Top : 0.4

    [#Part: CMP Tax Value]

    Add : Line : At End : CMP DLNNoVAL

    [Line: CMP DLNNoVAL]

    Field : Name Field
    Local : Field : Name Field : Storage : CMPDLNNoVAL
    Local : Field : Name Field : Full width : Yes
    Local : Field : Name Field : Max : 200
    Local : Field : Name Field : Line : 2
    Option : Small Size Line
    Space Top : 0.4


    [#Part: LED Other Details]

    Add : Lines : At End : LED DLNo

    [Line: LED DLNo]

    Fields : Medium Prompt, LED DLNo
    Local : Field : Medium Prompt : Set as : $$LocaleString:"Drug Lic. No :"
    Invisible : NOT @@IsIndian



    [Field: LED DLNo]

    Use : Name Field
    Storage : LEDDLNo
    Full width : YEs
    Line : 2
    Max : 200



    [#Form: Sales Color]

    Delete : Print
    Add : Print : SalesHInv

    [Report: SalesHInv]

    Object : Voucher

    [Form: SalesHInv]

    Part : SalesHInv,SalesHInv2,SalesHInv21,SalesHInv3,SalesHInvBdyTL,SalesHInvBdy
    Bottom Part: SalesHInvBTM
    Space Left : 3
    Space Right : 3
    Page Break : ClosnPgBrk,OpPgBrk

    [Part: ClosnPgBrk]

    Line : ClosnPgBrk

    [Line: ClosnPgBrk]

    Field : Simple Field
    Local : Field : Simple Field : Set As : "Continuee....."

    [Part: OpPgBrk]

    Part : SalesHInv,SalesHInv2,SalesHInv3,SalesHInvBdyTL
    Vertical : Yes

    [Part: SalesHInv]

    Line: SalesHInv,SalesHCmpAddress,SalesHInvTL,SalesHInvTxTL
    Repeat : SalesHCmpAddress : CompanyAddress

    [Line: SalesHInv]

    Field : Name Field
    Local : Field : Name Field: Set As :mad:@CMPMailName
    Local : Field : Name Field: Full Width : Yes
    Local : Field : Name Field: Align : Center
    Local : Field : Name Field: Style : sob1
    [Style: sob1]
    ; font:"Cooper Black"
    font:"Arial"
    Height : 28

    [Line:SalesHCmpAddress]

    Field : Name Field
    Local : Field : Name Field: Set As: $Address
    Local : Field : Name Field: Full width : Yes
    Local : Field : Name Field: Align : Center
    Local : Field : Name Field: Style : sob2

    [Style: sob2]
    font:"Courier New"
    Height : 14


    [Line: SalesHInvTL]

    Space Top : .20
    Field : Name Field
    Local : Field : Name Field: Set As :$VCHPrintTitle:VoucherType:##SVVoucherType
    Local : Field : Name Field: Align : Center
    Local : Field : Name Field: Full Width : Yes
    Local : Field : Name Field: Style : Large Bold

    [Line: SalesHInvTxTL]

    Field : Name Field
    Local : Field : Name Field: Set As :"(The Kerala Value Added Tax Rules 2005)"
    Local : Field : Name Field: Align : Center
    Local : Field : Name Field: Full Width : Yes
    Local : Field : Name Field: Style : Normal

    [Part: SalesHInv2]

    Space Top : 1
    Part: SalesHInv2C
    Right Part: SalesHInv2R


    [Part: SalesHInv2C]

    Line : SalesHInv2C
    Width : 50 % Page

    [Line: SalesHInv2C]

    Field : Name Field
    Local : Field : Name Field : Set As : "Cash/Credit"
    Local : Field : Name Field : Align : Right
    Local : Field : Name Field : Full Width: Yes
    Local : Field : Name Field : Style : Large

    [Part: SalesHInv2R]

    Line : SalesHInv2RTIN,SalesHInv2RCST
    Width : 33 % Page

    [Line: SalesHInv2RTIN]

    Field : Short Prompt,SalesHInv2RTIN
    Local : Field : Short Prompt : Set As : "T.I.N :"


    [Field: SalesHInv2RTIN]

    Use : Name Field
    Set As : $VATTINNumber:Company:##SVCurrentCompany


    [Line: SalesHInv2RCST]

    Field : Short Prompt,SalesHInv2RCST
    Local : Field : Short Prompt : Set As : "C.S.T :"




    [Field: SalesHInv2RCST]

    Use : Name Field
    Set As : $InterstateSTNumber:Company:##SVCurrentCompany

    [Part: SalesHInv21]

    Line: SalesHCmpDLicno

    [Line: SalesHCmpDLicno]

    Space Top : .50
    Field : Short Prompt,Name Field
    Local : Field : Short Prompt : Set As : "Drug Lic No. :"
    Local : Field : Name Field : Set As : $CMPDLNNoVAL:Company:##SVCurrentCompany
    Local : Field : Name Field : Full width : Yes
    Local : Field : Name Field : Style : Normal


    [System: UDF]

    CMPDLNNoVAL : String : 21110
    LEDDLNo : String : 21111
    STKI MFR : String : 21112

    [Part: SalesHInv3]

    Space Top : .50
    Border : Thin Top
    Part : SalesHInv3L
    Right Part: SalesHInv3R

    [Part : SalesHInv3L]

    Line : SalesBuyerName,SalesBuyerAddress,SalesBuyerPh,SalesBuyerTin,SalesBuyerDLIC
    Repeat : SalesBuyerAddress : BasicBuyerAddress

    [Line:SalesBuyerName]

    Field : Short Prompt,Name Field
    Local : Field : Short Prompt: Set As : "Buyer :"
    Local : Field : Short Prompt: Width : 7
    Local : Field : Name Field : Set As : $BasicBuyerName
    Local : Field : Name Field : Full width : Yes


    [Line:SalesBuyerAddress]

    Field : Short Prompt,Name Field
    Local : Field : Short Prompt: Width : 7
    Local : Field : Short Prompt: Delete : Align : Prompt
    Local : Field : Name Field : Set As : $BasicBuyerAddress
    Local : Field : Name Field : Full width : Yes


    [Line:SalesBuyerPh]

    Field : Short Prompt ,Name Field
    Local : Field : Short Prompt: Set As : "Phone :"
    Local : Field : Short Prompt: Width : 7
    Local : Field : Name Field : Set As : $LedgerPhone:Ledger:$PartyLedgerName


    [Line:SalesBuyerTin]

    Field : Short Prompt ,Name Field
    Local : Field : Short Prompt: Set As : "Tin :"
    Local : Field : Short Prompt: Width : 8
    Local : Field : Name Field : Set As : $BasicBuyersSalesTaxNo
    Local : Field : Name Field : Full width : Yes


    [Line: SalesBuyerDLIC]

    Field : Short Prompt ,Name Field
    Local : Field : Short Prompt: Set As : "Drug Lic No:"
    Local : Field : Short Prompt: Width : 8
    Local : Field : Name Field : Set As : $LEDDLNo:Ledger:$PartyLedgerName
    Local : Field : Name Field : Line : 0
    Local : Field : Name Field : Full width : Yes
    Local : Field : Name Field : Style : Normal




    [Part: SalesHInv3R]

    Line : SalesInvNo,SalesInvDate,SalesInvMOP,SalesInvDEL,SalesInvOrd,+
    SalesInvDest,SalesInvDThr

    [Line: SalesInvNo]

    Field : Medium Prompt,Name Field
    Local : Field : Medium Prompt : Set As : "Invoice No. :"
    Local : Field : Name Field : Style : Large Bold

    Local : Field : Name Field : Set As : $VoucherNumber
    Local : Field : Name Field : Style : Large Bold



    [Line: SalesInvDate]

    Field : Medium Prompt,Name Field
    Local : Field : Medium Prompt : Set As : "Invoice Date :"

    Local : Field : Name Field : Set As : $Date
    Local : Field : Name Field : Style : Large Bold



    [Line: SalesInvMOP]

    Field : Medium Prompt,Name Field
    Local : Field : Medium Prompt : Set As : "Mode of Payment :"
    Local : Field : Name Field : Set As : $BasicDueDateOfPymt
    Local : Field : Name Field : Style : Normal



    [Line: SalesInvDEL]

    Field : Medium Prompt,Name Field
    Local : Field : Medium Prompt : Set As : "DL Note No : "
    Local : Field : Name Field : Set As : $BasicShipDeliveryNote
    Local : Field : Name Field : Style : Normal



    [Line: SalesInvOrd]

    Field : Medium Prompt,Name Field
    Local : Field : Medium Prompt : Set As : "Order No : "
    Local : Field : Name Field : Set As : $BasicPurchaseOrderNo
    Local : Field : Name Field : Style : Normal



    [Line: SalesInvDest]

    Field : Medium Prompt,Name Field
    Local : Field : Medium Prompt : Set As : "Destination: "
    Local : Field : Name Field : Set As : $BasicFinalDestination
    Local : Field : Name Field : Style : Normal


    [Line: SalesInvDThr]

    Field : Medium Prompt,Name Field
    Local : Field : Medium Prompt : Set As : "Despatch Through: "
    Local : Field : Name Field : Set As : $BasicShippedBy
    Local : Field : Name Field : Style : Normal



    ;-SalesHInvBdy

    [Part: SalesHInvBdyTL]

    Line : SalesHInvBdyTL1,SalesHInvBdyTL2
    Border : Thin Top Bottom
    Space Bottom: .40
    Space Top : .40

    [Line: SalesHInvBdyTL1]

    Field : SalesHInvSl,SalesHInvDesc
    Right Field : SalesHInvMFR,SalesHInvBTH,SalesHInvExp,SalesHInvQty,SalesHInvRate,SalesHInvMRP,SalesHInvDIS,SalesHInvVAT1, SalesHInvAMT,IndQD
    Local : Field : SalesHInvSl : Set As : "Sl"
    Local : Field : SalesHInvDesc : Set As : "Description"
    Local : Field : SalesHInvMFR : Set As : "MFR"
    Local : Field : SalesHInvBTH : Set As : "Batch"
    Local : Field : SalesHInvExp : Set As : "Expiry"
    Local : Field : SalesHInvQty : Set As : "Quanty"
    Local : Field : SalesHInvRate : Set As : "Rate"
    Local : Field : SalesHInvMRP : Set As : "M.R.P"
    Local : Field : SalesHInvDIS : Set As : "Disc."
    Local : Field : SalesHInvVAT1 : Set As : "Tax"
    Local : Field : SalesHInvAMT : Set As : "Amount"
    Local : Field : IndQD : Set As : "Free"
    Local : Field : Default : Type : String
    Local : Field : Default : Align : Center

    [Line: SalesHInvBdyTL2]

    Field : SalesHInvSl,SalesHInvDesc
    Right Field : SalesHInvMFR,SalesHInvBTH,SalesHInvExp,SalesHInvQty,SalesHInvRate,SalesHInvMRP,SalesHInvDIS,SalesHInvVAT1, SalesHInvAMT,IndQD
    Local : Field : SalesHInvSl : Set As : "No"
    Local : Field : SalesHInvDesc : Set As : ""
    Local : Field : SalesHInvMFR : Set As : ""
    Local : Field : SalesHInvBTH : Set As : "Number"
    Local : Field : SalesHInvExp : Set As : "Date"
    Local : Field : SalesHInvQty : Set As : ""
    Local : Field : SalesHInvRate : Set As : ""
    Local : Field : SalesHInvMRP : Set As : ""
    Local : Field : SalesHInvDIS : Set As : "%"
    Local : Field : SalesHInvVAT1 : Set As : "%"
    Local : Field : SalesHInvAMT : Set As : ""
    Local : Field : IndQD : Set As : "Quanty"
    Local : Field : Default : Type : String
    Local : Field : Default : Align : Center



    [Part: SalesHInvBdy]

    Line : SalesHInvBdy
    Repeat : SalesHInvBdy : Inventory Entries
    Scroll : Vertical
    Common Border : Yes
    Float : No

    [Line: SalesHInvBdy]

    Field : SalesHInvSl,SalesHInvDesc
    Right Field : SalesHInvMFR,SalesHInvBTH,SalesHInvExp,SalesHInvQty,SalesHInvRate,SalesHInvMRP,SalesHInvDIS,SalesHInvVAT1, SalesHInvAMT,IndQD
    Space Top : .40
    Explode : BatchNo : Not $$Line > 1;(@@HasBatchWise OR @@IsOrderVch) AND @@InvWithBatches AND (NOT @@IsOrderVch OR @@OrdExplBatch) AND NOT @@InvWithGodowns
    Explode : EI DescExplosion : NOT $$IsEmpty:$StockItemName AND ##ICFGAddlDesc AND NOT $$IsEmpty:$UserDescription
    ;local :Field : EI DescExplosion : Space Right :10

    [Part : BatchNo]
    Line : BatchNo
    Repeat : BatchNo : BatchAllocations
    Scroll : Vertical

    [Line : BatchNo]
    Field : SalesHInvSl,SalesHInvDesc
    Right Field : SalesHInvMFR,SalesHInvBTH,SalesHInvExp,SalesHInvQty,SalesHInvRate,SalesHInvMRP,SalesHInvDIS,SalesHInvVAT1, SalesHInvAMT,IndQD

    Local : Field : SalesHInvSl : Set As: ""
    Local : Field : SalesHInvDesc : Set As: ""
    Local : Field : SalesHInvMFR : Set As: ""
    Local : Field : SalesHInvBTH : Set As: $BatchName
    Local: Field: SalesHInvExp : Set as :$EXPIRYPERIOD
    Local : Field : SalesHInvQty : Set As: $BilledQty
    Local : Field : SalesHInvRate : Set As: ""
    Local : Field : SalesHInvMRP : Set As: ""
    Local : Field : SalesHInvDIS : Set As: ""
    Local : Field : SalesHInvDIS : Type : String
    Local : Field : SalesHInvVAT1 : Set As: ""
    Local : Field : SalesHInvAMT : Set As: ""
    Local : Field : IndQD : Set As: ""

    [Field: SalesHInvSl]

    Use : Name Field
    Set As : $$Line
    Width : 3
    Style : Normal
    Border : Thin LeftRight

    [Field: SalesHInvDesc]

    Use : Name Field
    Set As : $StockItemName
    Style : Normal

    [Field: SalesHInvMFR]

    Use : Name Field
    Set As : $Category:Stockitem:$StockITemName
    Width : 4
    Style : Normal
    Border : Thin Left
    Align : Center

    [Field: SalesHInvBTH]

    Use : Name Field
    Set As : If $$Line > 1 Then $$CollectionField:$BatchName:1:BatchAllocations Else ""
    Width : 8
    Style : Normal
    Border : Thin Left
    Align : Center

    [Field: SalesHInvExp]

    Use : Due Date Field
    Set As : If $$Line > 1 Then $$CollectionField:$EXPIRYPERIOD:1:BatchAllocations Else ""
    Border : Thin Left
    Style : Normal
    Width : 7
    Align : Center

    [Field: SalesHInvQty]

    Use : Qty Primary Field
    Set As : $BilledQty
    Width : 5
    Border : Thin Left
    Style : Normal
    Align : Centre

    [Field: SalesHInvRate]

    Use : Rate Price Field
    Set As : $Rate
    Style : Normal
    Border : Thin Left
    Align : centre
    Width : 6

    [Field: SalesHInvMRP]

    Use : Number Field
    Set As : $RATEOFMRP:Stockitem:$StockitemName
    Style : Normal
    Format : "NoZero"
    Width : 6
    Border : Thin Left
    Align : centre

    [Field: SalesHInvDIS]

    Use : Number Field
    Format : "Percentage"
    Set As : $Discount
    Width : 4
    Align : Center
    Style : Normal
    Border : Thin LeftRight


    [Field: SalesHInvVAT1]

    Use : Number Field
    Set As : $RateOfVat:StockItem:$StockItemName
    Style : Normal
    Align : Center
    Format : "NoZero"
    Border : Thin LeftRight
    Width : 5


    [Field: SalesHInvAMT]

    Use : Amount Field
    Set As : $Amount
    Style : Normal
    Width : 8
    Align : Right
    ;;; Center


    [Field : IndQD]

    Use : Qty Primary Field
    Set As : $ActualQty - $BilledQty
    Width : 4
    Border : Thin Left
    Style : Normal
    Format : "NoZero"
    Border : ThinLeftRight
    Align : Center




    [Part: SalesHInvBdyBTH]

    Line : SalesHInvBdyBTH
    Repeat : SalesHInvBdyBTH : Batch Allocations

    [Line: SalesHInvBdyBTH]

    Field : SalesHInvSl,SalesHInvDesc
    Right Field : SalesHInvMFR,SalesHInvBTH,SalesHInvExp,SalesHInvQty,SalesHInvRate,SalesHInvMRP,SalesHInvDIS,SalesHInvVAT1, SalesHInvAMT,IndQD

    Local : Field : SalesHInvDesc : Set As: ""
    Local : Field : SalesHInvMFR : Set As: ""
    Local : Field : SalesHInvBTH : Set As: ""
    Local : Field : SalesHInvExp : Set As: ""
    Local : Field : SalesHInvQty : Set As: ""
    Local : Field : SalesHInvRate : Set As: ""
    Local : Field : SalesHInvMRP : Set As: ""
    Local : Field : SalesHInvDIS : Set As: ""
    Local : Field : SalesHInvVAT1 : Set As: ""
    Local : Field : SalesHInvAMT : Set As: ""
    Local : Field : IndQD : Set As: ""

    [Part: SalesHInvBTM]

    Border : Thin Top
    Space Top : .50
    Part : SalesHInvBTML
    Right Part : SalesHInvBTMR

    [Part: SalesHInvBTML]

    Line : SalesHInvBTML1TL,SalesHInvBTML1Wrd,SalesHInvBTMLDeclTL,SalesHInvBTMLDecl,SalesHInvBTMLDecl2

    [Line: SalesHInvBTML1TL]

    Field : Name Field
    Local : Field : Name Field : Set As : "Amount Chargable (in words)"
    Local : Field : Name Field : Style : Normal
    Local : Field : Name Field : Full width : Yes

    [Line: SalesHInvBTML1Wrd]

    Field : Name Field
    Local : Field : Name Field : Set As : $$InWords:$Amount + " Only"
    Local : Field : Name Field : Full width : Yes

    [Line: SalesHInvBTMLDeclTL]

    Space Top : 1
    Field : Name Field
    Local : Field : Name Field : Set As : "Declaration:"
    Local : Field : Name Field : Full width : Yes
    Local : Field : Name Field : Style : Normal

    [Line: SalesHInvBTMLDecl]

    Space Top : 1
    Field : Name Field
    Local : Field : Name Field : Set As : $VCHPrintDecl:VoucherType:##SVVoucherType
    Local : Field : Name Field : Full width : Yes
    Local : Field : Name Field : Line : 0
    Local : Field : Name Field : Style : Normal

    [Line: SalesHInvBTMLDecl2]

    Space Top : 1
    Field : Name Field
    Local : Field : Name Field : Set As : $VTYPDECL2:VoucherType:##SVVoucherType
    Local : Field : Name Field : Full width : Yes
    Local : Field : Name Field : Line : 0
    Local : Field : Name Field : Style : Normal

    [Part: SalesHInvBTMR]

    Line : SalesHInvBTML1,SalesHInvLedger,SalesHInvToT,SalesHInvFor,SalesHInvForSigh
    Repeat : SalesHInvLedger : Ledger Entries
    Width : 40 % Page

    [Line: SalesHInvBTML1]

    Right Field : Name Field ,SalesHInvAMT
    Local : Field : Name Field : Set As : "Total :"
    Local : Field : Name Field : Style : Normal
    Local : Field : SalesHInvAMT : Set As : $$CollAmtTotal:InventoryEntries:$Amount
    Local : Field : SalesHInvAMT : Style : Normal Bold

    [Line: SalesHInvLedger]

    Right Field : Name Field,SalesHInvAMT
    Local : Field : Name Field : Set As : $LedgerName
    Local : Field : Name Field : Style : Normal
    Local : Field : SalesHInvAMT : Set As : $Amount
    Local : Field : SalesHInvAMT : Style : Normal Bold
    Empty: $LedgerName = $PartyLedgerName

    [Line: SalesHInvToT]

    Space Top : 1
    Right Field : Name Field,SalesHInvAMT
    Local : Field : Name Field : Set As : "Invoice Value"
    Local : Field : Name Field : Style : Large
    Local : Field : SalesHInvAMT : Set As : $Amount


    Local : Field : SalesHInvAMT : Style : Large Bold

    [Line: SalesHInvFor]

    Space Top : 1
    Right Field : Name Field
    Local : Field : Name Field : Set As : "For " + @@CMPMailName
    Local : Field : Name Field : Style : Large Bold

    [Line: SalesHInvForSigh]

    Space Top : 3
    Right Field : Name Field
    Local : Field : Name Field : Set As : "Authorised Signatory"
    Local : Field : Name Field : Style : Normal Bold


    ;; end of file
     


  10. Ajeet Jain

    Ajeet Jain Member


    If anybody have any problem in tdl then send the mail on ajeet@gmail.com with code and data
     


  11. Rajendra

    Rajendra New Member



  12. parthm42

    parthm42 New Member


    It is possible to Print HSN code in Purchase Order in Tally.ERP9 6.0.2.?
     


  13. Arti

    Arti New Member


    plesae help .....

    Need help in TDL, How to get packing data , item company name data, Incl rate data and GST no in TDL code.

    upload_2017-8-28_14-13-42.png
     


  14. Moinuddin

    Moinuddin New Member


    Dear John,

    It Shows Error
     


  15. Moinuddin

    Moinuddin New Member



  16. Ajeet Jain

    Ajeet Jain Member



Share This Page