Fetch receipt amount by billref

I modified Voucher Register , i add 3 fields mobile number ,deposit amount, remaining amount. it is billwise.

i need to fetch receipt and payment amount on the basis of "billref no."

what collection i have to ceate? i am new into it. please help me out

Code:

[#Menu    :Gateway Of Tally]
    Add    : Item    :After    :@@LocQuit        :CR/DR Register    :Display    : CR_DR_Register
   
[Report: CR_DR_Register]
   
;
    Use    : Voucher Register
    Replace     : Set                    : VoucherTypeName       : VoucherTypeName    : $$VchTypeDebitNote


[#Line: DBTitle1]

            Add        :Right Field :  Before:DSP VchTypeTitle            :DSP VchAcctMobileT
            Add        :Right Field :    After:DSP DBDrTitle1            :AmountRcvdT,Dues_AmountT
            Border : Thick Top
            Delete    :Right Field        :DSP DBCrTitle1
           
[#Line        :DBTitle2]
    Delete        :Right Field        :DSP DBCrTitle2
    Add        :Right Field :    After:DSP DBDrTitle1            :AmountRcvdT,Dues_AmountT
    Local    :Field            :AmountRcvdT        :Set as        :$$LocaleString:"Deposit"

       
[Field        :Total_AmountT]
    Use        :Amount Title Field
    Info    :$$LocaleString:"Total Amount"
           

[Field    :DSP VchAcctMobileT]
Use         : Short Name Title Field
Info        : $$LocaleString:"Mobile No"
   
[Field    :AmountRcvdT]
    Use    :Amount Title Field
    Set as    :"Amount "
    Line    :0
   
[Field    :Dues_AmountT]
    Use    :Amount Title Field
    Set as    :"Remaining"
    Line    :0
   

[#Line: DSP VchDetail]
   Add                    : Right Field          : Before:DSP VchType    :DSP VchAcctMobile
  

[#Line: DSP AccDetails]

            Add     : Right Fields      :After: DSP DBDrAmt:AmountRcvd,Dues_Amount
           


[#Field: DSPDBDrAmt]
   
    Use             : Amount Field
;    Set as          : If $IsCancelled OR $IsDeleted then 0  +
;                        Else(If @UseForPOSInv AND NOT $$IsSysName:##VoucherTypeName AND @POSLedgerEntries Then +
;                        @FldValue Else $$IfDr:$DaybookAmount)
;
    Delete            :Set as
    Add                :Set as        :if @@isdebitnote then $$IfDr:$DaybookAmount else $DaybookAmount
   

    FldValue        : $$FilterAmtTotal:AllLedgerEntries:IsDr:$Amount
    UseForPOSInv    :(@@UseForPOSInvoice AND ($$AddOnInfo:POSEnabled))
    POSLedgerEntries: $$FilterCount:AllLedgerEntries:IsPartyLedgerAccount > 1
    Style           : Small Bold
           

[#Field    :DSPDBCrAmt]
   
    Invisible    :Yes
  

[Field        :Total_Amount]
    Set By Condition    :Yes        :""

[Field    :DSP VchAcctMobile]
    Use        :Name Field
[INDENT][INDENT]    Set as    :$LedgerMobile:Ledger:#DSPVchAccount[IMG]http://C:\Users\Lenovo\Desktop\Untitled.jpg[/IMG] [/INDENT][/INDENT]
   

[Field    :AmountRcvd]
    Use    :Amount Field
    Set as    :$ClosingBalance:
   
[Field    :Dues_Amount]
    Use    :Amount Field
    Color    :red
    Set as:""