518: || to_char(l_stmt_num)
519: || '): '
520: || l_err_msg
521: || '. ',1,240);
522: fnd_message.set_name('BOM', 'CST_NO_WIP_COMP_TXN');
523: x_err_msg := SUBSTR(fnd_message.get,1,2000);
524:
525: WHEN CST_FAIL_METHOD_HOOK THEN
526: x_err_num := 20010;
519: || '): '
520: || l_err_msg
521: || '. ',1,240);
522: fnd_message.set_name('BOM', 'CST_NO_WIP_COMP_TXN');
523: x_err_msg := SUBSTR(fnd_message.get,1,2000);
524:
525: WHEN CST_FAIL_METHOD_HOOK THEN
526: x_err_num := 20010;
527: x_err_code := SUBSTR('CSTPPWMT.charge_wip_material('
528: || to_char(l_stmt_num)
529: || '): '
530: || l_err_msg
531: || '. ',1,240);
532: fnd_message.set_name('BOM', 'CST_FAIL_METHOD_HOOK');
533: x_err_msg := SUBSTR(fnd_message.get,1,2000);
534:
535: WHEN CST_PROCESS_ERROR THEN
536: x_err_num := l_err_num;
529: || '): '
530: || l_err_msg
531: || '. ',1,240);
532: fnd_message.set_name('BOM', 'CST_FAIL_METHOD_HOOK');
533: x_err_msg := SUBSTR(fnd_message.get,1,2000);
534:
535: WHEN CST_PROCESS_ERROR THEN
536: x_err_num := l_err_num;
537: x_err_code := l_err_code;