DBA Data[Home] [Help]

APPS.WSMPPCPD dependencies on WSMPPCPD

Line 1: PACKAGE BODY WSMPPCPD AS

1: PACKAGE BODY WSMPPCPD AS
2: /* $Header: WSMPCPDB.pls 120.5 2006/09/14 05:23:10 sisankar noship $ */
3:
4: g_org_id NUMBER := NULL;
5:

Line 141: -- x_error_msg := 'Insufficient arguments to WSMPPCPD.insert_bill';

137:
138: EXCEPTION
139: WHEN e_insert_bill THEN
140: x_error_code := 1;
141: -- x_error_msg := 'Insufficient arguments to WSMPPCPD.insert_bill';
142: fnd_message.set_name('WSM', 'WSM_INSUFFICIENT_ARGUMENTS');
143: fnd_message.set_token('OBJECT_NAME', 'WSMPPCPD.insert_bill');
144: x_error_msg := fnd_message.get;
145:

Line 143: fnd_message.set_token('OBJECT_NAME', 'WSMPPCPD.insert_bill');

139: WHEN e_insert_bill THEN
140: x_error_code := 1;
141: -- x_error_msg := 'Insufficient arguments to WSMPPCPD.insert_bill';
142: fnd_message.set_name('WSM', 'WSM_INSUFFICIENT_ARGUMENTS');
143: fnd_message.set_token('OBJECT_NAME', 'WSMPPCPD.insert_bill');
144: x_error_msg := fnd_message.get;
145:
146: WHEN OTHERS THEN
147: x_error_code := sqlcode;

Line 148: x_error_msg := 'WSMPPCPD.insert_bill(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);

