Wednesday, 19 June 2013

6 AM TO 6 AM FOR A DAY (FINANCIAL YEAR )

AND jowl.creation_date
                                                                   BETWEEN   TRUNC
                                                                                (TO_DATE
                                                                                    (t_date
                                                                                    ),
                                                                                 'DD'
                                                                                )
                                                                           + (  6
                                                                              / 24
                                                                             )
                                                                       AND   TRUNC
                                                                                (TO_DATE
                                                                                    (t_date
                                                                                    ),
                                                                                 'dd'
                                                                                )
                                                                           + (  359.99
                                                                              / 1440
                                                                             )
                                                                           + 1

6 AM TO 6 AM (FOR AN MONTH ) LIKE MONTH WISE (FINANCIAL YEAR)

AND jowl.creation_date
                                                                   BETWEEN   TRUNC
                                                                                (TO_DATE
                                                                                    (t_date
                                                                                    ),
                                                                                 'mm'
                                                                                )
                                                                           + (  6
                                                                              / 24
                                                                             )
                                                                       AND   TRUNC
                                                                                (TO_DATE
                                                                                    (t_date
                                                                                    ),
                                                                                 'dd'
                                                                                )
                                                                           + (  359.99
                                                                              / 1440
                                                                             )
                                                                           + 1

6 AM TO 6 AM FOR THE FINANCIAL YEAR (FOR AN YEAR) 01-APR-2013 TO 31-MAR-2014

 And Rsh.Creation_Date BETWEEN   TRUNC
                                       (TO_DATE
                                           (   '01'
                                            || '-'
                                            || 'APR'
                                            || '-'
                                            || TRUNC
                                                  (TO_NUMBER
                                                          (TO_CHAR
                                                                  (t_date,
                                                                   'YYYY'
                                                                  )
                                                          )
                                                  )
                                           ),
                                        'dd'
                                       )
                                  + (6 / 24)   --to_date (01, 'dd') + (6 / 24)
                              AND TRUNC (t_date, 'dd') + (6 / 24) + 1

DISPATCH QUERY FOR BRANCH RETURN (ORDER MANAGEMENT & INVENTORY)

