DBA Data[Home] [Help]

APPS.CSTPLMWI dependencies on CSTPLMWI

Line 1: PACKAGE BODY CSTPLMWI AS

1: PACKAGE BODY CSTPLMWI AS
2: /* $Header: CSTLMWIB.pls 115.6 2004/02/17 20:12:04 lsoo ship $ */
3:
4:
5:

Line 344: o_err_msg := 'CSTPLMWI.wip_layer_create():' ||

340:
341: EXCEPTION
342: WHEN invalid_qty_table_exception THEN
343: o_err_num := 1001;
344: o_err_msg := 'CSTPLMWI.wip_layer_create():' ||
345: to_char(l_stmt_num) || ':' ||
346: 'i_layer_qty_table IS NULL';
347: RETURN 0;
348:

Line 351: o_err_msg := 'CSTPLMWI.wip_layer_create():' ||

347: RETURN 0;
348:
349: WHEN invalid_inv_layer_exception THEN
350: o_err_num := 1002;
351: o_err_msg := 'CSTPLMWI.wip_layer_create():' ||
352: to_char(l_stmt_num) || ':' ||
353: 'Inventory returned invalid layer ' ||
354: to_char( i_layer_qty_table(i).layer_id );
355: RETURN 0;

Line 359: o_err_msg := 'CSTPLMWI.wip_layer_create():' ||

355: RETURN 0;
356:
357: WHEN no_inv_cost_details_exception THEN
358: o_err_num := 1003;
359: o_err_msg := 'CSTPLMWI.wip_layer_create():' ||
360: to_char(l_stmt_num) || ':' ||
361: 'Inventory missing layer cost details ' ||
362: i_layer_qty_table(i).layer_id;
363: RETURN 0;

Line 367: o_err_msg := 'CSTPLMWI.wip_layer_create():' ||

363: RETURN 0;
364:
365: WHEN OTHERS THEN
366: o_err_num := SQLCODE;
367: o_err_msg := 'CSTPLMWI.wip_layer_create():' ||
368: to_char(l_stmt_num) || ':' ||
369: to_char( i_layer_qty_table(i).layer_id ) || ':' ||
370: substr(SQLERRM,1,150);
371: RETURN 0;

Line 463: l_layer_cursor CSTPLMWI.REF_CURSOR_TYPE;

459: o_err_num OUT NOCOPY NUMBER,
460: o_err_msg OUT NOCOPY VARCHAR2
461: ) RETURN cst_wip_layers%ROWTYPE
462: IS
463: l_layer_cursor CSTPLMWI.REF_CURSOR_TYPE;
464: l_layer cst_wip_layers%ROWTYPE;
465: l_sql_stmt VARCHAR2(8000);
466: l_stmt_num NUMBER(15);
467: BEGIN

Line 470: l_sql_stmt := CSTPLMWI.wip_layer_consume_sql

466: l_stmt_num NUMBER(15);
467: BEGIN
468:
469: l_stmt_num := 10;
470: l_sql_stmt := CSTPLMWI.wip_layer_consume_sql
471: (
472: to_char( NULL ),
473: CSTPLMWI.LIFO,
474: CSTPLMWI.NORMAL

Line 473: CSTPLMWI.LIFO,

469: l_stmt_num := 10;
470: l_sql_stmt := CSTPLMWI.wip_layer_consume_sql
471: (
472: to_char( NULL ),
473: CSTPLMWI.LIFO,
474: CSTPLMWI.NORMAL
475: );
476:
477: l_stmt_num := 20;

Line 474: CSTPLMWI.NORMAL

470: l_sql_stmt := CSTPLMWI.wip_layer_consume_sql
471: (
472: to_char( NULL ),
473: CSTPLMWI.LIFO,
474: CSTPLMWI.NORMAL
475: );
476:
477: l_stmt_num := 20;
478: open l_layer_cursor for l_sql_stmt

Line 494: o_err_msg := 'CSTPLMWI.get_last_layer():' ||

490:
491: EXCEPTION
492: WHEN OTHERS THEN
493: o_err_num := SQLCODE;
494: o_err_msg := 'CSTPLMWI.get_last_layer():' ||
495: to_char(l_stmt_num) || ':' ||
496: substr(SQLERRM,1,150);
497:
498: END get_last_layer;

Line 529: l_layer_qty_table CSTPLMWI.LayerQtyRecTable;

525: IS
526: l_stmt_num NUMBER;
527:
528: l_inv_layer_id NUMBER;
529: l_layer_qty_table CSTPLMWI.LayerQtyRecTable;
530: l_wip_layer_id NUMBER;
531:
532: l_err_code VARCHAR2(2000);
533:

Line 715: l_layer_qty_table := CSTPLMWI.LayerQtyRecTable();

711: RETURN;
712: END IF;
713: end if; /* l_exp_item_flag <> 1 */
714:
715: l_layer_qty_table := CSTPLMWI.LayerQtyRecTable();
716: l_layer_qty_table.EXTEND;
717: if (l_exp_item_flag <> 1) then
718: l_layer_qty_table( l_layer_qty_table.LAST ).layer_id := l_inv_layer_id;
719: else

Line 726: l_wip_layer_id := CSTPLMWI.wip_layer_create

722: l_layer_qty_table( l_layer_qty_table.LAST ).layer_qty := 0;
723:
724:
725: l_stmt_num := 60;
726: l_wip_layer_id := CSTPLMWI.wip_layer_create
727: (
728: i_wip_entity_id,
729: i_op_seq_num,
730: i_inv_item_id,

Line 754: o_err_msg := 'CSTPLMWI.init_wip_layers():' ||

750:
751: EXCEPTION
752: WHEN invalid_inv_layer_exception THEN
753: o_err_num := 1005;
754: o_err_msg := 'CSTPLMWI.init_wip_layers():' ||
755: to_char(l_stmt_num) || ':' ||
756: 'FIFO Inventory returned invalid current inv layer';
757: RETURN;
758:

Line 761: o_err_msg := 'CSTPLMWI.init_wip_layers():' ||

757: RETURN;
758:
759: WHEN OTHERS THEN
760: o_err_num := SQLCODE;
761: o_err_msg := 'CSTPLMWI.init_wip_layers():' ||
762: to_char(l_stmt_num) || ':' ||
763: substr(SQLERRM,1,150);
764:
765: END init_wip_layers;

Line 811: o_err_msg := 'CSTPLMWI.reset_temp_values():' ||

807:
808: EXCEPTION
809: WHEN OTHERS THEN
810: o_err_num := SQLCODE;
811: o_err_msg := 'CSTPLMWI.reset_temp_values():' ||
812: to_char(l_stmt_num) || ':' ||
813: substr(SQLERRM,1,150);
814:
815: END reset_temp_columns;

Line 821: END CSTPLMWI;

817:
818:
819:
820:
821: END CSTPLMWI;