eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.OKC_PRICE_PVT dependencies on OKC_PRICE_PUB

Line 1693: If okc_price_pub.g_lse_tbl.count>0 then

1689: IF (l_debug = 'Y') THEN
1690: my_debug('4400 : Entering Add_TO_GLOBAL_LSE_TBL', 2);
1691: END IF;
1692:
1693: If okc_price_pub.g_lse_tbl.count>0 then
1694: i:= okc_price_pub.g_lse_tbl.first;
1695: LOOP
1696: If okc_price_pub.g_lse_tbl(i).current_source = p_global_rec.current_source then
1697: raise l_already_there;

Line 1694: i:= okc_price_pub.g_lse_tbl.first;

1690: my_debug('4400 : Entering Add_TO_GLOBAL_LSE_TBL', 2);
1691: END IF;
1692:
1693: If okc_price_pub.g_lse_tbl.count>0 then
1694: i:= okc_price_pub.g_lse_tbl.first;
1695: LOOP
1696: If okc_price_pub.g_lse_tbl(i).current_source = p_global_rec.current_source then
1697: raise l_already_there;
1698: End If;

Line 1696: If okc_price_pub.g_lse_tbl(i).current_source = p_global_rec.current_source then

1692:
1693: If okc_price_pub.g_lse_tbl.count>0 then
1694: i:= okc_price_pub.g_lse_tbl.first;
1695: LOOP
1696: If okc_price_pub.g_lse_tbl(i).current_source = p_global_rec.current_source then
1697: raise l_already_there;
1698: End If;
1699: Exit When i= okc_price_pub.g_lse_tbl.last;
1700: i:= okc_price_pub.g_lse_tbl.next(i);

Line 1699: Exit When i= okc_price_pub.g_lse_tbl.last;

1695: LOOP
1696: If okc_price_pub.g_lse_tbl(i).current_source = p_global_rec.current_source then
1697: raise l_already_there;
1698: End If;
1699: Exit When i= okc_price_pub.g_lse_tbl.last;
1700: i:= okc_price_pub.g_lse_tbl.next(i);
1701: End Loop;
1702: End If; -- g_lse_type.count
1703: IF (l_debug = 'Y') THEN

Line 1700: i:= okc_price_pub.g_lse_tbl.next(i);

1696: If okc_price_pub.g_lse_tbl(i).current_source = p_global_rec.current_source then
1697: raise l_already_there;
1698: End If;
1699: Exit When i= okc_price_pub.g_lse_tbl.last;
1700: i:= okc_price_pub.g_lse_tbl.next(i);
1701: End Loop;
1702: End If; -- g_lse_type.count
1703: IF (l_debug = 'Y') THEN
1704: my_debug('4450 : current source'||p_global_rec.current_source, 1);

Line 1708: okc_price_pub.g_lse_tbl(i+1):=p_global_rec;

1704: my_debug('4450 : current source'||p_global_rec.current_source, 1);
1705: my_debug('4460 : source value'||p_global_rec.source_value, 1);
1706: END IF;
1707:
1708: okc_price_pub.g_lse_tbl(i+1):=p_global_rec;
1709: IF (l_debug = 'Y') THEN
1710: my_debug('4500 : Exiting Add_TO_GLOBAL_LSE_TBL', 2);
1711: END IF;
1712: IF (l_debug = 'Y') THEN

Line 1957: l_return_status:= add_to_global_tbl(okc_price_pub.g_rul_tbl,l_rul_rec);

1953: If l_rul_data.object1_id1 is not null and l_rul_data.object1_id2 = '#' then
1954: l_rul_rec.current_source:=l_rul_data.jtot_object1_code;
1955: l_rul_rec.code :=l_rul_data.rule_information_category;
1956: l_rul_rec.source_value := l_rul_data.object1_id1;
1957: l_return_status:= add_to_global_tbl(okc_price_pub.g_rul_tbl,l_rul_rec);
1958: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1959: RAISE l_exception_stop;
1960: END IF;
1961:

Line 1967: l_return_status:= add_to_global_tbl(okc_price_pub.g_rul_tbl,l_rul_rec);

1963: If l_rul_data.object2_id1 is not null and l_rul_data.object2_id2 = '#' then
1964: l_rul_rec.current_source:=l_rul_data.jtot_object2_code;
1965: l_rul_rec.code :=l_rul_data.rule_information_category;
1966: l_rul_rec.source_value := l_rul_data.object2_id1;
1967: l_return_status:= add_to_global_tbl(okc_price_pub.g_rul_tbl,l_rul_rec);
1968: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1969: RAISE l_exception_stop;
1970: END IF;
1971: End If;

Line 1976: l_return_status:= add_to_global_tbl(okc_price_pub.g_rul_tbl,l_rul_rec);

1972: If l_rul_data.object3_id1 is not null and l_rul_data.object3_id2 = '#' then
1973: l_rul_rec.current_source:=l_rul_data.jtot_object3_code;
1974: l_rul_rec.code :=l_rul_data.rule_information_category;
1975: l_rul_rec.source_value := l_rul_data.object3_id1;
1976: l_return_status:= add_to_global_tbl(okc_price_pub.g_rul_tbl,l_rul_rec);
1977: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
1978: RAISE l_exception_stop;
1979: END IF;
1980:

Line 2089: l_return_status:= add_to_global_tbl(okc_price_pub.g_prle_tbl,l_prle_rec);

2085: ---??? as any of the third party could get us some modifier
2086: --??? doing above might become a problem when duplication checked in extra pricing attributes.
2087: -- ?????Use party precedence column to check which party role should be sent
2088: ---???? when same role multiple times on a contract.
2089: l_return_status:= add_to_global_tbl(okc_price_pub.g_prle_tbl,l_prle_rec);
2090: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
2091: RAISE l_exception_stop;
2092: END IF;
2093: End If;