Select   Typ, Machine1, Machine2, Machine3, Sum (Mach1) Mach1,
                         Sum (Mach2) Mach2, Sum (Mach3) Mach3
                    From (Select   Typ, Machine1, Machine2, Machine3,
                                   Sum (Mc1) Mach1, Sum (Mc2) Mach2,
                                   Sum (Mc3) Mach3
                              From (Select Ott.Name, 'Branch Return' Typ,
                                           0 Machine1, 0 Machine2, 0 Machine3,
                                           Abs
                                              ((Case
                                                   When Substr (Msi.Segment1,
                                                                2,
                                                                1
                                                               ) = '1'
                                                      Then (Nvl
                                                               (Rt.Primary_Quantity,
                                                                0
                                                               )
                                                           )
                                                   Else 0
                                                End
                                               )
                                              ) Mc1,
                                           Abs
                                              ((Case
                                                   When Substr (Msi.Segment1,
                                                                2,
                                                                1
                                                               ) = '2'
                                                      Then (Nvl
                                                               (Rt.Primary_Quantity,
                                                                0
                                                               )
                                                           )
                                                   Else 0
                                                End
                                               )
                                              ) Mc2,
                                           Abs
                                              ((Case
                                                   When Substr (Msi.Segment1,
                                                                2,
                                                                1
                                                               ) = '3'
                                                      Then (Nvl
                                                               (Rt.Primary_Quantity,
                                                                0
                                                               )
                                                           )
                                                   Else 0
                                                End
                                               )
                                              ) Mc3
                                      From Apps.Oe_Order_Headers_All Oh,
                                           Apps.Po_Requisition_Headers_All Prh,
                                           Apps.Po_Requisition_Lines_All Prl,
                                           Apps.Po_Req_Distributions_All Prd,
                                           Apps.Rcv_Transactions Rt,
                                           Apps.Rcv_Shipment_Headers Rsh,
                                           Apps.Rcv_Shipment_Lines Rsl,
                                           Apps.Mtl_System_Items_B Msi,
                                           Apps.Mtl_Item_Categories Mic,
                                           Apps.Mtl_Categories Mc,
                                           Apps.Oe_Transaction_Types_Tl Ott
                                     Where
                                           --Oh.Order_Number = 32012003611
                                           Oh.Orig_Sys_Document_Ref =
                                                                  Prh.Segment1
                                       And Prh.Requisition_Header_Id =
                                                     Prl.Requisition_Header_Id
--And Prd.Requistion_Header_Id = Prl.Requisition_Header_Id
                                       And Prd.Requisition_Line_Id =
                                                       Prl.Requisition_Line_Id
                                       And Rt.Req_Distribution_Id =
                                                           Prd.Distribution_Id
                                       And Rsh.Shipment_Header_Id =
                                                         Rt.Shipment_Header_Id
                                       And Rt.Transaction_Type = 'DELIVER'
                                       And Rsl.Shipment_Line_Id =
                                                           Rt.Shipment_Line_Id
                                       And Msi.Organization_Id =
                                                            Rt.Organization_Id
                                       And Msi.Inventory_Item_Id = Rsl.Item_Id
                                       And Mic.Inventory_Item_Id = Rsl.Item_Id
                                       And Mic.Organization_Id =
                                                            Rt.Organization_Id
                                       And Mic.Category_Set_Id = 5
                                       And Mic.Category_Id = Mc.Category_Id(+)
                                       And Ott.Transaction_Type_Id =
                                                              Oh.Order_Type_Id
                                       And Mc.Segment1 Not In
                                                          ('NB', 'NA', 'COM')
                                       And Substr (Msi.Segment1, 2, 1) In
                                                              ('1', '2', '3')
--And Upper(Flv.Lookup_Code) = Upper(Ott.Name)
                                       And Ott.Name Like 'Stock Transfer'
--                                       And Mc.Segment1 =
--                                                Nvl (:P_Category, Mc.Segment1)
                                       And Rsh.Creation_Date BETWEEN   TRUNC
                                       (TO_DATE
                                           (   '01'
                                            || '-'
                                            || 'APR'
                                            || '-'
                                            || TRUNC
                                                  (TO_NUMBER
                                                          (TO_CHAR
                                                                  (t_date,
                                                                   'YYYY'
                                                                  )
                                                          )
                                                  )
                                           ),
                                        'dd'
                                       )
                                  + (6 / 24)   --to_date (01, 'dd') + (6 / 24)
                              AND TRUNC (t_date, 'dd') + (6 / 24) + 1
                                       And Prl.Destination_Organization_Id =
                                                                       Orgn_Id)
                          Group By Typ, Machine1, Machine2, Machine3)
                Group By Typ, Machine1, Machine2, Machine3
                Union All
                Select 'Branch Return' Typ, 0 Machine1, 0 Machine2,
                       0 Machine3, 0 Mach1, 0 Mach2, 0 Mach3
                  From Dual)

DISPATCH QUERY FOR SALES RETURN (ORDER MANAGEMENT & INVENTORY)

