CAC Margin Analysis Account Summary

➜ Back to Library
Description
Categories: Enginatics
Repository: Github
Report for the margin from the customer invoices and shipments, including the Sales and COGS accounts, based on the standard Oracle Margin table, cst_margin_summary. You first need to run the Margin Analysis Load Run request, to populate this table. Note that if you have customized Subledger Accounting or used custom programs to record COGS by cost element, this report shows only the first COGS  ...  Report for the margin from the customer invoices and shipments, including the Sales and COGS accounts, based on the standard Oracle Margin table, cst_margin_summary. You first need to run the Margin Analysis Load Run request, to populate this table. Note that if you have customized Subledger Accounting or used custom programs to record COGS by cost element, this report shows only the first COGS account, as there is only one reported row per sales order line.
/* +=============================================================================+
-- | Copyright 2006 - 2020 Douglas Volz Consulting, Inc. |
-- | All rights reserved. |
-- | Permission to use this code is granted provided the original author is |
-- | acknowledged. No warranties, express or otherwise is included in this |
-- | permission. |
-- +=============================================================================+
-- |
-- | Original Author: Douglas Volz ([email protected])
-- |
-- | Parameters:
-- | p_trx_date_from -- Starting transaction date for the customer shipments
-- | p_trx_date_to -- Ending transaction date for the customer shipments
-- | p_category_set1 -- The first item category set to report, typically the
-- | Cost or Product Line Category Set
-- | p_category_set2 -- The second item category set to report, typically the
-- | Inventory Category Set
-- | p_customer_name -- Enter the specific customer name you wish to report (optional)
-- | p_item_number -- Enter the specific item number you wish to report (optional)
-- | p_org_code -- Specific inventory organization you wish to report (optional)
-- | p_operating_unit -- Operating Unit you wish to report, leave blank for all
-- | operating units (optional)
-- | p_ledger -- General ledger you wish to report, leave blank for all
-- | ledgers (optional)
-- |
-- | Description:
-- | Report for the margin from the customer invoices and shipments, based
-- | on the standard Oracle Margin table, cst_margin_summary. You first need
-- | to run the Margin Analysis Build request, to populate this table.
-- |
-- | Version Modified on Modified by Description
-- | ======= =========== ============== =========================================
-- | 1.0 18 APR 2006 Douglas Volz Initial Coding
-- | 1.1 15 MAY 2006 Douglas Volz Working version
-- | 1.2 17 MAY 2006 Douglas Volz Added order line and date information
-- | 1.3 14 Dec 2012 Douglas Volz Modified for Garlock, changed category set
-- | 1.4 19 Dec 2012 Douglas Volz Bug fix for category set name
-- | 1.5 29 Jan 2013 Douglas Volz Fixed date parameters to have same format
-- | as other reports;
-- | 1.6 25 Feb 2013 Douglas Volz Added apps.mtl_default_category_sets mdcs table
-- | to make the script more generic
-- | 1.7 27 Feb 2017 Douglas Volz Modified for Item Category and customer
-- | information.
-- | 1.8 28 Feb 2017 Douglas Volz Removed sales rep information,
-- | was causing cross-joining.
-- | 1.9 22 May 2017 Douglas Volz Adding Inventory item category
-- | 1.10 23 May 2020 Douglas Volz Use multi-language table for UOM Code, item master
-- | OE transaction types and hr organization names.
-- | 1.11 06 Nov 2020 Douglas Volz Fix for having custom, multiple COGS accounts by
-- | cost element. Now only get one COGS account.+=============================================================================+*/
   more
Run CAC Margin Analysis Account Summary and other Oracle EBS reports with Blitz Report™ on our demo environment
select  nvl(gl.short_name, gl.name) Ledger,
 haou2.name Operating_Unit,
 mp.organization_code Org_Code,
 -- Revision for version 1.7
 -- cms_sum.sold_to_customer_name Sold_To_Customer,
 -- Revision for version 1.10
 cms_sum.customer_class_code Customer_Class_Code,
 hz.party_name Customer,
 hca.account_number Customer_Number,
 -- Revision for version 1.8
 -- Not useful at client site
 -- rsa.name Sales_Rep,
 cms_sum.order_number Order_Number,
 cms_sum.line_number Order_Line,
 -- Revision for version 1.10
 -- sot.name Order_Type,
 ottt.name Order_Type,
 cms_sum.gl_date Transaction_Date,
 &segment_columns
 msiv.concatenated_segments Item,
 msiv.description  Item_Description,
 -- Revision for version 1.10
 fcl.meaning Item_Type,
&category_columns
 muomv.uom_code UOM_Code,
        round(cms_sum.invoiced_amount / decode(cms_sum.invoice_line_quantity, 0, 1, cms_sum.invoice_line_quantity),5) Unit_Price,
        round(cms_sum.cogs_amount / decode(cms_sum.ship_quantity,0,1, cms_sum.ship_quantity),5) Unit_Cost,
 cms_sum.invoice_line_quantity Invoice_Quantity,
 cms_sum.ship_quantity Ship_Quantity,
 cms_sum.invoiced_amount Sales_Amount,
 cms_sum.cogs_amount COGS_Amount,
 cms_sum.invoiced_amount - cms_sum.cogs_amount Margin,
 round((cms_sum.invoiced_amount - cms_sum.cogs_amount) / decode(cms_sum.invoiced_amount, 0, 1, cms_sum.invoiced_amount) * 100,1) Percent
from -- Revision for version 1.10
 mtl_system_items_vl msiv,
 mtl_units_of_measure_vl muomv,
 fnd_common_lookups fcl,
 -- End for revision for version 1.10
 gl_code_combinations gcc_cogs,
 gl_code_combinations gcc_sales,
 mtl_parameters mp,
 so_order_types_all sot,
 -- Revision for version 1.10
 oe_transaction_types_tl ottt,
 -- Revision for version 1.7
 -- ra_customers rc,
 hz_cust_accounts_all hca,
 hz_parties hz,
 -- End revision for version 1.7
 -- Revision for version 1.8
 -- Causing cross-joining
 -- ra_salesreps_all rsa,
 hr_organization_information hoi,
 hr_all_organization_units_vl haou,  -- inv_organization_id
 hr_all_organization_units_vl haou2, -- operating unit
 gl_ledgers gl,
 -- =================================================
 -- Condense the Sales and COGS entries into one row
 -- =================================================
 (select cms.org_id,
  cms.customer_class_code,
  cms.parent_organization_id,
  cms.parent_inventory_item_id,
  sum(cms.sales_account) sales_account,
  sum(cms.cogs_account) cogs_account,
  cms.customer_id,
  cms.sold_to_customer_name,
  cms.order_number,
  cms.line_number,
  cms.order_type_id,
  cms.gl_date,
  sum(cms.invoice_line_quantity) invoice_line_quantity,
  sum(cms.ship_quantity) ship_quantity,
  sum(cms.invoiced_amount) invoiced_amount,
  sum(cms.cogs_amount) cogs_amount
  from (select cms.org_id,
   cms.customer_class_code,
   cms.parent_organization_id,
   cms.parent_inventory_item_id,
   0 sales_account,
   -- Revision for verison 1.11
   min(cms.cogs_account) cogs_account,
   cms.customer_id,
   cms.sold_to_customer_name,
   cms.order_number,
   cms.line_number,
   cms.order_type_id,
   -- COGS entry has a timestamp
   trunc(cms.gl_date) gl_date,
   sum(0) invoice_line_quantity,
   sum(nvl(cms.ship_quantity,0)) ship_quantity,
   sum(0) invoiced_amount,
   sum(nvl(cms.cogs_amount,0)) cogs_amount
   from cst_margin_summary cms
   where cms.source       = 'COGS'
   and 4=4  -- p_trx_date_from, p_trx_date_to
   group by
   cms.org_id,
   cms.customer_class_code,
   cms.parent_organization_id,
   cms.parent_inventory_item_id,
   -- Revision for verison 1.11
   -- cms.cogs_account,
   0, -- sales_account
   cms.customer_id,
   cms.sold_to_customer_name,
   cms.order_number,
   cms.line_number,
   cms.order_type_id,
   -- COGS entry has a timestamp
   trunc(cms.gl_date)
   union all
   select cms.org_id,
   cms.customer_class_code,
   cms.parent_organization_id,
   cms.parent_inventory_item_id,
   cms.sales_account,
   0 cogs_account,
   cms.customer_id,
   cms.sold_to_customer_name,
   cms.order_number,
   cms.line_number,
   cms.order_type_id,
   cms.gl_date,
   sum(nvl(cms.invoice_line_quantity,0)) invoice_line_quantity,
   sum(0) ship_quantity,
   sum(nvl(cms.invoiced_amount,0)) invoiced_amount,
   sum(0) cogs_amount
   from cst_margin_summary cms
   where cms.source       = 'INVOICE'
   and 4=4  -- p_trx_date_from, p_trx_date_to
   group by
   cms.org_id,
   cms.customer_class_code,
   cms.parent_organization_id,
   cms.parent_inventory_item_id,
   cms.sales_account,
   0, -- cogs_account,
   cms.customer_id,
   cms.sold_to_customer_name,
   cms.order_number,
   cms.line_number,
   cms.order_type_id,
   cms.gl_date
  ) cms
  group by
  cms.org_id,
  cms.customer_class_code,
  cms.parent_organization_id,
  cms.parent_inventory_item_id,
  cms.customer_id,
  cms.sold_to_customer_name,
  cms.order_number,
  cms.line_number,
  cms.order_type_id,
  cms.gl_date
 ) cms_sum