Line 3023: /* --dbms_output.put_line('okc_price_pub.g_rul_tbl');

3019: --call pricing build context
3020: --dbms_output.put_line('5return status'||x_return_status);
3021:
3022: Begin
3023: /* --dbms_output.put_line('okc_price_pub.g_rul_tbl');
3024: k:=okc_price_pub.g_rul_tbl.first;
3025: while k is not null loop
3026: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).code);
3027: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).current_source);

Line 3024: k:=okc_price_pub.g_rul_tbl.first;

3020: --dbms_output.put_line('5return status'||x_return_status);
3021:
3022: Begin
3023: /* --dbms_output.put_line('okc_price_pub.g_rul_tbl');
3024: k:=okc_price_pub.g_rul_tbl.first;
3025: while k is not null loop
3026: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).code);
3027: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).current_source);
3028: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).source_value);

Line 3026: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).code);

3022: Begin
3023: /* --dbms_output.put_line('okc_price_pub.g_rul_tbl');
3024: k:=okc_price_pub.g_rul_tbl.first;
3025: while k is not null loop
3026: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).code);
3027: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).current_source);
3028: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).source_value);
3029: k:=okc_price_pub.g_rul_tbl.next(k);
3030: END LOOP;

Line 3027: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).current_source);

3023: /* --dbms_output.put_line('okc_price_pub.g_rul_tbl');
3024: k:=okc_price_pub.g_rul_tbl.first;
3025: while k is not null loop
3026: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).code);
3027: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).current_source);
3028: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).source_value);
3029: k:=okc_price_pub.g_rul_tbl.next(k);
3030: END LOOP;
3031: --dbms_output.put_line('okc_price_pub.g_prle_tbl');

Line 3028: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).source_value);

3024: k:=okc_price_pub.g_rul_tbl.first;
3025: while k is not null loop
3026: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).code);
3027: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).current_source);
3028: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).source_value);
3029: k:=okc_price_pub.g_rul_tbl.next(k);
3030: END LOOP;
3031: --dbms_output.put_line('okc_price_pub.g_prle_tbl');
3032: k:=okc_price_pub.g_prle_tbl.first;

Line 3029: k:=okc_price_pub.g_rul_tbl.next(k);

3025: while k is not null loop
3026: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).code);
3027: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).current_source);
3028: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).source_value);
3029: k:=okc_price_pub.g_rul_tbl.next(k);
3030: END LOOP;
3031: --dbms_output.put_line('okc_price_pub.g_prle_tbl');
3032: k:=okc_price_pub.g_prle_tbl.first;
3033:

Line 3031: --dbms_output.put_line('okc_price_pub.g_prle_tbl');

3027: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).current_source);
3028: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).source_value);
3029: k:=okc_price_pub.g_rul_tbl.next(k);
3030: END LOOP;
3031: --dbms_output.put_line('okc_price_pub.g_prle_tbl');
3032: k:=okc_price_pub.g_prle_tbl.first;
3033:
3034: while k is not null loop
3035: --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).code);

Line 3032: k:=okc_price_pub.g_prle_tbl.first;

3028: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).source_value);
3029: k:=okc_price_pub.g_rul_tbl.next(k);
3030: END LOOP;
3031: --dbms_output.put_line('okc_price_pub.g_prle_tbl');
3032: k:=okc_price_pub.g_prle_tbl.first;
3033:
3034: while k is not null loop
3035: --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).code);
3036: --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).current_source);

Line 3035: --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).code);

3031: --dbms_output.put_line('okc_price_pub.g_prle_tbl');
3032: k:=okc_price_pub.g_prle_tbl.first;
3033:
3034: while k is not null loop
3035: --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).code);
3036: --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).current_source);
3037: --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).source_value);
3038: k:=okc_price_pub.g_prle_tbl.next(k);
3039: END LOOP;

Line 3036: --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).current_source);

3032: k:=okc_price_pub.g_prle_tbl.first;
3033:
3034: while k is not null loop
3035: --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).code);
3036: --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).current_source);
3037: --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).source_value);
3038: k:=okc_price_pub.g_prle_tbl.next(k);
3039: END LOOP;
3040:

Line 3037: --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).source_value);

3033:
3034: while k is not null loop
3035: --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).code);
3036: --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).current_source);
3037: --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).source_value);
3038: k:=okc_price_pub.g_prle_tbl.next(k);
3039: END LOOP;
3040:
3041: */

Line 3038: k:=okc_price_pub.g_prle_tbl.next(k);

3034: while k is not null loop
3035: --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).code);
3036: --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).current_source);
3037: --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).source_value);
3038: k:=okc_price_pub.g_prle_tbl.next(k);
3039: END LOOP;
3040:
3041: */
3042: -- populate global record g_contract_info

Line 3043: OKC_PRICE_PUB.G_CONTRACT_INFO:=null;

3039: END LOOP;
3040:
3041: */
3042: -- populate global record g_contract_info
3043: OKC_PRICE_PUB.G_CONTRACT_INFO:=null;
3044: Begin
3045: select INV_ORGANIZATION_ID,price_list_id,authoring_org_id,nvl(pricing_date,sysdate)
3046: into OKC_PRICE_PUB.G_CONTRACT_INFO.INV_ORG_ID , l_price_list_id,g_authoring_org_id,OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE
3047: from okc_k_headers_b

Line 3046: into OKC_PRICE_PUB.G_CONTRACT_INFO.INV_ORG_ID , l_price_list_id,g_authoring_org_id,OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE

3042: -- populate global record g_contract_info
3043: OKC_PRICE_PUB.G_CONTRACT_INFO:=null;
3044: Begin
3045: select INV_ORGANIZATION_ID,price_list_id,authoring_org_id,nvl(pricing_date,sysdate)
3046: into OKC_PRICE_PUB.G_CONTRACT_INFO.INV_ORG_ID , l_price_list_id,g_authoring_org_id,OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE
3047: from okc_k_headers_b
3048: where id = p_chr_id;
3049:
3050: EXCEPTION

Line 3059: into OKC_PRICE_PUB.G_CONTRACT_INFO.governing_contract_id

3055: END;
3056: -- Bug:2695614 Changes for Price Hold
3057: Begin
3058: select chr_id_referred
3059: into OKC_PRICE_PUB.G_CONTRACT_INFO.governing_contract_id
3060: from okc_governances
3061: where dnz_chr_id = p_chr_id
3062: and cle_id is null
3063: and rownum=1;

Line 3075: --OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE:=SYSDATE;

3071:
3072: -- end Bug:2695614
3073: -- Modified for Bug 2292742
3074:
3075: --OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE:=SYSDATE;
3076: g_hdr_pricing_date := OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE;
3077: --populate global variable sold_to_org_id. made it global as it is used
3078: -- at many places for build context functions
3079: OKC_PRICE_PUB.G_CONTRACT_INFO.SOLD_TO_ORG_ID :=

Line 3076: g_hdr_pricing_date := OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE;

3072: -- end Bug:2695614
3073: -- Modified for Bug 2292742
3074:
3075: --OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE:=SYSDATE;
3076: g_hdr_pricing_date := OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE;
3077: --populate global variable sold_to_org_id. made it global as it is used
3078: -- at many places for build context functions
3079: OKC_PRICE_PUB.G_CONTRACT_INFO.SOLD_TO_ORG_ID :=
3080: GET_RUL_SOURCE_VALUE(OKC_PRICE_PUB.G_RUL_TBL,'CAN','OKX_CUSTACCT');

Line 3079: OKC_PRICE_PUB.G_CONTRACT_INFO.SOLD_TO_ORG_ID :=

3075: --OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE:=SYSDATE;
3076: g_hdr_pricing_date := OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE;
3077: --populate global variable sold_to_org_id. made it global as it is used
3078: -- at many places for build context functions
3079: OKC_PRICE_PUB.G_CONTRACT_INFO.SOLD_TO_ORG_ID :=
3080: GET_RUL_SOURCE_VALUE(OKC_PRICE_PUB.G_RUL_TBL,'CAN','OKX_CUSTACCT');
3081:
3082: -- add header level pricelist as an attrib if found
3083: IF l_price_list_id is not null then

Line 3080: GET_RUL_SOURCE_VALUE(OKC_PRICE_PUB.G_RUL_TBL,'CAN','OKX_CUSTACCT');

