Hello Everyone, I want to generate new multiple voucher entries from Manufacturing journal, currently the entry is generating but not with the right values. I am using an explode part for InventoryEntries out but it is repeatin InventoriesEntriesIn in the generated entry. Current view of my entry : my given code : Code: [Function:AutoProdEntry] Parameter: APVchTypName : String : ##SVVoucherType Variable: InvIn Date : Date Variable: InvIn VchTyp : String Variable: InvIn Nar : String Variable: InvIn Ref : String Variable: InvIn Vchno : String Variable: InvIn Item : String Variable: InvIn BOM : String Variable: InvIn Gdwn : String Variable: InvIn Qty : Number Variable: InvIn Rate : Number Variable: InvIn Amt : Number Variable: IvnOut Item : String Variable: IvnOut Gdwn : String Variable: IvnOut Qty : Number Variable: IvnOut Rate : Number Variable: IvnOut Amt : Number Variable: Counter : Number : 1 001 : Query Box : "Do You Want Generate ?" + $$NewLine + $$NewLine + " Production Vouchers ":Yes:No 002 : IF : $$LastResult 004 : Start Batch Post : 10 005 : START PROGRESS : ($$NumItems:InvInColl) : "Creating " : @@CmpMailName : " Vouchers ..." 011 : SET : InvIn Date : $$Date:$Date 012 : SET : InvIn VchTyp : "Manufacturing Journal" 013 : SET : SVViewName : "Multi Consumption Voucher View" 014 : Set : InvIn Nar : $$LocaleString:$$machinedate + " - " + $$LocaleString:$$Time:$$MachineTime 050 : New Object : Voucher 051 : Set Value : Persisted View : ##SVViewName 052 : Set Value : Voucher Type Name : ##InvInVchTYP 053 : Set Value : Date : $$Date:$date 054 : Set Value : Narration : ##InvInNar 055 : Set Value : REFERENCE : ##InvInVchno 061 : Set Value : DESTINATIONGODOWN : ##InvInGdwn 062 : Set Value : VOUCHERDESTINATIONGODOWN : ##InvInGdwn 063 : Set Value : VOUCHERSOURCEGODOWN : ##IvnOutGdwn 064 : Set Value : FORJOBCOSTING : Yes 065 : Set Value : ISINVOICE : No 066 : Set Value : MFGJOURNAL : No 100 : WALK COLLECTION : InvInColl 111 : SET : InvInItem : $PMAEItem 112 : SET : InvIn Bom : $PMAEBOM 113 : SET : InvIn Gdwn : $PMAEGDWN 114 : SET : InvIn Qty : $PMAEQty 115 : SET : InvIn Rate : ##InvInAmt / ##InvInQty 116 : SET : InvIn Amt : $$CollNumTotal:IvnOutColl:$IvnOutAmt 150 : Insert Collection Object : INVENTORYENTRIESIN 151 : Set Value : STOCKITEMNAME : ##InvInItem 152 : Set Value : BOMNAME : ##InvInBom 153 : Set Value : ISDEEMEDPOSITIVE : Yes 154 : Set Value : ISLASTDEEMEDPOSITIVE : Yes 155 : Set Value : RATE : $$TgtObject:$$AsRate:##InvInRate 156 : Set Value : AMOUNT : $$TgtObject:$$AsAmount:##InvInAmt 157 : Set Value : ACTUALQTY : $$TgtObject:$$AsQty:##InvInQty 158 : Set Value : BilledQty : $$TgtObject:$$AsQty:##InvInQty 210 : Insert Collection Object : BatchAllocations 211 : Set Value : GODOWNNAME : ##InvInGdwn 212 : Set Value : BATCHNAME : "Primary Batch" 213 : Set Value : AMOUNT : $$TgtObject:$$AsAmount:##InvInAmt 214 : Set Value : ACTUALQTY : $$TgtObject:$$AsQty:##InvInQty 215 : Set Value : BilledQty : $$TgtObject:$$AsQty:##InvInQty 216 : Set Target : .. 250 : End Walk 300 : Walk Collection : IvnOut Coll 311 : SET : IvnOutItem : $PMEPEItem 312 : SET : IvnOut Gdwn : $PMEPEGDWN 313 : SET : IvnOut Qty : $PMEPEQty 314 : SET : IvnOut Rate : $PMEPERate 315 : SET : IvnOut Amt : $PMEPEAmt 410 : Insert Collection Object : INVENTORYENTRIESOUT 411 : Set Value : STOCKITEMNAME : ##IvnOutItem 412 : Set Value : ISDEEMEDPOSITIVE : No 413 : Set Value : ISLASTDEEMEDPOSITIVE : No 414 : Set Value : RATE : $$TgtObject:$$AsRate:##IvnOutRate 415 : Set Value : AMOUNT : $$TgtObject:$$AsAmount:##IvnOutAmt 416 : Set Value : ACTUALQTY : $$TgtObject:$$AsQty:##IvnOutQty*-1 417 : Set Value : BilledQty : $$TgtObject:$$AsQty:##IvnOutQty*-1 450 : Insert Collection Object : BatchAllocations 451 : Set Value : GODOWNNAME : ##IvnOutGdwn 452 : Set Value : DESTINATIONGODOWNNAME : ##IvnOutGdwn 453 : Set Value : BATCHNAME : "Primary Batch" 454 : Set Value : AMOUNT : $$TgtObject:$$AsAmount:##IvnOutAmt 455 : Set Value : ACTUALQTY : $$TgtObject:$$AsQty:##IvnOutQty*-1 456 : Set Value : BilledQty : $$TgtObject:$$AsQty:##IvnOutQty*-1 457 : Set Target : .. 500 : End Walk 501 : Log : "---Main line---" 502 : Log : ##InvInItem 503 : Log : ##InvInBOM 504 : Log : ##InvInGdwn 505 : Log : ##InvInQty 506 : Log : ##InvInRate 507 : Log : ##InvInAmt 510 : Log : "---Exp Part---" 511 : Log : ##IvnOutItem 512 : Log : ##IvnOutGdwn 513 : Log : ##IvnOutQty 514 : Log : ##IvnOutRate 515 : Log : ##IvnOutAmt 516 : Log : "---Coll num 2---" 600 : Create Target ;605 : Log: $$String:" Auto New Entry Create" 610 : INCREMENT : Counter 610a : SHOW PROGRESS : ##Counter 660 : END PROGRESS 670 : RETURN 680 : End Batch Post ;690 : Set File Log Off 003 : End If 700 : MSGBOX : "Error" : "No Production Entry Created!!"
