358: , p_transaction_action_id => sel_eligible_rec.transaction_action_id
359: , p_quantity => sel_eligible_rec.primary_quantity
360: , p_transaction_date => sel_eligible_rec.creation_date
361: );
362: IF x_return_status <> fnd_api.g_ret_sts_success THEN
363: x_msg_data := fnd_message.get;
364: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Error => '||x_msg_data);
365: IF g_debug = 1 THEN
366: debug('Error from update_locator_capacity - '||x_msg_data);
410: , p_transaction_action_id => sel_new_rec.transaction_action_id
411: , p_quantity => sel_new_rec.primary_quantity
412: , p_transaction_date => sel_new_rec.creation_date
413: );
414: IF x_return_status <> fnd_api.g_ret_sts_success THEN
415: x_msg_data := fnd_message.get;
416: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Error => '||x_msg_data);
417:
418: IF g_debug = 1 THEN
451: , p_transaction_action_id => sel_new_rec.transaction_action_id
452: , p_quantity => sel_new_rec.primary_quantity
453: , p_transaction_date => sel_new_rec.creation_date
454: );
455: IF x_return_status <> fnd_api.g_ret_sts_success THEN
456: x_msg_data := fnd_message.get;
457: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Error => '||x_msg_data);
458:
459: IF g_debug = 1 THEN
753: IF SQLCODE = -6550 THEN
754: l_plsql_msg_data := 'PL/SQL procedure -> ' || l_meaning ||' has some errors. Re-compile the procedure';
755: END IF;
756: l_success := FALSE;
757: x_return_Status:= fnd_api.g_ret_sts_error;
758: l_plsql_blk_failed := 'Y';
759: END;
760:
761: IF g_debug = 1 THEN
761: IF g_debug = 1 THEN
762: debug('x_return_Status -> ' ||x_return_Status);
763: END IF;
764:
765: IF x_return_Status = fnd_api.g_ret_sts_success THEN
766: IF g_debug = 1 THEN
767: debug(l_progress ||' : l_custom_reading from custom procedure => '||l_custom_reading );
768: END IF;
769: ELSIF x_return_Status IN (fnd_api.g_ret_sts_error, fnd_api.g_ret_sts_unexp_error) THEN
765: IF x_return_Status = fnd_api.g_ret_sts_success THEN
766: IF g_debug = 1 THEN
767: debug(l_progress ||' : l_custom_reading from custom procedure => '||l_custom_reading );
768: END IF;
769: ELSIF x_return_Status IN (fnd_api.g_ret_sts_error, fnd_api.g_ret_sts_unexp_error) THEN
770: l_success := FALSE;
771: l_rec_failed := l_rec_failed +1;
772: -- get the messages returned from seeded/custom source
773: l_plsql_blk_failed := 'Y';
770: l_success := FALSE;
771: l_rec_failed := l_rec_failed +1;
772: -- get the messages returned from seeded/custom source
773: l_plsql_blk_failed := 'Y';
774: IF x_return_status <> fnd_api.g_ret_sts_success THEN
775: x_msg_data := fnd_message.get;
776: if x_msg_data IS NOT NULL THEN
777: l_plsql_msg_data := x_msg_data;
778: end if;
841: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Contract number : '|| v_contract_number);
842: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Billing source name : '|| v_billing_source_name);
843:
844: IF (l_plsql_blk_failed = 'Y') AND
845: (x_return_status <> fnd_api.g_ret_sts_success) THEN
846: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Error from custom/seeded source => '||l_plsql_msg_data);
847: END IF;
848: l_printed_in_outfile := 'Y';
849: