The following lines contain the word 'select', 'insert', 'update' or 'delete':
, x_select_predicate IN OUT NOCOPY VARCHAR2
, x_note_type_predicate IN OUT NOCOPY VARCHAR2
, x_select_access IN OUT NOCOPY NUMBER
, x_create_access IN OUT NOCOPY NUMBER
, x_update_note_access IN OUT NOCOPY NUMBER
, x_update_note_details_access IN OUT NOCOPY NUMBER
, x_update_secondary_access IN OUT NOCOPY NUMBER
, x_delete_access IN OUT NOCOPY NUMBER
, x_return_status OUT NOCOPY VARCHAR2
, x_msg_count OUT NOCOPY NUMBER
, x_msg_data OUT NOCOPY VARCHAR2
) IS
l_api_name CONSTANT VARCHAR2(30) := 'check_notes_access';
IF (x_select_predicate IS NULL)
THEN
get_security_predicate
( p_api_version => 1.0
, p_init_msg_list => FND_API.G_FALSE
, p_object_name => G_OBJECT_NOTE
, p_function => G_FUNCTION_SELECT
, p_statement_type => 'OTHER'
, p_table_alias => NULL
, x_predicate => x_select_predicate
, x_return_status => x_return_status
, x_msg_count => x_msg_count
, x_msg_data => x_msg_data
);
, p_function => G_FUNCTION_TYPE_SELECT
, p_statement_type => 'OTHER'
, p_table_alias => NULL
, x_predicate => x_note_type_predicate
, x_return_status => x_return_status
, x_msg_count => x_msg_count
, x_msg_data => x_msg_data
);
((x_select_access NOT IN (0,1)) OR
(x_update_note_access NOT IN (0,1)) OR
(x_update_note_details_access NOT IN (0,1)) OR
(x_update_secondary_access NOT IN (0,1)) OR
(x_delete_access NOT IN (0,1))))
THEN
x_select_access := 0;
x_update_note_access := 0;
x_update_note_details_access := 0;
x_update_secondary_access := 0;
x_delete_access := 0;
IF (l_privilege_tbl(i) = G_FUNCTION_SELECT)
THEN
x_select_access := 1;
ELSIF (l_privilege_tbl(i) = G_FUNCTION_UPDATE_NOTE)
THEN
x_update_note_access := 1;
ELSIF (l_privilege_tbl(i) = G_FUNCTION_UPDATE_NOTE_DTLS)
THEN
x_update_note_details_access := 1;
ELSIF (l_privilege_tbl(i) = G_FUNCTION_UPDATE_SEC)
THEN
x_update_secondary_access := 1;
ELSIF (l_privilege_tbl(i) = G_FUNCTION_DELETE)
THEN
x_delete_access := 1;
x_select_predicate := 0;
x_select_access := 0;
x_update_note_access := 0;
x_update_note_details_access := 0;
x_update_secondary_access := 0;
x_delete_access := 0;
x_select_predicate := 0;
x_select_access := 0;
x_update_note_access := 0;
x_update_note_details_access := 0;
x_update_secondary_access := 0;
x_delete_access := 0;
l_query VARCHAR2(4000) := 'SELECT COUNT(1) '
||'FROM FND_LOOKUPS FNS '
||'WHERE FNS.LOOKUP_TYPE = ''JTF_NOTE_TYPE'' '
||'AND FNS.LOOKUP_CODE = :A ';
, p_function => G_FUNCTION_TYPE_SELECT
, p_statement_type => 'OTHER'
, p_table_alias => 'FNS'
, x_predicate => l_predicate
, x_return_status => x_return_status
, x_msg_count => x_msg_count
, x_msg_data => x_msg_data
);
FUNCTION check_update_sec_access
-- --------------------------------------------------------------------------
-- Start of notes
-- API Name : check_update_sec_access
-- Type : Private
-- Usage : Check notes access using AOL security
-- Version : Initial version 1.0
--
--
-- End of notes
-- --------------------------------------------------------------------------
( p_note_id IN NUMBER
) RETURN INTEGER
IS
retAccess INTEGER := 0;
, p_function => G_FUNCTION_UPDATE_SEC
, p_object_name => G_OBJECT_NOTE
, p_instance_pk1_value => p_note_id
, p_instance_pk2_value => NULL
, p_instance_pk3_value => NULL
, p_instance_pk4_value => NULL
, p_instance_pk5_value => NULL
, p_user_name => NULL
, x_return_status => l_return_status
, x_grant => retAccess
, x_msg_count => l_msg_count
, x_msg_data => l_msg_data
);
END check_update_sec_access;
FUNCTION check_update_prim_access
-- --------------------------------------------------------------------------
-- Start of notes
-- API Name : check_update_prim_access
-- Type : Private
-- Usage : Check notes access using AOL security
-- Version : Initial version 1.0
--
--
-- End of notes
-- --------------------------------------------------------------------------
( p_note_id IN NUMBER
) RETURN INTEGER
IS
retAccess INTEGER := 0;
, p_function => G_FUNCTION_UPDATE_NOTE_DTLS
, p_object_name => G_OBJECT_NOTE
, p_instance_pk1_value => p_note_id
, p_instance_pk2_value => NULL
, p_instance_pk3_value => NULL
, p_instance_pk4_value => NULL
, p_instance_pk5_value => NULL
, p_user_name => NULL
, x_return_status => l_return_status
, x_grant => retAccess
, x_msg_count => l_msg_count
, x_msg_data => l_msg_data
);
, p_function => G_FUNCTION_UPDATE_NOTE
, p_object_name => G_OBJECT_NOTE
, p_instance_pk1_value => p_note_id
, p_instance_pk2_value => NULL
, p_instance_pk3_value => NULL
, p_instance_pk4_value => NULL
, p_instance_pk5_value => NULL
, p_user_name => NULL
, x_return_status => l_return_status
, x_grant => retAccess
, x_msg_count => l_msg_count
, x_msg_data => l_msg_data
);
END check_update_prim_access;
FUNCTION check_delete_access
-- --------------------------------------------------------------------------
-- Start of notes
-- API Name : check_update_sec_access
-- Type : Private
-- Usage : Check notes access using AOL security
-- Version : Initial version 1.0
--
--
-- End of notes
-- --------------------------------------------------------------------------
( p_note_id IN NUMBER
) RETURN INTEGER
IS
retAccess INTEGER := 0;
, p_function => G_FUNCTION_DELETE
, p_object_name => G_OBJECT_NOTE
, p_instance_pk1_value => p_note_id
, p_instance_pk2_value => NULL
, p_instance_pk3_value => NULL
, p_instance_pk4_value => NULL
, p_instance_pk5_value => NULL
, p_user_name => NULL
, x_return_status => l_return_status
, x_grant => retAccess
, x_msg_count => l_msg_count
, x_msg_data => l_msg_data
);
END check_delete_access;