DBA Data[Home] [Help]

APPS.OKC_PRICE_PVT dependencies on OKC_K_LINES_B

Line 226: from OKC_K_LINES_B

222: px_control_rec.p_level:= 'L';
223: --get all the lines below the sent in p_cle_id
224: select level,cle_id,id,object_version_number,price_level_ind,price_basis_yn
225: bulk collect into l_lvl_tbl,l_cle_id_tbl,l_id_tbl,l_obj_tbl,l_p_tbl,l_bpi_tbl
226: from OKC_K_LINES_B
227: --where config_item_type is null
228: connect by (prior id = cle_id and config_item_type is null)
229: start with id=p_cle_id;
230: IF (l_debug = 'Y') THEN

Line 432: from OKC_K_LINES_B

428: END IF;
429: -- get the parents of passed in p_cle_id
430: select cle_id,id,object_version_number,nvl(price_negotiated,0),nvl(line_list_price,0)
431: bulk collect into l_cle_id_tbl,l_id_tbl,l_obj_tbl,l_amt_tbl,l_list_tbl
432: from OKC_K_LINES_B
433: --where dnz_chr_id=p_chr_id
434: connect by prior cle_id = id
435: start with id=p_cle_id;
436: IF (l_debug = 'Y') THEN

Line 749: p_cle_id IN okc_k_lines_b.ID%TYPE,

745: --
746: -- Comments: This procedure is to be called only by QA
747:
748: PROCEDURE validate_covered_line_qty ( p_chr_id IN okc_k_headers_b.ID%TYPE,
749: p_cle_id IN okc_k_lines_b.ID%TYPE,
750: p_l_id_tbl IN num_tbl_type,
751: p_l_cle_id_tbl IN num_tbl_type,
752: p_l_line_number_tbl IN char_tbl_type,
753: x_return_status OUT NOCOPY VARCHAR2

Line 782: l_parent_cle_id OKC_K_LINES_B.ID%TYPE;

778: l_return_status VARCHAR2(1);
779:
780: l_qty1 NUMBER := OKC_API.G_MISS_NUM;
781: l_qty2 NUMBER := OKC_API.G_MISS_NUM;
782: l_parent_cle_id OKC_K_LINES_B.ID%TYPE;
783: l_line_number OKC_K_LINES_B.LINE_NUMBER%TYPE := '0';
784: l_parent_line_number OKC_K_LINES_B.LINE_NUMBER%TYPE := '0';
785: i PLS_INTEGER := 0;
786: l_top_line_id NUMBER := OKC_API.G_MISS_NUM;

Line 783: l_line_number OKC_K_LINES_B.LINE_NUMBER%TYPE := '0';

779:
780: l_qty1 NUMBER := OKC_API.G_MISS_NUM;
781: l_qty2 NUMBER := OKC_API.G_MISS_NUM;
782: l_parent_cle_id OKC_K_LINES_B.ID%TYPE;
783: l_line_number OKC_K_LINES_B.LINE_NUMBER%TYPE := '0';
784: l_parent_line_number OKC_K_LINES_B.LINE_NUMBER%TYPE := '0';
785: i PLS_INTEGER := 0;
786: l_top_line_id NUMBER := OKC_API.G_MISS_NUM;
787:

Line 784: l_parent_line_number OKC_K_LINES_B.LINE_NUMBER%TYPE := '0';

780: l_qty1 NUMBER := OKC_API.G_MISS_NUM;
781: l_qty2 NUMBER := OKC_API.G_MISS_NUM;
782: l_parent_cle_id OKC_K_LINES_B.ID%TYPE;
783: l_line_number OKC_K_LINES_B.LINE_NUMBER%TYPE := '0';
784: l_parent_line_number OKC_K_LINES_B.LINE_NUMBER%TYPE := '0';
785: i PLS_INTEGER := 0;
786: l_top_line_id NUMBER := OKC_API.G_MISS_NUM;
787:
788: BEGIN

Line 1032: from OKC_K_LINES_B

1028: select level,cle_id,id,object_version_number,price_level_ind,price_basis_yn,config_top_model_line_id,
1029: line_number, lse_id
1030: bulk collect into l_lvl_tbl,l_cle_id_tbl,l_id_tbl,l_obj_tbl,l_p_tbl,l_bpi_tbl,l_top_model_tbl,
1031: l_line_number_tbl, l_lse_id_tbl
1032: from OKC_K_LINES_B
1033: connect by prior id = cle_id
1034: start with chr_id = p_chr_id;
1035: IF (l_debug = 'Y') THEN
1036: my_debug('2100 : select rowcount'||SQL%ROWCOUNT, 1);

Line 3240: Select price_list_id from okc_k_lines_b

3236:
3237:
3238: --Bug 2543687
3239: Cursor l_cle_pl(p_cle_id NUMBER) is
3240: Select price_list_id from okc_k_lines_b
3241: where id = p_cle_id;
3242:
3243:
3244: TYPE Cur_tab_type is table of okc_k_lines_b.currency_code%type;

Line 3244: TYPE Cur_tab_type is table of okc_k_lines_b.currency_code%type;

3240: Select price_list_id from okc_k_lines_b
3241: where id = p_cle_id;
3242:
3243:
3244: TYPE Cur_tab_type is table of okc_k_lines_b.currency_code%type;
3245: TYPE Date_tbl_type is table of DATE INDEX BY BINARY_INTEGER;
3246:
3247: l_id num_tbl_type;
3248: l_cur Cur_tab_type;

Line 3282: from okc_k_lines_b

3278: select id,currency_code,price_level_ind
3279: ,item_to_price_yn,price_basis_yn,nvl(service_item_yn,'N'),price_list_id,price_negotiated,line_list_price,price_unit,config_top_model_line_id,nvl(pricing_date,g_hdr_pricing_date),end_date,cle_id
3280: BULK COLLECT INTO l_id,l_cur, l_p
3281: ,l_pi, l_bpi,l_srvc,l_pricelist_id,l_price_tbl,l_list_price_tbl,l_unit_price_tbl, l_top_model_tbl,l_prc_date_tbl,l_end_date_tbl,l_cle_id_tbl
3282: from okc_k_lines_b
3283: connect by prior cle_id = id
3284: start with id=p_cle_id;
3285: IF (l_debug = 'Y') THEN
3286: my_debug('10005 : select rowcount for lines fetched'||SQL%ROWCOUNT, 1);

Line 3721: select price_list_id into pricelist from okc_k_lines_b

3717: If p_line_tbl(i).p_yn = 'Y' and p_service_price = 'Y' and
3718: p_line_tbl(i).object_code in ('OKX_COVLINE')Then
3719: begin
3720:
3721: select price_list_id into pricelist from okc_k_lines_b
3722: where id = p_line_tbl(i).id1;
3723: If pricelist is not null Then
3724: qual_rec.QUALIFIER_ATTR_VALUE_FROM := pricelist;
3725: Else

Line 5517: From okc_k_lines_b

5513: my_debug('100:In is_service_subline ');
5514: END IF;
5515:
5516: Select nvl(service_item_yn,'N') service_item_yn into result
5517: From okc_k_lines_b
5518: where id = (Select cle_id from okc_k_lines_b where id =p_id);
5519:
5520: IF (l_debug = 'Y') THEN
5521: my_debug('101: Result is'||result);

Line 5518: where id = (Select cle_id from okc_k_lines_b where id =p_id);

5514: END IF;
5515:
5516: Select nvl(service_item_yn,'N') service_item_yn into result
5517: From okc_k_lines_b
5518: where id = (Select cle_id from okc_k_lines_b where id =p_id);
5519:
5520: IF (l_debug = 'Y') THEN
5521: my_debug('101: Result is'||result);
5522: END IF;

Line 6433: from okc_k_lines_b where dnz_chr_id = p_chr_id

6429: -- of the given conract. fetch them from database
6430: ELSE
6431: select id
6432: BULK COLLECT into l_priced_tbl
6433: from okc_k_lines_b where dnz_chr_id = p_chr_id
6434: and price_level_ind ='Y';
6435: IF (l_debug = 'Y') THEN
6436: my_debug('16550 : select rowcount'||SQL%ROWCOUNT, 1);
6437: END IF;

Line 6648: from okc_k_lines_b

6644:
6645: --collect all the line styles and rules and party roles attached to lines above configurated lines
6646: select id
6647: BULK COLLECT INTO l_id_tbl
6648: from okc_k_lines_b
6649: connect by prior cle_id = id
6650: start with id=l_okc_control_rec.p_top_model_id;
6651: --dbms_output.put_line('rows found'||l_id_tbl.count);
6652: IF (l_debug = 'Y') THEN

Line 7402: from OKC_K_LINES_B

7398:
7399: If l_control_rec.p_level = 'H' and p_chr_id is not null then
7400: select id
7401: bulk collect into l_id_tbl
7402: from OKC_K_LINES_B
7403: where price_level_ind='Y' and dnz_chr_id = p_chr_id;
7404: IF (l_debug = 'Y') THEN
7405: my_debug('18010 : select rowcount'||SQL%ROWCOUNT, 1);
7406: END IF;