[Home] [Help]
101: --* in 'final' mode. *
102: --* *
103: --* 12-Feb-2004 PJS Various changes for bugs 3399618, 3401451, 3397388 and 3397408. These *
104: --* reported different manifestations of the same problem of either adding *
105: --* a duplicate row to the gmf_lot_cost_details table (the duplicate was a *
106: --* burden row that shared the same keys) or a division by zero if there *
107: --* was no onhand quantity. *
108: --* *
109: --* 12-Feb-2004 PJS Changes to prevent multiple updates to a cost header flagged as 'Final'. *
1089: glcd.cost_level,
1090: glcd.component_cost,
1091: 0
1092: )
1093: FROM gmf_lot_cost_details glcd
1094: WHERE glcd.header_id = p_header_id;
1095:
1096: --**********************************************************************************************
1097: --* *
1884:
1885:
1886: --**********************************************************************************************
1887: --* *
1888: --* Procedure to create a new lot cost detail row in gmf_lot_cost_details *
1889: --* *
1890: --**********************************************************************************************
1891:
1892:
1921: fnd_file.put_line(fnd_file.log,'Cost = '||p_component_cost);
1922: END IF;
1923:
1924:
1925: INSERT INTO gmf_lot_cost_details
1926: ( header_id
1927: , detail_id
1928: , cost_cmpntcls_id
1929: , cost_analysis_code
2477: --*
2478: --* Dinesh -No Bug# - Earlier new_cost_ind was not set up properly.Now corrected along with 4053149
2479: --* NEW_COST_IND in gmf_material_lot_cost_txns is used in the Subledger Posting.
2480: --* If this indicator is set to 1 then that means whatever cost pointed by
2481: --* header_id in gmf_lot_cost_details is the AVERAGE COST and not the actual
2482: --* TRANSACTION COST. The Actual Transaction cost is under the negative of header_id.
2483: --* So, depending on this NEW_COST_IND, the SL will decide on posting at the cost of
2484: --* header_id or negative of header_id (i.e., -header_id)
2485: --*
2532: component_cost,
2533: burden_ind,
2534: cost_origin,
2535: frozen_ind
2536: FROM gmf_lot_cost_details
2537: WHERE header_id = p_header_id
2538: ;
2539:
2540: /* Bug 4227784 - Dinesh Added this as we removed txns table from above query */
2554:
2555: l_onhand_qty gmf_lot_costs.onhand_qty%TYPE;
2556: l_header_id gmf_lot_costs.header_id%TYPE;
2557: l_unit_cost gmf_lot_costs.unit_cost%TYPE;
2558: l_prev_trans_unit_cost gmf_lot_cost_details.component_cost%TYPE;
2559: l_cmpnt_cost gmf_lot_cost_details.component_cost%TYPE;
2560: l_prev_new_cost_ind gmf_material_lot_cost_txns.new_cost_ind%TYPE; /* Dinesh No Bug# */
2561: procedure_name VARCHAR2(100);
2562:
2555: l_onhand_qty gmf_lot_costs.onhand_qty%TYPE;
2556: l_header_id gmf_lot_costs.header_id%TYPE;
2557: l_unit_cost gmf_lot_costs.unit_cost%TYPE;
2558: l_prev_trans_unit_cost gmf_lot_cost_details.component_cost%TYPE;
2559: l_cmpnt_cost gmf_lot_cost_details.component_cost%TYPE;
2560: l_prev_new_cost_ind gmf_material_lot_cost_txns.new_cost_ind%TYPE; /* Dinesh No Bug# */
2561: procedure_name VARCHAR2(100);
2562:
2563: BEGIN
2732:
2733:
2734: SELECT NVL(SUM(component_cost),0)
2735: INTO l_prev_trans_unit_cost
2736: FROM gmf_lot_cost_details
2737: WHERE header_id = DECODE(NVL(l_prev_prev_header_id, 0), 0, l_cost_header_id, -l_cost_header_id);
2738:
2739:
2740:
2814:
2815: l_onhand_qty gmf_lot_costs.onhand_qty%TYPE;
2816: l_header_id gmf_lot_costs.header_id%TYPE;
2817: l_unit_cost gmf_lot_costs.unit_cost%TYPE;
2818: l_cmpnt_cost gmf_lot_cost_details.component_cost%TYPE;
2819: i NUMBER;
2820: procedure_name VARCHAR2(100);
2821:
2822:
6518: --
6519: -- Delete all cost details
6520: --
6521: FORALL indx IN l_indx_from..l_indx_to
6522: DELETE FROM gmf_lot_cost_details
6523: WHERE abs(header_id) in l_header_ids_tab(indx);
6524:
6525: l_cdtl_rows_deleted := l_cdtl_rows_deleted + SQL%ROWCOUNT;
6526:
6555: WHERE rowid in l_rowids_tab(indx);
6556:
6557:
6558: fnd_file.put_line(fnd_File.LOG, ' ' || l_matl_rows_deleted || ' rows deleted from gmf_material_lot_cost_txns.');
6559: fnd_file.put_line(fnd_File.LOG, ' ' || l_cdtl_rows_deleted || ' rows deleted from gmf_lot_cost_details.');
6560: fnd_file.put_line(fnd_File.LOG, ' ' || SQL%ROWCOUNT || ' rows deleted from gmf_lot_costs.');
6561:
6562:
6563: COMMIT;
8540: -- a wrong answer.
8541:
8542: -- For each replenishment we must add a new row to (or update the existing
8543: -- row in) GMF_LOT_COSTS, add new rows to (or update the existing rows in)
8544: -- GMF_LOT_COST_DETAILS and finally create a row in GMF_LOT_COST_TRANSACTIONS
8545: -- that links the inventory transaction to the row in GMF_LOT_COSTS.
8546:
8547: -- For each consumption we leave the GMF_LOT_COSTS and GMF_LOT_COST_DETAILS
8548: -- rows alone and just create the GMF_LOT_COST_TRANSACTIONS row.
8543: -- row in) GMF_LOT_COSTS, add new rows to (or update the existing rows in)
8544: -- GMF_LOT_COST_DETAILS and finally create a row in GMF_LOT_COST_TRANSACTIONS
8545: -- that links the inventory transaction to the row in GMF_LOT_COSTS.
8546:
8547: -- For each consumption we leave the GMF_LOT_COSTS and GMF_LOT_COST_DETAILS
8548: -- rows alone and just create the GMF_LOT_COST_TRANSACTIONS row.
8549:
8550: --
8551: -- umoogala 21-Nov-2003