1. CLICK HERE TO JOIN WHATSAPP CHANNEL FOR TDL PROGRAMS

CUSTOMIZED INVOICE

Discussion in 'Free Source Codes' started by VINAY KUMAR BANDARI, Sep 21, 2016.

    
  1. VINAY KUMAR BANDARI

    VINAY KUMAR BANDARI New Member


    PLS MAKE A TDL FOR RICE MILL INVOICE INCLUDING TRANSPORTERS NAME,VEHICLE NUMBER,AGENT NAME,FREIGHT AMT,DRIVER DETALS,OWNER DETAILS,DRIVER DL NO.
     
    VINAY KUMAR BANDARI, Sep 21, 2016
    #1
    JAYDEEP BORSADIYA and SAI BABA like this.


  2. mpal2311

    mpal2311 Active Member


    attach a sample copy of invoice.
     
    mpal2311, Sep 21, 2016
    #2


  3. VINAY KUMAR BANDARI

    VINAY KUMAR BANDARI New Member

    Attached Files:

    VINAY KUMAR BANDARI, Sep 22, 2016
    #3


  4. VINAY KUMAR BANDARI

    VINAY KUMAR BANDARI New Member


    @mpal2311 pls send the tdl.. posted on 22-sep
     
    VINAY KUMAR BANDARI, Oct 11, 2016
    #4


  5. mpal2311

    mpal2311 Active Member


    how can i send tdl ?
    where it is posted ?
     
    mpal2311, Oct 12, 2016
    #5


  6. VINAY KUMAR BANDARI

    VINAY KUMAR BANDARI New Member


     

    Attached Files:

    VINAY KUMAR BANDARI, Oct 12, 2016
    #6


  7. VINAY KUMAR BANDARI

    VINAY KUMAR BANDARI New Member


    pls send tdl quickly..
     
    VINAY KUMAR BANDARI, Oct 12, 2016
    #7


  8. VINAY KUMAR BANDARI

    VINAY KUMAR BANDARI New Member


    @mpal2311 i have created a tdl but unable to print vat % and vat amount in the invoice.

    please correct the tdl..

    [#Part: LED Other Details]

    Add : Line : Before : LED STNo : OS FGL No

    [Line: OS FGL No]
    Field : Short Prompt, OS FGL No
    Local : Field : Short Prompt : Set As : "FGL No. "

    [Field: OS FGL No]
    use : Name Field
    Set As : $OSFGLNo
    Storage : OSFGLNo
    Width : 30 mms

    [System : Formula]

    SarojHeight : 297 ;;200
    SarojWidth : 210


    [#Form: Sales Color]
    Print : Saroj Agro Invoice

    [Report: Saroj Agro Invoice]
    Form : Saroj Invoice
    Object : Voucher

    [Form : Saroj Invoice]

    Height : @@SarojHeight Mms
    Width : @@SarojWidth Mms
    SpaceTop : 60 mms ;;50 mms
    Parts : SarojTop Part, SarojBody
    Bottom Parts : SarojBottom

    [Part : SarojTop Part]
    Parts : Saroj Invoice Part1 Left, Saroj Invoice Part1 Right
    ;; height: 45 mms ;;53 mms

    [Part : Saroj Invoice Part1 Left]
    Lines : Saroj Pname, Saroj PAddress
    Repeat : Saroj PAddress : Party Address
    Height : 45 mms ;;48 mms ;;53 mms

    [Line : Saroj Pname]

    Field : Saroj Pname
    Space Top : 2 mms

    [Field : Saroj Pname]
    Use : Name Field
    Set as : $Partyledgername
    Style : LargeBold
    Width : 120 mms
    Space Left : 21 mms

    [Line : Saroj PAddress]
    Field : Saroj PAddress
    [Field : Saroj PAddress]
    Use : Name Field
    Set as : $Address
    Style : LargeBold
    Width : 120 mms
    Space Left : 21 mms


    [Part : Saroj Invoice Part1 Right ]
    Lines : Saroj InvNo, Saroj Tinno, Saroj Cstno, Saroj Fglno, Saroj Agentname, Saroj Orderno
    Height : 19 mms

    [Line : Saroj Invno]
    Right Field : Saroj Invno, Saroj Invdate

    [Field : Saroj InvNo]
    Use : Name Field
    Set as : $vouchernumber
    Style : LargeBold
    Width : 50 mms
    Align :CENTER

    [Field : Saroj Invdate]
    Use : Name Field
    Set as : $$String:$Date
    Width : 48 mms
    Style : LARGE Bold
    Align : CENTER
    Space Right : 01 mms


    [Line: Saroj TinNO]
    Space Top : 2 MMS
    Right Field : Saroj TinNo
    [Field: Saroj TinNo]
    use : Name Field
    Set As : $VatTinNumber:Ledger:$PartyLedgerName
    Width : 120 mms
    Align : Right
    Style : Large Bold
    Space Right : 50 mms

    [Line: Saroj Cstno]
    Space Top : 2 mms ;;4 MMS
    Right Field : Saroj Cstno
    [Field: Saroj Cstno]
    use : Name Field
    Set As : " GSTIN " + " - " +$gstin :Ledger:$PartyLedgerName
    Width : 120 mms
    Align : Right
    Style : Large Bold
    Space Right : 50 mms

    [Line: Saroj Fglno]
    Space Top : 2 mms ;;3 MMS
    Right Field : Saroj Fglno
    [Field: Saroj Fglno]
    use : Name Field
    Set As : " PAN " + " - " + $incomeTaxNumber:Ledger:$PartyLedgerName
    Width : 120 mms
    Align : Right
    Style : Large Bold
    Space Right : 50 mms

    [Line: Saroj Agentname]
    Space Top : 3 mms ;;2 MMS
    Right Field : Saroj Agentname
    [Field: Saroj Agentname]
    use : Name Field
    Set As : $OSAgentName ;;$Parent:Ledger:$PartyLedgerName
    Width : 120 mms
    Align : Center
    Style : Large Bold
    Space Right : 06 mms

    [System: Formula]
    ccName : $$CollectionField:mad:@ccNamex:1:CostCategory
    CCNamex : $$FullList:Costcentre:$Name

    [Line: Saroj Orderno]
    Space Top : 3 mms ;;3 MMS
    Right Field : Saroj Orderno

    [Field: Saroj Orderno]
    use : Name Field
    Set As : $PurchaseorderNo + ", " + $$String:$Date
    Width : 120 mms
    Align : Right
    Style : Large Bold
    Space Right : 46 mms

    [Part : SarojBody]

    Parts : SarojBody Inv, SarojBody Acc, Saroj Body Bottom
    Vertical: Yes
    ;; Height : 72 mms
    space top : 14 mms ;;10 mms


    [Part: SarojBody Inv]

    Height : 42 Mms
    Lines : Saroj Body
    Repeat : Saroj Body : Inventory Entries
    Scroll : Vertical
    Total : Saroj Amount, Saroj ExDuty Amt

    [Line : SarojBody]

    Fields : Saroj Desc
    Right Fields : Saroj TotQty,Saroj Pack, Saroj Rate, Saroj Amount, Saroj DutyAmt, Saroj ExDuty Amt
    Explode : Item Desc: $$NumItems:UserDescription > 0 ;;;$$NumItems is a used defned functions which can be
    ;;;used for counting purposes. It takes collection name as parameter

    [Field : Saroj Desc]

    Use : Name Field
    Setas : $StockItemName
    Width : 60 Mms
    Style : Large Bold
    Space Left : 15 mms

    [Part: Saroj Description]

    Line : Saroj Description
    Repeat : Saroj Description : User Description
    BreakOn : $$IsEmpty:$BasicUserDescription
    Scroll : Vertical
    Space Left : 20 mms


    [Line: Saroj Description]

    Field :Saroj SNo,Saroj Description
    Local : Field : Saroj SNo : Set As : " "


    [Field: Saroj Description]

    Use : Name Field
    Style : Large Bold
    Storage : BasicUserDescription
    Set as : if (($$ExplodeLevel = 0) AND ($$Line = 1)) then $Description:StockItem:$StockItemName else $$Value
    Space Left : 30 mms


    [Field : Saroj TotQty]

    Use : Qty Primary Field
    Setas : $BilledQTy
    Width : 18 Mms
    Format :"NoSymbol,Nozero,decimal:0"
    Align : Left
    Style : Large Bold
    Space Right : 06 mms


    [Field : Saroj Pack]

    Use : Short Name Field
    Setas : $NumPackages
    Width : 16 Mms
    Align : Left
    Style : Large Bold

    [Field : Saroj Rate]

    Use : Rate Price Field
    Setas : $Rate
    Width : 12 mms
    Align : Center
    Style : Large Bold
    Space Left : 05 mms
    Space Right : 09 mms

    [Field : Saroj Amount]

    Use : Amount Field
    Setas : $Amount
    Width : 22 Mms
    Align : Center
    Style : Large Bold
    Space Left : 01 mms
    Space Right : 32 mms


    ;; Vat Amount

    [Field : Saroj DutyPer]

    Set As : @VatPer1
    Width : 11 mms
    Vatper1 : $$NUMBER:$:StockItem:$StockItemName
    Align : Center
    Style : Normal Bold

    [Field : Saroj DutyAmt]

    Use : Amount Field
    Set As : $vatAmt
    VatAmt : $Amount*@VatPeR1
    Width : 25 Mms
    VatPer1 : $$NUMBER:$VATDetails:StockItem:$StockItemName
    Align : Right
    Space LEFT : 26 mms
    Style : Normal Bold

    [Field : Saroj ExDuty Amt]

    Use : Amount Field
    Width : 50 Mms
    align : Right
    Set as : $amount+@a2
    A2 : IF @VatAmt>1 Then @VatAmt Else 0
    VatAmt : $Amount*@VatPer1
    VatPer1 : $$NUMBER:$VATDetails:StockItem:$StockItemName
    Space Right : 13 mms
    Style : Normal Bold


    [Part : SarojBody Acc]

    Line : SarojBody Acc
    Repeat : SarojBody Acc : LedgerEntries
    Height : 20 mms

    [Line : SarojBody Acc]

    Empty : $PartyLedgerName = $LedgerName OR $LedgerName Contains " VAT "
    Fields : Saroj Desc
    Right Fields : Saroj Pack, Saroj TotQty, Saroj Rate, Saroj Amount,Saroj DutyAmt , Saroj ExDuty Amt

    Local : Field : Saroj Desc : Setas : $LedgerName
    Local : Field : Saroj Pack : SEtas : ""
    Local : Field : Saroj TotQty : Setas : ""
    Local : Field : Saroj Rate : Setas : $$String:$RateofVat + "%" ;;function $$String used for conversion
    Local : Field : Saroj Rate : InActive : $VATDetails = 0
    Local : Field : Saroj Amount : Setas : $Amount
    Local : Field : Saroj Amount : Inactive : If $LedgerName Contains "Packing" Then No else Yes
    Local : Field : Saroj DutyAmt : Setas : $AMOUNT
    Local : Field : Saroj Rate : Setas : $$String:$Rateofvat + " % "
    Local : Field : Saroj ExDuty Amt: Setas : $Amount
    Local : Field : Saroj ExDuty Amt: Inactive : If $LedgerName Contains "Packing" Then Yes else No


    [Part: Saroj Body Bottom]

    Height : 19 mms
    Line : GrTotAmt
    Space Top : 15 mms

    [Line: GrTotAmt]

    Fields : GrTotAmtwrd
    Right field : GrTotAmt

    [Field: GrTotAmtwrd]
    use : Name Field
    set As : $$Inwords:#GrTotAmt:"NOSYMBOL" + " Only."
    Width : 189 mms
    Style : Large Bold
    Space Left: 36 mms

    [Field: GrTotAmt]
    use : amount Field
    Set As : $$CollectionField:$Amount:1:LedgerEntries
    Width : 50 mms
    Align : Right
    Style : LargeBold
    Space Right:07 mms



    [Part: SarojBottom]

    Parts : SarojBottom1, SarojBottom2, SarojBottom3
    Vertical: Yes

    [Part: SarojBottom1]

    Lines : SarojLorryno,Sarojtimeofloading,Sarojapmcno
    Height: 24 mms
    Space top : 00 mms


    [Line : SarojLorryno]

    Fields : SarojLorryno
    [Field: SarojLorryno]

    Use : Name Field
    Setas : $ShipDocumentNo
    Width : 250 mms
    Space Left: 142.5 mms
    Style : LargeBold

    [Line : Sarojtimeofloading]
    Fields : Sarojtimeofloading
    Space top : 2 mms

    [Field: Sarojtimeofloading]
    Use : Name Field
    Setas : $DateTimeofInvoice
    Width : 250 mms
    Space Left: 135 mms
    Style : Bold

    [Line : Sarojapmcno]
    Fields : Sarojapmcno
    Space top : 4 mms

    [Field: Sarojapmcno]
    Use : Name Field
    Setas : $BasicShipDeliveryNote
    Width : 250 mms
    Space Left: 137 mms
    Style : Bold

    [Part: SarojBottom2]

    Lines : Saroj LrNo, Saroj LrOwner, Saroj Driver, Saroj DlNo, Saroj AmtWrd
    ;; height : 50 mms
    Space top : 06 mms

    [Line: Saroj LrNo]

    Fields : Saroj LrNo
    Right Field : Saroj FrAmt

    [Field: Saroj LrNo]

    Use : Name Field
    Set As : $OSTransLorry
    Width : 150 mms
    Space Left: 100 mms

    [Field: Saroj FrAmt]

    Use : Amount Field
    Set As : $OSTransLorryFreight
    Width : 120 mms
    Align : Right
    Space Right : 30 mms

    [Line: Saroj LrOwner]

    Space Top : 1.75 mms
    Field : Saroj LrOwner
    Right Field : Saroj Other

    [Field: Saroj LrOwner]

    Use : Name Field
    Set As : $OSTransLowner
    Width : 150 mms
    Space Left: 100 mms

    [Field: Saroj Other]

    Use : Amount Field
    Set As : $OSTransOthers
    Width : 120 mms
    Align : Right
    Space Right : 30 mms

    [Line: Saroj Driver]

    Space Top : 2.0 mms
    Field : Saroj Driver
    Right Field : Saroj Adv

    [Field: Saroj Driver]

    Use : Name Field
    Set As : $OSTransDriver
    Width : 150 mms
    Space Left: 100 mms

    [Field: Saroj Adv]

    Use : Amount Field
    Set As : $OSTransAdvance
    Width : 120 mms
    Align : Right
    Space Right : 30 mms

    [Line: Saroj DlNo]

    Space Top : 3.25 mms
    Field : Saroj DlNo
    Right Field : Saroj Net

    [Field: Saroj DlNo]

    Use : Name Field
    Set As : $OSTransDlNo
    Width : 150 mms
    Space Left: 100 mms

    [Field: Saroj Net]

    Use : Amount Field
    Set As : $OSTransNet
    Width : 120 mms
    Align : Right
    Space Right : 30 mms

    [Line: Saroj AmtWrd]

    Space Top : 12 mms
    Field : Saroj GrAmt
    Right Field : Saroj AmtWrd

    [Field: Saroj GrAmt]

    Use : Amount Field
    Set As : ($OSTransLorryFreight + $OSTransOthers) - $OSTransAdvance
    ;;$$CollectionField:$Amount:1:LedgerEntries
    invisible: yes

    [Field: Saroj AmtWrd]

    Use : Name Field
    Set As : $$Inwords:#SarojGrAmt:"NOSYMBOL" + " Only."
    Width : 160 mms
    Line : 0
    Align : Left
    Space Right : 20 mms


    [Part: SarojBottom3]

    Lines : Saroj dumm line
    Space Bottom : 00 mms

    [Line: Saroj dumm line]

    Fields : Saroj dumm Fld

    [Field: Saroj Dumm Fld]
    Use : Name Field
    Set As : " "


    [#Part: Vch Narration]
    Line : Os Narr

    [Line: OS Narr]
    Fields : OsDBRefNoTita

    [Field: OsDBRefNoTita]

    Set As : "Transport Details"
    Width : 30 mms
    SubForm : OS Trans Dets
    invisible: NOT $$isSales:$VoucherTypeName

    [Report: OS Trans Dets]

    Form : OS Trans Dets

    [Form: OS Trans Dets]

    Height : 30% Page
    Width : 50% Page
    Part : OS Trans Dets

    [Part: OS Trans Dets]

    Lines : OS Agent Name, OS Trans LorryNo, OS Trans Lowner, OS Trans Driver, OS Trans DlNo

    [Line: OS Agent Name]

    Space Top: 2 mms
    Field : OS Agent Tit, OS Agent Name

    [Field: OS Agent Tit]

    Info : "Agent Name."
    Width : 40 mms

    [Field: OS Agent Name]

    Use : Name Field
    Set As : $OSAgentName
    Set Always: Yes
    Storage : OSAgentName
    Width : 30 mms

    [Line: OS Trans LorryNo]

    Space Top: 2 mms
    Field : OS Trans LorryNoTit, OS Trans LorryNo, OS Trans LorryFreightTit,OS Trans LorryFreight

    [Field: OS Trans LorryNoTit]

    Info : "Lorry No. "
    Width : 40 mms

    [Field: OS Trans LorryNo]

    Use : Name Field
    Set As : $ShipDocumentNo
    Set Always: Yes
    Storage : OSTransLorry
    Width : 30 mms

    [Field: OS Trans LorryFreightTit]

    info : "Lorry Freight."
    Width : 40 mms

    [Field: OS Trans LorryFreight]

    Use : Amount Field
    Set As : $OSTransLorryFreight
    Storage : OSTransLorryFreight
    Width : 20 mms
    Set Always: Yes
    Align : Right

    [Line: OS Trans Lowner]

    Space Top: 2 mms
    Field : OS Trans LownertTit, OS Trans Lowner, OS Trans OthersTit, OSTransOthers

    [Field: OS Trans LownertTit]

    info : "Name of the Lorry Owner"
    Width : 40 mms

    [Field: OS Trans Lowner]

    Use : Name Field
    Set As : $OSTransLowner
    Storage : OSTransLowner
    Set Always: Yes
    Width : 30 mms

    [Field: OS Trans OthersTit]

    Info : "Other Charges (Rs.) "
    Width : 40 mms

    [Field: OS Trans Others]

    Use : Amount Field
    Set As : $OSTransOthers
    Storage : OSTransOthers
    Set Always: Yes
    Width : 20 mms
    Align : Right

    [Line: OS Trans Driver]

    Space Top: 2 mms
    Fields : OS Trans DriverTit, OS Trans Driver, OS Trans AdvanceTit, OSTrans Advance

    [Field: OS Trans DriverTit]
    info : "Name of the Driver"
    Width : 40 mms

    [Field: OS Trans Driver]

    Use : Name Field
    Set As : $OSTransDriver
    Storage : OSTransDriver
    Set Always: yes
    Width : 30 mms

    [Field: OS Trans AdvanceTit]

    Info : "Less Advance (Rs.) "
    Width : 40 mms

    [Field: OS Trans Advance]

    use : Amount Field
    Set As : $OSTransAdvance
    Storage : OSTransAdvance
    Width : 20 mms
    Set Always: yes
    Align : Right

    [System: UDF]
    osfglno : String : 31
    OSAgentName : String : 839
    OSTransLowner : String : 840
    OSTransLorry : String : 841
    OSTransLorryFreight : Amount : 842
    OSTransOthers : Amount : 843
    OSTransDriver : String : 844
    OSTransAdvance : Amount : 845
    OSTransDlNo : String : 846
    OSTransNet : Amount : 847


    [Line: OS Trans DlNo]
    Space Top: 2 mms
    Fields : OS Trans DlNoTit, OS Trans DlNo, OS Trans NetTit, OS Trans Net

    [Field: OS Trans DlNoTit]
    info : "D.L. No."
    Width : 40 mms

    [Field: OS Trans DlNo]

    Use : Name Field
    Set As : $OSTransDlNo
    Storage : OSTransDlNo
    Set Always: yes
    Width : 30 mms

    [Field: OS Trans NetTit]

    Info : "Net Payable (Rs.) "
    Width : 40 mms

    [Field: OS Trans Net]

    use : Amount Field
    Set As : @FrgtAmt1
    FrgtAmt1 : ($OSTransLorryFreight + $OSTransOthers) - $OSTransAdvance
    Storage : OSTransNet
    Width : 20 mms
    Set Always: yes
    Align : Right



    [System : Formula]

    SarojVatAmt : $$FilterAmtTotal:AllLedgerEntries:SarojVatAmtFilter:$Amount
    SarojVatAmtFilter: $LedgerName Contains "VAT" OR $LedgerName Contains"CST"

    SarojVatPer :$$FilterValue:$RateofInvoiceTax:AllLedgerEntries:First:SarojVatPerFilter
    SarojVatPerFilter: $LedgerName Contains "VAT" OR $LedgerName Contains"CST"

    SarojCenvatAmt : $$FilterAmtTotal:AllLedgerEntries:SarojCenvatFilter:$Amount
    SarojCenvatFilter : $LedgerName Contains "ExciseDuty" OR $LedgerNameContains "Cenvat"
     
    VINAY KUMAR BANDARI, Jun 27, 2017
    #8


  9. manish saini

    manish saini New Member


    HI
    PLEASE SEND TDL FOR CUSTOMIZED FONT SIZE /FONT FACE / FONT COLOR FOR SELLER AND BUYER DETAILS
    ON SALES INVOICE .
    A LOT OF PEOPLE WILL BE HAPPY TO MAKE CUSTOMISED INVOICE . Capture.JPG
     
    manish saini, Jul 15, 2017
    #9


  10. Vivek Mehta

    Vivek Mehta New Member


    Can i have TWO different Printing format in Sales Voucher Print at the same time in same Company?
     
    Vivek Mehta, Aug 9, 2017
    #10


  11. Mahesh Sethi

    Mahesh Sethi Member


    Yes It is Possible, Call me on my cell 9644011112 or mail me on vidyapatil_indore@rediffmail.com
     
    Mahesh Sethi, Aug 9, 2017
    #11


  12. mpal2311

    mpal2311 Active Member


    there are many errors in the attached codes.
     
    mpal2311, Aug 11, 2017
    #12


Share This Page