3076: g_hdr_pricing_date := OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE;
3077: --populate global variable sold_to_org_id. made it global as it is used
3078: -- at many places for build context functions
3079: OKC_PRICE_PUB.G_CONTRACT_INFO.SOLD_TO_ORG_ID :=
3080: GET_RUL_SOURCE_VALUE(OKC_PRICE_PUB.G_RUL_TBL,'CAN','OKX_CUSTACCT');
3081:
3082: -- add header level pricelist as an attrib if found
3083: IF l_price_list_id is not null then
3084: g_hdr_pricelist:= l_price_list_id;

Line 3095: my_debug('9030 : G_CONTRACT_INFO.PRICING_DATE for header'||OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE,1);

3091: --x_qualifier_contexts_Tbl(l_count).VALIDATED_FLAG :='Y';
3092: x_qualifier_contexts_Tbl(l_count).VALIDATED_FLAG :='N'; --Bug 2760904: we need QP to validate the price list
3093: END IF;
3094: IF (l_debug = 'Y') THEN
3095: my_debug('9030 : G_CONTRACT_INFO.PRICING_DATE for header'||OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE,1);
3096: my_debug('9040 : G_CONTRACT_INFO.INV_ORG_ID for header'||OKC_PRICE_PUB.G_CONTRACT_INFO.INV_ORG_ID, 1);
3097: my_debug('9050 : G_CONTRACT_INFO.SOLD_TO_ORG_ID for header'||OKC_PRICE_PUB.G_CONTRACT_INFO.SOLD_TO_ORG_ID, 1);
3098: my_debug('9060 : G_CONTRACT_INFO.Inventory id for header'||OKC_PRICE_PUB.G_CONTRACT_INFO.INVENTORY_ITEM_ID, 1);
3099: my_debug('9070 : G_CONTRACT_INFO.top_model_line for header'||OKC_PRICE_PUB.G_CONTRACT_INFO.TOP_MODEL_LINE_ID, 1);

Line 3096: my_debug('9040 : G_CONTRACT_INFO.INV_ORG_ID for header'||OKC_PRICE_PUB.G_CONTRACT_INFO.INV_ORG_ID, 1);

3092: x_qualifier_contexts_Tbl(l_count).VALIDATED_FLAG :='N'; --Bug 2760904: we need QP to validate the price list
3093: END IF;
3094: IF (l_debug = 'Y') THEN
3095: my_debug('9030 : G_CONTRACT_INFO.PRICING_DATE for header'||OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE,1);
3096: my_debug('9040 : G_CONTRACT_INFO.INV_ORG_ID for header'||OKC_PRICE_PUB.G_CONTRACT_INFO.INV_ORG_ID, 1);
3097: my_debug('9050 : G_CONTRACT_INFO.SOLD_TO_ORG_ID for header'||OKC_PRICE_PUB.G_CONTRACT_INFO.SOLD_TO_ORG_ID, 1);
3098: my_debug('9060 : G_CONTRACT_INFO.Inventory id for header'||OKC_PRICE_PUB.G_CONTRACT_INFO.INVENTORY_ITEM_ID, 1);
3099: my_debug('9070 : G_CONTRACT_INFO.top_model_line for header'||OKC_PRICE_PUB.G_CONTRACT_INFO.TOP_MODEL_LINE_ID, 1);
3100: my_debug('9072 : Price list id for header'||l_price_list_id, 1);

Line 3097: my_debug('9050 : G_CONTRACT_INFO.SOLD_TO_ORG_ID for header'||OKC_PRICE_PUB.G_CONTRACT_INFO.SOLD_TO_ORG_ID, 1);

3093: END IF;
3094: IF (l_debug = 'Y') THEN
3095: my_debug('9030 : G_CONTRACT_INFO.PRICING_DATE for header'||OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE,1);
3096: my_debug('9040 : G_CONTRACT_INFO.INV_ORG_ID for header'||OKC_PRICE_PUB.G_CONTRACT_INFO.INV_ORG_ID, 1);
3097: my_debug('9050 : G_CONTRACT_INFO.SOLD_TO_ORG_ID for header'||OKC_PRICE_PUB.G_CONTRACT_INFO.SOLD_TO_ORG_ID, 1);
3098: my_debug('9060 : G_CONTRACT_INFO.Inventory id for header'||OKC_PRICE_PUB.G_CONTRACT_INFO.INVENTORY_ITEM_ID, 1);
3099: my_debug('9070 : G_CONTRACT_INFO.top_model_line for header'||OKC_PRICE_PUB.G_CONTRACT_INFO.TOP_MODEL_LINE_ID, 1);
3100: my_debug('9072 : Price list id for header'||l_price_list_id, 1);
3101: END IF;

Line 3098: my_debug('9060 : G_CONTRACT_INFO.Inventory id for header'||OKC_PRICE_PUB.G_CONTRACT_INFO.INVENTORY_ITEM_ID, 1);

3094: IF (l_debug = 'Y') THEN
3095: my_debug('9030 : G_CONTRACT_INFO.PRICING_DATE for header'||OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE,1);
3096: my_debug('9040 : G_CONTRACT_INFO.INV_ORG_ID for header'||OKC_PRICE_PUB.G_CONTRACT_INFO.INV_ORG_ID, 1);
3097: my_debug('9050 : G_CONTRACT_INFO.SOLD_TO_ORG_ID for header'||OKC_PRICE_PUB.G_CONTRACT_INFO.SOLD_TO_ORG_ID, 1);
3098: my_debug('9060 : G_CONTRACT_INFO.Inventory id for header'||OKC_PRICE_PUB.G_CONTRACT_INFO.INVENTORY_ITEM_ID, 1);
3099: my_debug('9070 : G_CONTRACT_INFO.top_model_line for header'||OKC_PRICE_PUB.G_CONTRACT_INFO.TOP_MODEL_LINE_ID, 1);
3100: my_debug('9072 : Price list id for header'||l_price_list_id, 1);
3101: END IF;
3102:

Line 3099: my_debug('9070 : G_CONTRACT_INFO.top_model_line for header'||OKC_PRICE_PUB.G_CONTRACT_INFO.TOP_MODEL_LINE_ID, 1);

3095: my_debug('9030 : G_CONTRACT_INFO.PRICING_DATE for header'||OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE,1);
3096: my_debug('9040 : G_CONTRACT_INFO.INV_ORG_ID for header'||OKC_PRICE_PUB.G_CONTRACT_INFO.INV_ORG_ID, 1);
3097: my_debug('9050 : G_CONTRACT_INFO.SOLD_TO_ORG_ID for header'||OKC_PRICE_PUB.G_CONTRACT_INFO.SOLD_TO_ORG_ID, 1);
3098: my_debug('9060 : G_CONTRACT_INFO.Inventory id for header'||OKC_PRICE_PUB.G_CONTRACT_INFO.INVENTORY_ITEM_ID, 1);
3099: my_debug('9070 : G_CONTRACT_INFO.top_model_line for header'||OKC_PRICE_PUB.G_CONTRACT_INFO.TOP_MODEL_LINE_ID, 1);
3100: my_debug('9072 : Price list id for header'||l_price_list_id, 1);
3101: END IF;
3102:
3103: -- call build context

Line 3115: g_hdr_rul_tbl:=okc_price_pub.g_rul_tbl;

3111: IF (l_debug = 'Y') THEN
3112: my_debug('9070 : After Call Build Context for header', 1);
3113: END IF;
3114: -- copy header values to copy them to line global tbls, in case not found on line
3115: g_hdr_rul_tbl:=okc_price_pub.g_rul_tbl;
3116: g_hdr_prle_tbl:=okc_price_pub.g_prle_tbl;
3117: If g_hdr_rul_tbl.count >0 then
3118: i:=g_hdr_rul_tbl.first-1;
3119: g_hdr_rul_tbl(i).code :='CHR_ID';

Line 3116: g_hdr_prle_tbl:=okc_price_pub.g_prle_tbl;

3112: my_debug('9070 : After Call Build Context for header', 1);
3113: END IF;
3114: -- copy header values to copy them to line global tbls, in case not found on line
3115: g_hdr_rul_tbl:=okc_price_pub.g_rul_tbl;
3116: g_hdr_prle_tbl:=okc_price_pub.g_prle_tbl;
3117: If g_hdr_rul_tbl.count >0 then
3118: i:=g_hdr_rul_tbl.first-1;
3119: g_hdr_rul_tbl(i).code :='CHR_ID';
3120: g_hdr_rul_tbl(i).source_value := p_chr_id;

Line 3128: okc_price_pub.g_rul_tbl.DELETE;

3124: g_hdr_prle_tbl(i).code :='CHR_ID';
3125: g_hdr_prle_tbl(i).source_value := p_chr_id;
3126: end if;
3127:
3128: okc_price_pub.g_rul_tbl.DELETE;
3129: okc_price_pub.g_prle_tbl.DELETE;
3130: OKC_PRICE_PUB.G_CONTRACT_INFO:=null;
3131:
3132: Exception

Line 3129: okc_price_pub.g_prle_tbl.DELETE;

3125: g_hdr_prle_tbl(i).source_value := p_chr_id;
3126: end if;
3127:
3128: okc_price_pub.g_rul_tbl.DELETE;
3129: okc_price_pub.g_prle_tbl.DELETE;
3130: OKC_PRICE_PUB.G_CONTRACT_INFO:=null;
3131:
3132: Exception
3133: When Others then

Line 3130: OKC_PRICE_PUB.G_CONTRACT_INFO:=null;

3126: end if;
3127:
3128: okc_price_pub.g_rul_tbl.DELETE;
3129: okc_price_pub.g_prle_tbl.DELETE;
3130: OKC_PRICE_PUB.G_CONTRACT_INFO:=null;
3131:
3132: Exception
3133: When Others then
3134: --dbms_output.put_line('error'||substr(sqlerrm,1,240));

Line 3277: OKC_PRICE_PUB.G_CONTRACT_INFO.top_model_line_id:=null;

3273: END IF;
3274: x_return_status := OKC_API.G_RET_STS_SUCCESS;
3275: x_bpi_ind :=0;
3276: x_pi_ind :=0;
3277: OKC_PRICE_PUB.G_CONTRACT_INFO.top_model_line_id:=null;
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

Line 3308: OKC_PRICE_PUB.G_CONTRACT_INFO.top_model_line_id :=l_item_row.object1_id1;

3304: -- set p_yn , pi_yn flag to 'N' for top model dummy config line
3305: If (l_top_model_tbl(i) is not null and l_id(i) = l_top_model_tbl(i)) then
3306: l_p(i) := 'N';
3307: l_pi(i) := 'N';
3308: OKC_PRICE_PUB.G_CONTRACT_INFO.top_model_line_id :=l_item_row.object1_id1;
3309: END IF;
3310:
3311: x_line_tbl(i).id := l_id(i);
3312: x_line_tbl(i).currency := l_cur(i);

Line 3566: OKC_PRICE_PUB.G_CONTRACT_INFO.inventory_item_id := null;

3562: line_attr_rec.PRICING_ATTRIBUTE :='PRICING_ATTRIBUTE3';
3563: line_attr_rec.PRICING_ATTR_VALUE_FROM := 'ALL'; -- generic value
3564: line_attr_rec.VALIDATED_FLAG :='N';
3565: x_pricing_contexts_Tbl(nvl(x_pricing_contexts_Tbl.last,0)+1):= line_attr_rec;
3566: OKC_PRICE_PUB.G_CONTRACT_INFO.inventory_item_id := null;
3567: -- Along with send ITEM_ALL attrib, we will map free line styles
3568: -- with dummy object code 'OKX_FREE', so that if the user has defined
3569: -- some attrib in pricing context ITEM which picks varchar2 value and
3570: -- then using it has defined a unit price for that attrib in price list

Line 3609: OKC_PRICE_PUB.G_CONTRACT_INFO.inventory_item_id := inv_id1;

3605: from okc_k_items
3606: where cle_id = p_line_tbl(1).id1;
3607:
3608: line_attr_rec.PRICING_ATTR_VALUE_FROM := inv_id1;
3609: OKC_PRICE_PUB.G_CONTRACT_INFO.inventory_item_id := inv_id1;
3610: ------Elsif p_line_tbl(i).object_code in ('OKX_CUSTPOD','OKX_CUSTITEM') then
3611: Elsif p_line_tbl(i).object_code in ('OKX_CUSTPROD','OKX_CUSTITEM') then
3612: Open covered_prod_csr(p_line_tbl(i).id1);
3613: Fetch covered_prod_csr into inv_id1;

Line 3619: OKC_PRICE_PUB.G_CONTRACT_INFO.inventory_item_id := inv_id1;

3615: IF (l_debug = 'Y') THEN
3616: my_debug('11049 inventory id covered :'|| inv_id1);
3617: END IF;
3618: line_attr_rec.PRICING_ATTR_VALUE_FROM := inv_id1 ;
3619: OKC_PRICE_PUB.G_CONTRACT_INFO.inventory_item_id := inv_id1;
3620: End If;
3621: line_attr_rec.VALIDATED_FLAG :='N';
3622: x_pricing_contexts_Tbl(nvl(x_pricing_contexts_Tbl.last,0)+1):= line_attr_rec;
3623: IF (l_debug = 'Y') THEN

Line 3637: OKC_PRICE_PUB.G_CONTRACT_INFO.inventory_item_id := p_line_tbl(i).id1;

3633: -- Inventory Item Id
3634: line_attr_rec.PRICING_ATTR_VALUE_FROM := p_line_tbl(i).id1;
3635:
3636: line_attr_rec.VALIDATED_FLAG :='N';
3637: OKC_PRICE_PUB.G_CONTRACT_INFO.inventory_item_id := p_line_tbl(i).id1;
3638: x_pricing_contexts_Tbl(nvl(x_pricing_contexts_Tbl.last,0)+1):= line_attr_rec;
3639: IF (l_debug = 'Y') THEN
3640: my_debug('11050 : Item Id '||p_line_tbl(i).id1,1);
3641: END IF;

Line 3646: into OKC_PRICE_PUB.G_CONTRACT_INFO.governing_contract_id

3642:
3643: -- Bug:2695614 Changes for Price Hold
3644: Begin
3645: select chr_id_referred
3646: into OKC_PRICE_PUB.G_CONTRACT_INFO.governing_contract_id
3647: from okc_governances
3648: where dnz_chr_id = p_chr_id
3649: and cle_id =p_line_tbl(i).id
3650: and rownum=1;

Line 3681: OKC_PRICE_PUB.G_CONTRACT_INFO.inventory_item_id := p_line_tbl(i).id1;

3677: IF (l_debug = 'Y') THEN
3678: my_debug('11060 : rowcount for OBJECT_USER_CODE '||SQL%ROWCOUNT,1);
3679: END IF;
3680: -- since this is an inventory item, assigning it to inventory_id
3681: OKC_PRICE_PUB.G_CONTRACT_INFO.inventory_item_id := p_line_tbl(i).id1;
3682:
3683: EXCEPTION
3684: WHEN NO_DATA_FOUND THEN
3685: IF (l_debug = 'Y') THEN

Line 3772: OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE:=p_line_tbl(i).pricing_date;

3768: ***********/
3769:
3770: END IF;
3771: --assign pricing_date
3772: OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE:=p_line_tbl(i).pricing_date;
3773:
3774: --If x_qualifier_contexts_tbl.count >0 then
3775: IF (l_debug = 'Y') THEN
3776: my_debug('11070 :Pricelist specified '||p_line_tbl(i).pricelist_id,1);

Line 3823: l_return_status:= add_to_global_tbl(okc_price_pub.g_rul_tbl,l_prle_rec);

3819: g_hdr_rul_tbl(i).code= 'CHR_ID' then
3820: i:=g_hdr_rul_tbl.next(i);
3821: while i is not null loop
3822: l_prle_rec:=g_hdr_rul_tbl(i);
3823: l_return_status:= add_to_global_tbl(okc_price_pub.g_rul_tbl,l_prle_rec);
3824: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
3825: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3826: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
3827: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 3841: l_return_status:= add_to_global_tbl(okc_price_pub.g_prle_tbl,l_prle_rec);

3837: g_hdr_prle_tbl(i).code= 'CHR_ID' then
3838: i:=g_hdr_prle_tbl.next(i);
3839: while i is not null loop
3840: l_prle_rec:=g_hdr_prle_tbl(i);
3841: l_return_status:= add_to_global_tbl(okc_price_pub.g_prle_tbl,l_prle_rec);
3842: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
3843: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3844: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
3845: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 3853: /* --dbms_output.put_line('okc_price_pub.g_lse_tbl');

3849: end if;
3850: END IF; --#hdr prle if
3851:
3852: Begin
3853: /* --dbms_output.put_line('okc_price_pub.g_lse_tbl');
3854: k:=okc_price_pub.g_lse_tbl.first;
3855: while k is not null loop
3856:
3857: --dbms_output.put_line('okc_price_pub.g_lse_tbl'||k||'-'||okc_price_pub.g_lse_tbl(k).current_source);

Line 3854: k:=okc_price_pub.g_lse_tbl.first;

3850: END IF; --#hdr prle if
3851:
3852: Begin
3853: /* --dbms_output.put_line('okc_price_pub.g_lse_tbl');
3854: k:=okc_price_pub.g_lse_tbl.first;
3855: while k is not null loop
3856:
3857: --dbms_output.put_line('okc_price_pub.g_lse_tbl'||k||'-'||okc_price_pub.g_lse_tbl(k).current_source);
3858: --dbms_output.put_line('okc_price_pub.g_lse_tbl'||k||'-'||okc_price_pub.g_lse_tbl(k).source_value);

Line 3857: --dbms_output.put_line('okc_price_pub.g_lse_tbl'||k||'-'||okc_price_pub.g_lse_tbl(k).current_source);

3853: /* --dbms_output.put_line('okc_price_pub.g_lse_tbl');
3854: k:=okc_price_pub.g_lse_tbl.first;
3855: while k is not null loop
3856:
3857: --dbms_output.put_line('okc_price_pub.g_lse_tbl'||k||'-'||okc_price_pub.g_lse_tbl(k).current_source);
3858: --dbms_output.put_line('okc_price_pub.g_lse_tbl'||k||'-'||okc_price_pub.g_lse_tbl(k).source_value);
3859: k:=okc_price_pub.g_lse_tbl.next(k);
3860: END LOOP;
3861:

Line 3858: --dbms_output.put_line('okc_price_pub.g_lse_tbl'||k||'-'||okc_price_pub.g_lse_tbl(k).source_value);

3854: k:=okc_price_pub.g_lse_tbl.first;
3855: while k is not null loop
3856:
3857: --dbms_output.put_line('okc_price_pub.g_lse_tbl'||k||'-'||okc_price_pub.g_lse_tbl(k).current_source);
3858: --dbms_output.put_line('okc_price_pub.g_lse_tbl'||k||'-'||okc_price_pub.g_lse_tbl(k).source_value);
3859: k:=okc_price_pub.g_lse_tbl.next(k);
3860: END LOOP;
3861:
3862: --dbms_output.put_line('okc_price_pub.g_rul_tbl');

Line 3859: k:=okc_price_pub.g_lse_tbl.next(k);

3855: while k is not null loop
3856:
3857: --dbms_output.put_line('okc_price_pub.g_lse_tbl'||k||'-'||okc_price_pub.g_lse_tbl(k).current_source);
3858: --dbms_output.put_line('okc_price_pub.g_lse_tbl'||k||'-'||okc_price_pub.g_lse_tbl(k).source_value);
3859: k:=okc_price_pub.g_lse_tbl.next(k);
3860: END LOOP;
3861:
3862: --dbms_output.put_line('okc_price_pub.g_rul_tbl');
3863: k:=okc_price_pub.g_rul_tbl.first;

Line 3862: --dbms_output.put_line('okc_price_pub.g_rul_tbl');

3858: --dbms_output.put_line('okc_price_pub.g_lse_tbl'||k||'-'||okc_price_pub.g_lse_tbl(k).source_value);
3859: k:=okc_price_pub.g_lse_tbl.next(k);
3860: END LOOP;
3861:
3862: --dbms_output.put_line('okc_price_pub.g_rul_tbl');
3863: k:=okc_price_pub.g_rul_tbl.first;
3864: while k is not null loop
3865: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).code);
3866: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).current_source);

Line 3863: k:=okc_price_pub.g_rul_tbl.first;

3859: k:=okc_price_pub.g_lse_tbl.next(k);
3860: END LOOP;
3861:
3862: --dbms_output.put_line('okc_price_pub.g_rul_tbl');
3863: k:=okc_price_pub.g_rul_tbl.first;
3864: while k is not null loop
3865: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).code);
3866: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).current_source);
3867: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).source_value);

Line 3865: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).code);

3861:
3862: --dbms_output.put_line('okc_price_pub.g_rul_tbl');
3863: k:=okc_price_pub.g_rul_tbl.first;
3864: while k is not null loop
3865: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).code);
3866: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).current_source);
3867: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).source_value);
3868: k:=okc_price_pub.g_rul_tbl.next(k);
3869: END LOOP;

Line 3866: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).current_source);

3862: --dbms_output.put_line('okc_price_pub.g_rul_tbl');
3863: k:=okc_price_pub.g_rul_tbl.first;
3864: while k is not null loop
3865: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).code);
3866: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).current_source);
3867: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).source_value);
3868: k:=okc_price_pub.g_rul_tbl.next(k);
3869: END LOOP;
3870: --dbms_output.put_line('okc_price_pub.g_prle_tbl');

Line 3867: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).source_value);

3863: k:=okc_price_pub.g_rul_tbl.first;
3864: while k is not null loop
3865: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).code);
3866: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).current_source);
3867: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).source_value);
3868: k:=okc_price_pub.g_rul_tbl.next(k);
3869: END LOOP;
3870: --dbms_output.put_line('okc_price_pub.g_prle_tbl');
3871: k:=okc_price_pub.g_prle_tbl.first;

Line 3868: k:=okc_price_pub.g_rul_tbl.next(k);

3864: while k is not null loop
3865: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).code);
3866: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).current_source);
3867: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).source_value);
3868: k:=okc_price_pub.g_rul_tbl.next(k);
3869: END LOOP;
3870: --dbms_output.put_line('okc_price_pub.g_prle_tbl');
3871: k:=okc_price_pub.g_prle_tbl.first;
3872:

Line 3870: --dbms_output.put_line('okc_price_pub.g_prle_tbl');

3866: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).current_source);
3867: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).source_value);
3868: k:=okc_price_pub.g_rul_tbl.next(k);
3869: END LOOP;
3870: --dbms_output.put_line('okc_price_pub.g_prle_tbl');
3871: k:=okc_price_pub.g_prle_tbl.first;
3872:
3873: while k is not null loop
3874: -- --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).code);

Line 3871: k:=okc_price_pub.g_prle_tbl.first;

3867: --dbms_output.put_line('okc_price_pub.g_rul_tbl'||k||'-'||okc_price_pub.g_rul_tbl(k).source_value);
3868: k:=okc_price_pub.g_rul_tbl.next(k);
3869: END LOOP;
3870: --dbms_output.put_line('okc_price_pub.g_prle_tbl');
3871: k:=okc_price_pub.g_prle_tbl.first;
3872:
3873: while k is not null loop
3874: -- --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).code);
3875: -- --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).current_source);

Line 3874: -- --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).code);

3870: --dbms_output.put_line('okc_price_pub.g_prle_tbl');
3871: k:=okc_price_pub.g_prle_tbl.first;
3872:
3873: while k is not null loop
3874: -- --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).code);
3875: -- --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).current_source);
3876: -- --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).source_value);
3877: k:=okc_price_pub.g_prle_tbl.next(k);
3878: END LOOP;*/

