DBA Data[Home] [Help]

PACKAGE BODY: APPS.AMS_ADV_FILTER_PKG

Source


1 PACKAGE BODY AMS_ADV_FILTER_PKG as
2 /* $Header: amstadfb.pls 120.1 2005/06/27 05:39:16 appldev ship $ */
3 -- ===============================================================
4 -- Start of Comments
5 -- Package name
6 --          AMS_ADV_FILTER_PKG
7 -- Purpose
8 --
9 -- History
10 --
11 -- NOTE
12 --
13 -- End of Comments
14 -- ===============================================================
15 
16 
17 G_PKG_NAME CONSTANT VARCHAR2(30):= 'AMS_ADV_FILTER_PKG';
18 G_FILE_NAME CONSTANT VARCHAR2(12) := 'amstadfb.pls';
19 
20 --  ========================================================
21 --
22 --  NAME
23 --  createInsertBody
24 --
25 --  PURPOSE  To create a Database record in JTF_PERZ_QUERY_PARAM table.
26 --
27 --  NOTES
28 --
29 --  HISTORY
30 --
31 --  ========================================================
32 PROCEDURE Insert_Row(
33           px_query_param_id  IN OUT NOCOPY    NUMBER,
34           p_query_id                   NUMBER,
35           p_parameter_name             VARCHAR2,
36           p_parameter_type             VARCHAR2,
37           p_parameter_value            VARCHAR2,
38           p_parameter_condition        VARCHAR2,
39           p_parameter_sequence         NUMBER,
40           p_created_by                 NUMBER,
41           p_last_updated_by            NUMBER,
42           p_last_update_date           DATE,
43           p_last_update_login          NUMBER,
44           p_security_group_id          NUMBER
45                      )
46 
47  IS
48    x_rowid    VARCHAR2(30);
49 
50 
51 BEGIN
52 
53 
54    INSERT INTO JTF_PERZ_QUERY_PARAM
55    (
56            query_param_id,
57            query_id,
58            parameter_name,
59            parameter_type,
60            parameter_value,
61            parameter_condition,
62            parameter_sequence,
63            created_by,
64            last_updated_by,
65            last_update_date,
66            last_update_login,
67            security_group_id
68    ) VALUES
69    (
70            DECODE( px_query_param_id, FND_API.g_miss_num, NULL, px_query_param_id),
71            DECODE( p_query_id, FND_API.g_miss_num, NULL, p_query_id),
72            DECODE( p_parameter_name, FND_API.g_miss_char, NULL, p_parameter_name),
73            DECODE( p_parameter_type, FND_API.g_miss_char, NULL, p_parameter_type),
74            DECODE( p_parameter_value, FND_API.g_miss_char, NULL, p_parameter_value),
75            DECODE( p_parameter_condition, FND_API.g_miss_char, NULL, p_parameter_condition),
76            DECODE( p_parameter_sequence, FND_API.g_miss_num, NULL, p_parameter_sequence),
77            DECODE( p_created_by, FND_API.g_miss_num, NULL, p_created_by),
78            DECODE( p_last_updated_by, FND_API.g_miss_num, NULL, p_last_updated_by),
79            DECODE( p_last_update_date, FND_API.g_miss_date, NULL, p_last_update_date),
80            DECODE( p_last_update_login, FND_API.g_miss_num, NULL, p_last_update_login),
81            DECODE( p_security_group_id, FND_API.g_miss_num, NULL, p_security_group_id)
82    );
83 END Insert_Row;
84 
85 
86 
87 --  ========================================================
88 --
89 --  NAME
90 --  create UpdateBody
91 --
92 --  PURPOSE  Update the Record in JTF_PERZ_QUERY_PARAM table.
93 --
94 --  NOTES
95 --
96 --  HISTORY
97 --
98 --  ========================================================
99 PROCEDURE Update_Row(
100           px_query_param_id         NUMBER,
101           p_query_id                NUMBER,
102           p_parameter_name          VARCHAR2,
103           p_parameter_type          VARCHAR2,
104           p_parameter_value         VARCHAR2,
105           p_parameter_condition     VARCHAR2,
106           p_parameter_sequence      NUMBER,
107           p_last_updated_by         NUMBER,
108           p_last_update_date        DATE,
109           p_last_update_login       NUMBER,
110           p_security_group_id       NUMBER
111                  )
112  IS
113          l_flag   VARCHAR2(4);
114  BEGIN
115          AMS_UTILITY_PVT.debug_message('Table Handler API: Update_row');
116 
117     Update JTF_PERZ_QUERY_PARAM
118     SET
119            parameter_name = DECODE( p_parameter_name, FND_API.g_miss_char, parameter_name, p_parameter_name),
120            parameter_value = DECODE( p_parameter_value, FND_API.g_miss_char, parameter_value, p_parameter_value),
121            parameter_condition = DECODE( p_parameter_condition, FND_API.g_miss_char, parameter_condition, p_parameter_condition),
122            parameter_sequence = DECODE( p_parameter_sequence, FND_API.g_miss_num, parameter_sequence, p_parameter_sequence),
123            last_updated_by = DECODE( p_last_updated_by, FND_API.g_miss_num, last_updated_by, p_last_updated_by),
124            last_update_date = DECODE( p_last_update_date, FND_API.g_miss_date, last_update_date, p_last_update_date),
125            last_update_login = DECODE( p_last_update_login, FND_API.g_miss_num, last_update_login, p_last_update_login),
126            security_group_id = DECODE( p_security_group_id, FND_API.g_miss_num, security_group_id, p_security_group_id)
127    WHERE   query_param_id = px_query_param_id
128    AND     query_id = p_query_id
129    AND     parameter_type = p_parameter_type ;
130 
131    IF (SQL%NOTFOUND) THEN
132      l_flag := 'true';
133      AMS_UTILITY_PVT.debug_message('Table Handler API: Update_row Flag '|| l_flag);
134      RAISE  FND_API.G_EXC_UNEXPECTED_ERROR;
135    ELSE
136      commit;
137    END IF;
138 
139 END Update_Row;
140 
141 
142 --  ========================================================
143 --
144 --  NAME
145 --  createDeleteBody
146 --
147 --  PURPOSE  Delete a Row from JTF_PERZ_QUERY_PARAM Table.
148 --
149 --  NOTES
150 --
151 --  HISTORY
152 --
153 --  ========================================================
154 PROCEDURE Delete_Row(
155     p_query_param_id NUMBER)
156  IS
157  BEGIN
158     DELETE FROM JTF_PERZ_QUERY_PARAM
159     WHERE query_param_id = p_query_param_id;
160    If (SQL%NOTFOUND) then
161       RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
162    End If;
163  END Delete_Row ;
164 
165 
166 
167 END AMS_ADV_FILTER_PKG;