The following lines contain the word 'select', 'insert', 'update' or 'delete':
l_QUALIFIERS_rec.operation := QP_GLOBALS.G_OPR_UPDATE;
, x_last_update_date OUT NOCOPY /* file.sql.39 change */ DATE
, x_last_updated_by OUT NOCOPY /* file.sql.39 change */ NUMBER
, x_last_update_login OUT NOCOPY /* file.sql.39 change */ NUMBER
, x_program_application_id OUT NOCOPY /* file.sql.39 change */ NUMBER
, x_program_id OUT NOCOPY /* file.sql.39 change */ NUMBER
, x_program_update_date OUT NOCOPY /* file.sql.39 change */ DATE
, x_request_id OUT NOCOPY /* file.sql.39 change */ NUMBER
)
IS
l_QUALIFIERS_rec QP_Qualifier_Rules_PUB.Qualifiers_Rec_Type;
l_QUALIFIERS_rec.operation := QP_GLOBALS.G_OPR_UPDATE;
x_last_update_date := l_x_QUALIFIERS_rec.last_update_date;
x_last_updated_by := l_x_QUALIFIERS_rec.last_updated_by;
x_last_update_login := l_x_QUALIFIERS_rec.last_update_login;
x_program_update_date := l_x_QUALIFIERS_rec.program_update_date;
PROCEDURE Delete_Row
( x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2
, x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER
, x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2
, p_qualifier_id IN NUMBER
)
IS
l_QUALIFIERS_rec QP_Qualifier_Rules_PUB.Qualifiers_Rec_Type;
l_QUALIFIERS_rec.operation := QP_GLOBALS.G_OPR_DELETE;
, 'Delete_Row'
);
END Delete_Row;
, p_last_updated_by IN NUMBER
, p_last_update_date IN DATE
, p_last_update_login IN NUMBER
, p_list_header_id IN NUMBER
, p_list_line_id IN NUMBER
, p_program_application_id IN NUMBER
, p_program_id IN NUMBER
, p_program_update_date IN DATE
, p_qualifier_attribute IN VARCHAR2
, p_qualifier_attr_value IN VARCHAR2
, p_qualifier_attr_value_to IN VARCHAR2
, p_qualifier_context IN VARCHAR2
, p_qualifier_datatype IN VARCHAR2
--, p_qualifier_date_format IN VARCHAR2
, p_qualifier_grouping_no IN NUMBER
, p_qualifier_id IN NUMBER
--, p_qualifier_number_format IN VARCHAR2
, p_qualifier_precedence IN NUMBER
, p_qualifier_rule_id IN NUMBER
, p_request_id IN NUMBER
, p_start_date_active IN DATE
, p_qualify_hier_descendent_flag IN VARCHAR2 -- Added for TCA
)
IS
l_return_status VARCHAR2(1);
l_QUALIFIERS_rec.last_updated_by := p_last_updated_by;
l_QUALIFIERS_rec.last_update_date := p_last_update_date;
l_QUALIFIERS_rec.last_update_login := p_last_update_login;
l_QUALIFIERS_rec.program_update_date := p_program_update_date;
select list_type_code
into l_list_type_code
from qp_list_headers_b
where list_header_id = p_list_header_id;
SELECT NVL(MAX(ABS(qualifier_grouping_no)),-1)
INTO l_max_grouping_no
FROM qp_qualifiers
WHERE list_header_id = l_list_header_id;
QP_DELAYED_REQUESTS_PVT.Delete_Reqs_for_Deleted_Entity(
p_entity_code => QP_GLOBALS.G_ENTITY_QUALIFIERS
,p_entity_id => p_qualifier_id
,x_return_status => l_return_status);
Procedure Delete_All_Requests
( x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2
, x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER
, x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2
)
IS
l_return_status Varchar2(30);
, 'Delete_All_Requests'
);
END Delete_All_Requests;