APPS.AR_CREATE_ACCTING_SRS dependencies on FND_API

Line 4: g_exec_status VARCHAR2(1) := fnd_api.G_RET_STS_SUCCESS;

1: PACKAGE BODY ar_create_accting_srs AS
2: /*$Header: ARSACCTB.pls 120.14 2010/09/20 13:51:56 rmanikan ship $*/
3:
4: g_exec_status VARCHAR2(1) := fnd_api.G_RET_STS_SUCCESS;
5:
6: g_xla_run VARCHAR2(1) := 'Y';
7: --Local procedures
8: PROCEDURE log(

Line 49: l_msg_data := l_msg_data || FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE );

45: BEGIN
46: FND_MSG_PUB.Reset;
47:
48: FOR I IN 1..FND_MSG_PUB.Count_Msg LOOP
49: l_msg_data := l_msg_data || FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE );
50: END LOOP;
51: IF (SQLERRM IS NOT NULL) THEN
52: l_msg_data := l_msg_data || SQLERRM;
53: END IF;

Line 395: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,

391: g_xla_run := 'N';
392: IF c_valid_date%ISOPEN THEN
393: CLOSE c_valid_date;
394: END IF;
395: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
396: p_count => x_msg_count,
397: p_data => x_msg_data);
398: out(message => x_msg_data);
399: log(message => x_msg_data);

Line 448: -- RAISE fnd_api.G_EXC_UNEXPECTED_ERROR;

444: --{If required, we can control the error handling at concurrent process level
445: -- but as this is part of the accounting posting process if revrec or rev analyser fails
446: -- for now we allow the accouning for the cash receipts
447: -- IF l_dev_status IN ('TERMINATED', 'CANCELLED', 'ERROR') THEN
448: -- RAISE fnd_api.G_EXC_UNEXPECTED_ERROR;
449: -- END IF;
450: --}
451: END IF;
452: END LOOP;

Line 467: WHEN fnd_api.G_EXC_UNEXPECTED_ERROR THEN

463: WHEN revrecdone THEN
464: IF reqs%ISOPEN THEN
465: CLOSE reqs;
466: END IF;
467: WHEN fnd_api.G_EXC_UNEXPECTED_ERROR THEN
468: g_exec_status := fnd_api.G_RET_STS_UNEXP_ERROR;
469: WHEN OTHERS THEN
470: IF reqs%ISOPEN THEN
471: CLOSE reqs;

Line 468: g_exec_status := fnd_api.G_RET_STS_UNEXP_ERROR;

464: IF reqs%ISOPEN THEN
465: CLOSE reqs;
466: END IF;
467: WHEN fnd_api.G_EXC_UNEXPECTED_ERROR THEN
468: g_exec_status := fnd_api.G_RET_STS_UNEXP_ERROR;
469: WHEN OTHERS THEN
470: IF reqs%ISOPEN THEN
471: CLOSE reqs;
472: END IF;