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