TDL code to set/update alias name in Tally ledger Master

This code tries to set/update alias name in Ledger master

Code:

[Function    : TaxoSetLedgerAliasName]
    Variable    :    pLedgerName : String
    Variable    :    pAliasName    : String
   
    050    :            Set    : pLedgerName : "Existing Ledger"
    080 :            Set    :  pAliasName : "Alias Name"
    100    :            SET TARGET  : (Ledger,  ##pLedgerName).
    111    :            Save Target
    115    :            SET TARGET  : (Ledger,  ##pLedgerName).LanguageName[1]
    120    :            Set Value    :  LanguageId : 1033 ;
    125    :            Insert Collection Object  : Name
    130    :            Set Target    : Name
    140    :            set value   : name :##pAliasName
    150    :            set target  : ..
    155    :            set target  : ..
    190    :            Save Target


[Function    : TaxoDelLedgerAliasName]
   
       
        Variable    : pLedgerName : String
        Variable    : NumNM        : Number
       
        115    :    Set Object  : (Ledger,  ##pLedgerName).
        118    :    SET TARGET  : (Ledger,  ##pLedgerName).
        122    :    SET TARGET  : (Ledger,  $Name).LanguageName[1].
        198    :        Set        : NumNM        : $$NumItems:Name
        200    :         If        : ##NumNM > 0
        210    :            While: (##NumNM != 0)
        211    :                Log    : ##NumNM
        212    :                Log    : $Name[##NumNM].Name
        215    :                Do If : (##NumNM = 2) AND NOT ($$IsEmpty:$Name[##NumNM].Name): DELETE COLLECTION OBJECT : Name    : ##NumNM    : Yes ;(NOT $$IsEmpty:$Name[##NumNM].Name) AND
        220    :                 Decr: NumNM
        230    :            End While
        240    :        End If
        245    :        Save Target
       
        

 

Suppose I have one ledger master named "ledger 1" with 2 Alias "Alias 1","Alias 2". Now I have to update with one more alias "Alias 3". How to do with function.

 

same code should work.. if not then inform me