144: x_error_msg := fnd_message.get;
145:
146: WHEN OTHERS THEN
147: x_error_code := sqlcode;
148: x_error_msg := 'WSMPPCPD.insert_bill(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);
149: END insert_bill;
150:
151:
152: /* ===========================================================================

Line 361: --x_error_msg := 'Insufficient arguments to WSMPPCPD.insert_component';

357:
358: EXCEPTION
359: WHEN e_insert_component THEN
360: x_error_code := 1;
361: --x_error_msg := 'Insufficient arguments to WSMPPCPD.insert_component';
362: fnd_message.set_name('WSM', 'WSM_INSUFFICIENT_ARGUMENTS');
363: fnd_message.set_token('OBJECT_NAME', 'WSMPPCPD.insert_component');
364: x_error_msg := fnd_message.get;
365:

Line 363: fnd_message.set_token('OBJECT_NAME', 'WSMPPCPD.insert_component');

359: WHEN e_insert_component THEN
360: x_error_code := 1;
361: --x_error_msg := 'Insufficient arguments to WSMPPCPD.insert_component';
362: fnd_message.set_name('WSM', 'WSM_INSUFFICIENT_ARGUMENTS');
363: fnd_message.set_token('OBJECT_NAME', 'WSMPPCPD.insert_component');
364: x_error_msg := fnd_message.get;
365:
366: WHEN OTHERS THEN
367: x_error_code := sqlcode;

Line 368: x_error_msg := 'WSMPPCPD.insert_component(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);

364: x_error_msg := fnd_message.get;
365:
366: WHEN OTHERS THEN
367: x_error_code := sqlcode;
368: x_error_msg := 'WSMPPCPD.insert_component(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);
369: END insert_component;
370:
371:
372: /* ===========================================================================

Line 548: --x_error_msg := 'Insufficient arguments to WSMPPCPD.insert_substitute_component';

544:
545: EXCEPTION
546: WHEN e_insert_substitute THEN
547: x_error_code := 1;
548: --x_error_msg := 'Insufficient arguments to WSMPPCPD.insert_substitute_component';
549: fnd_message.set_name('WSM', 'WSM_INSUFFICIENT_ARGUMENTS');
550: fnd_message.set_token('OBJECT_NAME', 'WSMPPCPD.insert_substitute_component');
551: x_error_msg := fnd_message.get;
552:

Line 550: fnd_message.set_token('OBJECT_NAME', 'WSMPPCPD.insert_substitute_component');

546: WHEN e_insert_substitute THEN
547: x_error_code := 1;
548: --x_error_msg := 'Insufficient arguments to WSMPPCPD.insert_substitute_component';
549: fnd_message.set_name('WSM', 'WSM_INSUFFICIENT_ARGUMENTS');
550: fnd_message.set_token('OBJECT_NAME', 'WSMPPCPD.insert_substitute_component');
551: x_error_msg := fnd_message.get;
552:
553: WHEN e_proc_exception THEN
554: x_error_msg := x_error_msg || ' - ' || 'WSMPPCPD.insert_substitute_component('||x_progress||')';

Line 554: x_error_msg := x_error_msg || ' - ' || 'WSMPPCPD.insert_substitute_component('||x_progress||')';

550: fnd_message.set_token('OBJECT_NAME', 'WSMPPCPD.insert_substitute_component');
551: x_error_msg := fnd_message.get;
552:
553: WHEN e_proc_exception THEN
554: x_error_msg := x_error_msg || ' - ' || 'WSMPPCPD.insert_substitute_component('||x_progress||')';
555:
556: WHEN OTHERS THEN
557: x_error_code := sqlcode;
558: x_error_msg := 'WSMPPCPD.insert_substitute_component(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);

Line 558: x_error_msg := 'WSMPPCPD.insert_substitute_component(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);

554: x_error_msg := x_error_msg || ' - ' || 'WSMPPCPD.insert_substitute_component('||x_progress||')';
555:
556: WHEN OTHERS THEN
557: x_error_code := sqlcode;
558: x_error_msg := 'WSMPPCPD.insert_substitute_component(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);
559:
560: END insert_substitute_component;
561:
562:

Line 622: WSMPPCPD.insert_substitute_component (x_rec,

618: x_rec.attribute13 := S_rec.attribute13;
619: x_rec.attribute14 := S_rec.attribute14;
620: x_rec.attribute15 := S_rec.attribute15;
621:
622: WSMPPCPD.insert_substitute_component (x_rec,
623: x_co_product_name,
624: x_alternate_designator,
625: x_component_name,
626: x_comp_start_eff_date,

Line 649: x_error_msg := x_error_msg || ' - ' || 'WSMPPCPD.insert_sub_comps('||x_progress||')';

645: x_error_code := 0;
646:
647: EXCEPTION
648: WHEN e_proc_exception THEN
649: x_error_msg := x_error_msg || ' - ' || 'WSMPPCPD.insert_sub_comps('||x_progress||')';
650:
651: WHEN OTHERS THEN
652: x_error_code := sqlcode;
653: x_error_msg := 'WSMPPCPD.insert_sub_comps(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);

Line 653: x_error_msg := 'WSMPPCPD.insert_sub_comps(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);

649: x_error_msg := x_error_msg || ' - ' || 'WSMPPCPD.insert_sub_comps('||x_progress||')';
650:
651: WHEN OTHERS THEN
652: x_error_code := sqlcode;
653: x_error_msg := 'WSMPPCPD.insert_sub_comps(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);
654:
655: END insert_sub_comps;
656:
657: /* ===========================================================================

Line 1114: x_error_msg := x_error_msg || ' - ' || 'WSMPPCPD.insert_sub_comps('||x_progress||')';

1110: x_error_code := 0;
1111:
1112: EXCEPTION
1113: WHEN e_proc_exception THEN
1114: x_error_msg := x_error_msg || ' - ' || 'WSMPPCPD.insert_sub_comps('||x_progress||')';
1115:
1116: WHEN e_comp_exception THEN
1117: x_error_code := 1;
1118: fnd_message.set_name('WSM','WSM_MISSING_BOM_COMP');

Line 1141: x_error_msg := 'WSMPPCPD.process_bom_sub_comp(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);

1137: x_error_msg := fnd_message.get;
1138:
1139: WHEN OTHERS THEN
1140: x_error_code := sqlcode;
1141: x_error_msg := 'WSMPPCPD.process_bom_sub_comp(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);
1142:
1143: END process_bom_sub_comp;
1144: ***************************************************************************************************************************/
1145:

Line 1628: x_error_msg := x_error_msg || ' - ' || 'WSMPPCPD.insert_sub_comps('||x_progress||')';

1624: x_error_code := 0;
1625:
1626: EXCEPTION
1627: WHEN e_proc_exception THEN
1628: x_error_msg := x_error_msg || ' - ' || 'WSMPPCPD.insert_sub_comps('||x_progress||')';
1629:
1630: WHEN e_comp_exception THEN
1631: x_error_code := 1;
1632: fnd_message.set_name('WSM','WSM_MISSING_BOM_COMP');

Line 1655: x_error_msg := 'WSMPPCPD.process_bom_sub_comp(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);

1651: x_error_msg := fnd_message.get;
1652:
1653: WHEN OTHERS THEN
1654: x_error_code := sqlcode;
1655: x_error_msg := 'WSMPPCPD.process_bom_sub_comp(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);
1656:
1657: END process_bom_sub_comp;
1658:
1659:

Line 1942: x_error_msg := x_error_msg || ' - ' || 'WSMPPCPD.val_co_product_details('||x_progress||')'||' - '||substr(sqlerrm,1,200);

1938: END IF;
1939:
1940: EXCEPTION
1941: WHEN e_proc_exception THEN
1942: x_error_msg := x_error_msg || ' - ' || 'WSMPPCPD.val_co_product_details('||x_progress||')'||' - '||substr(sqlerrm,1,200);
1943:
1944: WHEN OTHERS THEN
1945: x_error_code := sqlcode;
1946: x_error_msg := 'WSMPPCPD.val_co_product_details(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);

Line 1946: x_error_msg := 'WSMPPCPD.val_co_product_details(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);

1942: x_error_msg := x_error_msg || ' - ' || 'WSMPPCPD.val_co_product_details('||x_progress||')'||' - '||substr(sqlerrm,1,200);
1943:
1944: WHEN OTHERS THEN
1945: x_error_code := sqlcode;
1946: x_error_msg := 'WSMPPCPD.val_co_product_details(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);
1947: END val_co_product_details;
1948:
1949: /*===========================================================================
1950:

Line 2144: WSMPPCPD.insert_bill ( x_rec,

2140: x_rec.attribute15 := x_coprod_attribute15;
2141:
2142: x_progress := '100';
2143:
2144: WSMPPCPD.insert_bill ( x_rec,
2145: x_co_product_name,
2146: x_org_code,
2147: x_error_code,
2148: x_error_msg);

Line 2157: WSMPPCPD.call_bom_bo_api (

2153:
2154: -- now go ahead and call the BOM Business Object API
2155: -- to insert this primary bill
2156:
2157: WSMPPCPD.call_bom_bo_api (
2158: p_bom_header_rec => g_bom_header_rec,
2159: x_error_code => x_error_code,
2160: x_error_msg => x_error_msg );
2161:

Line 2219: WSMPPCPD.insert_bill ( x_rec,

2215: x_rec.attribute15 := x_coprod_attribute15;
2216:
2217: x_progress := '110';
2218:
2219: WSMPPCPD.insert_bill ( x_rec,
2220: x_co_product_name,
2221: x_org_code,
2222: x_error_code,
2223: x_error_msg);

Line 2281: WSMPPCPD.insert_component ( x_rec_comp,

2277:
2278: x_progress := '120';
2279:
2280:
2281: WSMPPCPD.insert_component ( x_rec_comp,
2282: x_component_name,
2283: x_org_code,
2284: x_co_product_name,
2285: x_supply_locator,

Line 2294: WSMPPCPD.insert_sub_comps (x_co_product_group_id,

2290: END IF;
2291:
2292: /* Insert substitutes. */
2293:
2294: WSMPPCPD.insert_sub_comps (x_co_product_group_id,
2295: x_co_product_name,
2296: x_alternate_designator,
2297: x_component_name,
2298: --bug 2987645

Line 2327: WSMPPCPD.call_bom_bo_api (

2323: -- Start
2324:
2325: If x_bill_insert AND (x_comp_insert <> TRUE) Then
2326:
2327: WSMPPCPD.call_bom_bo_api (
2328: p_bom_header_rec => g_bom_header_rec,
2329: x_error_code => x_error_code,
2330: x_error_msg => x_error_msg );
2331:

Line 2365: WSMPPCPD.call_bom_bo_api (

2361: */
2362:
2363: If x_comp_insert Then /*Bug#1359654 fix */
2364:
2365: WSMPPCPD.call_bom_bo_api (
2366: p_bom_header_rec => g_bom_header_rec,
2367: p_component_tbl => g_component_tbl,
2368: p_subs_comp_tbl => g_subs_comp_tbl,
2369: x_error_code => x_error_code,

Line 2509: WSMPPCPD.lock_component(x_component_sequence_id,

2505: x_progress := '150';
2506:
2507: /* Lock corresponding component prior to update. */
2508:
2509: WSMPPCPD.lock_component(x_component_sequence_id,
2510: x_error_code,
2511: x_error_msg);
2512:
2513: IF (x_error_code > 0) THEN

Line 2562: WSMPPCPD.lock_component (x_component_sequence_id,

2558: */
2559:
2560: /* Lock corresponding component prior to update. */
2561:
2562: WSMPPCPD.lock_component (x_component_sequence_id,
2563: x_error_code,
2564: x_error_msg);
2565:
2566: IF (x_error_code > 0) THEN

Line 2587: WSMPPCPD.set_common_bill (x_co_product_group_id,

2583: -- information.
2584:
2585: x_progress := '160';
2586:
2587: WSMPPCPD.set_common_bill (x_co_product_group_id,
2588: x_org_id,
2589: x_co_product_id,
2590: x_bill_sequence_id,
2591: x_component_sequence_id,

Line 2620: x_error_msg := x_error_msg || ' - ' || 'WSMPPCPD.process_co_product('||x_progress||')'||' - '||substr(sqlerrm,1,200);

2616: --x_error_code := -900; -- removed by raghu since we need the
2617: -- error code from call_bom_bo_api
2618: -- for error handling
2619: -- added by Bala.
2620: x_error_msg := x_error_msg || ' - ' || 'WSMPPCPD.process_co_product('||x_progress||')'||' - '||substr(sqlerrm,1,200);
2621:
2622: WHEN OTHERS THEN
2623: x_error_code := sqlcode;
2624: x_error_msg := 'WSMPPCPD.process_co_product(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);

Line 2624: x_error_msg := 'WSMPPCPD.process_co_product(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);

2620: x_error_msg := x_error_msg || ' - ' || 'WSMPPCPD.process_co_product('||x_progress||')'||' - '||substr(sqlerrm,1,200);
2621:
2622: WHEN OTHERS THEN
2623: x_error_code := sqlcode;
2624: x_error_msg := 'WSMPPCPD.process_co_product(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);
2625:
2626: END process_co_product;
2627:
2628:

Line 2732: WSMPPCPD.lock_bill (S_rec.bill_sequence_id,

2728: x_progress := '040';
2729:
2730: /* -- Lock corresponding bill prior to update. */
2731:
2732: WSMPPCPD.lock_bill (S_rec.bill_sequence_id,
2733: x_error_code,
2734: x_error_msg);
2735:
2736: IF (x_error_code > 0) THEN

Line 2831: WSMPPCPD.lock_bill (x_bill_sequence_id,

2827: x_progress := '080';
2828:
2829: /* -- Lock corresponding bill prior to update. */
2830:
2831: WSMPPCPD.lock_bill (x_bill_sequence_id,
2832: x_error_code,
2833: x_error_msg);
2834:
2835: IF (x_error_code > 0) THEN

Line 2854: x_error_msg := x_error_msg || ' - ' || 'WSMPPCPD.set_common_bill('||x_progress||')';

2850: x_error_code := 0;
2851:
2852: EXCEPTION
2853: WHEN e_proc_exception THEN
2854: x_error_msg := x_error_msg || ' - ' || 'WSMPPCPD.set_common_bill('||x_progress||')';
2855:
2856: WHEN e_c_bill_exists THEN
2857: x_error_code := 3;
2858: -- x_error_msg := 'Cannot update bill. It currently points to another common bill.';

Line 2870: -- x_error_msg := 'Insufficient arguments to WSMPPCPD.set_common_bill';

2866: x_error_msg := fnd_message.get;
2867:
2868: WHEN e_set_common_bill THEN
2869: x_error_code := 1;
2870: -- x_error_msg := 'Insufficient arguments to WSMPPCPD.set_common_bill';
2871: fnd_message.set_name('WSM', 'WSM_INSUFFICIENT_ARGUMENTS');
2872: fnd_message.set_token('OBJECT_NAME', 'WSMPPCPD.set_common_bill');
2873: x_error_msg := fnd_message.get;
2874:

Line 2872: fnd_message.set_token('OBJECT_NAME', 'WSMPPCPD.set_common_bill');

2868: WHEN e_set_common_bill THEN
2869: x_error_code := 1;
2870: -- x_error_msg := 'Insufficient arguments to WSMPPCPD.set_common_bill';
2871: fnd_message.set_name('WSM', 'WSM_INSUFFICIENT_ARGUMENTS');
2872: fnd_message.set_token('OBJECT_NAME', 'WSMPPCPD.set_common_bill');
2873: x_error_msg := fnd_message.get;
2874:
2875: WHEN OTHERS THEN
2876: x_error_code := sqlcode;

Line 2877: x_error_msg := 'WSMPPCPD.set_common_bill(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);

2873: x_error_msg := fnd_message.get;
2874:
2875: WHEN OTHERS THEN
2876: x_error_code := sqlcode;
2877: x_error_msg := 'WSMPPCPD.set_common_bill(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);
2878: END set_common_bill;
2879:
2880: /* ===========================================================================
2881:

Line 2921: WSMPPCPD.delete_co_product (x_co_product_group_id,

2917: x_progress := '020';
2918:
2919: FOR S_rec IN S LOOP
2920:
2921: WSMPPCPD.delete_co_product (x_co_product_group_id,
2922: S_rec.co_product_id,
2923: x_error_code,
2924: x_error_msg);
2925:

Line 2950: -- x_error_msg := 'Insufficient arguments to WSMPPCPD.delete_component';

2946:
2947: EXCEPTION
2948: WHEN e_delete_component THEN
2949: x_error_code := 1;
2950: -- x_error_msg := 'Insufficient arguments to WSMPPCPD.delete_component';
2951: fnd_message.set_name('WSM', 'WSM_INSUFFICIENT_ARGUMENTS');
2952: fnd_message.set_token('OBJECT_NAME', 'WSMPPCPD.delete_component');
2953: x_error_msg := fnd_message.get;
2954:

Line 2952: fnd_message.set_token('OBJECT_NAME', 'WSMPPCPD.delete_component');

2948: WHEN e_delete_component THEN
2949: x_error_code := 1;
2950: -- x_error_msg := 'Insufficient arguments to WSMPPCPD.delete_component';
2951: fnd_message.set_name('WSM', 'WSM_INSUFFICIENT_ARGUMENTS');
2952: fnd_message.set_token('OBJECT_NAME', 'WSMPPCPD.delete_component');
2953: x_error_msg := fnd_message.get;
2954:
2955: WHEN e_proc_exception THEN
2956: x_error_msg := x_error_msg || ' - ' || 'WSMPPCPD.delete_component('||x_progress||')';

Line 2956: x_error_msg := x_error_msg || ' - ' || 'WSMPPCPD.delete_component('||x_progress||')';

2952: fnd_message.set_token('OBJECT_NAME', 'WSMPPCPD.delete_component');
2953: x_error_msg := fnd_message.get;
2954:
2955: WHEN e_proc_exception THEN
2956: x_error_msg := x_error_msg || ' - ' || 'WSMPPCPD.delete_component('||x_progress||')';
2957:
2958: WHEN OTHERS THEN
2959: x_error_code := sqlcode;
2960: x_error_msg := 'WSMPPCPD.delete_component(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);

Line 2960: x_error_msg := 'WSMPPCPD.delete_component(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);

2956: x_error_msg := x_error_msg || ' - ' || 'WSMPPCPD.delete_component('||x_progress||')';
2957:
2958: WHEN OTHERS THEN
2959: x_error_code := sqlcode;
2960: x_error_msg := 'WSMPPCPD.delete_component(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);
2961: END delete_component;
2962:
2963:
2964: /* ===========================================================================

Line 3034: WSMPPCPD.process_co_product (x_process_code => 3,

3030:
3031: /*******
3032: -- commented out by Bala on June 23rd, 2000.
3033:
3034: WSMPPCPD.process_co_product (x_process_code => 3,
3035: x_bill_sequence_id => x_bill_sequence_id,
3036: x_component_sequence_id => x_component_sequence_id,
3037: x_alternate_designator => x_alternate,
3038: x_error_code => x_error_code,

Line 3072: WSMPPCPD.lock_bill( x_bill_sequence_id => x_bill_sequence_id

3068: -- Commenting the following code out. Please refer to bug 2816426
3069:
3070: /* ***************************************************************************
3071:
3072: WSMPPCPD.lock_bill( x_bill_sequence_id => x_bill_sequence_id
3073: , x_error_code => x_error_code
3074: , x_error_msg => x_error_msg);
3075:
3076: IF (x_error_code > 0) THEN

Line 3106: WSMPPCPD.lock_component(x_component_sequence_id,

3102: And NVL(bcp.primary_flag, 'N') = 'Y';
3103:
3104: x_progress := '032';
3105:
3106: WSMPPCPD.lock_component(x_component_sequence_id,
3107: x_error_code,
3108: x_error_msg);
3109:
3110: IF (x_error_code > 0) THEN

Line 3174: -- x_error_msg := 'Insufficient arguments to WSMPPCPD.delete_co_product';

3170:
3171: EXCEPTION
3172: WHEN e_delete_co_product THEN
3173: x_error_code := 1;
3174: -- x_error_msg := 'Insufficient arguments to WSMPPCPD.delete_co_product';
3175: fnd_message.set_name('WSM', 'WSM_INSUFFICIENT_ARGUMENTS');
3176: fnd_message.set_token('OBJECT_NAME', 'WSMPPCPD.delete_co_product');
3177: x_error_msg := fnd_message.get;
3178:

Line 3176: fnd_message.set_token('OBJECT_NAME', 'WSMPPCPD.delete_co_product');

3172: WHEN e_delete_co_product THEN
3173: x_error_code := 1;
3174: -- x_error_msg := 'Insufficient arguments to WSMPPCPD.delete_co_product';
3175: fnd_message.set_name('WSM', 'WSM_INSUFFICIENT_ARGUMENTS');
3176: fnd_message.set_token('OBJECT_NAME', 'WSMPPCPD.delete_co_product');
3177: x_error_msg := fnd_message.get;
3178:
3179: WHEN e_proc_exception THEN
3180: x_error_msg := x_error_msg || ' - ' || 'WSMPPCPD.delete_co_product('||x_progress||')';

Line 3180: x_error_msg := x_error_msg || ' - ' || 'WSMPPCPD.delete_co_product('||x_progress||')';

3176: fnd_message.set_token('OBJECT_NAME', 'WSMPPCPD.delete_co_product');
3177: x_error_msg := fnd_message.get;
3178:
3179: WHEN e_proc_exception THEN
3180: x_error_msg := x_error_msg || ' - ' || 'WSMPPCPD.delete_co_product('||x_progress||')';
3181:
3182: WHEN OTHERS THEN
3183: x_error_code := sqlcode;
3184: x_error_msg := 'WSMPPCPD.delete_co_product(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);

Line 3184: x_error_msg := 'WSMPPCPD.delete_co_product(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);

3180: x_error_msg := x_error_msg || ' - ' || 'WSMPPCPD.delete_co_product('||x_progress||')';
3181:
3182: WHEN OTHERS THEN
3183: x_error_code := sqlcode;
3184: x_error_msg := 'WSMPPCPD.delete_co_product(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);
3185: END delete_co_product;
3186:
3187:
3188: /* ===========================================================================

Line 3250: WSMPPCPD.process_co_product (x_process_code => 2,

3246: FOR S_rec IN S LOOP
3247:
3248: x_progress := '020';
3249:
3250: WSMPPCPD.process_co_product (x_process_code => 2,
3251: x_bill_sequence_id => x_bill_sequence_id,
3252: x_component_sequence_id => S_rec.component_sequence_id,
3253: x_alternate_designator => x_alternate,
3254: x_usage => x_usage_rate,

Line 3303: -- x_error_msg := 'Insufficient arguments to WSMPPCPD.update_co_prod_details';

3299:
3300: EXCEPTION
3301: WHEN e_update_co_prod_details THEN
3302: x_error_code := 1;
3303: -- x_error_msg := 'Insufficient arguments to WSMPPCPD.update_co_prod_details';
3304: fnd_message.set_name('WSM', 'WSM_INSUFFICIENT_ARGUMENTS');
3305: fnd_message.set_token('OBJECT_NAME', 'WSMPPCPD.update_co_prod_details');
3306: x_error_msg := fnd_message.get;
3307:

Line 3305: fnd_message.set_token('OBJECT_NAME', 'WSMPPCPD.update_co_prod_details');

3301: WHEN e_update_co_prod_details THEN
3302: x_error_code := 1;
3303: -- x_error_msg := 'Insufficient arguments to WSMPPCPD.update_co_prod_details';
3304: fnd_message.set_name('WSM', 'WSM_INSUFFICIENT_ARGUMENTS');
3305: fnd_message.set_token('OBJECT_NAME', 'WSMPPCPD.update_co_prod_details');
3306: x_error_msg := fnd_message.get;
3307:
3308: WHEN e_proc_exception THEN
3309: x_error_msg := x_error_msg || ' - ' || 'WSMPPCPD.update_co_prod_details('||x_progress||')';

Line 3309: x_error_msg := x_error_msg || ' - ' || 'WSMPPCPD.update_co_prod_details('||x_progress||')';

3305: fnd_message.set_token('OBJECT_NAME', 'WSMPPCPD.update_co_prod_details');
3306: x_error_msg := fnd_message.get;
3307:
3308: WHEN e_proc_exception THEN
3309: x_error_msg := x_error_msg || ' - ' || 'WSMPPCPD.update_co_prod_details('||x_progress||')';
3310:
3311: WHEN OTHERS THEN
3312: x_error_code := sqlcode;
3313: x_error_msg := 'WSMPPCPD.update_co_prod_details(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);

Line 3313: x_error_msg := 'WSMPPCPD.update_co_prod_details(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);

3309: x_error_msg := x_error_msg || ' - ' || 'WSMPPCPD.update_co_prod_details('||x_progress||')';
3310:
3311: WHEN OTHERS THEN
3312: x_error_code := sqlcode;
3313: x_error_msg := 'WSMPPCPD.update_co_prod_details(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);
3314: END update_co_prod_details;
3315:
3316:
3317: /*===========================================================================

Line 3350: x_error_msg := 'WSMPPCPD.lock_bill(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);

3346: x_error_msg := fnd_message.get;
3347:
3348: WHEN OTHERS THEN
3349: x_error_code := sqlcode;
3350: x_error_msg := 'WSMPPCPD.lock_bill(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);
3351:
3352: END lock_bill;
3353:
3354: /*===========================================================================

Line 3387: x_error_msg := 'WSMPPCPD.lock_component(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);

3383: x_error_msg := fnd_message.get;
3384:
3385: WHEN OTHERS THEN
3386: x_error_code := sqlcode;
3387: x_error_msg := 'WSMPPCPD.lock_component(' || x_progress || ')' || ' - ' || substr(sqlerrm, 1, 200);
3388:
3389: END lock_component;
3390:
3391: /*===========================================================================

Line 3530: fnd_message.set_token('OBJECT_NAME', 'WSMPPCPD.call_bom_bo_api');

3526: WHEN e_null_param_exception THEN
3527: x_error_code := -900;
3528: -- x_error_msg := 'Assembly Item Name or Org Code is NULL in header_rec';
3529: fnd_message.set_name('WSM', 'WSM_INSUFFICIENT_ARGUMENTS');
3530: fnd_message.set_token('OBJECT_NAME', 'WSMPPCPD.call_bom_bo_api');
3531: x_error_msg := fnd_message.get;
3532:
3533: WHEN OTHERS THEN
3534: x_error_code := sqlcode;

Line 3535: x_error_msg := 'WSMPPCPD.call_bom_bo_api - ' || substr(sqlerrm, 1, 200);

3531: x_error_msg := fnd_message.get;
3532:
3533: WHEN OTHERS THEN
3534: x_error_code := sqlcode;
3535: x_error_msg := 'WSMPPCPD.call_bom_bo_api - ' || substr(sqlerrm, 1, 200);
3536: END call_bom_bo_api;
3537:
3538: /*===========================================================================
3539:

Line 3679: WSMPPCPD.call_bom_bo_api (

3675:
3676: -- now go ahead and call the BOM Business Object API
3677: -- to update this bill
3678:
3679: WSMPPCPD.call_bom_bo_api (
3680: p_bom_header_rec => g_bom_header_rec,
3681: x_error_code => x_error_code,
3682: x_error_msg => x_error_msg );
3683:

Line 3698: x_error_msg := 'WSMPPCPD.set_common_bill_new('||x_progress ||') ' || substr(sqlerrm, 1, 200);

3694: x_error_msg := fnd_message.get;
3695:
3696: WHEN OTHERS THEN
3697: x_error_code := sqlcode;
3698: x_error_msg := 'WSMPPCPD.set_common_bill_new('||x_progress ||') ' || substr(sqlerrm, 1, 200);
3699:
3700: END set_common_bill_new;
3701:
3702: END WSMPPCPD;

Line 3702: END WSMPPCPD;

3698: x_error_msg := 'WSMPPCPD.set_common_bill_new('||x_progress ||') ' || substr(sqlerrm, 1, 200);
3699:
3700: END set_common_bill_new;
3701:
3702: END WSMPPCPD;