1 package body CSI_CLIENT_EXT_PUB AS
2 -- $Header: csiclexb.pls 120.0 2005/05/25 02:35:08 appldev noship $
3
4 l_debug NUMBER := csi_t_gen_utility_pvt.g_debug_level;
5
6 PROCEDURE mtl_post_transaction(p_transaction_id IN NUMBER,
7 x_return_status OUT NOCOPY VARCHAR2,
8 x_error_message OUT NOCOPY VARCHAR2)
9 IS
10 BEGIN
11
12 -- Replace this with your code here
13
14 x_return_status := FND_API.G_RET_STS_SUCCESS;
15 x_error_message := NULL;
16
17 EXCEPTION
18
19 WHEN OTHERS THEN
20 x_return_status := FND_API.G_RET_STS_ERROR;
21 x_error_message := sqlerrm;
22
23 END mtl_post_transaction;
24
25
26 PROCEDURE rcv_post_transaction(p_transaction_id IN NUMBER,
27 x_return_status OUT NOCOPY VARCHAR2,
28 x_error_message OUT NOCOPY VARCHAR2)
29 IS
30 BEGIN
31
32 -- Replace this with your code here
33
34 x_return_status := FND_API.G_RET_STS_SUCCESS;
35 x_error_message := NULL;
36
37 EXCEPTION
38
39 WHEN OTHERS THEN
40 x_return_status := FND_API.G_RET_STS_ERROR;
41 x_error_message := sqlerrm;
42
43 END rcv_post_transaction;
44
45 PROCEDURE csi_error_resubmit(p_transaction_id IN NUMBER,
46 x_return_status OUT NOCOPY VARCHAR2,
47 x_error_message OUT NOCOPY VARCHAR2)
48 IS
49 BEGIN
50
51 -- Replace this with your code here
52
53 x_return_status := FND_API.G_RET_STS_ERROR;
54 x_error_message := NULL;
55
56 -- After you put your custom code here you should then replace the x_return_status
57 -- with the following line of commented out code . Initially "E" is being passed
58 -- out in the return status so that the error will be retained in csi_txn_errors table.
59
60 --x_return_status := FND_API.G_RET_STS_SUCCESS;
61
62 EXCEPTION
63
64 WHEN OTHERS THEN
65 x_return_status := FND_API.G_RET_STS_ERROR;
66 x_error_message := sqlerrm;
67
68 END csi_error_resubmit;
69
70 end CSI_CLIENT_EXT_PUB;