DBA Data[Home] [Help]

APPS.INVPAGI2 dependencies on INVPAGI2

Line 1: package body INVPAGI2 as

1: package body INVPAGI2 as
2: /* $Header: INVPAG2B.pls 120.45.12020000.6 2013/01/23 08:20:26 lmai ship $*/
3: /*Values used in IOI to indicate an attribute update to NULL. Added for bug
4: * 6417006*/
5: g_Upd_Null_CHAR VARCHAR2(1) := '!';

Line 296: INVPUTLI.info('INVPAGI2: uom default is '|| uom_default);

292: err_text);
293: uom_default := substr(uom_default_tmp,1,25);
294:
295: IF l_inv_debug_level IN(101, 102) THEN
296: INVPUTLI.info('INVPAGI2: uom default is '|| uom_default);
297: END IF;
298:
299:
300: if rtn_status <> 0 and

Line 361: 'INVPAGI2: Invalid Item ID',

357: prog_appid,
358: prog_id,
359: request_id,
360: cr.transaction_id,
361: 'INVPAGI2: Invalid Item ID',
362: 'inventory_item_id',
363: 'MTL_SYSTEM_ITEMS_INTERFACE',
364: 'INV_INVALID_INV_ITEM_ID',
365: err_text);

Line 384: INVPUTLI.info('INVPAGI2: About to handle sequence generated item number case');

380:
381: IF default_flag = 2 THEN --Sequence generated item nos only in pre-defaulting phase
382:
383: IF l_inv_debug_level IN(101, 102) THEN
384: INVPUTLI.info('INVPAGI2: About to handle sequence generated item number case');
385: END IF;
386:
387: SELECT DISTINCT item_catalog_group_id BULK COLLECT INTO catalog_table
388: FROM mtl_system_items_interface

Line 414: INVPUTLI.info('INVPAGI2: Identified rows for SEQ generation are:' || SQL%ROWCOUNT);

410: FROM mtl_parameters)
411: AND (msii.item_catalog_group_id IS NOT NULL AND msii.item_catalog_group_id = catalog_table(i));
412:
413: IF l_inv_debug_level IN(101, 102) THEN
414: INVPUTLI.info('INVPAGI2: Identified rows for SEQ generation are:' || SQL%ROWCOUNT);
415: END IF;
416:
417: l_seq_exists := 1;
418: END IF;

Line 458: INVPUTLI.info('INVPAGI2: About to handle SKU items');

454: -- End of Bug 5118572
455: END IF; --Seq gen Item Nos only in pre defaulting phase
456:
457: IF l_inv_debug_level IN(101, 102) THEN
458: INVPUTLI.info('INVPAGI2: About to handle SKU items');
459: END IF;
460:
461: /* Mark all SKU items with no style item to error */
462: UPDATE mtl_system_items_interface msii

Line 549: INVPUTLI.info('INVPAGI2: About to enter DSQL block');

545: END IF;
546: END IF;
547:
548: IF l_inv_debug_level IN(101, 102) THEN
549: INVPUTLI.info('INVPAGI2: About to enter DSQL block');
550: END IF;
551:
552:
553: BEGIN /* PL-SQL Block for doing the dynamic SQL part*/

Line 582: INVPUTLI.info('INVPAGI2: About to enter DSQL loop');

578:
579: DSQL_ff_rows_processed := dbms_sql.execute(DSQL_ff_c);
580:
581: IF l_inv_debug_level IN(101, 102) THEN
582: INVPUTLI.info('INVPAGI2: About to enter DSQL loop');
583: END IF;
584:
585: loop
586: if dbms_sql.fetch_rows(DSQL_ff_c) > 0 then

Line 596: 'INVPAGI2: Duplicate Org ID and segments in MSI',

592: prog_appid,
593: prog_id,
594: request_id,
595: DSQL_ff_transaction_id,
596: 'INVPAGI2: Duplicate Org ID and segments in MSI',
597: 'inventory_item_id',
598: 'MTL_SYSTEM_ITEMS_INTERFACE',
599: 'INV_DUPL_ORG_ITEM_SEG',
600: err_text);

Line 620: INVPUTLI.info('INVPAGI2:out of loop ');

