DBA Data[Home] [Help]

APPS.PA_ADJUSTMENTS dependencies on PA_DEBUG

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

5167: ELSIF ( X_adj_action = 'PROJECT OR TASK CHANGE' ) THEN
5168:
5169: /* Bug#3598333 */
5170: FOR j in 1..i LOOP
5171: If pa_debug.Acquire_user_lock( 'PA_EI_ADJUST_'||to_char( ItemsIdTab(i)))<>0 then
5172: FND_MESSAGE.SET_NAME('FND','FORM_RECORD_CHANGED');
5173: APP_EXCEPTION.RAISE_EXCEPTION; /* AcquireLock */
5174: end if;
5175: END LOOP;

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

5208: /* Bug#3598333 */
5209: /*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*/
5210: IF ( temp_msg_type not in ('E','W')) then
5211: FOR j in 1..i LOOP
5212: If pa_debug.release_user_lock( 'PA_EI_ADJUST_'||to_char( ItemsIdTab(i)))<>0 then
5213: FND_MESSAGE.SET_NAME('PA','PA_CAP_CANNOT_RELS_LOCK');
5214: APP_EXCEPTION.RAISE_EXCEPTION; /* AcquireLock */
5215: end if;
5216: /*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 5224: RelLockStatus := pa_debug.release_user_lock( 'PA_EI_ADJUST_'||to_char( ItemsIdTab(i)));

5220:
5221: IF ( temp_outcome IS NOT NULL AND ( temp_msg_type = 'E' ) ) THEN /* Added msg_type check for Bug 4906816 */
5222: /* Bug#3598333 */
5223: FOR j in 1..i LOOP
5224: RelLockStatus := pa_debug.release_user_lock( 'PA_EI_ADJUST_'||to_char( ItemsIdTab(i)));
5225: END LOOP;
5226: /* Bug#3598333 */
5227: RAISE INVALID_ITEM;
5228: END IF;