31: ,p_commit IN VARCHAR2
32: ,x_return_status OUT NOCOPY VARCHAR2
33: ,x_msg_count OUT NOCOPY NUMBER
34: ,x_msg_data OUT NOCOPY VARCHAR2
35: ,p_formula_header_rec IN FM_FORM_MST%ROWTYPE
36: )
37: IS
38: /* Local Variables definitions */
39: l_api_name CONSTANT VARCHAR2(30) := 'INSERT_FORMULAHEADER';
102: /* New changes to include MLS */
103: /* This package inserts into the
104: /*
105: /* currently we have no relationship between the */
106: /* fm_form_mst and vl table. However at a later time fm_form_mst will */
107: /* be a compatible synonym of this view. */
108:
109: IF (l_debug = 'Y') THEN
110: gmd_debug.put_line(' ');
219: gmd_debug.put_line(' In formula header Pvt - About to insert fm id = '
220: ||p_formula_header_rec.formula_id);
221: END IF;
222:
223: FM_FORM_MST_MLS.INSERT_ROW(
224: X_ROWID => formula_rowid,
225: X_FORMULA_ID => p_formula_header_rec.formula_id,
226: X_MASTER_FORMULA_ID => p_formula_header_rec.master_formula_id,
227: X_OWNER_ORGANIZATION_ID => p_formula_header_rec.owner_organization_id,
341: ,p_commit IN VARCHAR2
342: ,x_return_status OUT NOCOPY VARCHAR2
343: ,x_msg_count OUT NOCOPY NUMBER
344: ,x_msg_data OUT NOCOPY VARCHAR2
345: ,p_formula_header_rec IN fm_form_mst%ROWTYPE
346: )
347: IS
348: /* Local Variables definitions */
349: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_FORMULAHEADER';
347: IS
348: /* Local Variables definitions */
349: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_FORMULAHEADER';
350: l_api_version CONSTANT NUMBER := 1.0;
351: l_scale_type fm_form_mst.scale_type%TYPE;
352: l_formula_desc1 fm_form_mst.formula_desc1%TYPE;
353: l_return_val NUMBER := 0 ;
354:
355: X_msg_cnt NUMBER;
348: /* Local Variables definitions */
349: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_FORMULAHEADER';
350: l_api_version CONSTANT NUMBER := 1.0;
351: l_scale_type fm_form_mst.scale_type%TYPE;
352: l_formula_desc1 fm_form_mst.formula_desc1%TYPE;
353: l_return_val NUMBER := 0 ;
354:
355: X_msg_cnt NUMBER;
356: X_msg_dat VARCHAR2(100);
382:
383: /* Call the Update_row procedure for mls */
384: /* To modify to call the approp variables */
385: IF (l_debug = 'Y') THEN
386: gmd_debug.put_line(' In Formula Header Pvt - Before updating fm_form_mst table '
387: ||p_formula_header_rec.formula_id);
388: END IF;
389: FM_FORM_MST_MLS.UPDATE_ROW(
390: X_FORMULA_ID => p_formula_header_rec.formula_id,
385: IF (l_debug = 'Y') THEN
386: gmd_debug.put_line(' In Formula Header Pvt - Before updating fm_form_mst table '
387: ||p_formula_header_rec.formula_id);
388: END IF;
389: FM_FORM_MST_MLS.UPDATE_ROW(
390: X_FORMULA_ID => p_formula_header_rec.formula_id,
391: X_OWNER_ORGANIZATION_ID => p_formula_header_rec.owner_organization_id,
392: X_TEXT_CODE => p_formula_header_rec.text_code,
393: X_DELETE_MARK => p_formula_header_rec.delete_mark,
445: X_AUTO_PRODUCT_CALC => p_formula_header_rec.auto_product_calc);
446:
447: /* End API body */
448: IF (l_debug = 'Y') THEN
449: gmd_debug.put_line(' In Formula Header Pvt - After updating fm_form_mst table ');
450: END IF;
451:
452: /* Check if p_commit is set to TRUE */
453: IF FND_API.To_Boolean( p_commit ) THEN