616: if dbms_sql.is_open(DSQL_ff_c) then
617: dbms_sql.close_cursor(DSQL_ff_c);
618: end if;
619: IF l_inv_debug_level IN(101, 102) THEN
620: INVPUTLI.info('INVPAGI2:out of loop ');
621: END IF;
622:
623: EXCEPTION
624: when others then

Line 661: INVPUTLI.info('INVPAGI2: About to enter header cursorloop');

657: and msi.organization_id = mp.organization_id
658: and ' || ff_statement_temp;
659:
660: IF l_inv_debug_level IN(101, 102) THEN
661: INVPUTLI.info('INVPAGI2: About to enter header cursorloop');
662: END IF;
663:
664:
665: update MTL_ITEM_REVISIONS_INTERFACE i

Line 697: INVPUTLI.info('INVPAGI2: Set_id for current_row is '||cr.set_process_id);

693: --End : Performance enhancements
694:
695: FOR cr in header loop
696: IF l_inv_debug_level IN(101, 102) THEN
697: INVPUTLI.info('INVPAGI2: Set_id for current_row is '||cr.set_process_id);
698: END IF;
699: rtn_status := 0;
700: org_flag := 0;
701: tran_id := cr.transaction_id;

Line 974: INVPUTLI.info('INVPAGI2: About to process DSQL 2 ');

970: */
971: if cr.inventory_item_id is null then
972: BEGIN
973: IF l_inv_debug_level IN(101, 102) THEN
974: INVPUTLI.info('INVPAGI2: About to process DSQL 2 ');
975: END IF;
976: DSQL_c := dbms_sql.open_cursor;
977: dbms_sql.parse(DSQL_c, DSQL_statement, dbms_sql.native);
978: dbms_sql.define_column(DSQL_c,1,DSQL_inventory_item_id);

Line 1005: INVPUTLI.info('INVPAGI2: About to process DSQL 3 ');

1001:
1002: else
1003: --Adding resolution of Item Id from Master in same batch (from Intf table)
1004: IF l_inv_debug_level IN(101, 102) THEN
1005: INVPUTLI.info('INVPAGI2: About to process DSQL 3 ');
1006: END IF;
1007: -- Fix for bug#9336604
1008: DSQL_Statement_Msii := 'SELECT /*+ index(msii MTL_SYSTEM_ITEMS_INTERFACE_N6) index(msi MTL_SYSTEM_ITEMS_INTERFACE_N4) */ msi.inventory_item_id
1009: FROM mtl_system_items_interface msi, mtl_system_items_interface msii

Line 1051: INVPUTLI.info('INVPAGI2: No match in MSI; Creating Inventory Item Id from sequence');

1047: -- No such row found. Close the cursor after
1048: -- Assigning missing inventory_item_id from sequence
1049:
1050: IF l_inv_debug_level IN(101, 102) THEN
1051: INVPUTLI.info('INVPAGI2: No match in MSI; Creating Inventory Item Id from sequence');
1052: END IF;
1053:
1054: /*update MTL_SYSTEM_ITEMS_INTERFACE
1055: set inventory_item_id = MTL_SYSTEM_ITEMS_S.nextval

Line 1098: INVPUTLI.info('INVPAGI2: Determining whether the item is in master org');

1094: end if; /* cr.inventory_item_id is null */
1095:
1096: -- determine if item is in master org.
1097: IF l_inv_debug_level IN(101, 102) THEN
1098: INVPUTLI.info('INVPAGI2: Determining whether the item is in master org');
1099: END IF;
1100: if l_old_organization_id <> cr.organization_id then
1101: select mp.master_organization_id ,
1102: mp.starting_revision ,

Line 1141: INVPUTLI.info('INVPAGI2: calling assign_master_defaults with set_id '||xset_id);