Line 3875: -- --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).current_source);

3871: k:=okc_price_pub.g_prle_tbl.first;
3872:
3873: while k is not null loop
3874: -- --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).code);
3875: -- --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).current_source);
3876: -- --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).source_value);
3877: k:=okc_price_pub.g_prle_tbl.next(k);
3878: END LOOP;*/
3879:

Line 3876: -- --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).source_value);

3872:
3873: while k is not null loop
3874: -- --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).code);
3875: -- --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).current_source);
3876: -- --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).source_value);
3877: k:=okc_price_pub.g_prle_tbl.next(k);
3878: END LOOP;*/
3879:
3880: -- populate global record g_contract_info

Line 3877: k:=okc_price_pub.g_prle_tbl.next(k);

3873: while k is not null loop
3874: -- --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).code);
3875: -- --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).current_source);
3876: -- --dbms_output.put_line('okc_price_pub.g_prle_tbl'||k||'-'||okc_price_pub.g_prle_tbl(k).source_value);
3877: k:=okc_price_pub.g_prle_tbl.next(k);
3878: END LOOP;*/
3879:
3880: -- populate global record g_contract_info
3881: If OKC_PRICE_PUB.G_CONTRACT_INFO.INV_ORG_ID is null then

Line 3881: If OKC_PRICE_PUB.G_CONTRACT_INFO.INV_ORG_ID is null then

3877: k:=okc_price_pub.g_prle_tbl.next(k);
3878: END LOOP;*/
3879:
3880: -- populate global record g_contract_info
3881: If OKC_PRICE_PUB.G_CONTRACT_INFO.INV_ORG_ID is null then
3882:
3883: Begin
3884: select INV_ORGANIZATION_ID
3885: into OKC_PRICE_PUB.G_CONTRACT_INFO.INV_ORG_ID

Line 3885: into OKC_PRICE_PUB.G_CONTRACT_INFO.INV_ORG_ID

3881: If OKC_PRICE_PUB.G_CONTRACT_INFO.INV_ORG_ID is null then
3882:
3883: Begin
3884: select INV_ORGANIZATION_ID
3885: into OKC_PRICE_PUB.G_CONTRACT_INFO.INV_ORG_ID
3886: from okc_k_headers_b
3887: where id = p_chr_id;
3888: IF (l_debug = 'Y') THEN
3889: my_debug('11290 : rowcount'||SQL%ROWCOUNT, 1);

Line 3898: END IF; -- If OKC_PRICE_PUB.G_CONTRACT_INFO.INV_ORG_ID is null

3894: IF (l_debug = 'Y') THEN
3895: my_debug('11300 : NO authoring org id found', 1);
3896: END IF;
3897: END;
3898: END IF; -- If OKC_PRICE_PUB.G_CONTRACT_INFO.INV_ORG_ID is null
3899:
3900: --OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE:=SYSDATE;
3901: --populate global variable sold_to_org_id. made it global as it is used
3902: --OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE:=p_line_tbl(i).pricing_date;

Line 3900: --OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE:=SYSDATE;

3896: END IF;
3897: END;
3898: END IF; -- If OKC_PRICE_PUB.G_CONTRACT_INFO.INV_ORG_ID is null
3899:
3900: --OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE:=SYSDATE;
3901: --populate global variable sold_to_org_id. made it global as it is used
3902: --OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE:=p_line_tbl(i).pricing_date;
3903: -- at many places for build context functions
3904: If OKC_PRICE_PUB.G_RUL_TBL.count > 0 then

Line 3902: --OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE:=p_line_tbl(i).pricing_date;

3898: END IF; -- If OKC_PRICE_PUB.G_CONTRACT_INFO.INV_ORG_ID is null
3899:
3900: --OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE:=SYSDATE;
3901: --populate global variable sold_to_org_id. made it global as it is used
3902: --OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE:=p_line_tbl(i).pricing_date;
3903: -- at many places for build context functions
3904: If OKC_PRICE_PUB.G_RUL_TBL.count > 0 then
3905: OKC_PRICE_PUB.G_CONTRACT_INFO.SOLD_TO_ORG_ID :=
3906: GET_RUL_SOURCE_VALUE(OKC_PRICE_PUB.G_RUL_TBL,'CAN','OKX_CUSTACCT');

