77: /* fm_form_mst and vl table. However at a later time fm_form_mst will */
78: /* be a compatible synonym of this view. */
79:
80: IF (l_debug = 'Y') THEN
81: gmd_debug.put_line(' ');
82: END IF;
83:
84: IF (l_debug = 'Y') THEN
85: gmd_debug.put_line(' In formula header Pvt - About to insert fm id = '
81: gmd_debug.put_line(' ');
82: END IF;
83:
84: IF (l_debug = 'Y') THEN
85: gmd_debug.put_line(' In formula header Pvt - About to insert fm id = '
86: ||p_formula_header_rec.formula_id);
87: END IF;
88:
89: FM_FORM_MST_MLS.INSERT_ROW(
148: -- Bug# 5716318
149: X_AUTO_PRODUCT_CALC => NVL(p_formula_header_rec.auto_product_calc,'N'));
150: /* Test if formula_id is returned */
151: IF (l_debug = 'Y') THEN
152: gmd_debug.put_line(' In formula header Pvt - After fm insert row_id = '
153: ||formula_rowid);
154: END IF;
155:
156: /* Check if p_commit is set to TRUE */
186: FND_MSG_PUB.Count_And_Get (
187: p_count => x_msg_count,
188: p_data => x_msg_data );
189: IF (l_debug = 'Y') THEN
190: gmd_debug.put_line(' In Formula Header Pvt - In OTHERS Exception Section '
191: ||' - '
192: ||x_return_status);
193: END IF;
194:
248:
249: /* Call the Update_row procedure for mls */
250: /* To modify to call the approp variables */
251: IF (l_debug = 'Y') THEN
252: gmd_debug.put_line(' In Formula Header Pvt - Before updating fm_form_mst table '
253: ||p_formula_header_rec.formula_id);
254: END IF;
255: FM_FORM_MST_MLS.UPDATE_ROW(
256: X_FORMULA_ID => p_formula_header_rec.formula_id,
311: X_AUTO_PRODUCT_CALC => p_formula_header_rec.auto_product_calc);
312:
313: /* End API body */
314: IF (l_debug = 'Y') THEN
315: gmd_debug.put_line(' In Formula Header Pvt - After updating fm_form_mst table ');
316: END IF;
317:
318: /* Check if p_commit is set to TRUE */
319: IF FND_API.To_Boolean( p_commit ) THEN
332: FND_MSG_PUB.Count_And_Get (
333: p_count => x_msg_count,
334: p_data => x_msg_data );
335: IF (l_debug = 'Y') THEN
336: gmd_debug.put_line(' In Formula Header Pvt - In Error Exception Section '
337: ||' - '
338: ||x_return_status);
339: END IF;
340: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
343: FND_MSG_PUB.Count_And_Get (
344: p_count => x_msg_count,
345: p_data => x_msg_data );
346: IF (l_debug = 'Y') THEN
347: gmd_debug.put_line(' In Formula Header Pvt - In Unexpected Exception Section '
348: ||' - '
349: ||x_return_status);
350: END IF;
351:
356: FND_MSG_PUB.Count_And_Get (
357: p_count => x_msg_count,
358: p_data => x_msg_data );
359: IF (l_debug = 'Y') THEN
360: gmd_debug.put_line(' In Formula Header Pvt - In Others Exception Section '
361: ||' - '
362: ||x_return_status);
363: END IF;
364: