DBA Data[Home] [Help]

APPS.WSMPWROT dependencies on WSMPWROT

Line 1: PACKAGE BODY WSMPWROT as

1: PACKAGE BODY WSMPWROT as
2: /* $Header: WSMWROTB.pls 120.4.12010000.2 2008/11/27 12:32:34 lmente ship $ */
3:
4:
5: /* ===========================================================================

Line 48: x_err_msg := substr('WSMPWROT ('||'Overloaded Procedure'||')' || SQLERRM,1,2000);

44: EXCEPTION
45:
46: WHEN OTHERS THEN
47: x_err_code := SQLCODE;
48: x_err_msg := substr('WSMPWROT ('||'Overloaded Procedure'||')' || SQLERRM,1,2000);
49:
50: END;
51:
52: PROCEDURE POPULATE_WRO (

Line 207: BE.GROUP_ID=WSMPWROT.EXPLOSION_GROUP_ID

203: BOM_INVENTORY_COMPONENTS A,
204: MTL_SYSTEM_ITEMS C,
205: BOM_EXPLOSION_TEMP BE
206: WHERE
207: BE.GROUP_ID=WSMPWROT.EXPLOSION_GROUP_ID
208: AND BE.TOP_BILL_SEQUENCE_ID=x_bill_sequence_id
209: AND A.COMPONENT_SEQUENCE_ID=BE.COMPONENT_SEQUENCE_ID
210: AND BE.COMPONENT_ITEM_ID = C.INVENTORY_ITEM_ID
211: AND O.wip_entity_id = p_wip_entity_id

Line 283: if (WSMPWROT.USE_PHANTOM_ROUTINGS IS NULL) then

279: BEGIN
280:
281: l_stmt_num := 5;
282:
283: if (WSMPWROT.USE_PHANTOM_ROUTINGS IS NULL) then
284: begin
285: SELECT nvl(use_phantom_routings, 0)
286: INTO WSMPWROT.USE_PHANTOM_ROUTINGS
287: FROM BOM_PARAMETERS

Line 286: INTO WSMPWROT.USE_PHANTOM_ROUTINGS

282:
283: if (WSMPWROT.USE_PHANTOM_ROUTINGS IS NULL) then
284: begin
285: SELECT nvl(use_phantom_routings, 0)
286: INTO WSMPWROT.USE_PHANTOM_ROUTINGS
287: FROM BOM_PARAMETERS
288: WHERE ORGANIZATION_ID = p_organization_id;
289: exception
290: when no_data_found then

Line 295: x_use_phantom_routings := WSMPWROT.USE_PHANTOM_ROUTINGS;

291: null;
292: end;
293: end if;
294:
295: x_use_phantom_routings := WSMPWROT.USE_PHANTOM_ROUTINGS;
296:
297: l_stmt_num := 6;
298: begin
299: SELECT nvl(maximum_bom_level, 60)

Line 403: if (WSMPWROT.explosion_group_id is null) then

399: END;
400:
401: l_stmt_num := 45;
402:
403: if (WSMPWROT.explosion_group_id is null) then
404: x_explode_phantoms := TRUE;
405:
406: l_stmt_num := 46;
407:

Line 408: SELECT BOM_EXPLOSION_TEMP_S.nextval INTO WSMPWROT.EXPLOSION_GROUP_ID

404: x_explode_phantoms := TRUE;
405:
406: l_stmt_num := 46;
407:
408: SELECT BOM_EXPLOSION_TEMP_S.nextval INTO WSMPWROT.EXPLOSION_GROUP_ID
409: FROM DUAL;
410: end if;
411:
412: x_explode_phantoms:=TRUE;

Line 421: WSMPWROT.EXPLOSION_GROUP_ID, -- grp_id

417:
418: /* bompexpl.exploder_userexit(0, -- verify_flag
419: p_organization_id,
420: 1, --order_by
421: WSMPWROT.EXPLOSION_GROUP_ID, -- grp_id
422: 0, -- session_id
423: 1, -- levels_to_explode
424: 1, -- bom_or_eng
425: 1, -- impl_flag

Line 444: grp_id =>WSMPWROT.EXPLOSION_GROUP_ID, -- grp_id

440: bompexpl.exploder_userexit(
441: verify_flag =>0, -- verify_flag
442: org_id =>p_organization_id,
443: order_by =>1, --order_by
444: grp_id =>WSMPWROT.EXPLOSION_GROUP_ID, -- grp_id
445: session_id =>0, -- session_id
446: levels_to_explode=>1, -- levels_to_explode
447: bom_or_eng =>1, -- bom_or_eng
448: impl_flag =>1, -- impl_flag

Line 558: WSMPWROT.EXPLOSION_GROUP_ID, -- grp_id

554:
555: /* bompexpl.exploder_userexit(0, -- verify_flag
556: p_organization_id,
557: 1, --order_by
558: WSMPWROT.EXPLOSION_GROUP_ID, -- grp_id
559: 0, -- session_id
560: x_max_bill_levels-1, -- levels_to_explode
561: 1, -- bom_or_eng
562: 1, -- impl_flag

Line 582: grp_id =>WSMPWROT.EXPLOSION_GROUP_ID, -- grp_id

578: bompexpl.exploder_userexit(
579: verify_flag =>0, -- verify_flag
580: org_id =>p_organization_id,
581: order_by =>1, --order_by
582: grp_id =>WSMPWROT.EXPLOSION_GROUP_ID, -- grp_id
583: session_id =>0, -- session_id
584: levels_to_explode=>x_max_bill_levels-1, -- levels_to_explode
585: bom_or_eng =>1, -- bom_or_eng
586: impl_flag =>1, -- impl_flag

Line 621: and be.group_id=WSMPWROT.EXPLOSION_GROUP_ID

617: l_stmt_num := 80;
618: update bom_explosion_temp be set be.primary_path_flag=1
619: where
620: be.top_bill_sequence_id=x_bill_sequence_id
621: and be.group_id=WSMPWROT.EXPLOSION_GROUP_ID
622: and ((be.operation_seq_num=1)
623: or (be.operation_seq_num in (
624: select bonv.from_seq_num
625: from bom_operational_routings bor,

Line 659: and be1.group_id=WSMPWROT.EXPLOSION_GROUP_ID

655: OR (exists (
656: select 'x'
657: from bom_explosion_temp be1
658: where be1.top_bill_sequence_id=x_bill_sequence_id
659: and be1.group_id=WSMPWROT.EXPLOSION_GROUP_ID
660: and be1.component_item_id=be.assembly_item_id
661: and be1.sort_order=SUBSTR(BE.SORT_ORDER, 1, l_level*(WSMPWROT.X_SortWidth))
662: and be1.primary_path_flag=1)));
663: END LOOP;

Line 661: and be1.sort_order=SUBSTR(BE.SORT_ORDER, 1, l_level*(WSMPWROT.X_SortWidth))

657: from bom_explosion_temp be1
658: where be1.top_bill_sequence_id=x_bill_sequence_id
659: and be1.group_id=WSMPWROT.EXPLOSION_GROUP_ID
660: and be1.component_item_id=be.assembly_item_id
661: and be1.sort_order=SUBSTR(BE.SORT_ORDER, 1, l_level*(WSMPWROT.X_SortWidth))
662: and be1.primary_path_flag=1)));
663: END LOOP;
664: END;
665: else --if ((x_routing_sequence_id is not null) and (x_use_phantom_routings=1) and (x_bill_sequence_id is not null)) then

Line 758: WHERE BE.GROUP_ID = WSMPWROT.EXPLOSION_GROUP_ID

754: FROM
755: BOM_INVENTORY_COMPONENTS A,
756: MTL_SYSTEM_ITEMS C,
757: BOM_EXPLOSION_TEMP BE
758: WHERE BE.GROUP_ID = WSMPWROT.EXPLOSION_GROUP_ID
759: AND A.COMPONENT_SEQUENCE_ID = BE.COMPONENT_SEQUENCE_ID
760: AND C.INVENTORY_ITEM_ID = BE.COMPONENT_ITEM_ID
761: AND C.ORGANIZATION_ID = P_ORGANIZATION_ID
762: AND BE.TOP_BILL_SEQUENCE_ID=x_bill_sequence_id

Line 1195: WSMPWROT.EXPLOSION_GROUP_ID := NULL;

1191:
1192:
1193: --Start NL BugFix 2786476
1194:
1195: WSMPWROT.EXPLOSION_GROUP_ID := NULL;
1196:
1197: --End NL BugFix 2786476
1198:
1199: --delete from wip_requirement_operations where wip_entity_id=p_wip_entity_id and operation_seq_num<0;

Line 1205: x_err_msg := substr('WSMPWROT ('||to_char(l_stmt_num)||')' || l_error_msg,1,2000);

1201: EXCEPTION
1202:
1203: WHEN be_exploder_exception THEN
1204: x_err_code := l_error_code;
1205: x_err_msg := substr('WSMPWROT ('||to_char(l_stmt_num)||')' || l_error_msg,1,2000);
1206: x_err_msg := 'WSMWROT stop';
1207:
1208:
1209: WHEN MY_EXCEPTION THEN

Line 1211: x_err_msg := 'WSMPWROT ('||to_char(l_stmt_num)||') '||x_operation_seq_num; /*NO_OF_COMP||' '

1207:
1208:
1209: WHEN MY_EXCEPTION THEN
1210: x_err_code := -199;
1211: x_err_msg := 'WSMPWROT ('||to_char(l_stmt_num)||') '||x_operation_seq_num; /*NO_OF_COMP||' '
1212: ||t_comp_details(0).segment1||' '
1213: ||t_comp_details(1).segment1||' '||t_comp_details(2).segment1||' '||t_comp_details(3).segment1||' '
1214: ||t_comp_details(4).segment1||' '||t_comp_details(5).segment1||' '||t_comp_details(6).segment1||' '
1215: ||t_comp_details(7).segment1; */

