67: l_tag VARCHAR2(300);
68: l_index NUMBER;
69: BEGIN
70: BIS_DEBUG_PUB.Add('> parse_SEC_select');
71: x_return_status := FND_API.G_RET_STS_SUCCESS;
72: -- get the security tag
73: l_tag := bis_vg_parser.skip_tag
74: ( p_view_select_table
75: , p_pointer
100: bis_vg_log.update_failure_log( x_error_tbl
101: , x_return_status
102: , x_error_Tbl
103: );
104: RAISE FND_API.G_EXC_ERROR;
105:
106: END IF;
107: x_app := bis_vg_util.get_char(p_view_select_table
108: , l_pointer
160: bis_vg_log.update_failure_log( x_error_tbl
161: , x_return_status
162: , x_error_Tbl
163: );
164: RAISE FND_API.G_EXC_ERROR;
165: END IF;
166: l_index:=G_SECURITY_FUNCTION_TABLE.NEXT(l_index);
167: END LOOP;
168: ELSE
176: BIS_DEBUG_PUB.Add('< parse_SEC_select');
177:
178:
179: EXCEPTION
180: when FND_API.G_EXC_ERROR then
181: x_return_status := FND_API.G_RET_STS_ERROR ;
182: RAISE;
183: when FND_API.G_EXC_UNEXPECTED_ERROR then
184: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
177:
178:
179: EXCEPTION
180: when FND_API.G_EXC_ERROR then
181: x_return_status := FND_API.G_RET_STS_ERROR ;
182: RAISE;
183: when FND_API.G_EXC_UNEXPECTED_ERROR then
184: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
185: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
179: EXCEPTION
180: when FND_API.G_EXC_ERROR then
181: x_return_status := FND_API.G_RET_STS_ERROR ;
182: RAISE;
183: when FND_API.G_EXC_UNEXPECTED_ERROR then
184: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
185: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
186: when others then
187: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
180: when FND_API.G_EXC_ERROR then
181: x_return_status := FND_API.G_RET_STS_ERROR ;
182: RAISE;
183: when FND_API.G_EXC_UNEXPECTED_ERROR then
184: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
185: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
186: when others then
187: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
188: BIS_VG_UTIL.Add_Error_Message
181: x_return_status := FND_API.G_RET_STS_ERROR ;
182: RAISE;
183: when FND_API.G_EXC_UNEXPECTED_ERROR then
184: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
185: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
186: when others then
187: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
188: BIS_VG_UTIL.Add_Error_Message
189: ( p_error_msg_id => SQLCODE
183: when FND_API.G_EXC_UNEXPECTED_ERROR then
184: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
185: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
186: when others then
187: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
188: BIS_VG_UTIL.Add_Error_Message
189: ( p_error_msg_id => SQLCODE
190: , p_error_description => SQLERRM
191: , p_error_proc_name => G_PKG_NAME||'. parse_SEC_select'
195: bis_vg_log.update_failure_log( x_error_tbl
196: , x_return_status
197: , x_error_Tbl
198: );
199: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
200:
201: END parse_SEC_select;
202:
203:
230: l_Table BIS_VG_TYPES.view_text_table_type;
231: BEGIN
232:
233: BIS_DEBUG_PUB.Add('> add_Security_Info ');
234: x_return_status := FND_API.G_RET_STS_SUCCESS;
235:
236: Parse_SEC_Select ( p_View_Select_Table
237: , p_security_pointer
238: , l_tbl
280: --
281: BIS_DEBUG_PUB.Add('< add_Security_Info ');
282:
283: EXCEPTION
284: when FND_API.G_EXC_ERROR then
285: x_return_status := FND_API.G_RET_STS_ERROR ;
286: RAISE;
287: when FND_API.G_EXC_UNEXPECTED_ERROR then
288: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
281: BIS_DEBUG_PUB.Add('< add_Security_Info ');
282:
283: EXCEPTION
284: when FND_API.G_EXC_ERROR then
285: x_return_status := FND_API.G_RET_STS_ERROR ;
286: RAISE;
287: when FND_API.G_EXC_UNEXPECTED_ERROR then
288: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
289: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
283: EXCEPTION
284: when FND_API.G_EXC_ERROR then
285: x_return_status := FND_API.G_RET_STS_ERROR ;
286: RAISE;
287: when FND_API.G_EXC_UNEXPECTED_ERROR then
288: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
289: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
290: when others then
291: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
284: when FND_API.G_EXC_ERROR then
285: x_return_status := FND_API.G_RET_STS_ERROR ;
286: RAISE;
287: when FND_API.G_EXC_UNEXPECTED_ERROR then
288: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
289: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
290: when others then
291: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
292: BIS_VG_UTIL.Add_Error_Message
285: x_return_status := FND_API.G_RET_STS_ERROR ;
286: RAISE;
287: when FND_API.G_EXC_UNEXPECTED_ERROR then
288: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
289: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
290: when others then
291: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
292: BIS_VG_UTIL.Add_Error_Message
293: ( p_error_msg_id => SQLCODE
287: when FND_API.G_EXC_UNEXPECTED_ERROR then
288: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
289: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
290: when others then
291: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
292: BIS_VG_UTIL.Add_Error_Message
293: ( p_error_msg_id => SQLCODE
294: , p_error_description => SQLERRM
295: , p_error_proc_name => G_PKG_NAME||'.add_security_Info'
299: bis_vg_log.update_failure_log( x_error_tbl
300: , x_return_status
301: , x_error_Tbl
302: );
303: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
304:
305: END add_security_Info;
306: --
307: --