DBA Data[Home] [Help]

APPS.CSM_MTL_MATERIAL_TXN_ACC_PKG dependencies on CSM_MTL_MATERIAL_TXN_ACC_PKG

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 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 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 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;