Line 1224: x_err_msg := substr('WSMPWROT ('||to_char(l_stmt_num)||')' || SQLERRM,1,2000);

1220: x_err_msg := FND_MESSAGE.GET;
1221:
1222: WHEN OTHERS THEN
1223: x_err_code := SQLCODE;
1224: x_err_msg := substr('WSMPWROT ('||to_char(l_stmt_num)||')' || SQLERRM,1,2000);
1225:
1226:
1227: END populate_wro;
1228:

Line 1232: return WSMPWROT.EXPLOSION_GROUP_ID;

1228:
1229: FUNCTION GET_EXPLOSION_GROUP_ID
1230: RETURN NUMBER IS
1231: BEGIN
1232: return WSMPWROT.EXPLOSION_GROUP_ID;
1233: END;
1234:
1235: PROCEDURE SET_EXPLOSION_GROUP_ID_NULL
1236: IS

Line 1238: WSMPWROT.EXPLOSION_GROUP_ID := NULL;

1234:
1235: PROCEDURE SET_EXPLOSION_GROUP_ID_NULL
1236: IS
1237: BEGIN
1238: WSMPWROT.EXPLOSION_GROUP_ID := NULL;
1239: WSMPWROT.USE_PHANTOM_ROUTINGS := NULL;
1240: END;
1241:
1242: END WSMPWROT;

Line 1239: WSMPWROT.USE_PHANTOM_ROUTINGS := NULL;

1235: PROCEDURE SET_EXPLOSION_GROUP_ID_NULL
1236: IS
1237: BEGIN
1238: WSMPWROT.EXPLOSION_GROUP_ID := NULL;
1239: WSMPWROT.USE_PHANTOM_ROUTINGS := NULL;
1240: END;
1241:
1242: END WSMPWROT;

Line 1242: END WSMPWROT;

1238: WSMPWROT.EXPLOSION_GROUP_ID := NULL;
1239: WSMPWROT.USE_PHANTOM_ROUTINGS := NULL;
1240: END;
1241:
1242: END WSMPWROT;