Select   Typ, Machine1, Machine2, Machine3, Sum (Mach1) Mach1,
                         Sum (Mach2) Mach2, Sum (Mach3) Mach3
                    From ((Select   Typ, Machine1, Machine2, Machine3,
                                    Sum (Mc1) Mach1, Sum (Mc2) Mach2,
                                    Sum (Mc3) Mach3
                               From (Select Ott.Name, 'Sales Return' Typ,
                                            0 Machine1, 0 Machine2,
                                            0 Machine3,
                                            Abs
                                               ((Case
                                                    When Substr (Msi.Segment1,
                                                                 2,
                                                                 1
                                                                ) = '1'
                                                       Then (Nvl
                                                                (Rt.Primary_Quantity,
                                                                 0
                                                                )
                                                            )
                                                    Else 0
                                                 End
                                                )
                                               ) Mc1,
                                            Abs
                                               ((Case
                                                    When Substr (Msi.Segment1,
                                                                 2,
                                                                 1
                                                                ) = '2'
                                                       Then (Nvl
                                                                (Rt.Primary_Quantity,
                                                                 0
                                                                )
                                                            )
                                                    Else 0
                                                 End
                                                )
                                               ) Mc2,
                                            Abs
                                               ((Case
                                                    When Substr (Msi.Segment1,
                                                                 2,
                                                                 1
                                                                ) = '3'
                                                       Then (Nvl
                                                                (Rt.Primary_Quantity,
                                                                 0
                                                                )
                                                            )
                                                    Else 0
                                                 End
                                                )
                                               ) Mc3
                                       From Apps.Rcv_Transactions Rt,
                                            Apps.Oe_Order_Headers_All Oh,
                                            Apps.Oe_Order_Lines_All Ol,
                                            Apps.Rcv_Shipment_Headers Rsh,
                                            Apps.Rcv_Shipment_Lines Rsl,
                                            Apps.Mtl_System_Items_B Msi,
                                            Apps.Mtl_Item_Categories Mic,
                                            Apps.Mtl_Categories Mc,
                                            Apps.Oe_Transaction_Types_Tl Ott
--Apps.Jai_Om_Wsh_Lines_All Jowl
                                     Where
                                            --Rt.Oe_Order_Header_Id = 49231
                                            Transaction_Type = 'DELIVER'
                                        And Rt.Oe_Order_Header_Id =
                                                                  Ol.Header_Id
                                        And Rt.Oe_Order_Line_Id = Ol.Line_Id
                                        And Oh.Header_Id = Ol.Header_Id
                                        And Rsh.Shipment_Header_Id =
                                                         Rt.Shipment_Header_Id
                                        And Rsl.Shipment_Line_Id =
                                                           Rt.Shipment_Line_Id
                                        And Msi.Organization_Id =
                                                            Rt.Organization_Id
                                        And Msi.Inventory_Item_Id =
                                                                   Rsl.Item_Id
                                        And Mic.Inventory_Item_Id =
                                                                   Rsl.Item_Id
                                        And Mic.Organization_Id =
                                                            Rt.Organization_Id
                                        And Mic.Category_Set_Id = 5
                                        And Mic.Category_Id = Mc.Category_Id(+)
                                        And Ott.Transaction_Type_Id =
                                                              Oh.Order_Type_Id
                                        And Mc.Segment1 Not In
                                                          ('NB', 'NA', 'COM')
                                        And Substr (Msi.Segment1, 2, 1) In
                                                              ('1', '2', '3')
--And Upper(Flv.Lookup_Code) = Upper(Ott.Name)
--                                        And Mc.Segment1 =
--                                                Nvl (:P_Category, Mc.Segment1)
                                        And Ott.Name = 'Sales Return'
                                        And Rsh.Creation_Date BETWEEN   TRUNC
                                       (TO_DATE
                                           (   '01'
                                            || '-'
                                            || 'APR'
                                            || '-'
                                            || TRUNC
                                                  (TO_NUMBER
                                                          (TO_CHAR
                                                                  (t_date,
                                                                   'YYYY'
                                                                  )
                                                          )
                                                  )
                                           ),
                                        'dd'
                                       )
                                  + (6 / 24)   --to_date (01, 'dd') + (6 / 24)
                              AND TRUNC (t_date, 'dd') + (6 / 24) + 1
                                        And Rt.Organization_Id = Orgn_Id)
                           Group By Typ, Machine1, Machine2, Machine3))
                Group By Typ, Machine1, Machine2, Machine3

DISPATCH FOR SELF CONSUMPTION (ORDER MANAGEMENT & INVENTORY)