1137: if rtn_status = 0 then
1138: IF INVPOPIF.g_source_org /*Added for bug 6372595*/
1139: THEN
1140: IF l_inv_debug_level IN(101, 102) THEN
1141: INVPUTLI.info('INVPAGI2: calling assign_master_defaults with set_id '||xset_id);
1142: END IF;
1143: rtn_status := INVPUTLI.assign_master_defaults(
1144: cr.transaction_id,
1145: cr.inventory_item_id,

Line 1188: INVPUTLI.info('INVPAGI2: Orphan found; about to call error ');

1184: else
1185: if ((master_org_id <> cr.organization_id) and (msiicount = 0)) then
1186: if rtn_status = 0 then
1187: IF l_inv_debug_level IN(101, 102) THEN
1188: INVPUTLI.info('INVPAGI2: Orphan found; about to call error ');
1189: INVPUTLI.info('INVPAGI2: Orphan found; checking in msii ');
1190: END IF;
1191:
1192: select count(*) into msiicount

Line 1189: INVPUTLI.info('INVPAGI2: Orphan found; checking in msii ');

1185: if ((master_org_id <> cr.organization_id) and (msiicount = 0)) then
1186: if rtn_status = 0 then
1187: IF l_inv_debug_level IN(101, 102) THEN
1188: INVPUTLI.info('INVPAGI2: Orphan found; about to call error ');
1189: INVPUTLI.info('INVPAGI2: Orphan found; checking in msii ');
1190: END IF;
1191:
1192: select count(*) into msiicount
1193: from mtl_system_items_interface

Line 1219: INVPUTLI.info('INVPAGI2: Orphan found; error called '|| rtn_status);

1215: if dumm_status < 0 then
1216: raise LOGGING_ERR;
1217: end if;
1218: IF l_inv_debug_level IN(101, 102) THEN
1219: INVPUTLI.info('INVPAGI2: Orphan found; error called '|| rtn_status);
1220: END IF;
1221: else
1222: rtn_status := INVPUTLI.predefault_child_master(
1223: cr.inventory_item_id,

Line 1237: INVPUTLI.info('INVPAGI2: In the new-item-in-master case ');

1233: end if; /*rtn_status = 0*/
1234: else
1235: if rtn_status = 0 then
1236: IF l_inv_debug_level IN(101, 102) THEN
1237: INVPUTLI.info('INVPAGI2: In the new-item-in-master case ');
1238: INVPUTLI.info('INVPAGI2: Calling assign_item_defaults with set_id '|| xset_id);
1239: END IF;
1240:
1241: rtn_status := INVPUTLI.assign_item_defaults(

Line 1238: INVPUTLI.info('INVPAGI2: Calling assign_item_defaults with set_id '|| xset_id);

1234: else
1235: if rtn_status = 0 then
1236: IF l_inv_debug_level IN(101, 102) THEN
1237: INVPUTLI.info('INVPAGI2: In the new-item-in-master case ');
1238: INVPUTLI.info('INVPAGI2: Calling assign_item_defaults with set_id '|| xset_id);
1239: END IF;
1240:
1241: rtn_status := INVPUTLI.assign_item_defaults(
1242: cr.inventory_item_id,

Line 1730: 'INVPAGI2: Invalid Item Status Code',

1726: prog_appid,
1727: prog_id,
1728: request_id,
1729: cr.transaction_id,
1730: 'INVPAGI2: Invalid Item Status Code',
1731: 'INVENTORY_ITEM_STATUS_CODE',
1732: 'MTL_SYSTEM_ITEMS_INTERFACE',
1733: 'INV_IOI_STATUS_CODE',
1734: err_text);

Line 2151: err_text := 'logging error raised in INVPAGI2.assign_item_header_recs with message:' || err_text; --added by bug 11894684

2147: err_text);
2148: return(rtn_status);
2149:
2150: when LOGGING_ERR then
2151: err_text := 'logging error raised in INVPAGI2.assign_item_header_recs with message:' || err_text; --added by bug 11894684
2152: return(dumm_status);
2153: --Fix for Bug 9706610
2154: /* Bug 13503782 : Start
2155: -- Commenting the below exception, this is not required as we have logged the error already.

Line 2173: error_msg := 'INVPAGI2.assign_item_header_recs:' || SQLERRM;

2169: err_text);
2170: return(rtn_status);
2171: */
2172: when OTHERS then
2173: error_msg := 'INVPAGI2.assign_item_header_recs:' || SQLERRM;
2174: dumm_status := INVPUOPI.mtl_log_interface_err(
2175: l_org_id ,
2176: user_id,
2177: login_id,

Line 2193: end INVPAGI2;

2189: end if;
2190: return(rtn_status);
2191: end assign_item_header_recs;
2192:
2193: end INVPAGI2;