DBA Data[Home] [Help]

APPS.CSL_MTL_ITEM_LOCATIONS_ACC_PKG dependencies on CSL_MTL_ITEM_LOCATIONS_ACC

Line 1: PACKAGE BODY CSL_MTL_ITEM_LOCATIONS_ACC_PKG AS

1: PACKAGE BODY CSL_MTL_ITEM_LOCATIONS_ACC_PKG AS
2: /* $Header: cslmlacb.pls 115.1 2003/10/24 23:35:06 yliao noship $ */
3:
4: /*
5: This package will be called from CSL_CSP_INV_LOC_ASS_ACC_PKG.

Line 9: and insert them into the CSL_MTL_ITEM_LOCATIONS_ACC table.

5: This package will be called from CSL_CSP_INV_LOC_ASS_ACC_PKG.
6: Pre_Insert_Child(..).
7: When assigning a sub-inventory to a resource, we check the
8: mtl_item_locations records associated with this sub-inventory,
9: and insert them into the CSL_MTL_ITEM_LOCATIONS_ACC table.
10: Same check applies for deletion of system items.
11:
12: We also need functions to be called for upgrade of exsting users
13: without new subinventory assignments.

Line 17: g_acc_table_name CONSTANT VARCHAR2(30) := 'CSL_MTL_ITEM_LOCATIONS_ACC';

13: without new subinventory assignments.
14: */
15:
16: /*** Globals ***/
17: g_acc_table_name CONSTANT VARCHAR2(30) := 'CSL_MTL_ITEM_LOCATIONS_ACC';
18: g_publication_item_name CONSTANT JTM_HOOK_UTIL_PKG.t_publication_item_list :=
19: JTM_HOOK_UTIL_PKG.t_publication_item_list('MTL_ITEM_LOCATIONS');
20: g_table_name CONSTANT VARCHAR2(30) := 'MTL_ITEM_LOCATIONS';
21: g_pk1_name CONSTANT VARCHAR2(30) := 'INVENTORY_LOCATION_ID';

Line 33: FROM CSL_MTL_ITEM_LOCATIONS_ACC acc

29: PROCEDURE UPDATE_ACC_REC_MARKDIRTY( p_last_run_date IN DATE )
30: IS
31: CURSOR c_changed( b_last_date DATE ) IS
32: SELECT acc.ACCESS_ID, acc.RESOURCE_ID
33: FROM CSL_MTL_ITEM_LOCATIONS_ACC acc
34: , MTL_ITEM_LOCATIONS b
35: , ASG_USER au
36: WHERE b.INVENTORY_LOCATION_ID = acc.INVENTORY_LOCATION_ID
37: AND b.ORGANIZATION_ID = acc.ORGANIZATION_ID

Line 114: FROM CSL_MTL_ITEM_LOCATIONS_ACC

110: AND LOC.CREATION_DATE >= NVL(b_last_date, LOC.CREATION_DATE)
111: AND (SEC.RESOURCE_ID, LOC.INVENTORY_LOCATION_ID, LOC.ORGANIZATION_ID)
112: NOT IN
113: ( SELECT RESOURCE_ID, INVENTORY_LOCATION_ID, ORGANIZATION_ID
114: FROM CSL_MTL_ITEM_LOCATIONS_ACC
115: );
116:
117: l_tab_access_id ASG_DOWNLOAD.ACCESS_LIST;
118: l_tab_resource_id ASG_DOWNLOAD.USER_LIST;

Line 139: UPDATE CSL_MTL_ITEM_LOCATIONS_ACC

135: );
136: END IF;
137:
138: /*Increment count if the record already exists */
139: UPDATE CSL_MTL_ITEM_LOCATIONS_ACC
140: SET COUNTER = COUNTER + 1
141: , LAST_UPDATE_DATE = SYSDATE
142: , LAST_UPDATED_BY = 1
143: WHERE ( RESOURCE_ID, INVENTORY_LOCATION_ID, ORGANIZATION_ID ) IN

Line 167: INSERT INTO CSL_MTL_ITEM_LOCATIONS_ACC(

163: );
164: END IF;
165:
166: FORALL i IN l_tab_access_id.FIRST..l_tab_access_id.LAST
167: INSERT INTO CSL_MTL_ITEM_LOCATIONS_ACC(
168: ACCESS_ID, LAST_UPDATE_DATE, LAST_UPDATED_BY, CREATION_DATE, CREATED_BY
169: , COUNTER, RESOURCE_ID, INVENTORY_LOCATION_ID, ORGANIZATION_ID ) VALUES (
170: l_tab_access_id(i), sysdate, 1, sysdate, 1, counters(i), l_tab_resource_id(i), locations(i), organizations(i));
171:

Line 249: FROM MTL_ITEM_LOCATIONS B, CSL_MTL_ITEM_LOCATIONS_ACC A

245: b_subinventory_code VARCHAR2,
246: b_resource_id NUMBER )
247: IS
248: SELECT B.INVENTORY_LOCATION_ID
249: FROM MTL_ITEM_LOCATIONS B, CSL_MTL_ITEM_LOCATIONS_ACC A
250: WHERE B.ORGANIZATION_ID = b_organization_id
251: AND B.SUBINVENTORY_CODE = b_subinventory_code
252: AND A.RESOURCE_ID = b_resource_id
253: AND B.ORGANIZATION_ID = A.ORGANIZATION_ID

Line 332: FROM CSL_MTL_ITEM_LOCATIONS_ACC

328: , b_organization_id NUMBER
329: , b_resource_id NUMBER )
330: IS
331: SELECT ACCESS_ID
332: FROM CSL_MTL_ITEM_LOCATIONS_ACC
333: WHERE INVENTORY_LOCATION_ID = b_inventory_location_id
334: AND ORGANIZATION_ID = b_organization_id
335: AND RESOURCE_ID = b_resource_id;
336: BEGIN

Line 430: populate the CSL_MTL_ITEM_LOCATIONS_ACC records for all mobile users.

426: END Delete_Item_Location;
427:
428: /*
429: Iterate over all the acc records for subinventories for given mobile user.
430: populate the CSL_MTL_ITEM_LOCATIONS_ACC records for all mobile users.
431: */
432: PROCEDURE POPULATE_ITEM_LOCATIONS_ACC
433: IS
434: PRAGMA AUTONOMOUS_TRANSACTION;

Line 453: DELETE FROM CSL_MTL_ITEM_LOCATIONS_ACC;

449:
450: l_dummy BOOLEAN;
451:
452: BEGIN
453: DELETE FROM CSL_MTL_ITEM_LOCATIONS_ACC;
454:
455: OPEN c_inserted;
456: FETCH c_inserted BULK COLLECT
457: INTO l_tab_access_id, l_tab_resource_id, locations, organizations, counters;

Line 471: INSERT INTO CSL_MTL_ITEM_LOCATIONS_ACC(

467: );
468: END IF;
469:
470: FORALL i IN l_tab_access_id.FIRST..l_tab_access_id.LAST
471: INSERT INTO CSL_MTL_ITEM_LOCATIONS_ACC(
472: ACCESS_ID, LAST_UPDATE_DATE, LAST_UPDATED_BY, CREATION_DATE, CREATED_BY
473: , COUNTER, RESOURCE_ID, INVENTORY_LOCATION_ID, ORGANIZATION_ID ) VALUES (
474: l_tab_access_id(i), sysdate, 1, sysdate, 1,
475: counters(i), l_tab_resource_id(i), locations(i), organizations(i));

Line 516: where package_name = 'CSL_MTL_ITEM_LOCATIONS_ACC_PKG'

512: CURSOR c_LastRundate
513: IS
514: select LAST_RUN_DATE
515: from JTM_CON_REQUEST_DATA
516: where package_name = 'CSL_MTL_ITEM_LOCATIONS_ACC_PKG'
517: AND procedure_name = 'CON_REQUEST_MTL_ITEM_LOCATIONS';
518: r_LastRundate c_LastRundate%ROWTYPE;
519: l_current_run_date DATE;
520: BEGIN

Line 567: WHERE package_name = 'CSL_MTL_ITEM_LOCATIONS_ACC_PKG'

563:
564: /*Update the last run date*/
565: UPDATE JTM_CON_REQUEST_DATA
566: SET LAST_RUN_DATE = l_current_run_date
567: WHERE package_name = 'CSL_MTL_ITEM_LOCATIONS_ACC_PKG'
568: AND procedure_name = 'CON_REQUEST_ITEM_LOCATIONS';
569:
570: COMMIT;
571:

Line 594: END CSL_MTL_ITEM_LOCATIONS_ACC_PKG;

590: END IF;
591: ROLLBACK;
592: END CON_REQUEST_ITEM_LOCATIONS;
593:
594: END CSL_MTL_ITEM_LOCATIONS_ACC_PKG;