1 Package body AHL_DI_DOC_REVISION_CUHK AS
2 /* $Header: AHLCDORB.pls 115.2 2002/12/04 08:41:24 pbarman noship $ */
3
4
5
6 PROCEDURE CREATE_REVISION_PRE
7 (
8
9 p_x_revision_tbl IN OUT NOCOPY AHL_DI_DOC_REVISION_PVT.revision_tbl ,
10 x_return_status OUT NOCOPY VARCHAR2 ,
11 x_msg_count OUT NOCOPY NUMBER ,
12 x_msg_data OUT NOCOPY VARCHAR2)
13
14 AS
15
16 Begin
17
18 x_return_status:=FND_API.G_RET_STS_SUCCESS;
19 Exception
20 When Others Then
21 x_return_status:=FND_API.G_RET_STS_UNEXP_ERROR;
22 End CREATE_REVISION_PRE;
23
24
25 PROCEDURE CREATE_REVISION_POST
26 (
27
28 p_revision_tbl IN AHL_DI_DOC_REVISION_PVT.revision_tbl ,
29 x_return_status OUT NOCOPY VARCHAR2 ,
30 x_msg_count OUT NOCOPY NUMBER ,
31 x_msg_data OUT NOCOPY VARCHAR2)
32
33 AS
34
35 Begin
36 x_return_status:=FND_API.G_RET_STS_SUCCESS;
37 Exception
38 When Others Then
39 x_return_status:=FND_API.G_RET_STS_UNEXP_ERROR;
40 End CREATE_REVISION_POST;
41
42
43 PROCEDURE MODIFY_REVISION_PRE
44 (
45
46 p_x_revision_tbl IN OUT NOCOPY AHL_DI_DOC_REVISION_PVT.revision_tbl ,
47 x_return_status OUT NOCOPY VARCHAR2 ,
48 x_msg_count OUT NOCOPY NUMBER ,
49 x_msg_data OUT NOCOPY VARCHAR2)
50
51 AS
52
53 Begin
54 x_return_status:=FND_API.G_RET_STS_SUCCESS;
55 Exception
56 When Others Then
57 x_return_status:=FND_API.G_RET_STS_UNEXP_ERROR;
58 End MODIFY_REVISION_PRE ;
59
60
61
62 PROCEDURE MODIFY_REVISION_POST
63 (
64 p_revision_tbl IN AHL_DI_DOC_REVISION_PVT.revision_tbl ,
65 x_return_status OUT NOCOPY VARCHAR2 ,
66 x_msg_count OUT NOCOPY NUMBER ,
67 x_msg_data OUT NOCOPY VARCHAR2)
68
69 AS
70
71 Begin
72 x_return_status:=FND_API.G_RET_STS_SUCCESS;
73 Exception
74 When Others Then
75 x_return_status:=FND_API.G_RET_STS_UNEXP_ERROR;
76 End MODIFY_REVISION_POST;
77
78 End AHL_DI_DOC_REVISION_CUHK;