filter is working only PartyName,Stockitem & VoucherNo in collection if Object value compute then filter not working.... Code: ;;;;;;;;;;;;;;;;;;;;;;;TRAVEL REPORT FILTER;;;;;;;;;;;;;;;;;;;; [Button:LineitemFilter1] Key : F6 Action : Call: DescFilter Func Title : All Filter [Function: DescFilter Func] 01 : Alter: LineitemFilter 02 : If: $$LastResult 03 : Display: SMReport1 05 : End If 06 : Set: vLineItem1 : "" [Report:LineitemFilter] Form : LineitemFilter [Form:LineitemFilter] Part : LineitemFilter No Confirmation : Yes [Part:LineitemFilter] Line : LineitemFilter [Line:LineitemFilter] Field : LineitemTitfld,LineitemFilter Option : alter on enter Local : Field : LineitemTitfld : Info : "Enter Details : " Local : Field : LineitemTitfld : Color :Blue Local : Field : LineitemTitfld : Style :Tiny Bold [Field : LineitemTitfld] Use : Name Field Width : 20 Border : Thin Box Skip: Yes [Field:LineitemFilter] Use : Name Field Width : 30 Border : Thin Box Variable : vLineitem1 Modifies : vLineitem1 [Report: SmReport1] Use : DSP Template Form : PQRReport1 Title : "Sales Report" Set : SVFromDate : ($BooksFrom:Company:##SVCurrentCompany) Set : SVToDate : ($LastVoucherDate:Company:##SVCurrentCompany) Variable : SVFromDate,SVToDate Variables : ExplodeFlag, IsForexReport Variable : DSPShowMonthly, DSPHasMultiLevel Variable : IsMultiPage, InNewPages, ShowBillType, IsGrpBillReport [Form: PQRReport1] Use : DSP Template Parts : FormSubTitle,PQRReport1 Height : 100% screen Width : 100% screen Button:EXPLODEFLAG Background: @@SV_RELEASEDLEAFGREEN_PL Bottom Toolbar Buttons : BottomToolBarBtn1, BottomToolBarBtn6, BottomToolBarBtn7, BottomToolBarBtn8,BottomToolBarBtn9, BottomToolBarBtn10, BottomToolBarBtn11, BottomToolBarBtn12 Local : Field : FormSubTitle : Info : $$LocaleString:"FILTER REPORT" Local : Field : Form SubTitle : Color : Dark Red Local: Field:Form SubTitle : Style : Large SerIf Bold [Part: PQRReport1] Lines:PQRTitile1,PQRBody1 Repeat:PQRBody1: COLL2 CommonBorder: Yes Scroll : Vertical [Collection: COLL2] Source Collection:PQRSalesManVouchersColl Type : Vouchers : VoucherType Child Of: $$VchTypeSales Fetch : IsShowInRepYN,Date, VoucherNumber, VoucherTypeName,LedgerName,PartyLedgerName,LedgerEntries.*,InventoryEntries.*, InventoryEntries.BasicUserDescription.*,Myudfs1.*,Myudfs.*,myudfs4.*,myudfs5.*,myudfs6.*,Myudfs2.*,JAPPer20,JAPPer,JAPDesc,JAPDesc1014,JAPPer202,InsuranceComp,InsuranceNo,JAPPer209,RETTOTALFARE209 Compute: MstID: $$Owner:$MasterID Filter : VchDescFilter VchDescFilter : (IF $$IsEmpty:##vLineitem1 Then 1=1 Else $PartyLedgerName)+ + (IF $$IsEmpty:##vLineitem1 Then 1=1 Else $StockItemname)+ + (IF $$IsEmpty:##vLineitem1 Then 1=1 Else $VoucherNumber) Contains ##vLineitem1 [Line: PQRTitile1] Use:PQRBody1 Local : Field : Default : Type : String Local : Field : Default : Style : Tiny Bold Local : Field : Default : Align : Centre Local : Field : PQRSno1 : set as : $$LocaleString:"S.No." Local : Field : PQRPartyDate1 : Set as: $$LocaleString:"Date" Local : Field : PQRPartyVchNo1 : Set as: $$LocaleString:"Inv No." Local : Field : PQRPartyName1 : Set as: $$LocaleString:"Party Name" Local : Field : PQRPartyAmount1 : Set as: $$LocaleString:"Amount" [Line: PQRBody1] Field:PQR MSTID1,PQRSno1, PQRPartyDate1,PQRPartyVchNo1,PQRPartyName1 RightField:PQRPartyAmount1 Explode : MyExplodPart :($$KeyExplode OR ##ExplodeFlag) ;;;;THIS EXPLODE IS MAIN REPORT Explode : MyExplodPart1 : ($$KeyExplode OR ##ExplodeFlag) ;;;;THIS EXPLODE IS MAIN REPORT Border :Thin Bottom Option : Alter On Enter ;============================== [Report: Voucher1] Use: Voucher Delete: Object: Voucher Add: Object: Voucher : @@MstID Form: Voucher1 [Form: Voucher1] Use: Voucher [System: Formulae] MstID : "ID:" + $$String:#PQRMstID1 [Field: PQR MSTID1] Set as: $MstID Alter: Voucher1 Invisible: Yes [Field:PQRSno1] Set as : $$Line Width : 2.5% Screen Align : Center [Field: PQRPartyDate1] Set as : $Date Width : 8% Screen Align : Right ;Style : Tiny [Field: PQRPartyVchNo1] Set as : $VoucherNumber Width : 10% Screen Align : Center ;Style : Tiny [Field: PQRPartyName1] Use : Name Field Set as : $PartyLedgerName Width : 20% Screen Align : Center [Field: PQRPartyAmount1] Use : Amount Field Set as : $Amount Width : 10% Screen Align : Center Style: Normal [#Object: InventoryEntry] PQRUserDesc : $$FullList:BasicUserDescription:$BasicUserDescription PQRMyUDF : $$FullList:MyUdfs:$BasicUserDescription10 + $$FullList:MyUdfs1:$BasicUserDescription20 + $$FullList:MyUdfs2:$BasicUserDescription202 + $$FullList:MyUdfs4:$BasicUserDescription1014 + $$FullList:MyUdfs5:$BasicUserDescription405 + $$FullList:MyUdfs6:$BasicUserDescription209 PQRAllDesc : IF $$IsEmpty:$PQRUserDesc AND $$IsEmpty:$PQRMyUDF Then "" Else + IF $$IsEmpty:$PQRUserDesc AND NOT $$IsEmpty:$PQRMyUDF Then $PQRMyUDF Else + IF NOT $$IsEmpty:$PQRUserDesc AND $$IsEmpty:$PQRMyUDF Then $PQRUserDesc Else "" PQRMyUDF1 :$$FullList:MyUdfs1:$JAPPer20 PQRAllDesc1 : IF $$IsEmpty:$PQRUserDesc AND $$IsEmpty:$PQRMyUDF1 Then "" Else + IF $$IsEmpty:$PQRUserDesc AND NOT $$IsEmpty:$PQRMyUDF1 Then $PQRMyUDF1 Else + IF NOT $$IsEmpty:$PQRUserDesc AND $$IsEmpty:$PQRMyUDF1 Then $PQRUserDesc Else "" PQRMyUDF2 :$$FullList:MyUdfs:$JAPPer PQRAllDesc2 : IF $$IsEmpty:$PQRUserDesc AND $$IsEmpty:$PQRMyUDF2 Then "" Else + IF $$IsEmpty:$PQRUserDesc AND NOT $$IsEmpty:$PQRMyUDF2 Then $PQRMyUDF2 Else + IF NOT $$IsEmpty:$PQRUserDesc AND $$IsEmpty:$PQRMyUDF2 Then $PQRUserDesc Else "" PQRMyUDF3 :$$FullList:MyUdfs:$JAPDesc + $$FullList:myudfs4:$JAPDesc1014 PQRAllDesc3 : IF $$IsEmpty:$PQRUserDesc AND $$IsEmpty:$PQRMyUDF3 Then "" Else + IF $$IsEmpty:$PQRUserDesc AND NOT $$IsEmpty:$PQRMyUDF3 Then $PQRMyUDF3 Else + IF NOT $$IsEmpty:$PQRUserDesc AND $$IsEmpty:$PQRMyUDF3 Then $PQRUserDesc Else "" PQRMyUDF4 :$$FullList:MyUdfs2:$JAPPer202 PQRAllDesc4 : IF $$IsEmpty:$PQRUserDesc AND $$IsEmpty:$PQRMyUDF4 Then "" Else + IF $$IsEmpty:$PQRUserDesc AND NOT $$IsEmpty:$PQRMyUDF4 Then $PQRMyUDF4 Else + IF NOT $$IsEmpty:$PQRUserDesc AND $$IsEmpty:$PQRMyUDF4 Then $PQRUserDesc Else "" PQRMyUDF5 :$$FullList:MyUdfs5:$InsuranceComp PQRAllDesc5 : IF $$IsEmpty:$PQRUserDesc AND $$IsEmpty:$PQRMyUDF5 Then "" Else + IF $$IsEmpty:$PQRUserDesc AND NOT $$IsEmpty:$PQRMyUDF5 Then $PQRMyUDF5 Else + IF NOT $$IsEmpty:$PQRUserDesc AND $$IsEmpty:$PQRMyUDF5 Then $PQRUserDesc Else "" PQRMyUDF6 :$$FullList:MyUdfs5:$InsuranceNo PQRAllDesc6 : IF $$IsEmpty:$PQRUserDesc AND $$IsEmpty:$PQRMyUDF6 Then "" Else + IF $$IsEmpty:$PQRUserDesc AND NOT $$IsEmpty:$PQRMyUDF6 Then $PQRMyUDF6 Else + IF NOT $$IsEmpty:$PQRUserDesc AND $$IsEmpty:$PQRMyUDF6 Then $PQRUserDesc Else "" PQRMyUDF7 :$$FullList:MyUdfs6:$JAPPer209 PQRAllDesc7 : IF $$IsEmpty:$PQRUserDesc AND $$IsEmpty:$PQRMyUDF7 Then "" Else + IF $$IsEmpty:$PQRUserDesc AND NOT $$IsEmpty:$PQRMyUDF7 Then $PQRMyUDF7 Else + IF NOT $$IsEmpty:$PQRUserDesc AND $$IsEmpty:$PQRMyUDF7 Then $PQRUserDesc Else ""
Send me data file and source code on email.. sales.rajatkumar@gmail.com I will update you till evening
