DBA Data[Home] [Help]

APPS.CSM_MTL_MATERIAL_TXN_ACC_PKG dependencies on CSM_MTL_MATERIAL_TXN_ACC

Line 1: PACKAGE BODY CSM_MTL_MATERIAL_TXN_ACC_PKG AS

1: PACKAGE BODY CSM_MTL_MATERIAL_TXN_ACC_PKG AS
2: /* $Header: csmmtacb.pls 120.5.12010000.4 2010/03/11 04:08:23 trajasek ship $ */
3:
4: /*** Globals ***/
5: g_acc_table_name CONSTANT VARCHAR2(30) := 'CSM_MTL_MATERIAL_TXN_ACC';

Line 5: g_acc_table_name CONSTANT VARCHAR2(30) := 'CSM_MTL_MATERIAL_TXN_ACC';

1: PACKAGE BODY CSM_MTL_MATERIAL_TXN_ACC_PKG AS
2: /* $Header: csmmtacb.pls 120.5.12010000.4 2010/03/11 04:08:23 trajasek ship $ */
3:
4: /*** Globals ***/
5: g_acc_table_name CONSTANT VARCHAR2(30) := 'CSM_MTL_MATERIAL_TXN_ACC';
6: g_publication_item_name CONSTANT CSM_ACC_PKG.t_publication_item_list :=
7: CSM_ACC_PKG.t_publication_item_list('CSM_MTL_MATERIAL_TXNS');
8: g_table_name CONSTANT VARCHAR2(30) := 'MTL_MATERIAL_TRANSACTIONS';
9: g_tasks_seq_name CONSTANT VARCHAR2(30) := 'CSM_MTL_MATERIAL_TXN_ACC_S';

Line 9: g_tasks_seq_name CONSTANT VARCHAR2(30) := 'CSM_MTL_MATERIAL_TXN_ACC_S';

