[Home] [Help]
PACKAGE BODY: APPS.DPP_BPEL_POLLCREATENOTIF
Source
1 PACKAGE BODY dpp_bpel_pollcreatenotif AS
2 /* $Header: dppvbpnb.pls 120.1 2011/07/14 09:59:22 rvkondur ship $ */
3 FUNCTION wait_for_request(p_request_id NUMBER, p_interval NUMBER, p_max_wait NUMBER, x_phase OUT NOCOPY VARCHAR2,
4 x_status OUT NOCOPY VARCHAR2, x_dev_phase OUT NOCOPY VARCHAR2, x_dev_status OUT NOCOPY VARCHAR2,
5 x_message OUT NOCOPY VARCHAR2, x_error_message OUT NOCOPY VARCHAR2) RETURN INTEGER IS x_return INTEGER;
6 BEGIN
7 x_return := sys.sqljutl.bool2int(fnd_concurrent.wait_for_request(p_request_id, p_interval, p_max_wait,
8 x_phase, x_status, x_dev_phase, x_dev_status, x_message));
9
10 IF(x_return = 0) THEN
11 fnd_message.set_name('DPP', 'DPP_BPEL_CONC_PGM_NOINFO');
12 fnd_message.set_token('TOKEN_01', p_request_id);
13 x_error_message := fnd_message.GET;
14
15 ELSIF(x_dev_status = 'DELETED') THEN
16 fnd_message.set_name('DPP', 'DPP_BPEL_CONC_PGM_DELETED');
17 fnd_message.set_token('TOKEN_01', p_request_id);
18 x_error_message := fnd_message.GET;
19
20 ELSIF(x_dev_status = 'TERMINATED') THEN
21 fnd_message.set_name('DPP', 'DPP_BPEL_CONC_PGM_TERMINATED');
22 fnd_message.set_token('TOKEN_01', p_request_id);
23 x_error_message := fnd_message.GET;
24
25 ELSIF(x_dev_status = 'ERROR') THEN
26 fnd_message.set_name('DPP', 'DPP_BPEL_CONC_PGM_ERROR');
27 fnd_message.set_token('TOKEN_01', p_request_id);
28 x_error_message := fnd_message.GET;
29
30 ELSIF(x_dev_status = 'NO_MANAGER') THEN
31 fnd_message.set_name('DPP', 'DPP_BPEL_CONC_PGM_NO_MANAGER');
32 fnd_message.set_token('TOKEN_01', p_request_id);
33 x_error_message := fnd_message.GET;
34
35 ELSIF(x_dev_status = 'DISABLED') THEN
36 fnd_message.set_name('DPP', 'DPP_BPEL_CONC_PGM_DISABLED');
37 fnd_message.set_token('TOKEN_01', p_request_id);
38 x_error_message := fnd_message.GET;
39 END IF;
40
41 RETURN x_return;
42 END wait_for_request;
43
44 END dpp_bpel_pollcreatenotif;