Wednesday, 19 June 2013

DISPATCH QUERY FOR EXPORT (ORDER MANAGEMENT & INVENTORY)

Select   Typ, Sum (Machine1) Machine1, Sum (Machine2)
                                                                     Machine2,
                         Sum (Machine3) Machine3, Sum (Mach1) Mach1,
                         Sum (Mach2) Mach2, Sum (Mach3) Mach3
                    From (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, 'Export' 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 Upper (Flv.Lookup_Code) =
                                                              Upper (Ott.Name)
                                                 And Substr (Msi.Segment1,
                                                             2,
                                                             1
                                                            ) In
                                                              ('1', '2', '3')
                                                 And Flv.Tag = 'Export'
                                                 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)
                Group By Typ

No comments:

Post a Comment