[#Form: Normal Day Book] [#Report: Sales Vouchers] ;[#Part: ExtractBody] ; Background:RED [#Part: DB WithTotals] ;[#Part: DB WithTotals] ; ; DELETE:Total : DSP VchAmtValue, DSP VchVchAmt, DSP VchRevenue, DSP VchCost, DSPVchProfit, DSPDBDrAmt, DSPDBCrAmt ; ADD:Total : RETOTAL,BALTOTAL,DSP VchAmtValue, DSP VchVchAmt, DSP VchRevenue, DSP VchCost, DSPVchProfit, DSPDBDrAmt, DSPDBCrAmt ; Bottom Lines: DSP VchTotalValue ; Page Break : DSP VchTotalValueCl, DSP VchTotalValueOp ; ; ;[#Line: DSP VchTotalValue] ; Border:THICKBOX ; DELETE:Right Fields : Simple Field, DSP VchTotalDrValue, DSP VchTotalCrValue ; ADD:Right Fields : RETOTAL,BALTOTAL,Simple Field, DSP VchTotalDrValue, DSP VchTotalCrValue ; Local : Field : Simple Field : Info : $$LocaleString:"Total" + ":" ; Local : Field : Simple Field : Style : Normal Bold ; ;[Field: RETOTAL] ; Background:RED ; Set as :$$Total:REtm ; ; ; Use : Amount Field ; ;; ; ;[Field: BALTOTAL] ; ; Use : Amount Field ; Set as : $$Total:$ClosingBalance:Ledger:$PartyLedgerName [#Part: DB Body] ;Background:red ;[#Part: FLT DBBody] ; Background:red [#Part: ExtractTitle] [#Line: DSP VchDybkDetail] Add : Left Fields : DSP VchAccount,stdparent,RETM,Baltm [#Field: DSP VchAccount] delete:FullWidth : Yes Width : 50 ;Space Left:10 mms ;Background:red [#Line: DBTitle1] ;Border:thinbox delete:Fields : DSP VchDateTitle, DSP VchAcctTitle add:Fields : slt,DSP VchDateTitle, DSP VchAcctTitle,Plot No,RETMt,Balt Right Fields: DSP VchSuppleCountTitle, DSP VchTypeTitle, DSP VchNumberTitle, DSP DBDrTitle1, DSP DBCrTitle1 ;Border : Thick Top Local : Field : DSP VchVchAmt : Set as : $$StringWord:1:$$LocaleString:"Transaction Value" Local : Field : DSP VchRevenue : Set as : $$StringWord:1:$$LocaleString:"Gross Revenue" Local : Field : DSP VchCost : Set as : $$LocaleString:"Cost" Local : Field : DSP VchProfit : Set as : $$StringWord:1:$$LocaleString:"Gross Profit" Local : Field : DSP VchProfPerc: Set as : $$LocaleString:"%-age" [#Field: DSP VchDateTitle] Border:thick right [#Field: DSP VchDate] Border:thin right Width:50 ;Full Width:Yes [Field:slt] Set as:"Sl No." Use: Simple Field Width:10 mms Space Right:3 mms Align:right Border:Thin Right [#Field: DSP VchAcctTitle] delete:FullWidth : Yes Width : 50 [Fieldlot No] Set:"Item Name";Parent:Ledger:$PartyLedgerName;VoucherType:$VoucherTypeName;:Ledger:$PartyLedgerName Use: Simple Field Width:30 mms Space Right:3 mms Align:left Border:Thin Left Right Invisible:#Baltm = daybook [Field:Balt] Set:"Order Date";Parent:Ledger:$PartyLedgerName;VoucherType:$VoucherTypeName;:Ledger:$PartyLedgerName Use: Simple Field Width:30 mms Space Right:3 mms Align:left Border:Thin Right Invisible:#Baltm = daybook [Field:RETMt] Set:"Order No.";Parent:Ledger:$PartyLedgerName;VoucherType:$VoucherTypeName;:Ledger:$PartyLedgerName Use: Simple Field Width:30 mms Space Right:3 mms Align:left Border:Thin Right Invisible:#Baltm = daybook [#Line: DSP VchDetail] Border:thintop delete: Right Fields : DSP VchSuppleCount, DSP VchType, DSP VchNumber, DSP VchMasterID Add:Right Fields : DSP VchSuppleCount, DSP VchType, DSP VchNumber, DSP VchMasterID delete: Fields : DSP VchDate add: Fields : snline,DSP VchDate [Field:snline] Set:$$Line Use: Simple Field Width:10 mms Space Right:3 mms Align:right Border:Thick Right ;Border:thin right [Field:stdparent] Set:$STOCKITEMNAME;Parent:Ledger:$PartyLedgerName;VoucherType:$VoucherTypeName;:Ledger:$PartyLedgerName Use: Simple Field Width:30 mms Space Right:3 mms Align:left Border:Thin Left Right Background: If ($regfree = "YES") Then "GREEN" Else "WHITE" Invisible:#Baltm = daybook ;Background:red [Field:REtm];$FirstLedger ;Use : Amount Field Use: Simple Field Setas:$BasicPurchaseOrderNo:LedgerEntries ;$ClosingBalance:Ledger:$PartyLedgerName;VoucherType:$VoucherTypeName;:Ledger:$PartyLedgerName ;Use: Simple Field Width:30 mms Space Right:3 mms Align:left Border:Thin Right Invisible:#Baltm = daybook [Field:Baltm];$FirstLedger ;Use : Amount Field Setas:$Date:LedgerEntries;$ClosingBalance:Ledger:$PartyLedgerName;VoucherType:$VoucherTypeName;:Ledger:$PartyLedgerName Use: Simple Field Width:30 mms Space Right:3 mms Align:left Border:Thin Right Invisible:#Baltm = daybook [#Part: FLT DBBody] ; Background:red [#Collection: Filtered Vouchers of Company] Fetch : Date, VoucherNumber, Reference, VoucherTypeName, SortPosition, Narration, PartyLedgerName, PartyName, BasicBuyerName Fetch :StockItemName,regfree,statusplot,$statusplot;psize ;[#Field: IFLT Method] ; Set as:"Ledgers" ; ; ;[#Field:IFLT Attr] ; Set as:"cont" ; ;Background:red ;=====================================================================all entris=============================================================== ;=====================================================================all entris=============================================================== ;[#Collection: Filtered Vouchers of Company] ; ;Source Collection : DBVoucher SRC ; ; Fetch : Date, VoucherNumber, VoucherTypeName, SortPosition, MasterID, IsCancelled, IsInvoice, BuyerName ; Fetch : IsOptional, IsDeleted, Narration ; Fetch : AllLedgerEntries.HasBankAllocations, AllInventoryEntries.ItemDSPName, AllLedgerEntries.InventoryAllocations.ItemDSPName ; ; Fetch : AllInventoryEntries.BasicUserDescription, AllLedgerEntries.InventoryAllocations.BasicUserDescription,STOCKITEMNAME ; Fetch : PartyLedgerName, PartyName, Reference ; ; Fetch : AllLedgerEntries.StockAffects, AllLedgerEntries.IsBillWiseOn, AllLedgerEntries.IsCostCentresOn ; Fetch : AllLedgerEntries.LedgerName, AllLedgerEntries.Amount ; ; Fetch : AllInventoryEntries.StockItemName, AllInventoryEntries.BilledQty, AllInventoryEntries.ActualQty ; Fetch : AllInventoryEntries.ItemDSPName ; ; Fetch : InventoryEntriesIn.ItemDSPName, InventoryEntriesOut.ItemDSPName ; Fetch : InventoryEntriesIn.StockItemName, InventoryEntriesOut.StockItemName ;=====================================================================all entris=============================================================== ;==================================================================================================================================== [#Field: DSP TelephoneNo];DSP ContactPerson];, DSP TelephoneNo ;Background:red delete:Set as : @@DSPLedContactNo Add:setas:$StudMobileno [#Report: Group Outstandings] [#lineSP AccLine] ;Border:thinbox ;########################################################################DAY BOOK COLLECTION######################################################################################## ;########################################################################DAY BOOK COLLECTION######################################################################################## ;########################################################################DAY BOOK COLLECTION######################################################################################## [#Form:daybook] add:Button:serch [Key:serch] TITLE:"SEARCH" Key:Alt + s Action: trigger Key:Alt+F12,ENTER,Ledgers,ENTER,name,ENTER,conta,ENTER;S,O,R;Direct Incomes,ENTER,Alt+F1,F2; ; ;Fetch : Name, Parent,TBalOpening, LedOpeningBalance ; Fetch : LedgerContact, LedgerPhone, ClosingBalance ; Fetch : ClosingOnAcctValue, OnAccountValue, ClosingDrOnAcctValue ;[#Part : REPDB Body];, DSP VchTitle, DB Body ;Background:red [#Collection: Daybook Vouchers of Company] Source Collection : DBVoucher SRC Fetch : Date, VoucherNumber, VoucherTypeName, SortPosition, MasterID, IsCancelled, IsInvoice, BuyerName Fetch : IsOptional, IsDeleted, Narration Fetch : AllLedgerEntries.HasBankAllocations, AllInventoryEntries.ItemDSPName, AllLedgerEntries.InventoryAllocations.ItemDSPName Fetch arent Fetch :VchLedName Fetch ARTYLEDGERNAME ;================= Fetch : AllInventoryEntries.BasicUserDescription, AllLedgerEntries.InventoryAllocations.BasicUserDescription ;; to fetch the item additional description. Compute : DSPNameStyle : ##DSPNameStyle Compute : DaybookAmount : $$GetDBAmt Compute : FirstLedger : $$GetDSPName:##DSPNameStyle@IsVchInvVch@IsPOSAttdVch@IsJobMaterialTransferInVch Compute : DaybookActualQty : if $$IsJobMaterialReceive:$VoucherTypeName Then $InventoryEntriesIn[1].ActualQty Else + if $$IsJobMaterialIssue:$VoucherTypeName Then $InventoryEntriesOut[1].ActualQty Else + If @@IsVchInvVch Then $InventoryEntries[1].ActualQty Else $$AsQty:0 Compute : DBFirstInvExp : @@DBFirstInvExplodable Compute : DBFirstCostExp : @@DBFirstHasLedgerCC Compute : DBFirstBillExp : @@DBFirstHasBillWise Compute : DBFirstBankExp : $AllLedgerEntries[1].HasBankAllocations ;; The Below 3 computes are added to ensure that, appropriate Method Names and its Default values are available in the Collection definition before its been locally modified in Report definition Compute : TNetSAAuditStatus : "" Compute : TNetSAAuditNote : "" Compute : ManualSampling : "" ;Sort : @@Default :$Parent;:Ledger:$PARTYLEDGERNAME $Date, $SortPosition, $VoucherTypeName ;Sort :$Parent:Ledger:$PARTYLEDGERNAME Sort : @@InSequenceOfEntry23 : $Parent:Ledger:$PARTYLEDGERNAME ;Sort : @@Default : $Date, $SortPosition, $VoucherTypeName ;########################################################################DAY BOOK COLLECTION######################################################################################## ;########################################################################DAY BOOK COLLECTION######################################################################################## ;########################################################################DAY BOOK COLLECTION########################################################################################
In Tally Developer in the "Schema" find voucher next find the collection which containing Order No and Order Date, then get it with $$FilterValue from the collection with contains your required, or create a collection of your own Based on $VoucherNumber
Please stop spamming on every thread. Explain properly what you want to achieve, If you are not comfortable try posting in Hindi. Post clear pictures try snip and sketch app or you can just press the print screen button for a screenshot.
Eg. Cash balance is Rs 2000Cr, What you do with Cash Receipt Amount and Payment Amount ?? Add or Subtract to the Balance ? Try to Analysis \Samples\User Defined Functions\Action Set Value Enhanced.txt to get clear understanding of IsDeemedPositive Hope this will help, even it is not a answer.
Sir Please help me . I want Parent Group Name (Sundry Debtors) in Sales Day book. I have written codes given below ;;;For Entry Time [#Part: VCHTitle2Left] Add:Line:After:VCH Ref:TUName [Line: TUName] Add: Field: UseNameOfTally [Field: UseNameOfTally] Fields : Simple Prompt, Name Field Local : Field : Simple Prompt: Set as : "Group Name:" Local : Field : Simple Prompt:Border:Thin Box Local : Field : Name Field : Set as : $Parent Local : Field : Name Field: Color:Red Local : Field : Name Field : Skip:Yes ;;;;;For Daybook [#Line: DBTitle1] Add:Field:AfterSP VchAcctTitleD [Field: DD] Use : Name Title Field Info : "Group Name" Space Right :2 [#Line: DSP VchDetail] Add:Right Fields:BeforeSP VchTypeD2 [FieldD2] Fields : Name Field Local : Field : Name Field: Set as :$Parent Local : Field : Name Field:Color:Red ;;[#Collection: Daybook Vouchers of Company] [#Collection:Filtered Vouchers of Company] Fetch:AllLedgerEntries Fetcharent
Sir I have written a code with one UDF and also made search from UDF . It is working . But I could able to GROUP WISE FILTER . Code is given below . Only check Group Filter Portion . Do not Hurry Sir. When you get time, you can check . ;==================================================SIMO Category in Sales Voucher Screen======================================= ;;=============== Enabling Category Master Table============== ;;[#Part: CMP AccFeat Left] ;;for TALLY ERP9 ;;Add: Line: CMP EnableSimoCatTable ;;for TALLY ERP9 ;; FOR Tally Prime [#Part: Company F11 Acc Features] Local : Part : Cfg PartContent : Add : Lines : CMP Use Type, CMP BillwiseOn, CMP CCOn, CMP Interest, CMP EnableSimoCatTable [Line: CMP EnableSimoCatTable] Field: Medium Prompt, CMP EnableSimoCatTable Local: Field: Medium Prompt: Info: "Enable Simo Category ? " Local: Field: Long Prompt: Info: "Enable CAT wise Report.? " Space Top: 1 [Field: CMP EnableSimoCatTable] Use: Logical Field Storage: EnableSimoCat Set as: If $$IsEmpty:$$Value then "No" else $$Value Sub Form: SimoReport: $$Value = "Yes" [#Menu: Gateway Of Tally] Add : Item : before : @@locQuit : Simo Module : Menu : SIMOMenu [Menu: SIMOMenu] Add : Item : SIMO Category Master : Alter : Category Name Add : Item : Blank Add : Item : SIMO Service Register : Display : SimoReport Control : SIMO Category Master : NOT ##SVEducationalMode [Report: Category Name] Form : Category Name Object : Company [Form: Category Name] Part : FormSubTitle, Catman ;Button : Delete All, Remove Line, Restore Line, Restore All,Report Operations FullWidth : No Height : 90% Screen Background : @@SV_CHEQUE SpaceRight : 0.5 SpaceLeft : 1.5 Local : Field : Form SubTitle : Info : $$LocaleString:"Simo Category" Option : Small Size Form [Part: Catman] Lines : CMP SimoCat Repeat : CMP SimoCat:mydbSimoCat Break on: $$IsEmpty:$SimoCatName Scroll : Vertical Height : 90% Screen [Line: CMP SimoCat] Fields : Multi SNo, CMPCatName Local : Field : Default : Delete : Border [Field: CMPCatName] Use : Short Name Field Storage : SimoCatName Unique : Yes [System: UDF] mydbSimoCat : Aggregate: 999 SimoCatName : String : 1000 ;: Yes [Collection : SimoCatNameCollection] Type : mydbSimoCat : Company Childof : ##SVCurrentCompany Format : $SimoCatName, 6 Title : Category Name ;=============== During Sales Voucher Entry============= ;;[#Part: EI BaseInfo] for Tally ERP9 [#Part: EI Consignee] Option: HPSimoCatName: $$IsSales:##SVVoucherType OR $$IsCreditNote:##SVVoucherType [!Part: HPSimoCatName] Add: Line: HPSimoCatName [Line: HPSimoCatName] Add: Field: HPSimoCatNameTitle Add: Field: VCHSimoCatName [Field: HPSimoCatNameTitle] Info : "Simo Category : " Color : Blue Style : Normal Bold Width: 14 [Field: VCHSimoCatName] Use : Name Field Storage : VCHSimoCatName Set as : $VCHSimoCatName Width : 25 Table : SimoCatNameCollection, not applicable Show Table: Always Key : Create SimoCatName [Key: Create SimoCatName] Key :Alt + C Action: Alter: SimoCatName [System: UDF] VCHSimoCatName:String:375 ;;===========================Sub Form: SimoReport: Means Category wise report===================== [Report: SimoReport] Use : DSP Template Form : PQRReport Title : "Daily SIMO Service Register" Set : SVFromDate : $$MonthStart:##SVCurrentDate Set : SVToDate : $$MonthEnd:##SVCurrentDate ;Set : SV From Date : if $$InPrintMode then $$MonthStart:##SVCurrentDate else ##SVCurrentDate ;Set : SV To Date : if $$InPrintMode then $$MonthEnd:##SVCurrentDate else ##SVCurrentDate Set : SIMOCatChqVar : "Full" Set : SIMOCatName : "" Set : SimoGroupName : "" [Form: PQRReport] Use : DSP Template Parts : PQRReport Height : 100% screen Width : 100% screen Delete : Buttons: ExplodeFlag Background : @@SV_UNYELLOW Bottom Toolbar Buttons : BottomToolBarBtn1, BottomToolBarBtn6, BottomToolBarBtn7, BottomToolBarBtn8, BottomToolBarBtn9, BottomToolBarBtn10, BottomToolBarBtn11, BottomToolBarBtn12, Add: Button: SIMOCatfilter,SimoGroupFilter [Part: PQRReport] LinesQRTitile,PQRBody BottomLines : PQRBody Total Repeat : PQRBody QRSIMOCatVouchersColl CommonBorder: Yes Scroll : Vertical Total QRPartyAmount,MyVchfNo2,MyVchfNo3,MyVchfNo4,MyVchAmount2x [Line: PQRTitile] UseQRBody Local : Field : Default : Type : String Local : Field : Default : Style : Tiny Bold Local : Field : Default : Align : Centre Local : Field : Default : Color : deep green Local : Field : Default : set as : $$LocaleString:"Sl" Local : Field : PQRPartyDate : Set as: $$LocaleString:"Date" Local : Field : PQRPartyVchNo : Set as: $$LocaleString:"Inv.No." Local : Field : PQRPartySIMOCat: Set as: $$LocaleString:"Cat" Local : Field : SimoGrp : Set as: $$LocaleString:"Group" Local : Field : PQRDistName : Set as: $$LocaleString:"Party Name" Local : Field : MyVchTIN2 : Set As : "GST No" Local : Field : PQRPartyVchType : Set As : $$LocaleString:"Type" Local : Field : MyVchAmount2x : Set As : $$LocaleString:"Basic Amount" Local : Field : MyVchfNo2 : Set As : $$LocaleString:"CGST" Local : Field : MyVchfNo3 : Set As : $$LocaleString:"SGST" Local : Field : MyVchfNo4 : Set As : $$LocaleString:"IGST" Local : Field : PQRPartyAmount : Set as: $$LocaleString:"Invoice Amount" Border : Flush Totals [Line: PQRBody] FieldQRSno, PQRPartyDate,PQRPartyVchNo,PQRPartySIMOCat,SimoGrp,PQRDistName,MyVchTIN2,PQRPartyVchType,MyVchAmount2x,MyVchfNo2,MyVchfNo3,MyVchfNo4 RightField: pQRPartyAmount ;;,MyVchAmount2x Border :Thin Bottom [FieldQRSno] ;Serial No Set as : $$Line Width : 1.0 cm Align : Center Border : Thin Left Right ;;Color : Blue ;Style : Normal Bold [Field: PQRPartyDate] ; Bill Date Set as : $Date Width : 6% Screen Align : Right Style : Tiny Border : Thin Left ;;Color : Blue ;Style : Normal Bold [Field: PQRPartyVchNo] ; Bill No Set as : $VoucherNumber ;Width : 9% Screen Width : 16 Align : Center Style : Tiny Border : Thin Left ;Color : Blue ;Style : Normal Bold [Field: PQRPartySIMOCat] ; Category Use :Name Field Set as :$VCHSIMOCatName Border : Thin Left ;;Width : 3.5% Screen Width : 5 Align : Centre Style : Tiny Color : Blue ;Style : Normal Bold Key : Create SIMOCatName [Field: Simogrp] ; Group Name Use : Name Field Set as : $Parent:Ledger:$PartyLedgerName Border : Thin Left ;;Width : 12% Screen Width : 16 Align : Centre ;Color : Blue ;Style : Normal Bold Style : Tiny [Field: PQRDistName] ; Party Name Use : Name Field Set as : $PartyLedgerName Border : Thin Left Width : 40% Screen Align : Left Style : Tiny ;Color : Blue ;Style : Normal Bold Variable: LedgerName Display : Ledger Vouchers [Field : MyVchTIN2] ; GST No. Use : Name Field Set As :$PartyGSTIN:Ledger:$PartyLedgerName ;;$VATTINNumber Width : 17 Style : Tiny Border : Thin Left [Field: PQRPartyVchType] ; Voucher Type Set as : $VoucherTypeName Border : Thin Left ;;Width : 6% Screen Width : 12 Align : Center ;Color : Blue ;Style : Normal Bold Style : Tiny [Field : MyVchAmount2x] ; Basic Amount Use : Amount Forex Field Set as : $Amount-($SGST + $CGST + $IGST) Border : Thin Left ;;Width : 8% Screen Width : 14 Align : Right Style : Tiny [Field : MyVchfNo2] ; CGST Amount Use : Amount Forex Field Set as:$$FilterAmtTotal:LedgerEntries:CGST1:$Amount Border : Thin Left ;;Width : 6% Screen Width : 10 Style : Tiny Align : Right ;*********************** [Field : MyVchfNo3] ; SGST Amount Use : Amount Forex Field Set as : $$FilterAmtTotal:LedgerEntries:SGST1:$Amount Border : Thin Left ;;Width : 6% Screen Width : 10 Style : Tiny Align : Right ;*********************** [Field : MyVchfNo4] ; IGST Amount Use : Amount Forex Field Set as : $$FilterAmtTotal:LedgerEntries:IGST1:$Amount;$IGSTAMOUNT Border : Thin Left ;;Width : 6% Screen Width : 10 Style : Tiny Align : Right [Field: PQRPartyAmount] ; TOTAL Bill Amount Use : Amount Forex Field Set as : $Amount Border : Thin Left ;;Width : 8% Screen Width : 16 ;16 Align : Right ;Color : Blue ;Style : Normal Bold Style : Tiny Format : "No Zero,DrCr,Symbol," + ##ShowForex [Line: PQRBody Total] UseQRBody Local : Field : Default : Type : String Local : Field : Default : Style : Tiny Bold Local : Field : Default : Align : Right Local : Field : Default : Color : deep green Local : Field : PQRSno : Set as: "" Local : Field : PQRPartyDate : Set as: "" Local : Field : PQRPartyVchNo : Set as: "" Local : Field : PQRPartySIMOCat: Set as: "" Local : Field : PQRDistName : Set as: "TOTAL" Local : Field : PQRDistName : Align : Centre Local : Field : PQRPartyVchType : Set as: "" Local : Field : PQRPartyAmount : Set as: $$TotalQRPartyAmount Local : Field : MyVchAmount2x : Set as: $$Total:MyVchAmount2x Local : Field : MyVchfNo2 : Set as: $$Total:MyVchfNo2 Local : Field : MyVchfNo3 : Set as: $$Total:MyVchfNo3 Local : Field : MyVchfNo4 : Set as: $$Total:MyVchfNo4 ;Local : Field : PQRPartyAmount :Set as : $$AsPositive:$$TotalQRPartyAmount Border : Flush Totals ;============================== Filter =================================== [Button:SIMOCatFilter] Key : Alt+S Action : Execute : SIMOCatFilter ;Title : SIMOCat Name Title : Category Search Inactive: Not $EnableSimoCat:Company:##SVCurrentCompany [Report:SIMOCatFilter] Form : SIMOCatFilter ;Set : SIMOCatName : "" Set : SIMOCatChqVar : "Filter" [Form:SIMOCatFilter] Part : SIMOCatFilter No Confirmation : Yes [Part:SIMOCatFilter] Line : SIMOCatFilter [Line:SIMOCatFilter] Field : Medium Prompt,SIMOCatFilter Local : Field : Medium Prompt : Set as : "Select SIMOCat Name: " [Field:SIMOCatFilter] Table : SIMOCatNameCollection,EndOfList ShowTable : Always Use : Name Field Width : 20 Border : Thin Box Variable : SIMOCatName Modifies : SIMOCatName ;================================================================================================ ;;========================== Group Filter ====================== [Button:SimoGroupFilter] Key : Alt+F1 Action : Execute : SimoGroupFilter Title : Group [Report:SimoGroupFilter] Form : SimoGroupFilter Set : SimoGroupName : "" [Form:SimoGroupFilter] Part : SimoGroupFilter No Confirmation : Yes [Part:SimoGroupFilter] Line : SimoGroupFilter [Line:SimoGroupFilter] Field : Medium Prompt,SimoGroupFilter Local : Field : Medium Prompt : Set as : "Select Group : " [Field:SimoGroupFilter] Table : SimoGroupFilter,EndOfList ShowTable : Always Use : Name Field Width : 20 Border : Thin Box Variable : SimoGroupName Modifies : SimoGroupName [Variable:SimoGroupName] Type : String ;===================================== Collections ================================================= [Collection: PQRSIMOCatVouchersColl] Type : Voucher Fetch : Date, VoucherNumber,VCHSIMOCatName,LedgerName,PartyLedgerName,VoucherTypeName, Name, Parent LedgerEntries.* Fetch : CGSTAmount,SGSTAmount,IGSTAmount Compute:IGSTAmount:$$CollAmtTotal:InventoryEntries:$Amount * $(Stockitem,$stockitem).GSTIGSTRate / 100 ; ledger entries Compute:CGSTAmount :$$CollAmtTotal:InventoryEntries:$Amount * $(Stockitem,$stockitem).GSTIGSTRate / 100/2 Compute:SGSTAmount:$$CollAmtTotal:InventoryEntries:$Amount * $(Stockitem,$stockitem).GSTIGSTRate / 100/2 Filter : PQRSaleManVouchers Filter : SIMOCatFilter [Collection:SimoGroupFilter] Title : "List of Groups" Type : Ledger Belongs To : Yes Fetch : Parent Format : $Parent,25 Filter : SimoFilter,SimoCrDrOnly [System:UDF] EnableSIMOCat : Logical : 1000 [Variable:SIMOCatName] Type : String [Variable:SIMOCatChqVar] Type : String [System:Variable] SIMOCatName : "" SIMOCatChqVar : "" SimoGroupName : "" [System: Formula] SGST :$$FilterAmtTotal:LedgerEntries:SGST1:$Amount SGST1 :$Name:Ledger:$LedgerName Contains $$LocaleString:"SGST" CGST :$$FilterAmtTotal:LedgerEntries:CGST1:$Amount CGST1 :$Name:Ledger:$LedgerName Contains $$LocaleString:"CGST" IGST :$$FilterAmtTotal:LedgerEntries:IGST1:$Amount IGST1 :$Name:Ledger:$LedgerName Contains $$LocaleString:"IGST" [System: Formula] PQRSaleManVouchers: $$IsSales:$VoucherTypeName OR $$IsCreditNote:$VoucherTypeName SIMOCatWise : $VCHSIMOCatName=@@SIMOCatEOL SIMOCatFull : $VCHSIMOCatName=$VCHSIMOCatName SIMOCatEOL : if $$IsEndOfList:##SIMOCatName then $VCHSIMOCatName Else ##SIMOCatName SIMOCatFilter : if ##SIMOCatChqVar="Filter" Then @@SIMOCatWise Else @@SIMOCatFull [System:Formula] simoCrDrOnly : $$IsBelongsTo:$$GroupSundryDebtors ;;OR $$IsBelongsTo:$$GroupSundryCreditors SimoFilter : $Parent=@@SimoGroupFilter SimoGroupFilter : if ##SimoGroupName="" OR $$IsEndOfList:##SimoGroupName then $Parent Else ##SimoGroupName ;******************************************************************
