Code: ; can anybody check How i can improve performance at report level. ;Sometimes I am getting out of memory msg. at Report report level. ;Voucher Type level ;[#Part: VTYP BehaviourMain] ; Add : Lines :After:VTYP PrintSave:Processing Type [#Part: VTYP Behaviour] Add : Lines :After:VTYP UseforJobWorkIn:Processing Type ; Lines : VTYP EffDate, VTYPOptional, VTYP CommonNarr, VTYP EachNarr, VTYP AsMfgJrnl, + ; VTYP UseforJobWork, VTYP UseforJobWorkIn, VTYP AllowConsumption, VTYP UseExciseMfgr, VTYP ExciseMfgrUnit, VTYP UseExciseSupplementary, + ; VTYP UseExciseGoodsTransfer, VTYP TraderInvoice, MSTSortPosition [Line: Processing Type] Fields : Long Prompt, Processing Type Local : Field : Long Prompt : Info : $$LocaleString:"Processing Type ?" Invisible: Not $$IsCmpOwner Local : Field : Default :Inactive : NOT ($$IsJobOrderOut:$Parent OR $$IsJobMaterialIssue:$Parent Or $$IsJobMaterialReceive:$Parent) Invisible : NOT @@IsJobOrderEnabled Space Top: .25 [Field: Processing Type] Use : Name Field Storage : ProcessingType Show Table : Always Table : List of Processing Type [Table: List of Processing Type] List Name: $$LocaleString:"Knitting", $$LocaleString:"Dying", $$LocaleString:"Printing" [System: Udf] ProcessingType: String: 10001 ;;=================Cost Center Name for Job work Out Order Voucher [#Line: EI Consignee] Option:Job_Work_Out_With_Cost_Center:$$IsJobOrderOut:$VoucherTypeName [!Line: Job_Work_Out_With_Cost_Center] Add: Fields: After:INVMailName: Blankfld, Job_Work_Out_Cost_Center_Title, Job_Work_Out_Cost_Center_List ;, EI Lot No Title, EI Lot No [Field: Blankfld] Set as: "" Width: 5 Skip: Yes [Field: Job_Work_Out_Cost_Center_Title] Use : Medium Prompt Info : $$LocaleString:"Cost Center :" Width : 12 Border : Thin Box Style : Normal Bold [Field: Job_Work_Out_Cost_Center_List] Use : Short Name Field Table : Job_Work_Out_Cost_Center Show Table : Always Width : 15 Border : Thin Box Storage : JobWorkOutWithCostCenter Alignment : Center [Collection: Job_Work_Out_Cost_Center] Title : "List of Cost Centers" Type : Cost Centre Format : $Name,25 Method : Cost Centre Name : $Name [System: UDF] JobWorkOutWithCostCenter : String : 20002 JobMaterialOutWithCostCenter : String : 20003 JobMaterialInWithCostCenter : String : 20004 JobMaterialInLOTTable : String : 20005 ;;;cost Center Name for Material Out Transaction, Cost Center Collection from JOB WORK OUT ORDER Only [#Line: EI Consignee] Option:Job_Material_Out_With_Cost_Center:$$IsJobMaterialIssue:$VoucherTypeName [!Line: Job_Material_Out_With_Cost_Center] Add: Fields: After:INVMailName: Blankfld, Job_Work_Out_Cost_Center_Title, Job_Material_Out_Cost_Center_List ;, EI Lot No Title, EI Lot No [Field: Job_Material_Out_Cost_Center_List] Use : Short Name Field Table : Job_Material_Out_Cost_Center, None ;Job_Work_Out_Cost_Center, None ;Job_Material_Out_Cost_Center ;VCHJobOrderRecievable ;Job_Material_Out_Cost_Center, VCHJobOrderIssuable ; Show Table : Always Width : 15 Border : Thin Box Storage : JobMaterialOutWithCostCenter Alignment : Center Dynamic :"" [Collection: Job_Material_Out_Cost_Center] /*Primary item name is shown in list of orders table which appears in Stock Item Allocation screen for Material Out */ ;[#Collection: VCHJobOrderIssuable] Title : $$LocaleString:"Cost Center List for Selected Party JWOO" Sub Title : $$LocaleString:"Cost Center", $$LocaleString:"Order Name", $$LocaleString:"Due On", $$LocaleString:"Balance", $$LocaleString:"Order Type" ;,$$LocaleString:"Primary Item Name", Source Collection : Pending Issuable Job Orders, Pending Issuable SubJob Orders Fetch : Name, OrderDueDate, FinalBalance, GodownName, TrackLedger, BatchName, BilledQty, + OrderPreclosureQty, Rate, Discount, Amount, OrderType,ParentItem, JobWorkOutWithCostCenter Format : $JobWorkOutWithCostCenter, 10 Format : $Name, 10 Format : $OrderDueDate, 6 : Universal Date Format : $FinalBalance, 8 : Base ;Format : $ParentItem, 12 Format : @@JOBOrderIssueTypeFormat, 20 Client Only : Yes Keep Source : .... Search Key: $Name ;[#Field: EI Order] ;;==================Material In Form (Cost Center Collection from Material Issued only) [#Line: EI Consignee] Option:Job_Material_In_With_Cost_Center:$$IsJobMaterialReceive:$VoucherTypeName [!Line: Job_Material_In_With_Cost_Center] Add: Fields: After:INVMailName: Blankfld, Job_Work_Out_Cost_Center_Title, Job_Material_In_Cost_Center_List, Blankfld2, Job_Material_In_LOT_No_Title, Job_Material_In_LOT_No [Field: Job_Material_In_Cost_Center_List] Use : Short Name Field Table :Material Issued With Cost Center, None ;Ledger In Sub Orders Extract ;Inwards Orders ;All In Sub Orders ;Ledger In Sub OrdersX ;My Voucher Rep Collection ;VCHJobOrderRecievable ;Job_Material_In_Cost_Center ;VCHJobOrderRecievable ;Job_Material_Out_Cost_Center, VCHJobOrderIssuable ;VCHJobOrderRecievable ; ;JobworkTransferIn UnClearedSrcs ; Show Table : Always Width : 15 Border : Thin Box Storage : JobMaterialInWithCostCenter Alignment : Center Dynamic :"" [Collection : Material Issued With Cost Center] Title : $$LocaleString:"Material Issued With Cost Center" Sub Title : $$LocaleString:"Cost Center", $$LocaleString:"Issued On", $$LocaleString:"Issue No.", $$LocaleString:"Issued To", $$LocaleString:"Issued By" ;Type : Vouchers Source Collection: My Voucher Rep CollectionSrc Fetch : BasicPurchaseOrderNo, Name, BatchName, TrackLedgerAlias, Date,Amount,VoucherTypeName,PArtyLedgerName,VoucherNumber,JobMaterialOutWithCostCenter, FinalBalance, OriginalQty, BilledQty, * Filter: SamePartynm ;, MaterialOutonly ;, NotOrder ;, MaterialOutonly Filter : IsMTOUsedByJobWrkOUTNotAsIn Format: $JobMaterialOutWithCostCenter, 10 Format: $Date, 10 : Universal Date Format: $VoucherNumber, 10 Format: $PArtyLedgerName, 20 Format: $VoucherTypeName, 10 Format: $Amount, 10 Format: $OriginalQty, 5 Format: $Name, 10 Format: $BatchName, 10 Format: $TrackLedgerAlias, 10 Format: $PArtyLedgerName, 10 Format: $BasicPurchaseOrderNo, 10 ; reference number from Material Out Vch, can be filtered like if material in vch ref contains this. this will not work in case partial material in happen Format : $BilledQty, 8 ; : Base Search Key: $Name [Collection: JobWrkInFGPartyOrderSrcS] Use : JobWrkOutOrders Fetch : LedgerEntries.MasterID, LedgerEntries.IsVCHOfStockJrnl, LedgerEntries.Date, LedgerEntries.CurLangVoucherTypeName Fetch : LedgerEntries.VoucherTypeName, LedgerEntries.VoucherNumber Fetch : TrackLedgerAlias, StkItemParentAlias, StkItemParentPNAlias, StkItemParentPNName, StkItemParentDesc Sort : Default : $Name Filter : IsJobInOrder Format: $Name, 10 Format: $VoucherNumber, 10 Format: $PArtyLedgerName, 20 Format: $VoucherTypeName, 10 Format: $Amount, 10 [#Report: Mattranfoutvchregister] [Collection : My Voucher Rep CollectionSrc] Type : Vouchers Child Of: $$VchTypeJobMaterialIssue ;"Material Out";$$IsJobMaterialReceive ;:##SVVoucherType ;@@IsJobMaterialRcpt ;$$IsJobOrderOut ;:##SVVoucherType ;$$IsJobMaterialReceive Belongs To: Yes ;Filter: abcx ; Filter: NotOrder Fetch: LedgerEntries.JobMaterialOutWithCostCenter, VouchertypeName [Collection : Lot No of Material Issued With Cost Center] Title : $$LocaleString:"Material Issued With Cost Center" Sub Title : $$LocaleString:"Cost Center", $$LocaleString:"Issued On", $$LocaleString:"Issue No.", $$LocaleString:"Issued To", $$LocaleString:"Issued By" ;Type : Vouchers Source Collection: My Voucher Rep CollectionSrc Fetch : BasicPurchaseOrderNo, Name, BatchName, TrackLedgerAlias, Date,Amount,VoucherTypeName,PArtyLedgerName,VoucherNumber,JobMaterialOutWithCostCenter, FinalBalance, OriginalQty, BilledQty, * Filter: SamePartynm ;, MaterialOutonly ;, NotOrder ;, MaterialOutonly Filter : IsMTOUsedByJobWrkOUTNotAsIn Format: $JobMaterialOutWithCostCenter, 10 Format: $Date, 10 : Universal Date Format: $VoucherNumber, 10 Format: $PArtyLedgerName, 20 Format: $VoucherTypeName, 10 Format: $Amount, 10 Format: $OriginalQty, 5 Format: $Name, 10 Format: $BatchName, 10 Format: $TrackLedgerAlias, 10 Format: $PArtyLedgerName, 10 Format: $BasicPurchaseOrderNo, 10 ; reference number from Material Out Vch, can be filtered like if material in vch ref contains this. this will not work in case partial material in happen Format : $BilledQty, 8 ; : Base Search Key: $Name [System : Formula] MaterialOutonly: $VouchertypeName="Material Out" ;$$IsJobMaterialReceive:$VoucherTypeName ; SamePartynm:#EIConsignee=$PArtyLedgerName NotOrder: Not $$IsJobOrderOut:$Parent=$$ReqObject:$VouchertypeName ;@@IsJobOrderOut abcx:$$VchTypeJobMaterialIssue:$VoucherTypeName [Field: Blankfld2] Use: Blankfld [Field: Job_Material_In_LOT_No_Title] Use : Medium Prompt Info : $$LocaleString:"Lot No.:" Width : 8 Border : Thin Box Style : Normal Bold [Field: Job_Material_In_LOT_No] Use: Short Name Field Table:Job_Material_In_LOT_Table Show Table : Always Width : 8 Border : Thin Box Storage : JobMaterialInLOTTable Alignment : Center [Table:Job_Material_In_LOT_Table] Title : $$LocaleString:"Material Issued With Voucher No" Sub Title : $$LocaleString:"Voucher No.", $$LocaleString:"Cost Center", $$LocaleString:"Issued On", $$LocaleString:"Issued To", $$LocaleString:"Issued By" Source Collection: My Voucher Rep CollectionSrc Fetch : Date,Amount,VoucherTypeName,PArtyLedgerName,VoucherNumber,JobMaterialOutWithCostCenter, BilledQty, * Filter: SamePartynm Format: $VoucherNumber, 10 Format: $JobMaterialOutWithCostCenter, 10 Format: $Date, 10 : Universal Date Format: $PArtyLedgerName, 20 Format: $VoucherTypeName, 10 Format: $BilledQty, 10 Filter : IsMTOUsedByJobWrkOUTNotAsIn ;[#Field: VchBatchCostProfitalln] [#Field: EI Order] [#Report: Job Work Out Register Report] [#Collection: JobworkTransferIn UnClearedSrc] ParmVar : pvAccountName : String : $$AccountName Parmvar : pvPartyLedgerName : String : $$BaseOwner:$PartyLedgerName ; Type : In Sub Orders Type : IN Orders Fetch : Name, Date, OrderType, PArtyLedgerName Fetch : LedgerEntries.* Cleared : No Compute : JobMaterialReceivVchType : $LedgerEntries[1].VoucherTypeName Format: $Name, 10 Format: $Date, 10 Format: $OrderType, 10 ;;;;;;;;;;;;; [#Menu: Gateway of Tally] Add : Key Item : After : @@locquite: "Knitting Issue Report" : K : Display : Knitting_Issue_Report [Report:Knitting_Issue_Report] Use : DSP Template Title : $$LocaleString:"Knitting Issue Voucher Register" Form : Knitting Issue Voucher Register Variable : DSPGodownName Set : SVFromDate : $$MonthStart:##SVCurrentDate Set : SVTodate : $$MonthEnd:##SVCurrentDate Set : JobworkSingleLineItem : No Set : JobworkRegisterReport : Yes Print Set : Report Title : $$LocaleString:"Material Movement Register" PrintSet : Report SubTitle : "" Fetch Object: Godown : ##DSPGodownName : ExciseMailingName, Address, ExciseRegNumber, ExciseRange Set : ABSCostCenter : "" [Form : Knitting Issue Voucher Register] Use : DSP Template Height : 100% Page Width : 100% Page Space Top : If $$InPrintMode Then ##SVSpaceTop Else 0.05 inches Space Bottom: If $$InPrintMode Then 0.5 Else 0 inches Space Left : If $$InPrintMode AND $$InPixelMode Then 0.5 Else 0 inches Space Right : If $$InPrintMode AND $$InPixelMode Then 0.25 Else 0 inches Parts : DSP AccTitles,BWRFilter, JobworkAnnexureIV ReportTitle, ABS JobWorkAnnexureIV MultiLineDetls;ABS JobWorkAnnexureIV Detls ;JobworkAnnexureIV Title, Delete : Bottom Button Add : Buttons : PrintButton, ExportButton, UploadButton, MailButton, ChangePeriod, ChangeCompany, CstCtrfltbutton, LotNumberfltButton ;, ProcessTypeButton Delete : Page Break Add : Page Break : DSP ClPageBreak, DSP JWAnnexure OpPageBreak Bottom Part : Empty Bottom Button: JobWorkAnnexureIV PrintConfig Local : Part : Empty : Invisible : NOT $$InPrintMode Background : @@SV_UNGREEN Option : Small Size Form Local : Line : JobworkAnnexureIV ReportTitle : Local : Field : Simple Field : Set as : $$LocaleString:"" [Part:BWRFilter] Line : RPTBrokerFilter, ABS LotNumberFilt [Line:RPTBrokerFilter] Right Field : Name Field Left Field : Short Prompt,Cost CenterFilter Local : Field : Name Field : Info : "" Local : Field : Name Field : Width : 50 Local : Field : Name Field : Align : Right Local : Field : Short Prompt : Set as: "Cost Center:" Local : Field : Short Prompt : Width : 20 [Field:Cost CenterFilter] Use : Simple Field Style : Normal Bold Set as : @ABSCCName Set Always : Yes ABSCCName : If $$IsEndOfList:##ABSCostCenter or ##ABSCostCenter="" Then "Show All" Else ##ABSCostCenter Width: 30 [Line:ABS LotNumberFilt] Right Field : Name Field Left Field : Short Prompt,LotNumberFilter Local : Field : Name Field : Info : "" Local : Field : Name Field : Width : 50 Local : Field : Name Field : Align : Right Local : Field : Short Prompt : Set as: "Lot Number:" Local : Field : Short Prompt : Width : 20 [Field:LotNumberFilter] Use : Simple Field Style : Normal Bold Set as : @ABSLotName Set Always : Yes ABSLotName : If $$IsEndOfList:##ABSLotNumber or ##ABSLotNumber="" Then "Show All" Else ##ABSLotNumber Width: 30 [Line:ProcessTYpe] Right Field : Name Field Left Field : Short Prompt,ProcessTYpe Local : Field : Name Field : Info : "" Local : Field : Name Field : Width : 50 Local : Field : Name Field : Align : Right Local : Field : Short Prompt : Set as: "Process Type:" Local : Field : Short Prompt : Width : 20 [Field:ProcessTYpe] Use : Simple Field Style : Normal Bold Set as : @ProcessTYpes Set Always : Yes ProcessTYpes : If $$IsEndOfList:##ABSProcessTYpe or ##ABSProcessTYpe="" Then "Show All" Else ##ABSProcessTYpe Width: 30 [Part: ABS JobWorkAnnexureIV MultiLineDetls] Line : ABS JobWorkAnnexureIV Title1, ABS JobWorkAnnexureIV Detls Repeat : ABS JobWorkAnnexureIV Detls : ABS JobworkAnnexureIV Extract Bottom Line : JobWorkAnnexureIV Total Scroll : Vertical CommonBorder: Yes Local : Field : Default : Style : Normal [Line: ABS JobWorkAnnexureIV Title1] Field : ABS JWAnnexureIV DateofDesp, ABS JWAnnexureIV SlNo, ABS JWAnnexureIV DelChalanNo, + ABS JWAnnexureIV ItemDescription, JWAnnexureIV IssueQty, + ABS Vch Date, ABS Rec VchNo, ABS CCName, JWAnnexureIV ReceivedItem, JWAnnexureIV ReceivedQty,+ ABS JWAnnexureIV JobworkerDelChalanNo, MTO VchTypeName, JWAnnexureIV VchTypeName, Isissuedqty, + JWAnnexureIV NameAddrofJobworker Field : JWAnnexureIV SetDocReport ;Border : Thin Top Local : Field : ABS JWAnnexureIV DateofDesp : Set as : $$LocaleString:"Date" Local : Field : ABS JWAnnexureIV SlNo : Set as : $$LocaleString:"Lot No" Local : Field : ABS JWAnnexureIV DelChalanNo : Set as : $$LocaleString:"Voucher No" Local : Field : ABS JWAnnexureIV ItemDescription : Set as : $$LocaleString:"Item Delivered" Local : Field : JWAnnexureIV IssueQty : Set as : $$LocaleString:"Qty Delivered" Local : Field : JWAnnexureIV ReceivedQty : Set as : $$LocaleString:"Quantity Received from Job Worker" Local : Field : JWAnnexureIV ReceivedItem : Set as : $$LocaleString:"Goods Received" Local : Field : ABS JWAnnexureIV JobworkerDelChalanNo: Set as : $$LocaleString:"Job Worker's Delivery Challan No, and Date" + " " + $$StringWord:2:$$LocaleString:"Job Worker's Delivery Challan No. and Date" Local : Field : ABS JWAnnexureIV JobworkerDelChalanNo: Invisible: Yes Local : Field :JWAnnexureIV NameAddrofJobworker: Set as : $$LocaleString:"Job Worker" Local : Field : Default : Type : String Local : Field : Default : Align : Center Local : Field : Default : Style : Small Bold Local : Field : Default : Line: 3 Local: Field: JWAnnexureIV VchTypeName: Set as:$$LocaleString:"Processing Type" Local: Field: MTO VchTypeName: Set as:$$LocaleString:"Vch Type" Local: Field: Isissuedqty: Set as: $$LocaleString:"Isissued qty" Local: Field: Isissuedqty: Invisible: Yes Local: Field: ABS Vch Date: Set as:$$LocaleString:"Received Date" Local: Field: ABS Rec VchNo: Set as:$$LocaleString:"RecVchNo" Local: Field: ABS CCName: Set as: $$LocaleString:"Cost Center Name" Border: Thin Top Bottom [Line: ABS JobWorkAnnexureIV Detls] Field : ABS JWAnnexureIV DateofDesp, JWAnnexureIV OrderNo, JWAnnexureIV LineNumber, ABS JWAnnexureIV SlNo, ABS JWAnnexureIV DelChalanNo, + ABS JWAnnexureIV ItemDescription, JWAnnexureIV IssueQty, + ABS Vch Date, ABS Rec VchNo, ABS CCName, JWAnnexureIV ReceivedItem, JWAnnexureIV ReceivedQty, + ABS JWAnnexureIV JobworkerDelChalanNo, MTO VchTypeName, JWAnnexureIV VchTypeName, Isissuedqty, JWAnnexureIV NameAddrofJobworker Local : Field : Default : Style : Small Local: Field: ABS JWAnnexureIV DateofDesp : Skip: No Local: Field: ABS JWAnnexureIV DateofDesp : Fixed: No Remove if: Not #JWAnnexureIVVchTypeName="Knitting" [Collection: Abs JobworkTransferOUT UnClearedSrc] Type : Out Sub Orders Fetch : Name, Date, OrderType, JobMaterialOutWithCostCenter, VoucherTypeName, JobMaterialInLOTTable, JobMaterialInWithCostCenter Fetch : LedgerEntries.* Cleared : No Search Key: $Name [Collection: ABS JobworkTransferOUT ClearedSrc] Type : Out Sub Orders Fetch : Name, Date, OrderType, JobMaterialOutWithCostCenter, VoucherTypeName, JobMaterialInLOTTable, JobMaterialInWithCostCenter Fetch : LedgerEntries.* Cleared : Yes Search Key: $Name [Collection: ABS JobworkTransferOUT Src] Collection : ABS JobworkTransferOUT UnClearedSrc, ABS JobworkTransferOUT ClearedSrc [Collection: ABS JobWorkTransferOut Extract] Source Collection : ABS JobworkTransferOUT Src Walk : LedgerEntries, Inventory EntriesOut, Batch Allocations By : OrderNumber : If ($OrderNo = $$Owner:$$Owner:$$Owner:$Name) Then $OrderNo Else "" ; ;;Group by voucher number if it is not empty else group by voucher id By : VoucherNumber : If @@IsJobMaterialTransferOutVch AND NOT $$Owner:$$Owner:$IsForJobWorkIn Then (If NOT $$IsEmpty:$VoucherNumber Then $VoucherNumber Else $MasterID) Else "" By : StockItemName : If @@IsJobMaterialTransferOutVch AND $StockItemName = $$Owner:$$Owner:$$Owner:$Parent Then $StockItemName Else "" By : ParentItem : $ParentItem By : ExciseUnitName : $ExciseUnitName Compute : OrdDate : $$Owner:$$Owner:$$Owner:$Date Compute : GodownName : $GodownName Compute : PartyName : $PartyLedgerName Compute : VchDate : $Date Compute : NatureofProcess : $AdditionalNarration Compute : IsJobworkerVchType: $$Owner:$$Owner:$IsForJobWorkIn Compute : Reference : $$Owner:$$Owner:$JWDelNoteRef Compute : BuyerAddress : $$Owner:$$Owner:$TraderVchBasicBuyerAddress Compute : VchTypeOrder : $$LocaleString:"A" ;; + $$String:$VchDate Compute : VoucherTypeName : $VoucherTypeName Compute : JobMaterialOutWithCostCenters : $$CollectionFieldByKey:$JobWorkOutWithCostCenter:$OrderNumber:ABSJobworkTransferOUTClearedSrc;JobMaterialOutWithCostCenter Compute :BatchName:$BatchName ;;To compute the voucher Number Compute : MasterVoucherNo : If NOT $$IsEmpty:$VoucherNumber Then $VoucherNumber Else "" Source Var : srcvOrderNo : String : $Name Source Var : srcvOrderid : Number : $OrderID Source Var : srcvStockItemName : String : $Parent Aggr Compute : IssueQty : SUM : $$GetMOutQty:##srcvOrderNo:##srcvOrderid:##srcvStockItemName Aggr Compute : ScrapQty : SUM : 0 ; Filter : NONEmptyOrder, JWAnnexExciseFilter Search Key: $BatchName [Collection: ABS Jobwork Transfer In Extract] Source Collection : JobworkTransferIn Src Walk : LedgerEntries, Inventory Entries, Batch Allocations By : OrderNumber : If ($OrderNo = $$Owner:$$Owner:$$Owner:$Name) Then $OrderNo Else "" ;;Group by voucher number if it is not empty else group by voucher id By : VoucherNumber : If @@IsJobMaterialTransferInVch AND NOT $$Owner:$$Owner:$IsForJobWorkIn Then (If NOT $$IsEmpty:$VoucherNumber Then $VoucherNumber Else $MasterID) Else "" By : StockItemName : If @@IsJobMaterialTransferInVch AND $StockItemName = $$Owner:$$Owner:$$Owner:$Parent Then $StockItemName Else "" By : ParentItem : $ParentItem By : ExciseUnitName : $ExciseUnitName Compute : OrdDate : $$Owner:$$Owner:$$Owner:$Date Compute : GodownName : $GodownName Compute : PartyName : $PartyLedgerName Compute : VchDate : $Date Compute : NatureofProcess : $AdditionalNarration Compute : IsJobworkerVchType: $$Owner:$$Owner:$IsForJobWorkIn Compute : Reference : $$Owner:$$Owner:$JWDelNoteRef Compute : BuyerAddress : $$Owner:$$Owner:$TraderVchBasicBuyerAddress Compute : VchTypeOrder : $$LocaleString:"B" ;; + $$String:$VchDate ;;To compute the master voucher number as voucher number, if the voucher number is not empty, else as empty Compute : MasterVoucherNo : If NOT $$IsEmpty:$VoucherNumber Then $VoucherNumber Else "" Compute : VoucherTypeName : $VoucherTypeName Source Var : srcvOrderNo : String : $Name Source Var : srcvOrderID : Number : $OrderID Source Var : srcvStockItemName : String : $Parent Aggr Compute : ReceivedQty : SUM : $$GetMInQty:##srcvOrderNo:##srcvOrderID:##srcvStockItemName Filter : NONEmptyOrder, JWAnnexExciseFilter [Collection: ABS JobworkTransferInSub UnClearedSrc] Type : In Sub Orders Fetch : Name, Date, OrderType, JobMaterialOutWithCostCenter Fetch : LedgerEntries.* Cleared : No [Collection: ABS JobworkTransferInSub ClearedSrc] Type : In Sub Orders Fetch : Name, Date, OrderType, JobMaterialOutWithCostCenter Fetch : LedgerEntries.* Cleared : Yes [Collection: ABS JobworkTransferInSub Src] Collection : ABS JobworkTransferInSub ClearedSrc, ABS JobworkTransferInSub UnClearedSrc [Collection: ABS Jobwork Transfer InSub Extract] Source Collection : ABS JobworkTransferInSub Src Walk : LedgerEntries, Inventory EntriesIn, Batch Allocations By : OrderNumber : If ($OrderNo = $$Owner:$$Owner:$$Owner:$Name) Then $OrderNo Else "" ;;Group by voucher number if it is not empty else group by voucher id By : VoucherNumber : If @@IsJobMaterialTransferInVch AND NOT $$Owner:$$Owner:$IsForJobWorkIn Then (If NOT $$IsEmpty:$VoucherNumber Then $VoucherNumber Else $MasterID) Else "" By : StockItemName : If @@IsJobMaterialTransferInVch AND $StockItemName = $$Owner:$$Owner:$$Owner:$Parent Then $StockItemName Else "" By : ParentItem : $ParentItem By : ExciseUnitName : $ExciseUnitName Compute : OrdDate : $$Owner:$$Owner:$$Owner:$Date Compute : GodownName : $GodownName Compute : PartyName : $PartyLedgerName Compute : VchDate : $Date Compute : NatureofProcess : $AdditionalNarration Compute : IsJobworkerVchType: $$Owner:$$Owner:$IsForJobWorkIn Compute : Reference : $$Owner:$$Owner:$JWDelNoteRef Compute : BuyerAddress : $$Owner:$$Owner:$TraderVchBasicBuyerAddress Compute : VchTypeOrder : $$LocaleString:"B" ;;To compute the master voucher number as voucher number, if the voucher number is not empty, else as empty Compute : MasterVoucherNo : If NOT $$IsEmpty:$VoucherNumber Then $VoucherNumber Else "" Source Var : srcvOrderNo : String : $Name Source Var : srcvOrderID : Number : $OrderID Source Var : srcvStockItemName : String : $Parent Aggr Compute : ScrapQty : SUM : $$GetMInScrapCoByQty:##srcvOrderNo:##srcvOrderID:##srcvStockItemName Filter : NONEmptyOrder, JWAnnexExciseFilter [Collection: ABS JobworkAnnexureIV Extract] Source Collection : ABS JobWorkTransferOut Extract, ABS JobworkTransferIn Extract, ABS Jobwork Transfer InSub Extract By : OrderNumber : $OrderNumber By : VoucherNumber : $VoucherNumber By : StockItemName : $StockItemName By : VchTypeOrder : $VchTypeOrder ; Compute : OrdDate : $OrdDate Compute : VchDate : $VchDate Compute : JobWorkerAddress : $BuyerAddress Compute : IssueUoM : $IssueUoM Compute : PartyName : $PartyName Compute : NatureofProcess : $NatureofProcess Compute : Reference : $Reference Compute : MasterVoucherNo : $MasterVoucherNo Compute : VoucherTypeName : $VoucherTypeName Compute : JobMaterialOutWithCostCenters : $$CollectionFieldByKey:$JobWorkOutWithCostCenter:$OrderNumber:ABSJobworkTransferOUTClearedSrc;$JobMaterialOutWithCostCenter Compute : JobMaterialInWithCostCenters:$JobMaterialInWithCostCenter Aggr Compute : IssuedQty : SUM : If $$IsEmpty:$IssueQty Then $$AsQty:0 Else $IssueQty Aggr Compute : ReceivedQty : SUM : If $$IsEmpty:$ReceivedQty Then $$AsQty:0 Else $ReceivedQty Aggr Compute : ScrapQty : SUM : If $$IsEmpty:$ScrapQty Then $$AsQty:0 Else $ScrapQty Filter : JWAnnexureDateFilter, BWRFilterX, LotFilter Sort : @@Default : $OrdDate, $OrderNumber, $VchDate, $VchTypeOrder Keep Source : (). Client Only : Yes Option : Dummyrefresh : ##ABSCostCenter OR ##ABSLotNumber [!Collection : Dummyrefresh] [System: Formula] BWRFilterX : $JobMaterialOutWithCostCenters=@@BrokerWiseY BrokerWiseY: If Not $$IsEmpty:##ABSCostCenter Then ##ABSCostCenter else $JobMaterialOutWithCostCenters LotFilter : $OrderNumber=@@LotFilterX LotFilterX: If Not $$IsEmpty:##ABSLotNumber Then ##ABSLotNumber else $OrderNumber ProcessTYpe : #JWAnnexureIVVchTypeName=@@ProcessTYpeX ProcessTYpeX: If Not $$IsEmpty:##ABSProcessTYpe Then ##ABSProcessTYpe else #JWAnnexureIVVchTypeName ;$ProcessingType [Collection: ABS JobworkTransferIn UnClearedSrc] Type : In Sub Orders Type : IN Orders Fetch : Name, Date, OrderType, JobMaterialOutWithCostCenter, VoucherTypeName, JobMaterialInLOTTable, JobMaterialInWithCostCenter Fetch : LedgerEntries.* Cleared : No Compute : JobMaterialReceivVchType : $LedgerEntries[1].VoucherTypeName [Collection: ABS JobworkTransferIn ClearedSrc] Type : In Sub Orders Type : IN Orders Fetch : Name, Date, OrderType, JobMaterialOutWithCostCenter, VoucherTypeName, JobMaterialInLOTTable, JobMaterialInWithCostCenter Fetch : LedgerEntries.* Cleared : Yes Filter : IsJobInOrderType Compute : JobMaterialReceivVchType : $LedgerEntries[1].VoucherTypeName [Collection: ABS JobworkTransferIn Src] Collection : ABS JobworkTransferIn ClearedSrc, ABS JobworkTransferIn UnClearedSrc [Field: ABS Vch Date] Use: Uni date Field Set as: If #Isissuedqty ="Receive" then $VchDate else "" Border: Thin Left Width: 10 [Field:ABS Rec VchNo] Use: Short Name Field Set as: $MasterVoucherNo Border: Thin Left [Field: ABS CCName] Use: Short Name Field Set as: $JobMaterialOutWithCostCenterS Border: Thin Left [System: Formula] Mykey:#JWAnnexureIVSlNo [Field: MTO VchTypeName] Use : Name Field Set as : $VoucherTypeName Alignment: Center Style: Small Border: Thin Left Width: 10 [Field: Isissuedqty] Use: Name Field Set as: if #JWAnnexureIVIssueQty>0 then "ISSUE" else "Receive" Width: 8 Invisible: Yes [Field: JWAnnexureIV VchTypeName] Use : Name Field Set as: $$CollectionFieldByKey:$ProcessingType:#MTOVchTypeName:ListofVchTypesX Alignment: Center Style: Small Border: Thin Left Width: 10 [Field: Abs JWAnnexureIV SlNo] Use : Name Field Set as : If ($$Line = 1 OR $OrderNumber != $$PrevObj:$OrderNumber) Then $OrderNumber Else $OrderNumber Width : 10 Border: Thin Left [Field: ABS JWAnnexureIV DateofDesp] Use : Uni Date Field Set as : If #Isissuedqty ="ISSUE" then $VchDate else "" Width : 8 Align : Left Fixed : Yes Border : Thin Left [Field: ABS JWAnnexureIV DelChalanNo] Use : Name Field Set as : $MasterVoucherNo Width : 12 Border : Thin Left [Field: ABS JWAnnexureIV ItemDescription] Use : Name Field Set as : If $VchTypeOrder = $$LocaleString:"B" Then $ParentItem Else $StockItemName Width : 20 Scroll : Yes Border : Thin Left [Field: ABS JWAnnexureIV JobworkerDelChalanNo] Use : Name Field Set as : If $VchTypeOrder = $$LocaleString:"B" Then $Reference Else + If $VchTypeOrder = $$LocaleString:"B" AND $OrderNumber != $$PrevObj:$OrderNumber Then $Reference Else "" Width : 15 Line : 0 Scroll : Yes Border : Thin Left Invisible: Yes [Collection: List of VchTypesX] Type : Voucher Type Title : $$LocaleString:"List of Types" BelongsTo : Yes WithAlias : Yes Format : $$Name, 20 FullHeight : Yes Align : Centre Set as : $Name Fetch : Name, ProcessingType Client Only : Yes Search Key: $Name ;;;Filter of Report [Button:CstCtrfltbutton] Key : F5 Action : Execute : ABSCostCenterWise Title : Cost Center Wise [Report:ABSCostCenterWise] Form : ABSCostCenterWise [Form:ABSCostCenterWise] Part : ABSCostCenterWise Space Left : 2 mms Space Right : 2 mms [Part:ABSCostCenterWise] Line : ABSCostCenterWise [Line:ABSCostCenterWise] Field : Medium Prompt,ABSCostCenterWise Local : Field : Medium Prompt : Set as : "Select Cost Center Name:" Space Bottom : 2 mms [Field:ABSCostCenterWise] Table : Job_Work_Out_Cost_Center ;,EndOfList Use : Name Field Width : 20 Border : Thin Box Variable : ABSCostCenter Modifies : ABSCostCenter [Button:LotNumberfltButton] Key : F6 Action : Execute : ABS LotWise Title : Lot Number Wise [Report:ABS LotWise] Form : ABS LotWise [Form:ABS LotWise] Part : ABS LotWise Space Left : 2 mms Space Right : 2 mms [Part:ABS LotWise] Line : ABS LotWise [Line:ABS LotWise] Field : Medium Prompt,ABS LotWise Local : Field : Medium Prompt : Set as : "Select Lot Number:" Space Bottom : 2 mms [Field:ABS LotWise] ;Table : Job_Work_Out_Cost_Center,EndOfList Set as:"" Use : Name Field Width : 20 Border : Thin Box Variable : ABSLotNumber Modifies : ABSLotNumber [Button:ProcessTypeButton] Key : F7 Action : Execute : ABS Process Type Title : Processing Type [Report:ABS Process Type] Form : ABS Process Type [Form:ABS Process Type] Part : ABS Process Type Space Left : 2 mms Space Right : 2 mms [Part:ABS Process Type] Line : ABS Process Type [Line:ABS Process Type] Field : Medium Prompt,ABS Process Type Local : Field : Medium Prompt : Set as : "Select Process Name:" Space Bottom : 2 mms [Field:ABS Process Type] Table : List of Processing Type ;,EndOfList Use : Name Field Width : 20 Border : Thin Box Variable : ABSProcessTYpe Modifies : ABSProcessTYpe [Variable:ABSCostCenter] Type : String [Variable: ABSLotNumber] Type: String Persistent: No [Variable: ABSProcessTYpe] Type: String [System:Variables] ABSCostCenter : "" ABSLotNumber : "" ABSProcessTYpe :""