5: g_acc_table_name CONSTANT VARCHAR2(30) := 'CSM_MTL_MATERIAL_TXN_ACC';
6: g_publication_item_name CONSTANT CSM_ACC_PKG.t_publication_item_list :=
7: CSM_ACC_PKG.t_publication_item_list('CSM_MTL_MATERIAL_TXNS');
8: g_table_name CONSTANT VARCHAR2(30) := 'MTL_MATERIAL_TRANSACTIONS';
9: g_tasks_seq_name CONSTANT VARCHAR2(30) := 'CSM_MTL_MATERIAL_TXN_ACC_S';
10: g_pk1_name CONSTANT VARCHAR2(30) := 'TRANSACTION_ID';
11:
12: PROCEDURE Insert_MTL_Mat_Transaction(
13: p_user_id NUMBER,

Line 156: DELETE CSM_MTL_MATERIAL_TXN_ACC

152: ( module => g_table_name
153: , message => 'Entering DELETE_ALL_ACC_RECORDS'
154: , log_level => FND_LOG.LEVEL_STATEMENT);
155:
156: DELETE CSM_MTL_MATERIAL_TXN_ACC
157: WHERE user_id = p_user_id;
158:
159: x_return_status := FND_API.G_RET_STS_SUCCESS;
160:

Line 174: fnd_msg_pub.Add_Exc_Msg('CSM_MTL_MATERIAL_TXN_ACC_PKG','PROCESS_ACC',sqlerrm);

170: CSM_UTIL_PKG.LOG
171: ( module => g_table_name
172: , message => 'Caught exception in DELETE_ALL_ACC_RECORDS hook:' || fnd_global.local_chr(10) || sqlerrm
173: , log_level => FND_LOG.LEVEL_ERROR);
174: fnd_msg_pub.Add_Exc_Msg('CSM_MTL_MATERIAL_TXN_ACC_PKG','PROCESS_ACC',sqlerrm);
175: END DELETE_ALL_ACC_RECORDS;
176:
177:
178: PROCEDURE Refresh_Mat_Txn_Acc(p_status OUT NOCOPY VARCHAR2,

Line 186: WHERE package_name = 'CSM_MTL_MATERIAL_TXN_ACC_PKG'

182:
183: CURSOR l_last_run_date_csr IS
184: SELECT NVL(last_run_date, TO_DATE('1','J'))
185: FROM jtm_con_request_data
186: WHERE package_name = 'CSM_MTL_MATERIAL_TXN_ACC_PKG'
187: AND procedure_name = 'REFRESH_MAT_TXN_ACC';
188:
189: --Delete if either from or to subinv is not assigned to the mobile user any longer
190: --OR if the transaction is older than CSM: Purge Interval Setting profile value

Line 195: FROM CSM_MTL_MATERIAL_TXN_ACC ACC,

191: CURSOR l_mat_delete_csr (c_history_profile NUMBER)
192: IS
193: SELECT ACC.user_id
194: , ACC.TRANSACTION_ID
195: FROM CSM_MTL_MATERIAL_TXN_ACC ACC,
196: MTL_MATERIAL_TRANSACTIONS B
197: WHERE B.TRANSACTION_ID = ACC.TRANSACTION_ID
198: AND B.TRANSACTION_ACTION_ID = 2 --Subinventory transfer
199: And (

Line 224: FROM CSM_MTL_MATERIAL_TXN_ACC ACC,

220: -- get the updates to mat trfr
221: CURSOR l_mat_update_csr (b_last_run_date IN DATE) IS
222: SELECT ACC.user_id
223: , ACC.TRANSACTION_ID
224: FROM CSM_MTL_MATERIAL_TXN_ACC ACC,
225: MTL_MATERIAL_TRANSACTIONS B
226: WHERE B.TRANSACTION_ID = ACC.TRANSACTION_ID
227: AND B.last_update_date > b_last_run_date;
228:

Line 242: AND NOT EXISTS (SELECT 1 FROM CSM_MTL_MATERIAL_TXN_ACC ACC

238: AND TRANSACTION_ACTION_ID = 2 --Subinventory transfer
239: AND cila_from.subinventory_code = B.subinventory_code
240: AND cila_from.organization_id = B.organization_id
241: AND NVL(cila_from.locator_id,0) = NVL(B.locator_id,0)
242: AND NOT EXISTS (SELECT 1 FROM CSM_MTL_MATERIAL_TXN_ACC ACC
243: WHERE B.TRANSACTION_ID = ACC.TRANSACTION_ID
244: And Acc.User_Id = Cilaa.User_Id)
245: AND B.transaction_date > (sysdate - c_history_profile)
246: UNION ALL

Line 258: AND NOT EXISTS (SELECT 1 FROM CSM_MTL_MATERIAL_TXN_ACC ACC

254: AND cila_to.subinventory_code = B.transfer_subinventory
255: AND cila_to.organization_id = B.transfer_organization_id
256: And Nvl(Cila_To.Locator_Id,0) = Nvl(B.Transfer_Locator_Id,0)
257: AND B.transaction_date > (sysdate - c_history_profile)
258: AND NOT EXISTS (SELECT 1 FROM CSM_MTL_MATERIAL_TXN_ACC ACC
259: WHERE B.TRANSACTION_ID = ACC.TRANSACTION_ID
260: AND ACC.USER_ID = cilaa.USER_ID);
261:
262: l_last_run_date jtm_con_request_data.last_run_date%TYPE;

Line 276: CSM_UTIL_PKG.LOG('Entering CSM_MTL_MATERIAL_TXN_ACC_PKG.Refresh_Mat_Txn_Acc ',

272: l_profile_value NUMBER;
273: l_dummy boolean;
274:
275: BEGIN
276: CSM_UTIL_PKG.LOG('Entering CSM_MTL_MATERIAL_TXN_ACC_PKG.Refresh_Mat_Txn_Acc ',
277: g_table_name,FND_LOG.LEVEL_PROCEDURE);
278:
279: L_Current_Date := Sysdate;
280: --This profile is supported only at site level.

Line 296: 'CSM_MTL_MATERIAL_TXN_ACC_PKG.Refresh_Mat_Txn_Acc',FND_LOG.LEVEL_STATEMENT);

292: l_tran_id_lst.DELETE;
293: END IF;
294:
295: CSM_UTIL_PKG.LOG('Processing Material Trasaction Delete',
296: 'CSM_MTL_MATERIAL_TXN_ACC_PKG.Refresh_Mat_Txn_Acc',FND_LOG.LEVEL_STATEMENT);
297:
298: --Processing Deletes
299: OPEN l_mat_delete_csr(l_profile_value);
300: LOOP

Line 327: 'CSM_MTL_MATERIAL_TXN_ACC_PKG.Refresh_Mat_Txn_Acc',FND_LOG.LEVEL_STATEMENT);

323: l_tran_id_lst.DELETE;
324: END IF;
325:
326: CSM_UTIL_PKG.LOG('Processing Material Trasaction Update',
327: 'CSM_MTL_MATERIAL_TXN_ACC_PKG.Refresh_Mat_Txn_Acc',FND_LOG.LEVEL_STATEMENT);
328: OPEN l_mat_update_csr (l_last_run_date);
329: LOOP
330: FETCH l_mat_update_csr BULK COLLECT INTO l_user_id_lst , l_tran_id_lst LIMIT 500;
331: EXIT WHEN l_user_id_lst.COUNT = 0;

Line 357: 'CSM_MTL_MATERIAL_TXN_ACC_PKG.Refresh_Mat_Txn_Acc',FND_LOG.LEVEL_STATEMENT);

353: l_tran_id_lst.DELETE;
354: END IF;
355:
356: CSM_UTIL_PKG.LOG('Processing Material Trasaction Insert',
357: 'CSM_MTL_MATERIAL_TXN_ACC_PKG.Refresh_Mat_Txn_Acc',FND_LOG.LEVEL_STATEMENT);
358:
359: OPEN l_mat_insert_csr(l_profile_value);
360: LOOP
361: FETCH l_mat_insert_csr BULK COLLECT INTO l_user_id_lst, l_tran_id_lst LIMIT 500;

Line 382: WHERE package_name = 'CSM_MTL_MATERIAL_TXN_ACC_PKG'

378:
379: -- update last_run_date
380: UPDATE jtm_con_request_data
381: SET last_run_date = l_current_date
382: WHERE package_name = 'CSM_MTL_MATERIAL_TXN_ACC_PKG'
383: AND procedure_name = 'REFRESH_MAT_TXN_ACC';
384:
385: COMMIT;
386:

Line 388: p_message := 'CSM_MTL_MATERIAL_TXN_ACC_PKG.Refresh_Mat_Txn_Acc executed successfully';

384:
385: COMMIT;
386:
387: p_status := 'FINE';
388: p_message := 'CSM_MTL_MATERIAL_TXN_ACC_PKG.Refresh_Mat_Txn_Acc executed successfully';
389:
390: CSM_UTIL_PKG.LOG('Leaving CSM_MTL_MATERIAL_TXN_ACC_PKG.Refresh_Mat_Txn_Acc ',
391: 'CSM_MTL_MATERIAL_TXN_ACC_PKG.Refresh_Mat_Txn_Acc',FND_LOG.LEVEL_PROCEDURE);
392: EXCEPTION

Line 390: CSM_UTIL_PKG.LOG('Leaving CSM_MTL_MATERIAL_TXN_ACC_PKG.Refresh_Mat_Txn_Acc ',

386:
387: p_status := 'FINE';
388: p_message := 'CSM_MTL_MATERIAL_TXN_ACC_PKG.Refresh_Mat_Txn_Acc executed successfully';
389:
390: CSM_UTIL_PKG.LOG('Leaving CSM_MTL_MATERIAL_TXN_ACC_PKG.Refresh_Mat_Txn_Acc ',
391: 'CSM_MTL_MATERIAL_TXN_ACC_PKG.Refresh_Mat_Txn_Acc',FND_LOG.LEVEL_PROCEDURE);
392: EXCEPTION
393: WHEN OTHERS THEN
394: l_sqlerrno := TO_CHAR(SQLCODE);

Line 391: 'CSM_MTL_MATERIAL_TXN_ACC_PKG.Refresh_Mat_Txn_Acc',FND_LOG.LEVEL_PROCEDURE);

387: p_status := 'FINE';
388: p_message := 'CSM_MTL_MATERIAL_TXN_ACC_PKG.Refresh_Mat_Txn_Acc executed successfully';
389:
390: CSM_UTIL_PKG.LOG('Leaving CSM_MTL_MATERIAL_TXN_ACC_PKG.Refresh_Mat_Txn_Acc ',
391: 'CSM_MTL_MATERIAL_TXN_ACC_PKG.Refresh_Mat_Txn_Acc',FND_LOG.LEVEL_PROCEDURE);
392: EXCEPTION
393: WHEN OTHERS THEN
394: l_sqlerrno := TO_CHAR(SQLCODE);
395: l_sqlerrmsg := SUBSTR(SQLERRM, 1,2000);

Line 397: p_message := 'Error in CSM_MTL_MATERIAL_TXN_ACC_PKG.Refresh_Mat_Txn_Acc: ' || l_sqlerrno || ':' || l_sqlerrmsg;

393: WHEN OTHERS THEN
394: l_sqlerrno := TO_CHAR(SQLCODE);
395: l_sqlerrmsg := SUBSTR(SQLERRM, 1,2000);
396: p_status := 'ERROR';
397: p_message := 'Error in CSM_MTL_MATERIAL_TXN_ACC_PKG.Refresh_Mat_Txn_Acc: ' || l_sqlerrno || ':' || l_sqlerrmsg;
398: ROLLBACK;
399: csm_util_pkg.LOG('CSM_MTL_MATERIAL_TXN_ACC_PKG.Refresh_Mat_Txn_Acc ERROR : ' || l_sqlerrno || ':' || l_sqlerrmsg);
400: END Refresh_Mat_Txn_Acc;
401:

Line 399: csm_util_pkg.LOG('CSM_MTL_MATERIAL_TXN_ACC_PKG.Refresh_Mat_Txn_Acc ERROR : ' || l_sqlerrno || ':' || l_sqlerrmsg);

395: l_sqlerrmsg := SUBSTR(SQLERRM, 1,2000);
396: p_status := 'ERROR';
397: p_message := 'Error in CSM_MTL_MATERIAL_TXN_ACC_PKG.Refresh_Mat_Txn_Acc: ' || l_sqlerrno || ':' || l_sqlerrmsg;
398: ROLLBACK;
399: csm_util_pkg.LOG('CSM_MTL_MATERIAL_TXN_ACC_PKG.Refresh_Mat_Txn_Acc ERROR : ' || l_sqlerrno || ':' || l_sqlerrmsg);
400: END Refresh_Mat_Txn_Acc;
401:
402: --Called when a new user is created
403: PROCEDURE get_new_user_mat_txn(p_user_id IN NUMBER)

Line 420: AND NOT EXISTS (SELECT 1 FROM CSM_MTL_MATERIAL_TXN_ACC ACC

416: AND cila_from.subinventory_code = B.subinventory_code
417: AND cila_from.organization_id = B.organization_id
418: AND NVL(cila_from.locator_id,0) = NVL(B.locator_id,0)
419: AND cilaa1.user_id = b_user_id)
420: AND NOT EXISTS (SELECT 1 FROM CSM_MTL_MATERIAL_TXN_ACC ACC
421: WHERE B.TRANSACTION_ID = ACC.TRANSACTION_ID
422: AND ACC.USER_ID = b_user_id)
423: UNION ALL
424: SELECT B.TRANSACTION_ID

Line 436: AND NOT EXISTS (SELECT 1 FROM CSM_MTL_MATERIAL_TXN_ACC ACC

432: AND cila_to.subinventory_code = B.transfer_subinventory
433: AND cila_to.organization_id = B.transfer_organization_id
434: AND NVL(cila_to.locator_id,0) = NVL(B.transfer_locator_id,0)
435: AND cilaa2.user_id = b_user_id)
436: AND NOT EXISTS (SELECT 1 FROM CSM_MTL_MATERIAL_TXN_ACC ACC
437: WHERE B.TRANSACTION_ID = ACC.TRANSACTION_ID
438: AND ACC.USER_ID = b_user_id);
439:
440:

Line 452: CSM_UTIL_PKG.LOG('Entering CSM_MTL_MATERIAL_TXN_ACC_PKG.get_new_user_mat_txn ',

448: l_profile_value NUMBER;
449: l_dummy boolean;
450:
451: BEGIN
452: CSM_UTIL_PKG.LOG('Entering CSM_MTL_MATERIAL_TXN_ACC_PKG.get_new_user_mat_txn ',
453: g_table_name,FND_LOG.LEVEL_PROCEDURE);
454: l_profile_value := NVL(CSM_PROFILE_PKG.get_task_history_days(p_user_id),0);
455:
456: OPEN l_mat_insert_csr(p_user_id, l_profile_value);

Line 471: CSM_UTIL_PKG.LOG('Leaving CSM_MTL_MATERIAL_TXN_ACC_PKG.get_new_user_mat_txn ',

467:
468: END LOOP;
469: CLOSE l_mat_insert_csr;
470:
471: CSM_UTIL_PKG.LOG('Leaving CSM_MTL_MATERIAL_TXN_ACC_PKG.get_new_user_mat_txn ',
472: 'CSM_MTL_MATERIAL_TXN_ACC_PKG.get_new_user_mat_txn',FND_LOG.LEVEL_PROCEDURE);
473: EXCEPTION
474: WHEN OTHERS THEN
475: l_sqlerrno := TO_CHAR(SQLCODE);

Line 472: 'CSM_MTL_MATERIAL_TXN_ACC_PKG.get_new_user_mat_txn',FND_LOG.LEVEL_PROCEDURE);

468: END LOOP;
469: CLOSE l_mat_insert_csr;
470:
471: CSM_UTIL_PKG.LOG('Leaving CSM_MTL_MATERIAL_TXN_ACC_PKG.get_new_user_mat_txn ',
472: 'CSM_MTL_MATERIAL_TXN_ACC_PKG.get_new_user_mat_txn',FND_LOG.LEVEL_PROCEDURE);
473: EXCEPTION
474: WHEN OTHERS THEN
475: l_sqlerrno := TO_CHAR(SQLCODE);
476: l_sqlerrmsg := SUBSTR(SQLERRM, 1,2000);

Line 478: csm_util_pkg.LOG('CSM_MTL_MATERIAL_TXN_ACC_PKG.get_new_user_mat_txn ERROR : ' || l_sqlerrno || ':' || l_sqlerrmsg);

474: WHEN OTHERS THEN
475: l_sqlerrno := TO_CHAR(SQLCODE);
476: l_sqlerrmsg := SUBSTR(SQLERRM, 1,2000);
477: ROLLBACK;
478: csm_util_pkg.LOG('CSM_MTL_MATERIAL_TXN_ACC_PKG.get_new_user_mat_txn ERROR : ' || l_sqlerrno || ':' || l_sqlerrmsg);
479: END get_new_user_mat_txn;
480:
481: END CSM_MTL_MATERIAL_TXN_ACC_PKG;

Line 481: END CSM_MTL_MATERIAL_TXN_ACC_PKG;

477: ROLLBACK;
478: csm_util_pkg.LOG('CSM_MTL_MATERIAL_TXN_ACC_PKG.get_new_user_mat_txn ERROR : ' || l_sqlerrno || ':' || l_sqlerrmsg);
479: END get_new_user_mat_txn;
480:
481: END CSM_MTL_MATERIAL_TXN_ACC_PKG;