DBA Data[Home] [Help]

PACKAGE BODY: APPS.QP_PERF_CTRL_PVT

Source


1 package body qp_perf_ctrl_pvt as
2 /* $Header: QPXPRFCB.pls 120.0.12010000.1 2008/10/31 05:24:46 ssangane noship $ */
3 
4 procedure exec_prog(
5   err_buff out nocopy varchar2,
6   retcode out nocopy number,
7   p_list_header_id_low in number,
8   p_list_header_id_high in number,
9   p_update_type in varchar2
10 ) is
11   l_list_header_id_low number;
12   l_list_header_id_high number;
13   l_perf varchar2(30);
14 begin
15 
16   l_perf := nvl(FND_PROFILE.VALUE(g_perf), g_off);
17   if (l_perf = g_on) then
18 
19   if (p_update_type = g_update_factor) then
20 
21     --insert into qp_tests values('Y', 1, 2, sysdate);
22 
23     qp_denormalized_pricing_attrs.update_search_ind(
24       err_buff,
25       retcode,
26       p_list_header_id_low,
27       p_list_header_id_high,
28       g_update_factor
29     );
30 
31   end if;
32 
33   end if;
34 
35 end exec_prog;
36 
37 end qp_perf_ctrl_pvt;