DBA Data[Home] [Help]

APPS.PA_ADJUSTMENTS dependencies on PA_DEBUG

Line 5061: If pa_debug.Acquire_user_lock( 'PA_EI_ADJUST_'||to_char( ItemsIdTab(i)))<>0 then

5057: ELSIF ( X_adj_action = 'PROJECT OR TASK CHANGE' ) THEN
5058:
5059: /* Bug#3598333 */
5060: FOR j in 1..i LOOP
5061: If pa_debug.Acquire_user_lock( 'PA_EI_ADJUST_'||to_char( ItemsIdTab(i)))<>0 then
5062: FND_MESSAGE.SET_NAME('FND','FORM_RECORD_CHANGED');
5063: APP_EXCEPTION.RAISE_EXCEPTION; /* AcquireLock */
5064: end if;
5065: END LOOP;

Line 5100: If pa_debug.release_user_lock( 'PA_EI_ADJUST_'||to_char( ItemsIdTab(i)))<>0 then

5096: /* Bug#3598333 */
5097: /*Changes for 7371988 Starts here -- We will release the lock, hence issuing a commit in PAXEIADJ.pld now, instead of here for messages seeded in Client Extension*/
5098: IF ( temp_msg_type not in ('E','W')) then
5099: FOR j in 1..i LOOP
5100: If pa_debug.release_user_lock( 'PA_EI_ADJUST_'||to_char( ItemsIdTab(i)))<>0 then
5101: FND_MESSAGE.SET_NAME('PA','PA_CAP_CANNOT_RELS_LOCK');
5102: APP_EXCEPTION.RAISE_EXCEPTION; /* AcquireLock */
5103: end if;
5104: /*Changes for 7371988 end here -- We will release the lock, hence issuing a commit in PAXEIADJ.pld now, instead of here for messages seeded in Client Extension*/

Line 5112: RelLockStatus := pa_debug.release_user_lock( 'PA_EI_ADJUST_'||to_char( ItemsIdTab(i)));

5108:
5109: IF ( temp_outcome IS NOT NULL AND ( temp_msg_type = 'E' ) ) THEN /* Added msg_type check for Bug 4906816 */
5110: /* Bug#3598333 */
5111: FOR j in 1..i LOOP
5112: RelLockStatus := pa_debug.release_user_lock( 'PA_EI_ADJUST_'||to_char( ItemsIdTab(i)));
5113: END LOOP;
5114: /* Bug#3598333 */
5115: RAISE INVALID_ITEM;
5116: END IF;