How to make a collection of All the Ledgers and Alias

Discussion in 'Free Source Codes' started by ABDUL AZIZ, May 31, 2019.

    
  1. ABDUL AZIZ

    ABDUL AZIZ Member


    Dear Expert,

    Please have a look at the below collection, currently it lists only Ledger Name.

    [Collection:AllLedVchrsSrc]
    Type : Ledger : Voucher
    Fetch : Ledger Name, Amount, Date, VoucherTypeName, *.*

    But I wan to list Alias also. What to do?

    Please help.....
    Thanks & Regards,
     


  2. Amit Kamdar

    Amit Kamdar Administrator Staff Member


    Use : Alias Collection ... look up the same in TDE.........
     


  3. ABDUL AZIZ

    ABDUL AZIZ Member


    Sir,

    When I used as shown in below collection then it is showing the same information in two columns, but I don't want 2nd column.

    [Collection:MyCashEntriesInLedgers]
    Use : Alias Collection
    Title : "List of Ledgers"
    Type : Ledger
    Align : Center
    Format : $Name , 25
    Sub Title : "Ledger Name"
    Trigger : TrigerLedger
    Variable : VarLedItem
    Report : MyCashEntries

    Please look at the screenshot ..
    Error message by Tally.JPG
     
    mpal2311 likes this.


  4. ONKAR

    ONKAR Active Member


    @ABDUL AZIZ, try this new one code here, change as per your requirement


    [#Collection: List of Ledgers]
    Use : Ledger Collection
    Title : $$LocaleString:"List of Ledgers"
    Type : ledger
    Fetch : Name
    Report : ledger
    Variable : Sledger
    Trigger : Sledger
    IsODBCTable : Yes
    Delete : Format
    Add : Format : $Name,50
    Add : SubTitle : $$LocaleString:"LEDGER NAME", "Mobile No", "GROUP", "PAN", "GSTIN", "OP BALANCE", "CL BALANCE"


    Add :Format :$LedgerMobile
    Fetch :LedgerMobil

    Add : Format : $parent
    Fetch : parent

    Add : Format : $IncomeTaxNumber
    Fetch : IncomeTaxNumber

    Add : Format : $PartyGSTIN
    Fetch : PartyGSTIN

    Add : Format : $OpeningBalance
    Fetch : OpeningBalance

    Add : Format : $ClosingBalance
    Fetch : ClosingBalance


    [#Collection : VLedTable]

    Use : Ledger Collection
    Title : $$LocaleString:"List of Ledger Accounts"
    Delete : Format
    Add : Format : $Name,50
    Add : SubTitle : $$LocaleString:"LEDGER NAME", "Mobile No", "GROUP", "GSTIN", "CL BALANCE"

    Add :Format :$LedgerMobile
    Fetch :LedgerMobil

    Add : Format : $parent
    Fetch : parent

    Add : Format : $PartyGSTIN
    Fetch : PartyGSTIN

    Add : Format : $ClosingBalance
    Fetch : ClosingBalance


    [#Collection: List of Groups]

    Use : Ledger Collection

    Title : $$LocaleString:"List of Groups"
    Type : Group
    Fetch : Name
    Delete : Format
    Add : Format : $Name,50
    Add : SubTitle : $$LocaleString:"GROUP NAME","MAIN GROUP",
    Add : Format : $parent
    Fetch : parent
     
    Frz and ABDUL AZIZ like this.


  5. Amit Kamdar

    Amit Kamdar Administrator Staff Member


    Delete : Format
    Add : Format : $$Name , 25
     
    ABDUL AZIZ likes this.


  6. Amit Kamdar

    Amit Kamdar Administrator Staff Member


    You seems to have quite a collection of codes.!!!

    But try to give them "as wanted" solutions rather than expanding the same. By solving other member's queries, you will learn yourself too.
     


  7. ABDUL AZIZ

    ABDUL AZIZ Member


    Done! Thanks Sir,

    I am learning right now, and once I am able to solve someone else problem , I will do. If you see my past two three posts where I did some mistakes while guiding others.... so I am restricting my self before i learn better....
     


  8. Amit Kamdar

    Amit Kamdar Administrator Staff Member


    You are self learning and i am happy for you. This method is the best teacher.

    Secondly, I am aware you are new, so the advice was for Mr.Onkar, not you and hence I have earmarked his post also in my reply. Cheers.

    As for you keep learning and doing more.... practicals is the best way to go about.
     
    ABDUL AZIZ likes this.


  9. ABDUL AZIZ

    ABDUL AZIZ Member


    Sorry Sir,

    It shows that I am really new.
     


  10. ONKAR

    ONKAR Active Member


    Amit Sir is not what you think about me, I do not have any tdl collection, it is available on the internet. I just want to help them, as if you do me always, All of these are available on the Internet, All you have to do is find it correctly, that's it.
     


  11. Amit Kamdar

    Amit Kamdar Administrator Staff Member


    That's Okay buddy...........I just said ...from your last few uploads.... you have ready made code for every problem and occasion.

    So I complemented about your collection. ;)
     


  12. ONKAR

    ONKAR Active Member


    ok ok. keep sharing your knowledge. happy coding. Always help others , so that's why I upload threads / posts
     



  13. I want alias of ledger, how i fetch
     


  14. Amit Kamdar

    Amit Kamdar Administrator Staff Member


    Depends on where you want it? Is a collection?? if yes, then see above solution.
     


  15. ABDUL AZIZ

    ABDUL AZIZ Member


    You can try the below code..

    [Field: ListOfAlias]
    Use : Small Field
    Set as : $$Alias:$Alias
    Width : 15
    Border : Thin Left
     



  16. thanks a lot sir
     



  17. [#Collection: Vch Stock Item Extract]
    ;Use:ExtractAlias Collection
    Delete : Format
    Add : Format : $Name,25
    add: Sub Title:"Stock Items","Stock Group","Rate","Alias","Stock Available"
    Add:Format:$parent,10
    Fetch:parent

    Add:Format:$LastPurcCost:StockItem:$StockItemName,15
    Fetch:$LastPurcCost
    Add:Format:$$Alias:$Alias
    Fetch:Alias
    Search Key:$Name

    in this code one item is shown in two place, i need as ledger
     



  18. on compiling
    "H:\Test\List of itemledger.txt"(31): error T0025: could not 'USE' description 'Ledger Collection'!
    this error shown
     


  19. ganeshgk

    ganeshgk Member


    Please Use format:$onlyalias,10
    it show in alias name compelsary
     


  20. Khyrul

    Khyrul New Member


    Need Parent Alias in journal print, anybody help me sir?

    [#Line: PJR ColumnTitles]
    Space Top: 0
    Space Bottom: 0
    Delete : Indent
    PrePrinted : Yes
    ;Delete : Right Fields: Amount Title Field
    Add : Left Field : Before : Name Title Field : NumberTitleField, ShortNameTitleField
    Local : Field : NumberTitleField : Info : $$LocaleString:"ACC CODE"
    Local : Field : NumberTitleField : Border : Thin Right
    Local : Field : NumberTitleField : Style : Normal Bold
    Local : Field : NumberTitleField : Width : @@NumberWidth+2
    Local : Field : NumberTitleField : Align : Centre
    Local : Field : ShortNameTitleField : Info : $$LocaleString:"ACC TITLE"
    Local : Field : ShortNameTitleField : Style : Normal Bold
    Local : Field : ShortNameTitleField : Width : @@NameWidth
    Local : Field : ShortNameTitleField : Align : Centre
    [#Line: PJR Accts]
    Add : Left Fields : Before : PJR To : PJRGrpCode, PJRGrp
    Local : Field : PPR Accts : Style : Normal
    Local : Field : PPR Accts : Width : @@NameWidth
    [Field:pJRGrpCode]
    Use : NumberTitleField
    ; Set as : $OnlyAlias:Group:$ParentName
    Set as : $OnlyAlias:Group:$ParentName
    Border : Thin Right
    Width : @@NumberWidth+2
    ;[#Object:Group]
    ; AliasName: $$Alias
    [Field : PJRGrp]
    Use : ShortNameTitleField
    Set as : $Parent:Ledger:$LedgerName
    Border : Thin Right
    Width : @@NameWidth
     


  21. ABDUL AZIZ

    ABDUL AZIZ Member


    Try this...

    [#Menu:Gateway Of tally]

    Add: Key Item : After : @@LOCQUIT: "My Report" :R: Display: MyReport



    ;;Start of Empty Template
    [Report: MyReport]
    Form: MyForm


    [Form: MyForm]
    Part: MyPart

    [Part: MyPart]
    Line: MyLine
    Repeat:MyLine:parentAliasColl

    [Line: MyLine]
    Field: MyField,MyField1

    [Field: MyField]
    Set as: $Name
    Table:parentAliasColl
    Show Table:Always
    Width:25

    [Field: MyField1]
    Set as: $$Alias:$Alias
    Width: 25


    [Collection:parentAliasColl]
    Type:Group
    Fetch: *.*,
     
    Sanjeev S likes this.


Share This Page