Select   Typ, Sum (Machine1) Machine1, Sum (Machine2)
                                                                     Machine2,
                         Sum (Machine3) Machine3, Mach1, Mach2, Mach3
                    From ((Select   Typ, Sum (Mc1) Machine1,
                                    Sum (Mc2) Machine2, Sum (Mc3) Machine3,
                                    Mach1, Mach2, Mach3
                               From (Select Ott.Name, 'Self Consumption' Typ,
                                            Abs
                                               ((Case
                                                    When Substr (Msi.Segment1,
                                                                 2,
                                                                 1
                                                                ) = '1'
                                                       Then (Nvl
                                                                (Jowl.Quantity,
                                                                 0
                                                                )
                                                            )
                                                    Else 0
                                                 End
                                                )
                                               ) Mc1,
                                            Abs
                                               ((Case
                                                    When Substr (Msi.Segment1,
                                                                 2,
                                                                 1
                                                                ) = '2'
                                                       Then (Nvl
                                                                (Jowl.Quantity,
                                                                 0
                                                                )
                                                            )
                                                    Else 0
                                                 End
                                                )
                                               ) Mc2,
                                            Abs
                                               ((Case
                                                    When Substr (Msi.Segment1,
                                                                 2,
                                                                 1
                                                                ) = '3'
                                                       Then (Nvl
                                                                (Jowl.Quantity,
                                                                 0
                                                                )
                                                            )
                                                    Else 0
                                                 End
                                                )
                                               ) Mc3,
                                            0 Mach1, 0 Mach2, 0 Mach3
                                       From Apps.Jai_Om_Wsh_Lines_All Jowl,
                                            Apps.Oe_Order_Headers_All Oh,
                                            Apps.Oe_Order_Lines_All Ol,
                                            Apps.Wsh_Delivery_Details Wdd,
                                            Apps.Mtl_System_Items_B Msi,
                                            Apps.Mtl_Item_Categories Mic,
                                            Apps.Oe_Transaction_Types_Tl Ott,
                                            Apps.Mtl_Categories Mc,
                                            Apps.Fnd_Lookup_Values Flv
                                      Where
                                            --Jowl.Excise_Invoice_No='Facs/32012005865'
                                            Oh.Header_Id = Ol.Header_Id
                                        And Ol.Header_Id = Wdd.Source_Header_Id(+)
                                        And Ol.Line_Id = Wdd.Source_Line_Id(+)
                                        And Wdd.Delivery_Detail_Id = Jowl.Delivery_Detail_Id(+)
                                        And Wdd.Source_Header_Id = Jowl.Order_Header_Id(+)
                                        And Wdd.Source_Line_Id = Jowl.Order_Line_Id(+)
                                        And Msi.Organization_Id(+) =
                                                          Jowl.Organization_Id
                                        And Msi.Inventory_Item_Id(+) =
                                                        Jowl.Inventory_Item_Id
                                        And Mic.Inventory_Item_Id(+) =
                                                        Jowl.Inventory_Item_Id
                                        And Mic.Organization_Id(+) =
                                                          Jowl.Organization_Id
                                        And Mic.Category_Set_Id(+) = 5
                                        And Mic.Category_Id = Mc.Category_Id(+)
                                        And Ott.Transaction_Type_Id =
                                                              Oh.Order_Type_Id
                                        And Mc.Segment1 Not In
                                                          ('NB', 'NA', 'COM')
                                        And Substr (Msi.Segment1, 2, 1) In
                                                              ('1', '2', '3')
                                        And Upper (Flv.Lookup_Code) =
                                                              Upper (Ott.Name)
                                        And Ott.Transaction_Type_Id = 1222
--                                        And Mc.Segment1 =
--                                                Nvl (:P_Category, Mc.Segment1)
                                        And  Jowl.Creation_Date BETWEEN   TRUNC
                                       (TO_DATE
                                           (   '01'
                                            || '-'
                                            || 'APR'
                                            || '-'
                                            || TRUNC
                                                  (TO_NUMBER
                                                          (TO_CHAR
                                                                  (t_date,
                                                                   'YYYY'
                                                                  )
                                                          )
                                                  )
                                           ),
                                        'dd'
                                       )
                                  + (6 / 24)   --to_date (01, 'dd') + (6 / 24)
                              AND TRUNC (t_date, 'dd') + (6 / 24) + 1
                                        And Jowl.Organization_Id = Orgn_Id)
                           Group By Typ, Mach1, Mach2, Mach3))
                Group By Typ, Mach1, Mach2, Mach3