How to get Ledger details

Discussion in 'Tally Developer' started by Joharfchhil, Dec 29, 2012.

    
  1. Joharfchhil

    Joharfchhil Member


    Dear Experts

    Help needed, thanks for the same.


    [#Line: DSP VchAccTitles]
    Add: Field : after : DSP VchDateTitle : VCH Percentage, VCH Qtybilled, VCH Actualqty
    [#Line: DSP VchInv1Titles]
    Add: Field : after : DSP VchDateTitle : VCH Percentage, VCH Qtybilled, VCH Actualqty
    [Field: VCH Percentage]
    Use: VCH ShortTitle
    Setas: $$LocaleString:"Percentage"
    [Field: VCH Qtybilled]
    Use: VCH ShortTitle
    Setas: $$LocaleString:"Qty Billed"
    [Field: SCS VCH Actualbilled]
    Use: VCH ShortTitle
    Setas: $$LocaleString:"Actual Qty"

    [#Line: DSP VchDetail]
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;; To Get details from Voucher ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    ;;;;;;;;;;;;;; i.e Percentage, Total Qty billed, Total Actual Qty etc. ;;;;;;;;;;;;;;;;;;;;;;;;;;
    ;;;;;;;;;;;;;; what code needed for the getting above details ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
     


  2. mpal2311

    mpal2311 Active Member


    This is for reference:


    ;; Sri Ganeshji : Sri Balaji : Sri Pitreshwarji : Sri Durgaji : Sri Venkateshwara


    [System : Formula]
    IsDebtorLedger : ($$IsLedofGrp:$LedgerName:$$GroupSales Or $$IsLedofGrp:$LedgerName:$$GroupSundryDebtors)

    [System : Formula]
    AbcFilter : $$IsBelongsTo:$$GroupSales OR $$IsBelongsTo:$$GroupSundryDebtors

    [#Line: DSP VchAccTitles]
    Add : Fields : AFter : DSP VchAcctTitle : JLBankTitle

    [Field : JLBankTitle]
    Set as : "Dec Thru "
    Skip : Yes
    Invisible : Not ##DesThru
    Inactive : Not ##DesThru

    [#Line: DSP VchDetail]
    Add : Right Fields : Before : DSP VchType : JLBank

    [Field : JLBank]
    Use : Short Name Field
    Set as : $BasicShippedBy
    Skip : Yes
    Invisible : Not ##DesThru
    Inactive : Not ##DesThru
    Style : Normal Italic
    Align : Right


    [#Line: DSP VchAccTitles]
    Add : Fields : AFter : DSP VchAcctTitle : JLBankTitle1

    [Field : JLBankTitle1]
    Set as : "Dec Doc No"
    Skip : Yes
    Invisible : Not ##DesDocNo
    Inactive : Not ##DesDocNo

    [#Line: DSP VchDetail]
    Add : Right Fields : Before : DSP VchType : JLBank1

    [Field : JLBank1]
    Use : Short Name Field
    Set as : $BasicShipDocumentNo
    Skip : Yes
    Invisible : Not ##DesDocNo
    Inactive : Not ##DesDocNo
    Style : Normal Italic
    Align : Right

    [#Part: LEDVCHCFG Common]
    Add : Lines : AT End : DesDocNo, DesThru



    [Line : DesDocNo]
    Fields : Medium prompt, DesDocNo
    Local : Field : Medium Prompt : Info : "Show Des Doc No."

    [Field: DesDocNo]
    Use : Logical Field
    Modifies : DesDocNo

    [Line : DesThru]
    Fields : Medium prompt, DesThru
    Local : Field : Medium Prompt : Info : "Show Des Thru "

    [Field: DesThru]
    Use : Logical Field
    Modifies : DesThru


    [System: Variables]
    DesDocNo : No
    DesThru : No

    [Variable: DesDocNo]
    Type : Logical
    Persistent : Yes

    [Variable : DesThru]
    Type : Logical
    Persistent : Yes

    [#Report : Ledger Vouchers]
    Variable :DesDocNo , DesThru
    Set : DesDocNo : No
    Set : DesThru : No


    [#Report : Day Book]
    Variable :DesDocNo , DesThru
    Set :DesDocNo : No
    Set : DesThru : No



    [#Report: Bank Recon]
    Variable :DesDocNo , DesThru
    Set :DesDocNo : No
    Set : DesThru : No


    [#Collection: Vouchers of Ledger]

    Fetch : BasicShipDocumentNo,BasicShippedBy

    ;;; Eof
     
    Pritam Krishna likes this.


  3. Joharfchhil

    Joharfchhil Member


    Dear Sir,

    I have added few code, but unable to get Qty Total --- i.e in Field F_two & F_three, I think the code is incorrect, Can anyone tell me the correct code.

    Thanks for the Help


    ;;=== Ledger report
    [#Line: DSP VchAccTitles]
    Add: Field : after : DSP VchAcctTitle : SCS VCH CurTitle,SCS VCH CurRateTitle, SCS VCH CurAmtTitle
    ;;VchDateTitle

    [#Line: DSP VchInv1Titles]
    Add: Field : after : DSP VchAcctTitle : SCS VCH CurTitle,SCS VCH CurRateTitle, SCS VCH CurAmtTitle

    [#Line: DSP VchDetail]
    Add : Right Field : before : DSP VchType : F_one, F_two, F_Three
    [Field : F_One]
    Use : Number Field
    Set as : $AdiscPerc
    Width : 10
    Format : "NoZero, Percentage"
    Align : Centre
    [Field : F_Two]
    Set as : $$ReportObject:$$CollectionFieldByKey:$TotalVchAQty
    Width : 10
    Style : Normal
    [Field : F_Three]
    Set as : $$ReportObject:$$CollectionFieldByKey:$TotalVchBQty
    Width : 10
    Style : Normal

    [#Collection : Vouchers of Ledger]
    Type : Vouchers : Ledger
    Child of : #LedgerName
    Fetch: AdiscPerc, ActualQty, Billedqty
    Aggr Compute: TotalVchAQty:Sum: $$ActualQty:#LedgerName
    Aggr Compute: TotalVchBqty:Sum: $$BilledQty:#LedgerName


    [Field: SCS VCH CurTitle]
    Use: VCH ShortTitle
    Setas: $$LocaleString:"Percentage"
    [Field: SCS VCH CurRateTitle]
    Use: VCH ShortTitle
    Setas: $$LocaleString:"Qty Billed"
    [Field: SCS VCH CurAmtTitle]
    Use: VCH ShortTitle
    Setas: $$LocaleString:"Actual Qty"
     



  4. Hi, Pl. find the solution in other way as attached.
     

    Attached Files:

    mpal2311 likes this.


  5. Joharfchhil

    Joharfchhil Member


    Dear Pritam Krishna,

    Thanks for your help, my problem got solved.

    THANKS
     


  6. Basha

    Basha Member


    Problem Solved Thx to Pritam i need Ref No. also
     


Share This Page