Item on rent

Discussion in 'Tally Developer' started by K Vinod Kumar, Sep 19, 2014.

    
  1. K Vinod Kumar

    K Vinod Kumar New Member


    Dear Admin & All,
    Kindly help me in finding a logic for scenario, where a product (CD/DVD, Books, Room, Bed etc.) is taken for rent for few days. I would like to know at any moment of time, a product's availability.
    We make invoices, when the product object is returned with rent, late fees, damage, room service etc.
    Does this require customisation or can it be handled in Tally?

    Regards
    Vinod
     


  2. NAGARAJKMAR SUBRAMANIAN

    NAGARAJKMAR SUBRAMANIAN Active Member


    Attn : Mr. Vinod Kumar,

    Your requirement needs customisation.
     


  3. K Vinod Kumar

    K Vinod Kumar New Member


    Thank you sir. But I'm trying to find a solution without customisation, that could solve at least 80% problem.
     


  4. JObimon Arackal JOhn

    JObimon Arackal JOhn Active Member


    You need to Enter two kind of Vouchers. One is for inventory Control
    One is for Booking of your income.

    Let us take an example you are renting CD to me .
    For the First you need to Create Item CD-Film Name
    The you need to create a ledger in my name under debtors and a godown with an option 'our stock with third party'. Both must be same name for easy understanding.

    When you rent me cd you can enter a matrial out voucher and when cd is returned you can enter material in voucher.


    For charging rent charges you can create service invoice also.
     


  5. K Vinod Kumar

    K Vinod Kumar New Member


    Thank you sir. This is what I was looking for. So when we create an service invoice, there will be no Stock item information in that. If required, that information we would have to customise it, isn't it? When CD is rented, only one voucher is necessary i.e. Material Out, when CD is returned two vouchers are needed i.e. Material In and Sales vouchers.
    I could not understand the line "Both must be same name for easy understanding". Could help me more by explaining this?
     


  6. JObimon Arackal JOhn

    JObimon Arackal JOhn Active Member


    Yes Absolutly Right.

    What I said, if we keep both godown name and Ledger Name is same name;it will reduce the chance of error. to find out a particular cd is lying with which customer we can know from default stock report of tally. Enable option Stock with third party and filter the name of CD
     


  7. K Vinod Kumar

    K Vinod Kumar New Member


    Sir, Ok I got it. You mean to say for every customer we create, a corresponding godown is also to be created with the same name, so as to find which CD is with which customer. We also have to create another godown for our office, to which the CD is returned. Will more no. of godowns affect Tally's performance in any way?
    I hope I have understood it right. Isn't it Sir?
     


  8. nirexshan

    nirexshan New Member


    Dear Admin & All,
    Kindly help me. how to print invoice in items alphabetic order

    Regards
    Nirexshan
     


  9. Joharfchhil

    Joharfchhil Member


    Is your invoice customized ?? yes then attach TDL
     


  10. nirexshan

    nirexshan New Member


    yes
    pls find attachment
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

    [#form :sales color]
    delete :print :printed invoice
    print : BIS Invoiceyaa

    [report :BIS Invoiceyaa]
    object :voucher
    filtered: yes
    form :BIS Invoiceyaa


    [form :BIS Invoiceyaa]
    height : 280 mms
    width :204 mms
    space left :10 mms
    space right : 10 mms
    space top :2 mms
    space bottom : 5 mms
    horizontal align :center

    parts :raminvtop, raminvbody
    bottom parts : EtainvBottom

    Page Break : adsvchCIBreak, adsvchPBreak

    [Part : adsvchPBreak]
    Parts :raminvtop
    Vertical : Yes

    [Part : adsvchCIBreak]
    BottomParts : adsvchPageBreak
    Vertical : Yes


    [Part : adsvchPageBreak]
    Lines : adsvchPageBreak
    ;Height : 62 MMS



    [Line : adsvchPageBreak]
    Right Fields : Info Field
    Local : Field : Info Field : Info : "continued ..."
    ;Space Top : 10 MMS
    Local : Field : Info Field : Space Right : 10 MMS

    [part :raminvtop]

    parts :raminvtop1,raminvtop4,raminvtop5, raminvtop7
    ;RightParts : raminvtop5r
    ;raminvtop3
    vertical :yes

    [part :raminvtop1]
    lines :raminvconame,raminvcoadd1
    Repeat : raminvcoadd1: Company Address
    ;height : 8 mms
    ;border :thinbox

    [line :raminvconame]
    fields :raminvconame
    space top :2 mms

    [field :raminvconame]
    ;Info : ""
    set as :mad:@cmpmailname
    full width :yes
    align :center
    style : Salesfontaa



    [line :raminvcoadd1]
    fields :raminvcoadd1
    ;space top :2mms
    ;,raminvcoadd2

    [field :raminvcoadd1]
    set :$address
    ;space left : 15 mms
    ;height :20 mms
    fullwidth :yes
    align :center
    style : normal


    [part :raminvtop4]
    lines :raminvadd3
    ;;lines :raminvadd3,raminvadd341
    ;height :22 mms

    [line :raminvadd3]
    fields :raminvadd3
    ;right fields :raminvgstinfo
    space top: 5 mms

    [line :raminvadd341]
    fields :raminvadd3123
    space top: 5 mms

    [field :raminvadd3123]
    set as : ""
    fullwidth : yes
    align :center
    style : normal

    [field :raminvadd3]
    ;info : "INVOICE"
    ;set as : if @@IsInvVch then "INVOICE" else if @@IsOptionalStatus then "QUOTATION"
    SET AS : if @@IsOptionalStatus then "QUOTATION" else " INVOICE"
    fullwidth :yes
    align :center
    style :large serif bold
    Border : thin bottom

    [part :raminvtop5]
    rightparts :raminvtop5l
    parts :raminvtop5r
    vertical :no
    ;height : 50 mms


    [part :raminvtop5l]
    lines :raminvno,raminvdt,raminvgst,raminvgstgg,raminvlorry
    ;;lines :raminvno,raminvdt,raminvgst
    ;raminvlorry
    ;raminvinfo2

    [line :raminvno]
    fields :raminvnoinfo,raminvno
    Space top : 1.5 mms
    ;raminvgst

    [field :raminvnoinfo]
    ;SET AS : if @@IsOptionalStatus then "QUOTATION NO :" else "No. "
    INFO : "Invoice No :"
    ;Space top : 2 MMS
    Width : 40 MMS
    STYLE :ERfontss
    align : left

    [field :raminvno]
    set as :$vouchernumber
    STYLE :ERfontss
    Width : 30 MMS
    align :left

    [Line : raminvinfo1]
    Field : raminvinfo1,raminvinfo1d
    Space top : 2.5 mms
    [Field : raminvinfo1]
    Info : "Your Po approved No :"
    Width : 40 MMS
    align : left
    [Field : raminvinfo1d]
    set as:$PurchaseOrderNo
    align :left
    Width : 30 MMS
    [line :raminvdt]
    fields :raminvdtinfo,raminvdt
    Space top : 2.5 mms

    [field :raminvdtinfo]
    INFO : "Invoice Date :"
    Width : 40 MMS
    align : left
    [field :raminvdt]
    set as :$date
    align :left

    [line :raminvgst]
    fields :raminvgstinfo,raminvgstx
    Space top : 2.5 mms
    ;raminvgst

    ;[Line : raminvinfo2]
    ;field : raminvinfo2

    ;[Field : raminvinfo2]
    ;Info : ""
    ;Width : 50 MMS

    [field :raminvgstinfo]
    INFO : "Sales Rep :"
    Width : 40 MMS
    align : left

    [field :raminvgstx]
    ;;set as :$reference
    set as :$DueDateOfPymt
    align :left




    [line :raminvgstgg]
    fields :raminvgstinfogg,raminvgstxgg
    Space top : 2.5 mms
    ;raminvgst

    [field :raminvgstinfogg]
    INFO : "Delivery To :"
    Width : 40 MMS
    align : left

    [field :raminvgstxgg]
    set as :$OrderTerms
    ;;;set as :$DueDateOfPymt
    align :left





    [line : raminvlorry]
    fields : raminvlorryinfo, raminvlorry
    Space top : 2.5 mms
    ;border : thick TOP

    [field : raminvlorryinfo]

    ;style : NORMAL Bold
    Width : 40 MMS
    align : left
    [Field : raminvlorry]

    align : left

    [part :raminvtop5r]
    lines :raminvbuyinfo, raminvbuydet, raminvbuyadd
    Repeat : raminvBuyadd : partyAddress
    width : 50% page

    ;,raminvbuyname

    [line :raminvbuyinfo]
    fields :raminvbuyinfo
    Space top : 2.5 mms
    [field :raminvbuyinfo]
    INFO : "Customer Name:"
    STYLE : NORMAL BOLD

    [Line : raminvbuydet]
    Field : raminvbuydet
    pace top : 2.5 mms

    [field : raminvbuydet]
    Set as : $ledgerName
    Space Left : 10 MMS
    ;;STYLE : small bold
    STYLE :ERfontss
    FULL WIDTH: YES



    [Line : raminvbuyadd]
    Field : raminvbuyadd

    [Field : raminvbuyadd]
    Set as : $Address
    Space Left : 10 MMS
    ;STYLE: SMALL BOLD
    FULL WIDTH: YES

    [Line : vat]
    Field :raminvbuyaddlf, raminvbuyaddl

    space top : 2 mms
    [Field : raminvbuyaddlf]
    Set as :"Customer Vat No : "

    [Field : raminvbuyaddl]
    Set as : $SALESTAXNUMBER:ledger:$ledgerName

    Space Left : 10 MMS
    ;STYLE: SMALL BOLD
    FULL WIDTH: YES

    [Part : raminvtop7]
    Line : raminvDestitle
    Height : 9 MMS
    Border : YCSBorder
    CommonBorder : yes

    [Border : YCSBorder]

    Top : Thick, Double Lined
    Bottom : Thick

    [Line : RAMINVDesTitle]
    Fields : RAMINVItemNoT,RAMINVDescT
    Explode : RaminvUserDesc : not $$isEmpty:$stockItemName and ##ICFAdd1Desc
    Right Fields : RAMINVItemNoTo,RAMINVQtyTaa,www ,RaminvRateT, RAMINVDiscT, RAMINVInvAmtT
    Space Top : 2 MMS

    [Field : RAMINVItemNoT]
    Info : "No."
    Width : 15 MMS
    Align : Center

    style: normal bold

    [Field : RAMINVItemNoTo]
    ;Info : "."
    Width : 20 MMS
    Align : Center


    [Field : RAMINVDescT]
    Info : "Description "
    FullWidth : Yes
    Align : LEFT
    style: normal bold


    [Field : www]
    Info : "InvQty"
    ;;Align : Right
    Align : Center
    Width : 20 MMS

    style: normal bold


    [Field : RAMINVQtyTaa]
    Info : "Free Qty"
    Align : Center
    ;;Align : Right

    Width : 20 MMS

    style: normal bold



    [Field : RAMINVRateT]
    Info : "Price"
    Align : Center
    Width : 25 MMS

    style: normal bold

    [Field : RAMINVDiscT]
    Info : "Discount"
    Align : Center
    ;;Align : Right
    Width : 18 MMS

    style: normal bold



    [Field : RAMINVInvAmtT]
    Info : "Amount"
    ;;Align : Right
    Align : Center
    Width : 27 MMS

    style: normal bold

    [Part : RAMINVBody]
    Parts : RAMINVInvDet

    Option : RAMINVAccInfo : Not $$SetNo = 4

    Vertical : Yes
    Scroll : Vertical

    Float : No

    ;;Thin Left Right
    ;Border : Thin Bottom

    [!Part : RAMINVAccInfo]
    Add : Parts : RAMINVAcctDet

    [Part : RAMINVInvDet]
    Lines : RAMINVInvDet
    ;;Option : RAMINVSubTot : Not $$SetNo = 4
    Repeat : RAMINVInvDet : Inventory Entries
    Scroll : Vertical
    Total : RAMINVInvAmt
    ;[!Line : RAMINVSubTot1]
    ;Add : Lines : RAMINVSubTot
    [Line : RAMINVInvDet]

    Fields : RAMINVItemNo,RAMINVDesc
    Right Fields : RAMINVItemNoo,RAMINVQtyaaaaa,bbb,RaminvRate,RAMINVDiscsss, RAMINVInvAmt
    Explode : RAMINVUserDesc : NOT $$IsEmpty:$StockItemName AND ##ICFGAddlDesc
    Space Top : 1 MMS

    [Field : RAMINVItemNo]
    Set as : $$Line
    ;;If $$IsEmpty:$PartNo:StockItem:$StockItemName then $AliasName:StockItem:$StockItemName else $PartNo:StockItem:$StockItemName
    Width : 15 MMS

    ;;Space Left : 2 MMS
    Align : Center

    [Field : RAMINVItemNoo]
    Set as : $PartNo:StockItem:$StockItemName
    ;;If $$IsEmpty:$PartNo:StockItem:$StockItemName then $AliasName:StockItem:$StockItemName else $PartNo:StockItem:$StockItemName
    Width : 20 MMS

    ;;Space Left : 2 MMS
    Align : Center

    [Field : RAMINVDesc]
    ;SET AS :$DESCRIPTION:StockItem:$StockItemName
    Set as : $StockItemName
    Space Left : 2 MMS
    ;Align : Left
    Style : Normal
    ;BORDER : THIN BOTTOM

    [Field : bbb]
    Use : Qty Primary Field
    Set as : $BilledQty
    Width : 20 MMS

    Style : Normal




    [Field : RAMINVDiscsss]
    Use : Number Field
    Set as : $Discount
    Format : "NoZero,Percentage"
    Invisible : $$SetNo = 4

    Width : 18 MMS
    Align : Center
    ;;;Invisible : NOT @@IsInvoice OR (NOT @@InvWithRate AND NOT @@InvWithAmt) OR (NOT $$IsDiscountsOn AND NOT $HasDiscounts)
    Style : Normal



    [Field : RAMINVRate]
    Use : Rate Price Field
    Set as : $Rate
    Width : 25 MMS
    ;Invisible : $$SetNo = 4
    Style : Normal
    Format : "Forex"



    [Field : RAMINVInvAmt]
    Use : Amount Forex Field
    Set as : $Amount
    Width : 27 MMS

    Format : "NoSymbol"
    Style : Normal
    ;Invisible : $$SetNo = 4

    [Field : RAMINVQtyaaaaa]
    Use: Qty Field
    Set As: $ActualQty - $BilledQty
    Width : 20 MMS
    Style : Normal

    [Part : RAMINVAcctDet]
    Lines : RAMINVAcctDet
    Repeat : RAMINVAcctDet : LedgerEntries

    [Line : RAMINVAcctDet]
    Fields : RAMINVAccSp, RAMINVAccSign, RAMINVAccQua, RAMINVAccName
    Right Fields : RAMINVAccDue, RAMINVAccQty, RAMINVAccRate, RAMINVAccPer, RAMINVAccAmt
    Space Top : 2 MMS

    [Field : RAMINVAccSp]
    Info : ""
    Width : 12 MMS

    [Field : RAMINVAccSign]
    Use : Logical Field
    Set as : ($IsDeemedPositive = @@VchSign) OR ($Amount < 0)
    Invisible : Yes
    Set always : Yes
    Skip : Yes

    [Field : RAMINVAccQua]
    Use : Simple Field
    Set as : if #RAMINVAccSign then "" else ""
    Style : Small Italic
    ;Width : 20 MMS
    Space Left : 2 MMS
    Align : Left

    [Field : RAMINVAccName]
    ;Set as : if NOT $$IsSysName:$LedgerName then $LedgerName else ""
    Style : Normal bold Italic
    Align : Right
    FullWidth : Yes
    Space Right : 3 MMS

    [Field : RAMINVAccDue]
    Info : ""
    Width : 20 MMS
    ;Border : Thin Left

    [Field : RAMINVAccQty]
    Info : ""
    Width : 20 MMS

    [Field : RAMINVAccRate]
    Use : Rate Price Field
    Type : Number
    Align : Right
    Format : "NoZero,Decimals:-1"
    Style : Normal Italic
    Set as : $RateOfInvoiceTax
    Inactive : $$IsSysName:$LedgerName
    invisible : yes
    ; Invisible : not@@InvwithRate
    Width : 12.5 MMS

    [Field : RAMINVAccPer]
    Use : Rate Units Field
    Type : String
    Align : Left
    Style : Normal Italic
    Set as : if $$IsEmpty:$RateOfInvoiceTax then "" else ""
    Inactive : $$IsSysName:$LedgerName
    Invisible : NOT @@InvWithRate
    Width : 12.5 MMS

    [Field : RAMINVAccDisc]
    Info : ""
    Width : 16 MMS

    [Field : RAMINVAccAmt]
    Use : Amount Forex Field
    Set as : $Amount
    Width : 30 MMS
    Format : "NoSymbol"
    Style : Normal
    Invisible :YES





    [Part : RaminvUserDesc]
    Line : RaminvUserDesc
    Repeat : RaminvUserDesc : UserDescription

    [Line : RaminvUserDesc]
    Fields : RaminvUserS,RaminvUserDesc

    [Field : RaminvUserS]
    Info : ""
    Width : 12 MMS

    [Field : RaminvUserDesc]
    set as : $UserDescription
    Style : small bold
    Space Left : 15 MMS








    [Part : EtainvBottom]
    Parts : EtainvInvDet1, EtainvInvDet2,ST
    ;; Parts : EtainvInvDet1, EtainvInvDet2,ST
    Height : 85 mms
    Vertical : Yes
    ;BORDER : THIN BOX


    [Line : RAMINVSubTot]
    Right Fields : RAMINVSubTot
    Space Top : 2 MMS
    Space Bottom : 2 MMS

    [Field : RAMINVSubTot]
    Use : Amount Forex Field
    Set as : $$Total:RAMINVINVAmt
    ;Invisible : $$SetNo = 4
    Width : 30 MMS
    Inactive : ($$NumItems:InventoryEntries = 1) OR ($$IsSysName:$$CollectionField:$LedgerName:2:LedgerEntries)
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Border : Thin Top : ($$NumItems:InventoryEntries > 1) AND (NOT $$IsSysName:$$CollectionField:$LedgerName:2:LedgerEntries)
    Skip : Yes
    Style : normal Bold
    ; Invisible : NOT @@InvWithAmt
    Format : "NoSymbol"

    [Part :EtainvInvDet1]
    Line : EtainvSubTot
    [Line : EtainvSubTot]
    Left fields :ttyyya,shvyya
    Right Fields : EtainvSubTotx,EtainvSubTot
    BORDER : THIN BOX


    [Field : EtainvSubTotx]
    info:"GRAND TOTAL"
    style: Salesfonta

    [Field : EtainvSubTot]
    Use : Amount Forex Field
    Set as : $$Total:RAMINVINVAmt
    Width : 40 MMS
    ;Inactive : ($$NumItems:InventoryEntries = 1) OR ($$IsSysName:$$CollectionField:$LedgerName:2:LedgerEntries)
    ;Border : Thin Top : ($$NumItems:InventoryEntries > 1) AND (NOT $$IsSysName:$$CollectionField:$LedgerName:2:LedgerEntries)
    Skip : Yes
    style: Salesfonta
    Invisible : NOT @@InvWithAmt
    Format : "NoSymbol"


    [part:EtainvInvDet2]
    Option : EtainvAccInfo


    [!Part : EtainvAccInfo]
    Add : Parts : EtainvAcctDet

    [Part : EtainvAcctDet]
    Lines : EtainvAcctDet,EtainvTotAmt,ttttyann,tttt,ttttkk,ttttkk1,ttttkk2,ttttkk3
    Repeat : EtainvAcctDet : LedgerEntries
    ;Height : 22 mms
    Vertical : Yes


    [Line : EtainvAcctDet]
    Fields : AS,EtainvAccSp, EtainvAccSign,EtainvAccQua,EtainvAccName,
    Right Fields : EtainvAccDue, EtainvAccQty, EtainvAccRate, EtainvAccPer,vvv,EtainvAccAmt,

    [Field : EtainvAccSp]
    Info : ""
    Width : 12 MMS

    [Field : EtainvAccSign]
    Use : Logical Field
    Set as : ($IsDeemedPositive = @@VchSign) OR ($Amount < 0)
    Invisible : Yes
    Set always : Yes
    Skip : Yes

    [Field : EtainvAccQua]
    Use : Simple Field
    ;Set as : if #EtainvAccSign then "Deduct :" else "Add :"
    Style : Small Italic
    ;Width : 20 MMS
    Space Left : 2 MMS
    Align : Left

    [Field : EtainvAccName]
    Set as : if NOT $$IsSysName:$LedgerName then $LedgerName else ""
    Style : Normal Italic
    Align : Right
    FullWidth : Yes
    Space Right : 3 MMS
    Invisible : yes

    [Field : EtainvAccDue]
    Info : ""
    Width : 20 MMS
    ;Border : Thin Left

    [Field : EtainvAccQty]
    Info : ""
    Width : 20 MMS

    [Field : EtainvAccRate]
    ;Use : Rate Price Field
    ;Type : Number
    Align : Right
    ;Format : "NoZero,Decimals:-1"
    Style : Normal
    Info : ""
    ;Set as : $RateOfInvoiceTax
    ;Inactive : $$IsSysName:$LedgerName
    ;invisible : yes
    ;Invisible : not@@InvwithRate
    Width : 12.5 MMS

    [Field : EtainvAccPer]
    Use : Rate Units Field
    Type : String
    Align : Left
    Style : Normal Italic
    Set as : if $$IsEmpty:$RateOfInvoiceTax then "" else ""
    Inactive : $$IsSysName:$LedgerName
    Invisible : NOT @@InvWithRate
    Width : 12.5 MMS

    [Field : EtainvAccDisc]
    Info : ""
    Width : 16 MMS

    [Field : EtainvAccAmt]
    Use : Amount Forex Field
    Set as : $Amount
    Width : 40 MMS
    Format : "NoSymbol"
    ;BORDER : THIN LEFT
    style: Salesfonta

    ;[Part : EtainvTot]
    .Line : EtainvTotAmt

    [Line : EtainvTotAmt]
    Fields : mmn
    Right Fields : mmm,EtainvTotal, EtainvTotAmt

    [Field : vvv]
    Set as : if NOT $$IsSysName:$LedgerName then $LedgerName else ""
    Style : Salesfonta
    Align : right
    ;FullWidth : Yes
    ;Space Right : 3 MMS
    ;Invisible : yes

    ;Info : " Add : Vat 15%"
    ;align : left

    [Field : AS]
    Info : ""
    style : normal bold


    [Field : mmm]
    Info : "NET AMOUNT"
    style : Salesfonta
    Align : rIGHT

    [Field : EtainvTotal]
    Use : Amount Forex Field
    Set as : #EtainvTotAmt
    Width : 40 MMS

    Border : Totals
    style: Salesfonta
    Format : "NoSymbol"
    Align : rIGHT
    [Field : EtainvTotAmt]
    Use : Amount Forex Field
    Storage : Amount : Ledger Entries : First
    Invisible : Yes

    [Line : bvbv]
    Fields : mmn


    [Field : mmn]
    Max : @@MaxNarrWidth
    Set as : $$InWords:#EtainvTotal:"Forex" + " Only"
    Style : Normal
    Lines : 0
    Width : 100 mms
    Inactive : $$IsEmpty:#EtainvTotal
    ; Invisible : NOT @@InvWithAmt $$SetNo = 4
    Invisible : $$SetNo = 4


    [Part :ST]
    Line : TST
    [Line : TST
    Fields : STS,STSz,STSx,STSxe,STSxr
    space top : 15 mms

    [Field : STS]
    Info : "Received By"
    align : CENTER
    BORDER : THIN TOP
    WIDTH : 20% page

    [Field : STSz]
    Info : "Customer Signature"
    align : CENTER
    BORDER : THIN TOP
    WIDTH : 20% page

    [Field : STSx]
    Info : "Name"
    align : CENTER
    BORDER : THIN TOP
    WIDTH : 20% page

    [Field : STSxe]
    Info : "Date"
    align : CENTER
    BORDER : THIN TOP
    WIDTH : 20% page


    [Field : STSxr]
    Info : "Stamp"
    align : CENTER
    BORDER : THIN TOP
    WIDTH : 20% page


    [style:Salesfontaa ]
    height :16
    bold : yes
    font:" times newroman"

    [style:Salesfonta ]
    height :12
    bold : yes
    font:" times newroman"


    [line :tttt]
    fields :ttyy,shvy
    Space top : 2.5 mms
    ;height : 8 mms
    ;border :thinbox

    [field :ttyy]
    ;;;INFO : "ADVANCE PAYMENT:"
    Info:"Prev.Balance Rs"
    style : Salesfonta
    Width : 40 MMS
    align : left
    ;;style:Salesfontafontss
    ;;;;; Style : Normal



    [line :ttttkk]
    Rightfields :ttyykk
    Space top : 2.5 mms
    ;height : 8 mms
    ;border :thinbox


    [field :ttyykk]
    ;;;INFO : "ADVANCE PAYMENT:"
    Info:"E.&.O.E"
    style : Salesfonta
    Width : 40 MMS
    align : Right
    ;;style:Salesfontafontss
    ;;;;; Style : Normal



    [line :ttttkk1]
    fields :ttyykk1
    Space top : 1 mms
    ;height : 8 mms
    ;border :thinbox

    [field :ttyykk1]
    INFO : "Goods once sold will not be taken back"
    ;;Info:"E.&.O.E"
    style : Salesfonta
    ;;Width : 40 MMS
    align : Left
    ;;style:Salesfontafontss
    ;;;;; Style : Normal




    [line :ttttkk2]
    fields :ttyykk2,ttyykk22
    Space top : 1 mms
    ;height : 8 mms
    ;border :thinbox

    [field :ttyykk2]
    INFO : " Issue cheque in favour of "
    ;;;Info:"E.&.O.E"
    style : Salesfonta
    Width : 40 MMS
    align : Left
    ;;style:Salesfontafontss
    ;;;;; Style : Normal


    [field :ttyykk22]
    ;;INFO : " Issue cheque in favour of "
    ;;;Info:"E.&.O.E"
    set as :mad:@cmpmailname
    full width :yes
    style : Salesfonta
    ;;;Width : 40 MMS
    align : Left
    ;;style:Salesfontafontss
    ;;;;; Style : Normal





    [line :ttttkk3]
    fields :ttyykk3
    Space top : 1 mms
    ;height : 8 mms
    ;border :thinbox

    [field :ttyykk3]
    INFO : "Dishonoured cheque will attract intrest 18% from date of delivery."
    ;;;;Info:"E.&.O.E"
    style : Salesfonta
    ;;Width : 40 MMS
    align : Left
    ;;style:Salesfontafontss
    ;;;;; Style : Normal







    [field :shvy]
    ;;Set as : $$Total:RAMINVINVAmt
    Use :Amount Field
    ;;Set as:($$ToValue:$Date:$ClosingBalance:Ledger:$$CollectionField:$LedgerName:1:LedgerEntries)-$$abs:$EXPINVTOTAL
    Set as:($$ToValue:$Date:$ClosingBalance:Ledger:$$CollectionField:$LedgerName:1:LedgerEntries)-$$abs:#EtainvTotAmt
    ;;;set as :$VoucherChequeName
    Width : 30 MMS
    align :left
    ;;style:Salesfontafontss
    style : Salesfonta
    Border: Totals
    ;;;Style : Normal


    [line :ttttya]
    fields :ttyyya,shvyya
    ;Space top : 2.5 mms

    [field :ttyyya]
    INFO : "Total Qty"

    Width : 40 MMS
    align : left
    ;;style:Salesfontafontss
    Style : Normal


    [field :shvyya]
    ;;;;Use:Amount Field
    use:Qty Primary Field

    Set as : $$CollQtyTotal:InventoryEntries:$ActualQty
    Width : 30 MMS
    align :left
    ;;style:Salesfontafontss
    Style : Normal

    [line :ttttyann]
    fields :ttyyyann,shvyyann
    Space top : 2.5 mms

    [field :ttyyyann]
    INFO : "Total Outstanding"
    ;;Info:"Curr.Balance"
    ;;border :thinbox
    Width : 37 MMS
    align : left
    Border : thin bottom
    ;;style:Salesfontafontss
    style:Salesfontafontss
    ;;Style : Normal

    [field :shvyyann]
    ;;;INFO : " PAYMENT:"
    Use: Qty Field
    ;;Use : Simple Field
    ;;;Use : Logical Field
    ;;;Set as : $$CollQtyTotal:InventoryEntries:$ActualQty


    ;;;;Border: Totals




    [style:Salesfontaafontss ]
    height :16
    bold : yes
    font:" times newroman"

    [style:Salesfontafontss ]
    height :12
    bold : yes
    font:" times newroman"

    [style:ERfontss ]
    height :12
    bold : yes
    font:" times newroman"
     


  11. Joharfchhil

    Joharfchhil Member


    Repeat : RAMINVAcctDet : My Item List

    [Collection : My Item List]
    Source Collection : ..
    Walk : Inventory Entries
    By : StockItemName:$StockItemName
    Sort : @@Default: $StockItemName
     


  12. nirexshan

    nirexshan New Member


    Thank you sir. I'm New in Tdl sir
    But I'm try is not coming item alphabetic order

    Repeat : RAMINVAcctDet : My Item List

    [Collection : My Item List]
    Source Collection : ..
    Walk : Inventory Entries
    By : StockItemName:$StockItemName
    Sort : @@Default: $StockItemName
     


Share This Page