The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE parse_SEC_select
( p_View_Select_Table IN BIS_VG_TYPES.View_Text_Table_Type
, p_pointer IN BIS_VG_TYPES.View_Character_Pointer_Type
, x_tbl OUT VARCHAR2
, x_app OUT VARCHAR2
, x_pointer OUT BIS_VG_TYPES.View_Character_Pointer_Type
, x_return_status OUT VARCHAR2
, x_error_Tbl OUT BIS_VG_UTIL.Error_Tbl_Type
)
IS
l_pointer BIS_VG_TYPES.View_Character_Pointer_Type;
BIS_DEBUG_PUB.Add('> parse_SEC_select');
( p_view_select_table
, p_pointer
, l_pointer
, x_return_status
, x_error_Tbl
);
x_tbl := bis_vg_parser.get_token ( p_view_select_table
, l_pointer
, ':'''
, l_pointer
, x_return_status
, x_error_Tbl
);
, p_error_proc_name => G_PKG_NAME||'.parse_SEC_select '
, p_error_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR
, p_token1 => 'tag'
, p_value1 => l_tag
, p_error_table => x_error_tbl
, x_error_table => x_error_tbl
);
bis_vg_log.update_failure_log( x_error_tbl
, x_return_status
, x_error_Tbl
);
x_app := bis_vg_util.get_char(p_view_select_table
, l_pointer
, x_return_status
, x_error_Tbl
);
l_pointer := bis_vg_util.increment_pointer( p_view_select_table
, l_pointer
, x_return_status
, x_error_Tbl
);
x_tbl := bis_vg_parser.get_token_increment_pointer( p_view_select_table
, l_pointer
, ''''
, l_pointer
, x_return_status
, x_error_Tbl
);
, p_error_proc_name => G_PKG_NAME||'. parse_SEC_select'
, p_error_table => x_error_tbl
, p_token1 => 'tag'
, p_value1 => l_tag
, p_token2 => 'function'
, p_value2 => x_app
, p_error_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR
, x_error_table => x_error_tbl
);
bis_vg_log.update_failure_log( x_error_tbl
, x_return_status
, x_error_Tbl
);
BIS_DEBUG_PUB.Add('< parse_SEC_select');
, p_error_proc_name => G_PKG_NAME||'. parse_SEC_select'
, p_error_table => x_error_tbl
, x_error_table => x_error_tbl
);
bis_vg_log.update_failure_log( x_error_tbl
, x_return_status
, x_error_Tbl
);
END parse_SEC_select;
( p_View_Select_Table IN BIS_VG_TYPES.View_Text_Table_Type
, p_security_pointer IN BIS_VG_TYPES.view_character_pointer_type
, x_Select_Table OUT BIS_VG_TYPES.view_text_table_type
, x_security_pointer OUT BIS_VG_TYPES.view_character_pointer_type
, x_return_status OUT VARCHAR2
, x_error_Tbl OUT BIS_VG_UTIL.Error_Tbl_Type
)
IS
l_tbl VARCHAR2(100);
Parse_SEC_Select ( p_View_Select_Table
, p_security_pointer
, l_tbl
, l_app
, l_pointer
, x_return_status
, x_error_Tbl
);
x_select_table(x_select_table.COUNT + 1) := l_result;
( p_View_Select_Table
, l_table
, l_pointer
, x_return_status
, x_error_Tbl
);
x_security_pointer := bis_vg_util.increment_pointer( p_view_select_table
, x_security_pointer
, x_return_status
, x_error_Tbl
);
bis_vg_log.update_failure_log( x_error_tbl
, x_return_status
, x_error_Tbl
);