-- Revision for version 1.10
where msiv.organization_id         = mp.organization_id
and msiv.organization_id         = cms_sum.parent_organization_id
and msiv.inventory_item_id       = cms_sum.parent_inventory_item_id
and muomv.uom_code               = msiv.primary_uom_code
and gcc_cogs.code_combination_id (+)  = cms_sum.cogs_account
and gcc_sales.code_combination_id (+) = cms_sum.sales_account
and fcl.lookup_code (+)          = msiv.item_type
and fcl.lookup_type (+)          = 'ITEM_TYPE'
and ottt.transaction_type_id     = sot.order_type_id
and ottt.language                = userenv('lang')
-- End for revision for version 1.10
and sot.order_type_id            = cms_sum.order_type_id
-- Performance improvement, comment this out
-- and sot.org_id  = cms.org_id
-- Revision for version 1.7
-- and rc.customer_id               = cms_sum.customer_id
and hca.cust_account_id          = cms_sum.customer_id
and hz.party_id                  = hca.party_id
-- Revision for version 1.8
-- Causing cross-joining
-- and rsa.salesrep_id              = cms.primary_salesrep_id
-- ===================================================================
-- using the base tables to avoid using
-- org_organization_definitions and hr_operating_units
-- ===================================================================
and hoi.org_information_context  = 'Accounting Information'
and hoi.organization_id          = mp.organization_id
and hoi.organization_id          = haou.organization_id   -- this gets the organization name
and cms_sum.org_id               = haou2.organization_id
and haou2.organization_id        = hoi.org_information3 -- this gets the operating unit id
and gl.ledger_id                 = to_number(hoi.org_information1) -- get the ledger_id
and mp.organization_id in (select oav.organization_id from org_access_view oav where oav.resp_application_id=fnd_global.resp_appl_id and oav.responsibility_id=fnd_global.resp_id)
and 1=1                          -- p_customer_name, p_item_number, p_org_code, p_operating_unit, p_ledger
order by
 nvl(gl.short_name, gl.name), -- Ledger
 haou2.name, -- Operating_Unit
 mp.organization_code, -- Org_Code
 hz.party_name, -- Customer
 cms_sum.order_number, -- Order_Number
 cms_sum.line_number -- Order_Line
Parameter Name SQL text Validation
Transaction Date From 
cms.gl_date >= :p_trx_date_from
 Date
Transaction Date To 
cms.gl_date < :p_trx_date_to + 1
 Date
Category Set 1 
select x.* from (
select
'(select min(mcb.'||lower(fifsv.application_column_name)||') keep (dense_rank first order by mic.category_id) from mtl_item_categories mic, mtl_categories_b mcb where mic.category_set_id='||mcsv.category_set_id||' and msiv.organization_id=mic.organization_id and msiv.inventory_item_id=mic.inventory_item_id and mic.category_id=mcb.category_id) "'||substr(fifsv.form_left_prompt,1,30)||'",' sql_text
from
mtl_category_sets_vl mcsv,
fnd_id_flex_segments_vl fifsv
where
mcsv.category_set_name=:category_set_name1 and
mcsv.structure_id=fifsv.id_flex_num and
fifsv.application_id=401 and
fifsv.id_flex_code='MCAT' and
fifsv.enabled_flag='Y'
order by
fifsv.id_flex_num,
fifsv.segment_num
) x
union all
select
'(select min(mct.description) keep (dense_rank first order by mic.category_id) from mtl_item_categories mic, mtl_categories_tl mct where mic.category_set_id='||mcsv.category_set_id||' and msiv.organization_id=mic.organization_id and msiv.inventory_item_id=mic.inventory_item_id and mic.category_id=mct.category_id and mct.language=userenv(''lang'')) "'||substr(mcsv.category_set_name||' Description',1,30)||'",' sql_text
from
mtl_category_sets_vl mcsv
where
mcsv.category_set_name=:category_set_name1
 LOV
Category Set 2 
select x.* from (
select
'(select min(mcb.'||lower(fifsv.application_column_name)||') keep (dense_rank first order by mic.category_id) from mtl_item_categories mic, mtl_categories_b mcb where mic.category_set_id='||mcsv.category_set_id||' and msiv.organization_id=mic.organization_id and msiv.inventory_item_id=mic.inventory_item_id and mic.category_id=mcb.category_id) "'||substr(fifsv.form_left_prompt,1,30)||'",' sql_text
from
mtl_category_sets_vl mcsv,
fnd_id_flex_segments_vl fifsv
where
mcsv.category_set_name=:category_set_name2 and
mcsv.structure_id=fifsv.id_flex_num and
fifsv.application_id=401 and
fifsv.id_flex_code='MCAT' and
fifsv.enabled_flag='Y'
order by
fifsv.id_flex_num,
fifsv.segment_num
) x
union all
select
'(select min(mct.description) keep (dense_rank first order by mic.category_id) from mtl_item_categories mic, mtl_categories_tl mct where mic.category_set_id='||mcsv.category_set_id||' and msiv.organization_id=mic.organization_id and msiv.inventory_item_id=mic.inventory_item_id and mic.category_id=mct.category_id and mct.language=userenv(''lang'')) "'||substr(mcsv.category_set_name||' Description',1,30)||'",' sql_text
from
mtl_category_sets_vl mcsv
where
mcsv.category_set_name=:category_set_name2
 LOV
Customer Name 
hz.party_name = :p_customer_name
 LOV
Item Number 
msiv.concatenated_segments = :p_item_number
 LOV
Organization Code 
mp.organization_code = :p_org_code
 LOV