510: || to_char(l_stmt_num)
511: || '): '
512: || l_err_msg
513: || '. ',1,240);
514: fnd_message.set_name('BOM', 'CST_NO_WIP_COMP_TXN');
515: x_err_msg := SUBSTR(fnd_message.get,1,2000);
516:
517: WHEN CST_FAIL_METHOD_HOOK THEN
518: x_err_num := 20010;
511: || '): '
512: || l_err_msg
513: || '. ',1,240);
514: fnd_message.set_name('BOM', 'CST_NO_WIP_COMP_TXN');
515: x_err_msg := SUBSTR(fnd_message.get,1,2000);
516:
517: WHEN CST_FAIL_METHOD_HOOK THEN
518: x_err_num := 20010;
519: x_err_code := SUBSTR('CSTPPWMT.charge_wip_material('
520: || to_char(l_stmt_num)
521: || '): '
522: || l_err_msg
523: || '. ',1,240);
524: fnd_message.set_name('BOM', 'CST_FAIL_METHOD_HOOK');
525: x_err_msg := SUBSTR(fnd_message.get,1,2000);
526:
527: WHEN CST_PROCESS_ERROR THEN
528: x_err_num := l_err_num;
521: || '): '
522: || l_err_msg
523: || '. ',1,240);
524: fnd_message.set_name('BOM', 'CST_FAIL_METHOD_HOOK');
525: x_err_msg := SUBSTR(fnd_message.get,1,2000);
526:
527: WHEN CST_PROCESS_ERROR THEN
528: x_err_num := l_err_num;
529: x_err_code := l_err_code;