Line 3904: If OKC_PRICE_PUB.G_RUL_TBL.count > 0 then

3900: --OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE:=SYSDATE;
3901: --populate global variable sold_to_org_id. made it global as it is used
3902: --OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE:=p_line_tbl(i).pricing_date;
3903: -- at many places for build context functions
3904: If OKC_PRICE_PUB.G_RUL_TBL.count > 0 then
3905: OKC_PRICE_PUB.G_CONTRACT_INFO.SOLD_TO_ORG_ID :=
3906: GET_RUL_SOURCE_VALUE(OKC_PRICE_PUB.G_RUL_TBL,'CAN','OKX_CUSTACCT');
3907: END IF;
3908: IF (l_debug = 'Y') THEN

Line 3905: OKC_PRICE_PUB.G_CONTRACT_INFO.SOLD_TO_ORG_ID :=

3901: --populate global variable sold_to_org_id. made it global as it is used
3902: --OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE:=p_line_tbl(i).pricing_date;
3903: -- at many places for build context functions
3904: If OKC_PRICE_PUB.G_RUL_TBL.count > 0 then
3905: OKC_PRICE_PUB.G_CONTRACT_INFO.SOLD_TO_ORG_ID :=
3906: GET_RUL_SOURCE_VALUE(OKC_PRICE_PUB.G_RUL_TBL,'CAN','OKX_CUSTACCT');
3907: END IF;
3908: IF (l_debug = 'Y') THEN
3909: my_debug('11310 : G_CONTRACT_INFO.PRICING_DATE for line '||OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE,1);

Line 3906: GET_RUL_SOURCE_VALUE(OKC_PRICE_PUB.G_RUL_TBL,'CAN','OKX_CUSTACCT');

3902: --OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE:=p_line_tbl(i).pricing_date;
3903: -- at many places for build context functions
3904: If OKC_PRICE_PUB.G_RUL_TBL.count > 0 then
3905: OKC_PRICE_PUB.G_CONTRACT_INFO.SOLD_TO_ORG_ID :=
3906: GET_RUL_SOURCE_VALUE(OKC_PRICE_PUB.G_RUL_TBL,'CAN','OKX_CUSTACCT');
3907: END IF;
3908: IF (l_debug = 'Y') THEN
3909: my_debug('11310 : G_CONTRACT_INFO.PRICING_DATE for line '||OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE,1);
3910: my_debug('11320: G_CONTRACT_INFO.INV_ORG_ID fo line'||OKC_PRICE_PUB.G_CONTRACT_INFO.INV_ORG_ID, 1);

Line 3909: my_debug('11310 : G_CONTRACT_INFO.PRICING_DATE for line '||OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE,1);

3905: OKC_PRICE_PUB.G_CONTRACT_INFO.SOLD_TO_ORG_ID :=
3906: GET_RUL_SOURCE_VALUE(OKC_PRICE_PUB.G_RUL_TBL,'CAN','OKX_CUSTACCT');
3907: END IF;
3908: IF (l_debug = 'Y') THEN
3909: my_debug('11310 : G_CONTRACT_INFO.PRICING_DATE for line '||OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE,1);
3910: my_debug('11320: G_CONTRACT_INFO.INV_ORG_ID fo line'||OKC_PRICE_PUB.G_CONTRACT_INFO.INV_ORG_ID, 1);
3911: my_debug('11330: G_CONTRACT_INFO.SOLD_TO_ORG_ID for line'||OKC_PRICE_PUB.G_CONTRACT_INFO.SOLD_TO_ORG_ID, 1);
3912: my_debug('11340 : G_CONTRACT_INFO.Inventory id for line'||OKC_PRICE_PUB.G_CONTRACT_INFO.INVENTORY_ITEM_ID, 1);
3913: my_debug('11350 : G_CONTRACT_INFO.top_model_line for line'||OKC_PRICE_PUB.G_CONTRACT_INFO.TOP_MODEL_LINE_ID, 1);

Line 3910: my_debug('11320: G_CONTRACT_INFO.INV_ORG_ID fo line'||OKC_PRICE_PUB.G_CONTRACT_INFO.INV_ORG_ID, 1);

3906: GET_RUL_SOURCE_VALUE(OKC_PRICE_PUB.G_RUL_TBL,'CAN','OKX_CUSTACCT');
3907: END IF;
3908: IF (l_debug = 'Y') THEN
3909: my_debug('11310 : G_CONTRACT_INFO.PRICING_DATE for line '||OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE,1);
3910: my_debug('11320: G_CONTRACT_INFO.INV_ORG_ID fo line'||OKC_PRICE_PUB.G_CONTRACT_INFO.INV_ORG_ID, 1);
3911: my_debug('11330: G_CONTRACT_INFO.SOLD_TO_ORG_ID for line'||OKC_PRICE_PUB.G_CONTRACT_INFO.SOLD_TO_ORG_ID, 1);
3912: my_debug('11340 : G_CONTRACT_INFO.Inventory id for line'||OKC_PRICE_PUB.G_CONTRACT_INFO.INVENTORY_ITEM_ID, 1);
3913: my_debug('11350 : G_CONTRACT_INFO.top_model_line for line'||OKC_PRICE_PUB.G_CONTRACT_INFO.TOP_MODEL_LINE_ID, 1);
3914: END IF;

Line 3911: my_debug('11330: G_CONTRACT_INFO.SOLD_TO_ORG_ID for line'||OKC_PRICE_PUB.G_CONTRACT_INFO.SOLD_TO_ORG_ID, 1);

3907: END IF;
3908: IF (l_debug = 'Y') THEN
3909: my_debug('11310 : G_CONTRACT_INFO.PRICING_DATE for line '||OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE,1);
3910: my_debug('11320: G_CONTRACT_INFO.INV_ORG_ID fo line'||OKC_PRICE_PUB.G_CONTRACT_INFO.INV_ORG_ID, 1);
3911: my_debug('11330: G_CONTRACT_INFO.SOLD_TO_ORG_ID for line'||OKC_PRICE_PUB.G_CONTRACT_INFO.SOLD_TO_ORG_ID, 1);
3912: my_debug('11340 : G_CONTRACT_INFO.Inventory id for line'||OKC_PRICE_PUB.G_CONTRACT_INFO.INVENTORY_ITEM_ID, 1);
3913: my_debug('11350 : G_CONTRACT_INFO.top_model_line for line'||OKC_PRICE_PUB.G_CONTRACT_INFO.TOP_MODEL_LINE_ID, 1);
3914: END IF;
3915:

Line 3912: my_debug('11340 : G_CONTRACT_INFO.Inventory id for line'||OKC_PRICE_PUB.G_CONTRACT_INFO.INVENTORY_ITEM_ID, 1);

