[Home] [Help]
PACKAGE: APPS.AHL_LTP_SPACE_UNAVL_PVT
Source
1 PACKAGE AHL_LTP_SPACE_UNAVL_PVT AUTHID CURRENT_USER AS
2 /* $Header: AHLVSUAS.pls 115.7 2002/12/04 19:35:22 ssurapan noship $ */
3
4 -----------------------------------------------------------
5 -- PACKAGE
6 -- AHL_SPACE_UNAVL_PVT
7 --
8 -- PURPOSE
9 -- This package is a Private API for managing Space Unavailable information in
10 -- Advanced Services Online. It contains specification for pl/sql records and tables
11 --
12 -- AHL_SPACE_UNAVIALABLE_VL:
13 -- Create_Space_Restriction (see below for specification)
14 -- Update_Space_Restriction (see below for specification)
15 -- Delete_Space_Restriction (see below for specification)
16 -- Validate_Space_Restriction (see below for specification)
17 --
18 --
19 -- NOTES
20 --
21 --
22 -- HISTORY
23 -- 17-Apr-2002 ssurapan Created.
24 -----------------------------------------------------------
25
26 -------------------------------------
27 ----- SPACE UNAVAILABILITY -----
28 -------------------------------------
29 TYPE Space_Restriction_Rec IS RECORD (
30 space_unavailability_id NUMBER,
31 last_update_date DATE,
32 last_updated_by NUMBER,
33 creation_date DATE,
34 created_by NUMBER,
35 last_update_login NUMBER,
36 object_version_number NUMBER,
37 organization_id NUMBER,
38 org_name VARCHAR2(240),
39 department_id NUMBER,
40 dept_description VARCHAR2(240),
41 space_id NUMBER,
42 space_name VARCHAR2(30),
43 start_date DATE,
44 end_date DATE,
45 description VARCHAR2(2000),
46 attribute_category VARCHAR2(30),
47 attribute1 VARCHAR2(150),
48 attribute2 VARCHAR2(150),
49 attribute3 VARCHAR2(150),
50 attribute4 VARCHAR2(150),
51 attribute5 VARCHAR2(150),
52 attribute6 VARCHAR2(150),
53 attribute7 VARCHAR2(150),
54 attribute8 VARCHAR2(150),
55 attribute9 VARCHAR2(150),
56 attribute10 VARCHAR2(150),
57 attribute11 VARCHAR2(150),
58 attribute12 VARCHAR2(150),
59 attribute13 VARCHAR2(150),
60 attribute14 VARCHAR2(150),
61 attribute15 VARCHAR2(150),
62 operation_flag VARCHAR2(1)
63 );
64
65 --Declare table type
66 TYPE space_restriction_tbl IS TABLE OF Space_Restriction_Rec
67 INDEX BY BINARY_INTEGER;
68
69 --------------------------------------------------------------------
70 -- PROCEDURE
71 -- Create_Space_Restriction
72 --
73 -- PURPOSE
74 -- Create Space Restriction Record
75 --
76 -- PARAMETERS
77 -- p_space_restriction_rec: the record representing AHL_SPACE_UNAVAILABLE_VL view..
78 -- x_space_unavailability_id: the space_unavailability_id.
79 --
80 -- NOTES
81 --------------------------------------------------------------------
82 PROCEDURE Create_Space_Restriction (
83 p_api_version IN NUMBER,
84 p_init_msg_list IN VARCHAR2 := FND_API.g_false,
85 p_commit IN VARCHAR2 := FND_API.g_false,
86 p_validation_level IN NUMBER := FND_API.g_valid_level_full,
87 p_module_type IN VARCHAR2 := 'JSP',
88 p_x_space_restriction_rec IN OUT NOCOPY ahl_ltp_space_unavl_pub.Space_Restriction_Rec,
89 x_return_status OUT NOCOPY VARCHAR2,
90 x_msg_count OUT NOCOPY NUMBER,
91 x_msg_data OUT NOCOPY VARCHAR2
92 );
93
94 --------------------------------------------------------------------
95 -- PROCEDURE
96 -- Update_Space_Restriction
97 --
98 -- PURPOSE
99 -- Update Space Restriction Record.
100 --
101 -- PARAMETERS
102 -- p_space_restriction_rec: the record representing AHL_SPACE_UNAVAILABLE_VL
103 --
104 -- NOTES
105 --------------------------------------------------------------------
106 PROCEDURE Update_Space_Restriction (
107 p_api_version IN NUMBER,
108 p_init_msg_list IN VARCHAR2 := FND_API.g_false,
109 p_commit IN VARCHAR2 := FND_API.g_false,
110 p_validation_level IN NUMBER := FND_API.g_valid_level_full,
111 p_module_type IN VARCHAR2 := 'JSP',
112 p_space_restriction_rec IN ahl_ltp_space_unavl_pub.Space_Restriction_Rec,
113 x_return_status OUT NOCOPY VARCHAR2,
114 x_msg_count OUT NOCOPY NUMBER,
115 x_msg_data OUT NOCOPY VARCHAR2
116 );
117
118 --------------------------------------------------------------------
119 -- PROCEDURE
120 -- Delete_Space_Restriction
121 --
122 -- PURPOSE
123 -- Delete Space Restriction Record.
124 --
125 -- PARAMETERS
126 -- p_space_unavailability_id: the space unavailability id
127 -- p_object_version_number: the object_version_number
128 --
129 -- ISSUES
130 --
131 -- NOTES
132 -- 1. Raise exception if the object_version_number doesn't match.
133 --------------------------------------------------------------------
134 PROCEDURE Delete_Space_Restriction (
135 p_api_version IN NUMBER,
136 p_init_msg_list IN VARCHAR2 := FND_API.g_false,
137 p_commit IN VARCHAR2 := FND_API.g_false,
138 p_validation_level IN NUMBER := FND_API.g_valid_level_full,
139 p_space_restriction_rec IN ahl_ltp_space_unavl_pub.Space_Restriction_Rec,
140 x_return_status OUT NOCOPY VARCHAR2,
141 x_msg_count OUT NOCOPY NUMBER,
142 x_msg_data OUT NOCOPY VARCHAR2
143
144 );
145
146 END AHL_LTP_SPACE_UNAVL_PVT;