Need Help Regarding Sales Voucher AutoPost

Discussion in 'Free Source Codes' started by Aslan Iglesias, Jun 8, 2020.

    
  1. Aslan Iglesias

    Aslan Iglesias New Member


    Dear Experts,

    I am new here in TDL, recently I am trying a code on Sales Voucher Auto Post.
    The code is creating New Vouchers Accordingly. The problem is that those Sales Bills couldn't be receipt against reference of the Sales Bill, i.e. sales bill list not showing on when I am going to receive CASH/BANK on Receipt Voucher. Please help me regarding this.



    The code for following is:




    [Function:FuncGenFunc]
    Variable:CURNTSTD:String
    Variable:STUNM:String
    Variable:STUFuncTot:Amount
    Variable:STDFIX:String
    Variable:STUProgressCount:Number
    000a : SET : STUProgressCount : $$Number:"1"
    000 : if : #FuncCollectionStudentName=" All Items" and #FuncCollectionSTDName=" All Items"

    000b : START PROGRESS : ##STUProgressCount : "Generating Func" : "for Students" : ""
    001 : Walk Collection : FuncGenStudentColl
    002 : Set : CURNTSTD:$STUCURRENTSTANDARD:LEdger:$Name
    003 : Set : STUNM:$Name
    004 : NEW OBJECT : Voucher
    005 : SET VALUE : Date : ##SVCurrentDate
    006 : SET VALUE : VoucherTypeName : "Func Generation"
    007 : SET VALUE : IsInvoice : YES
    008 : SET : SVViewName : "Accounting Voucher View"
    009 : SET VALUE : PERSISTEDVIEW : ##SVViewName
    010 : SET VALUE : PartyLedgerName :##STUNM
    011 : SETVALUE : Narration:#FuncCollectionAddNote

    ;011a:Delete Collection Object:BILLALLOCATIONS
    012 : INSERT COLLECTION OBJECT : AllLedger Entries
    013 : SET TARGET : LedgerEntries

    016 : SET VALUE : Ledger Name : ##STUNM
    017 : SET VALUE : Amount : -$$FilterAmtTotal:FuncStrucCollExtnd:STDFltr:$AdmissionFunc
    018 : SET VALUE : ISDEEMEDPOSITIVE : Yes
    018a : SET VALUE : ISLASTDEEMEDPOSITIVE : Yes
    019 : SET TARGET : ...

    020 : Walk Collection : FuncStrucCollExtnd
    021 : INSERT COLLECTION OBJECT : AllLedger Entries
    022 : SET TARGET : LedgerEntries
    023 : SET VALUE : Ledger Name : $AdmissionLedger
    024 : SET VALUE : Amount :$AdmissionFunc
    025 : SET VALUE : ISDEEMEDPOSITIVE : No
    026 : Set Value : ISLASTDEEMEDPOSITIVE : No


    027 : Insert Collection Object : COSTCENTREALLOCATIONS
    028 : Set Value : NAME:$Name
    029 : Set Value : AMOUNT:$AdmissionFunc
    030 : Set Target : ..
    031 : Set Target : ..

    032 : End Walk

    033 : CREATE TARGET
    035a : Incr:STUProgressCount
    034 : End Walk
    035 : Return
    036b: End Progress
    036 : End If
     


Share This Page