3908: IF (l_debug = 'Y') THEN
3909: my_debug('11310 : G_CONTRACT_INFO.PRICING_DATE for line '||OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE,1);
3910: my_debug('11320: G_CONTRACT_INFO.INV_ORG_ID fo line'||OKC_PRICE_PUB.G_CONTRACT_INFO.INV_ORG_ID, 1);
3911: my_debug('11330: G_CONTRACT_INFO.SOLD_TO_ORG_ID for line'||OKC_PRICE_PUB.G_CONTRACT_INFO.SOLD_TO_ORG_ID, 1);
3912: my_debug('11340 : G_CONTRACT_INFO.Inventory id for line'||OKC_PRICE_PUB.G_CONTRACT_INFO.INVENTORY_ITEM_ID, 1);
3913: my_debug('11350 : G_CONTRACT_INFO.top_model_line for line'||OKC_PRICE_PUB.G_CONTRACT_INFO.TOP_MODEL_LINE_ID, 1);
3914: END IF;
3915:
3916:

Line 3913: my_debug('11350 : G_CONTRACT_INFO.top_model_line for line'||OKC_PRICE_PUB.G_CONTRACT_INFO.TOP_MODEL_LINE_ID, 1);

3909: my_debug('11310 : G_CONTRACT_INFO.PRICING_DATE for line '||OKC_PRICE_PUB.G_CONTRACT_INFO.PRICING_DATE,1);
3910: my_debug('11320: G_CONTRACT_INFO.INV_ORG_ID fo line'||OKC_PRICE_PUB.G_CONTRACT_INFO.INV_ORG_ID, 1);
3911: my_debug('11330: G_CONTRACT_INFO.SOLD_TO_ORG_ID for line'||OKC_PRICE_PUB.G_CONTRACT_INFO.SOLD_TO_ORG_ID, 1);
3912: my_debug('11340 : G_CONTRACT_INFO.Inventory id for line'||OKC_PRICE_PUB.G_CONTRACT_INFO.INVENTORY_ITEM_ID, 1);
3913: my_debug('11350 : G_CONTRACT_INFO.top_model_line for line'||OKC_PRICE_PUB.G_CONTRACT_INFO.TOP_MODEL_LINE_ID, 1);
3914: END IF;
3915:
3916:
3917: IF (l_debug = 'Y') THEN

Line 3931: okc_price_pub.g_rul_tbl.DELETE;

3927: IF (l_debug = 'Y') THEN
3928: my_debug('11402 : After Calling Build context request type', 1);
3929: END IF;
3930:
3931: okc_price_pub.g_rul_tbl.DELETE;
3932: okc_price_pub.g_prle_tbl.DELETE;
3933: okc_price_pub.g_lse_tbl.DELETE;
3934: OKC_PRICE_PUB.G_CONTRACT_INFO.inventory_item_id:=null;
3935:

Line 3932: okc_price_pub.g_prle_tbl.DELETE;

3928: my_debug('11402 : After Calling Build context request type', 1);
3929: END IF;
3930:
3931: okc_price_pub.g_rul_tbl.DELETE;
3932: okc_price_pub.g_prle_tbl.DELETE;
3933: okc_price_pub.g_lse_tbl.DELETE;
3934: OKC_PRICE_PUB.G_CONTRACT_INFO.inventory_item_id:=null;
3935:
3936: Exception

Line 3933: okc_price_pub.g_lse_tbl.DELETE;

3929: END IF;
3930:
3931: okc_price_pub.g_rul_tbl.DELETE;
3932: okc_price_pub.g_prle_tbl.DELETE;
3933: okc_price_pub.g_lse_tbl.DELETE;
3934: OKC_PRICE_PUB.G_CONTRACT_INFO.inventory_item_id:=null;
3935:
3936: Exception
3937: When Others then

Line 3934: OKC_PRICE_PUB.G_CONTRACT_INFO.inventory_item_id:=null;

3930:
3931: okc_price_pub.g_rul_tbl.DELETE;
3932: okc_price_pub.g_prle_tbl.DELETE;
3933: okc_price_pub.g_lse_tbl.DELETE;
3934: OKC_PRICE_PUB.G_CONTRACT_INFO.inventory_item_id:=null;
3935:
3936: Exception
3937: When Others then
3938: --dbms_output.put_line('error'||substr(sqlerrm,1,240));

Line 6458: OKC_PRICE_PUB.G_CONTRACT_INFO := null;

6454: px_cle_price_tbl.delete;
6455: i:= l_priced_tbl.first;
6456: j:=0;
6457: --?????maybe we can do without initializing global rec here for better performance
6458: OKC_PRICE_PUB.G_CONTRACT_INFO := null;
6459: While i is not null LOOP -- l_priced_tbl loop
6460: l_price_list:=null;
6461: l_prc_Tbl.delete;
6462: l_qual_Tbl.delete;

Line 6630: OKC_PRICE_PUB.G_CONTRACT_INFO:= null;

6626:
6627: i:=l_priced_tbl.next(i);
6628: END LOOP; -- l_priced_tbl loop
6629: Elsif l_okc_control_rec.p_config_yn in ('Y','S') then --p_config_flag
6630: OKC_PRICE_PUB.G_CONTRACT_INFO:= null;
6631: If l_okc_control_rec.p_top_model_id is null then
6632: OKC_API.set_message(p_app_name => g_app_name,
6633: p_msg_name => 'OKC_INVALID_TOP_MODEL');
6634: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 6676: OKC_PRICE_PUB.G_CONTRACT_INFO.top_model_line_id:= l_id1;

6672: l_line_tbl(i).id1:=l_id1;
6673: l_line_tbl(i).id2:=l_id2;
6674: -- populate global top model intevnetory item id with this value
6675: IF l_id_tbl(i) = l_okc_control_rec.p_top_model_id then
6676: OKC_PRICE_PUB.G_CONTRACT_INFO.top_model_line_id:= l_id1;
6677: END IF;
6678: i:=l_id_tbl.next(i);
6679: EXCEPTION
6680: WHEN NO_DATA_FOUND then

Line 6694: OKC_PRICE_PUB.G_CONTRACT_INFO.inventory_item_id := px_cle_price_tbl(i).id1;

6690: while i is not null loop--#3config
6691:
6692: --??????? an issue here that build_context has to be called now for each line as the
6693: --following values will differ.
6694: OKC_PRICE_PUB.G_CONTRACT_INFO.inventory_item_id := px_cle_price_tbl(i).id1;
6695: /*-- here the assumption is that out of the pl/sql tbl sent by configurtor cal
6696: -- the first record is the one with the top model line. hence
6697: -- picking its inventory_item_id
6698: If i = px_cle_price_tbl.first then

Line 6699: OKC_PRICE_PUB.G_CONTRACT_INFO.top_model_line_id:= px_cle_price_tbl(i).id1;

6695: /*-- here the assumption is that out of the pl/sql tbl sent by configurtor cal
6696: -- the first record is the one with the top model line. hence
6697: -- picking its inventory_item_id
6698: If i = px_cle_price_tbl.first then
6699: OKC_PRICE_PUB.G_CONTRACT_INFO.top_model_line_id:= px_cle_price_tbl(i).id1;
6700: end if;*/
6701: BUILD_CLE_CONTEXT(
6702: p_api_version => p_api_version,
6703: p_init_msg_list => p_init_msg_list,