LAST RECEIPT OF PARTY

Discussion in 'Free Source Codes' started by CHANDRESH GAUR, Dec 30, 2019.

    

  1. Dear Sir i am facing a problem to get party last receipt amount

    can Anyone resolve this

    [#Menu: GATEWAY OF TALLY]
    Add: Item: MIS REPORT : Display: Party Wise Turnover Report : NOT $$IsEmpty:$$SelectedCmps
    [Report: Party Wise Turnover Report]
    Title: $$LocaleString:"MIS REPORT"
    Use : DSP Template
    Form : Party Wise Turnover Report
    Variables : SV CurrentCompany, SV FromDate, SV ToDate, SV SortMethod
    Set : SV Sort Method : @@Default
    Set : SV From Date :##SVCurrentDate ; if $$InPrintMode then $$MonthStart:##SVCurrentDate else ##SVCurrentDate
    Set : SV To Date : ##SVCurrentDate

    [Form: Party Wise Turnover Report]
    Use : DSP Template
    Width : 100% Page
    Height: 100% Page
    Part:ABCD, DETAIL
    [Part:ABCD]
    Line:ROI TITLE LINE12,ROI TITLE LINE2
    Space Bottom:0.5
    Space Top:0.25
    [Line:ROI TITLE LINE12]
    Field:NAME FIELD
    Right Field:ABCD1
    Local:Field:NAME FIELD:Set as:"RECEIPT DETAILS "
    Local:Field:NAME FIELd:Style:large bold
    Local:Field:NAME FIELd:Align:Center
    Local:Field:NAME FIELD:Border:THIN BOTTOM
    Local:Field:NAME FIELD:Full Width:Yes
    [Field:ABCD1]
    Set as : @@DSPDateStr

    [Line:ROI TITLE LINE2]
    Field:NAME FIELD
    ;Right Field:ABCD1
    Local:Field:NAME FIELD:Set as:mad:@CMPMAILNAME
    Local:Field:NAME FIELD:Align:Centre
    Local:Field:NAME FIELd:Style:large bold
    Local:Field:NAME FIELd:Align:Left
    ;Local:Field:NAME FIELD:Border:THIN BOTTOM
    Local:Field:NAME FIELD:Full Width:Yes

    [Part:DETAIL]
    Line: TurnOverTitles, TurnOverDetails
    Repeat: TurnOverDetails : TurnOverColl
    Scroll: Vertical
    Common Border:Yes
    [Line: TurnOverTitles]
    Use: TurnOverDetails
    Local:Field:SR:Info:"SR NO."
    Local:Field:SR:Border:THIN LEFT
    Local:Field:partyName:Info:"PARTY NAME"
    Local:Field:partyName:Border:THIN LEFT
    Local:Field:grp:Info:"GROUP NAME"
    Local:Field:grp:Border:THIN LEFT
    Local:Field:DT:Info:"DATE"
    Local:Field:DT:Border:THIN LEFT
    Local:Field:RAMT:Info:"AMOUNT"
    Local:Field:RAMT:Border:THIN LEFT
    ;Local: Field: RAMT : Border:THICK LEFT RIGHT
    Local: Field: Default: Type: String
    Local: Field: Default: Align: Center
    Local: Field: Default: Style: CMPAddStyleB
    Border:THIN BOX
    Space Bottom: .50
    Space Top: .75
    [Style : CMPAddStyleB]
    Font : "Calibri"
    Height : "11"
    Bold : Yes
    [Line:TurnOverDetails]
    Add:Field:SR,PartyName,GRP;,DT,RAMT
    Right Field:DT,RAMT

    [Field:SR]
    Use:name FIELD
    Set as:if $$IsEmpty:#PARTYNAME then "" else $$Line
    [Field:pARTYNAME]
    Use:NAME FIELD
    ;Set as:$LedgerName
    ;Set as:$$CollectionField:$LedgerName:(-1):TurnOverColl

    Set as:if $LedgerName=$$PrevLine:$LedgerName AND $$IsEmpty:#PARTYNAME then "" else $LedgerName

    [Field:GRP]
    Use:NAME FIELD
    Set as:if $$IsEmpty:#PARTYNAME then "" else $PLN

    [Field:DT]
    Use:UNI DATE FIELD
    Set as:if $$IsEmpty:#PARTYNAME then "" else $date
    [Field:RAMT]
    Use:AMOUNT FIELD
    ;Set as:$$CollectionField:$AMOUNT:(-1):TurnOverColl

    Set as:if $$IsEmpty:#PARTYNAME then "" else $$CollectionField:$AMOUNT:$$Line:TurnOverColl
    [Collection: RecptVchs]

    Type : Vouchers : VoucherType
    Child Of : $$VchTypeReceipt

    [Collection:TurnOverColl]
    Source Collection : RecptVchs
    Walk : Ledger Entries
    By : LedgerName : $LedgerName
    ;Sort : -$Date
    By : Date : $Date
    ;Compute : Amount : $(ledger,$Amount).LAST
    Compute:pln:$_PrimaryGroup:Ledger:$LedgerName
    Compute:AMOUNT:$AMOUNT
    Sort : @@SortAlphaIncr : $LedgerName
    Filter:new

    [System:Formulae]
    NEW:$PLN="Loans & Advances (Asset)"

    ;; SELECT $LEDGERNAME,$DATE,$AMOUNT FROM RecptVchsSum
     


  2. Bipin Damania

    Bipin Damania Active Member


    Add below in Collection

    Compute:LastRcptDate:$Date
    Sort : @@SortAlphaIncr : -$Date, $LedgerName

    and in Field

    [Field:DT]
    Use:UNI DATE FIELD
    Set as:if $$IsEmpty:#PARTYNAME then "" else $LastRcptDate ;;$date
     


  3. NainaSiraj

    NainaSiraj Member


    its nor fetching
     


Share This Page