DBA Data[Home] [Help]

APPS.AHL_MATERIALS_GRP dependencies on FND_LOG

Line 86: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

82: l_material_rec get_task_mtrls_csr%ROWTYPE;
83:
84: BEGIN
85:
86: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
87: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure. p_wip_entity_id = ' || p_wip_entity_id);
88: END IF;
89:
90: -- Standard call to check for call compatibility

Line 87: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure. p_wip_entity_id = ' || p_wip_entity_id);

83:
84: BEGIN
85:
86: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
87: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure. p_wip_entity_id = ' || p_wip_entity_id);
88: END IF;
89:
90: -- Standard call to check for call compatibility
91: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version,l_api_name, G_PKG_NAME )

Line 118: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

114: i := 1;
115: LOOP
116: FETCH get_task_mtrls_csr INTO l_material_rec;
117: EXIT WHEN get_task_mtrls_csr%NOTFOUND;
118: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
119: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Requirement index i = ' || i || ', scheduled_material_id = ' || l_material_rec.scheduled_material_id);
120: END IF;
121: -- If the record has item_group_id or (position_key and mc_header_id) and inventory_item_id, get all other applicable alternate items
122: -- taking into consideration the item group or the SB effectivity (for position based items)

Line 119: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Requirement index i = ' || i || ', scheduled_material_id = ' || l_material_rec.scheduled_material_id);

115: LOOP
116: FETCH get_task_mtrls_csr INTO l_material_rec;
117: EXIT WHEN get_task_mtrls_csr%NOTFOUND;
118: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
119: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Requirement index i = ' || i || ', scheduled_material_id = ' || l_material_rec.scheduled_material_id);
120: END IF;
121: -- If the record has item_group_id or (position_key and mc_header_id) and inventory_item_id, get all other applicable alternate items
122: -- taking into consideration the item group or the SB effectivity (for position based items)
123: IF ((l_material_rec.item_group_id IS NOT NULL OR (l_material_rec.mc_header_id IS NOT NULL AND l_material_rec.position_key IS NOT NULL))

Line 126: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

122: -- taking into consideration the item group or the SB effectivity (for position based items)
123: IF ((l_material_rec.item_group_id IS NOT NULL OR (l_material_rec.mc_header_id IS NOT NULL AND l_material_rec.position_key IS NOT NULL))
124: AND l_material_rec.inventory_item_id IS NOT NULL) THEN
125: -- Get the alternates by calling the LTP procedure
126: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
127: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to call AHL_LTP_MTL_REQ_PVT.Get_Alternate_Items with p_schedule_material_id as ' || l_material_rec.scheduled_material_id);
128: END IF;
129: AHL_LTP_MTL_REQ_PVT.Get_Alternate_Items(p_api_version => 1.0,
130: p_schedule_material_id => l_material_rec.scheduled_material_id,

Line 127: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to call AHL_LTP_MTL_REQ_PVT.Get_Alternate_Items with p_schedule_material_id as ' || l_material_rec.scheduled_material_id);

123: IF ((l_material_rec.item_group_id IS NOT NULL OR (l_material_rec.mc_header_id IS NOT NULL AND l_material_rec.position_key IS NOT NULL))
124: AND l_material_rec.inventory_item_id IS NOT NULL) THEN
125: -- Get the alternates by calling the LTP procedure
126: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
127: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to call AHL_LTP_MTL_REQ_PVT.Get_Alternate_Items with p_schedule_material_id as ' || l_material_rec.scheduled_material_id);
128: END IF;
129: AHL_LTP_MTL_REQ_PVT.Get_Alternate_Items(p_api_version => 1.0,
130: p_schedule_material_id => l_material_rec.scheduled_material_id,
131: x_alt_items => l_alt_items,

Line 135: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

131: x_alt_items => l_alt_items,
132: x_return_status => x_return_status,
133: x_msg_count => x_msg_count,
134: x_msg_data => x_msg_data);
135: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
136: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'AHL_LTP_MTL_REQ_PVT.Get_Alternate_Items returned ' || x_return_status);
137: END IF;
138: EXIT WHEN x_return_status <> FND_API.G_RET_STS_SUCCESS;
139: IF (l_alt_items IS NULL OR l_alt_items.COUNT = 0) THEN

Line 136: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'AHL_LTP_MTL_REQ_PVT.Get_Alternate_Items returned ' || x_return_status);

132: x_return_status => x_return_status,
133: x_msg_count => x_msg_count,
134: x_msg_data => x_msg_data);
135: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
136: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'AHL_LTP_MTL_REQ_PVT.Get_Alternate_Items returned ' || x_return_status);
137: END IF;
138: EXIT WHEN x_return_status <> FND_API.G_RET_STS_SUCCESS;
139: IF (l_alt_items IS NULL OR l_alt_items.COUNT = 0) THEN
140: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 140: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

136: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'AHL_LTP_MTL_REQ_PVT.Get_Alternate_Items returned ' || x_return_status);
137: END IF;
138: EXIT WHEN x_return_status <> FND_API.G_RET_STS_SUCCESS;
139: IF (l_alt_items IS NULL OR l_alt_items.COUNT = 0) THEN
140: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
141: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'No alternate items available for this requirement.');
142: END IF;
143: ELSE
144: -- This requirement has alternate items available

Line 141: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'No alternate items available for this requirement.');

137: END IF;
138: EXIT WHEN x_return_status <> FND_API.G_RET_STS_SUCCESS;
139: IF (l_alt_items IS NULL OR l_alt_items.COUNT = 0) THEN
140: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
141: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'No alternate items available for this requirement.');
142: END IF;
143: ELSE
144: -- This requirement has alternate items available
145: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 145: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

141: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'No alternate items available for this requirement.');
142: END IF;
143: ELSE
144: -- This requirement has alternate items available
145: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
146: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'This requirement has ' || l_alt_items.COUNT || ' alternate items.');
147: END IF;
148: FOR j IN l_alt_items.FIRST..l_alt_items.LAST LOOP
149: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 146: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'This requirement has ' || l_alt_items.COUNT || ' alternate items.');

142: END IF;
143: ELSE
144: -- This requirement has alternate items available
145: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
146: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'This requirement has ' || l_alt_items.COUNT || ' alternate items.');
147: END IF;
148: FOR j IN l_alt_items.FIRST..l_alt_items.LAST LOOP
149: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
150: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Index j = ' || j || ', l_alt_items(j) = ' || l_alt_items(j));

Line 149: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

145: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
146: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'This requirement has ' || l_alt_items.COUNT || ' alternate items.');
147: END IF;
148: FOR j IN l_alt_items.FIRST..l_alt_items.LAST LOOP
149: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
150: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Index j = ' || j || ', l_alt_items(j) = ' || l_alt_items(j));
151: END IF;
152: x_alt_item_tbl(l_tbl_index).PRIMARY_ITEM_ID := l_material_rec.inventory_item_id;
153: x_alt_item_tbl(l_tbl_index).PRIMARY_ITEM_QUANTITY := l_material_rec.REQUESTED_QUANTITY;

Line 150: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Index j = ' || j || ', l_alt_items(j) = ' || l_alt_items(j));

146: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'This requirement has ' || l_alt_items.COUNT || ' alternate items.');
147: END IF;
148: FOR j IN l_alt_items.FIRST..l_alt_items.LAST LOOP
149: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
150: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Index j = ' || j || ', l_alt_items(j) = ' || l_alt_items(j));
151: END IF;
152: x_alt_item_tbl(l_tbl_index).PRIMARY_ITEM_ID := l_material_rec.inventory_item_id;
153: x_alt_item_tbl(l_tbl_index).PRIMARY_ITEM_QUANTITY := l_material_rec.REQUESTED_QUANTITY;
154: x_alt_item_tbl(l_tbl_index).PRIMARY_ITEM_UOM_CODE := l_material_rec.UOM;

Line 189: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

185: p_data => x_msg_data,
186: p_encoded => fnd_api.g_false
187: );
188:
189: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
190: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end. Number of rows in the Output table: ' || (l_tbl_index - 1), 'End Procedure');
191: END IF;
192:
193: EXCEPTION

Line 190: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end. Number of rows in the Output table: ' || (l_tbl_index - 1), 'End Procedure');

186: p_encoded => fnd_api.g_false
187: );
188:
189: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
190: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end. Number of rows in the Output table: ' || (l_tbl_index - 1), 'End Procedure');
191: END IF;
192:
193: EXCEPTION
194: WHEN FND_API.G_EXC_ERROR THEN

Line 199: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

195: x_return_status := FND_API.G_RET_STS_ERROR;
196: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
197: p_data => x_msg_data,
198: p_encoded => fnd_api.g_false);
199: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
200: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, L_DEBUG_KEY, 'Execution Error: ' || x_msg_data);
201: END IF;
202:
203: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 200: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, L_DEBUG_KEY, 'Execution Error: ' || x_msg_data);

196: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
197: p_data => x_msg_data,
198: p_encoded => fnd_api.g_false);
199: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
200: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, L_DEBUG_KEY, 'Execution Error: ' || x_msg_data);
201: END IF;
202:
203: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
204: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 209: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

205: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
206: p_data => x_msg_data,
207: p_encoded => fnd_api.g_false);
208:
209: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
210: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, L_DEBUG_KEY, 'Unexpected Exception: ' || x_msg_data);
211: END IF;
212:
213: WHEN OTHERS THEN

Line 210: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, L_DEBUG_KEY, 'Unexpected Exception: ' || x_msg_data);

206: p_data => x_msg_data,
207: p_encoded => fnd_api.g_false);
208:
209: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
210: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, L_DEBUG_KEY, 'Unexpected Exception: ' || x_msg_data);
211: END IF;
212:
213: WHEN OTHERS THEN
214: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 224: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

220: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
221: p_data => x_msg_data,
222: p_encoded => fnd_api.g_false);
223:
224: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
225: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, L_DEBUG_KEY, 'Other Exception: ' || x_msg_data);
226: END IF;
227:
228: END GET_WO_ALTERNATES;

Line 225: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, L_DEBUG_KEY, 'Other Exception: ' || x_msg_data);

221: p_data => x_msg_data,
222: p_encoded => fnd_api.g_false);
223:
224: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
225: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, L_DEBUG_KEY, 'Other Exception: ' || x_msg_data);
226: END IF;
227:
228: END GET_WO_ALTERNATES;
229:

Line 319: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

315: BEGIN
316:
317: -- Standard start of API savepoint
318: SAVEPOINT update_wo_materials_pvt;
319: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
320: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure. p_wip_entity_id = ' || p_wip_entity_id);
321: END IF;
322:
323: -- Standard call to check for call compatibility

Line 320: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure. p_wip_entity_id = ' || p_wip_entity_id);

316:
317: -- Standard start of API savepoint
318: SAVEPOINT update_wo_materials_pvt;
319: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
320: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure. p_wip_entity_id = ' || p_wip_entity_id);
321: END IF;
322:
323: -- Standard call to check for call compatibility
324: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version,l_api_name, G_PKG_NAME )

Line 355: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

351: END IF;
352:
353: IF (p_alt_item_tbl IS NULL OR p_alt_item_tbl.COUNT = 0) THEN
354: -- Only Date Change, No Item Change
355: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
356: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'p_alt_item_tbl is null or empty');
357: END IF;
358: ELSE
359: -- Item Change has happened

Line 356: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'p_alt_item_tbl is null or empty');

352:
353: IF (p_alt_item_tbl IS NULL OR p_alt_item_tbl.COUNT = 0) THEN
354: -- Only Date Change, No Item Change
355: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
356: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'p_alt_item_tbl is null or empty');
357: END IF;
358: ELSE
359: -- Item Change has happened
360: l_num_items_changed := p_alt_item_tbl.COUNT;

Line 361: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

357: END IF;
358: ELSE
359: -- Item Change has happened
360: l_num_items_changed := p_alt_item_tbl.COUNT;
361: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
362: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Number of items changed = ' || l_num_items_changed);
363: END IF;
364: END IF;
365:

Line 362: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Number of items changed = ' || l_num_items_changed);

358: ELSE
359: -- Item Change has happened
360: l_num_items_changed := p_alt_item_tbl.COUNT;
361: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
362: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Number of items changed = ' || l_num_items_changed);
363: END IF;
364: END IF;
365:
366: -- Handle date change

Line 367: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

363: END IF;
364: END IF;
365:
366: -- Handle date change
367: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
368: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to handle date change.');
369: END IF;
370: OPEN get_scheduled_material_id(p_wip_entity_id, l_requested_date);
371: i := 1;

Line 368: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to handle date change.');

364: END IF;
365:
366: -- Handle date change
367: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
368: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to handle date change.');
369: END IF;
370: OPEN get_scheduled_material_id(p_wip_entity_id, l_requested_date);
371: i := 1;
372: -- Loop for all the scheduled material ids for the given wip_entity_id

Line 379: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

375: LOOP
376: FETCH get_scheduled_material_id INTO l_scheduled_material_id;
377: EXIT WHEN get_scheduled_material_id%NOTFOUND;
378:
379: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
380: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Inside the loop i = ' || i || ', scheduled_material_id = ' || l_scheduled_material_id);
381: END IF;
382: -- This API updates all the reservation dates, if l_requested_date
383: -- and requested_date in AHL_SCHEDULE_MATERIALS table are different

Line 380: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Inside the loop i = ' || i || ', scheduled_material_id = ' || l_scheduled_material_id);

376: FETCH get_scheduled_material_id INTO l_scheduled_material_id;
377: EXIT WHEN get_scheduled_material_id%NOTFOUND;
378:
379: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
380: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Inside the loop i = ' || i || ', scheduled_material_id = ' || l_scheduled_material_id);
381: END IF;
382: -- This API updates all the reservation dates, if l_requested_date
383: -- and requested_date in AHL_SCHEDULE_MATERIALS table are different
384: AHL_RSV_RESERVATIONS_PVT.Update_Reservation(

Line 395: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

391: x_msg_data => x_msg_data,
392: p_scheduled_material_id => l_scheduled_material_id,
393: p_requested_date => l_requested_date);
394: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
395: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
396: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Returned success from AHL_RSV_RESERVATIONS_PVT.Update_Reservation');
397: END IF;
398: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
399: RAISE FND_API.G_EXC_ERROR;

Line 396: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Returned success from AHL_RSV_RESERVATIONS_PVT.Update_Reservation');

392: p_scheduled_material_id => l_scheduled_material_id,
393: p_requested_date => l_requested_date);
394: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
395: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
396: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Returned success from AHL_RSV_RESERVATIONS_PVT.Update_Reservation');
397: END IF;
398: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
399: RAISE FND_API.G_EXC_ERROR;
400: ELSE

Line 413: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

409: last_update_login = fnd_global.login_id
410: WHERE scheduled_material_id = l_scheduled_material_id;
411: i := i + 1;
412: END LOOP;
413: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
414: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'After end of the loop, total number of iteration to modify date = ' || (i-1));
415: END IF;
416: CLOSE get_scheduled_material_id;
417:

Line 414: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'After end of the loop, total number of iteration to modify date = ' || (i-1));

410: WHERE scheduled_material_id = l_scheduled_material_id;
411: i := i + 1;
412: END LOOP;
413: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
414: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'After end of the loop, total number of iteration to modify date = ' || (i-1));
415: END IF;
416: CLOSE get_scheduled_material_id;
417:
418: IF (l_num_items_changed > 0) THEN

Line 420: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

416: CLOSE get_scheduled_material_id;
417:
418: IF (l_num_items_changed > 0) THEN
419: -- Handle Item change
420: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
421: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to handle item change.');
422: END IF;
423: -- Changes made by jaramana on 29-SEP-2011 to handle Item Change
424: -- NOTE: The VCP Release process will make changes to the item in the WIP requirement only under the following conditions:

Line 421: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to handle item change.');

417:
418: IF (l_num_items_changed > 0) THEN
419: -- Handle Item change
420: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
421: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to handle item change.');
422: END IF;
423: -- Changes made by jaramana on 29-SEP-2011 to handle Item Change
424: -- NOTE: The VCP Release process will make changes to the item in the WIP requirement only under the following conditions:
425: -- a. The entire quantity is changed (no partial quantity changes)

Line 428: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

424: -- NOTE: The VCP Release process will make changes to the item in the WIP requirement only under the following conditions:
425: -- a. The entire quantity is changed (no partial quantity changes)
426: -- b. There does NOT already exist a requirement in the Work Order/Operation for the new item
427: FOR i IN p_alt_item_tbl.FIRST..p_alt_item_tbl.LAST LOOP
428: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
429: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'i = ' || i ||
430: ', p_alt_item_tbl(i).PRIMARY_ITEM_ID = ' || p_alt_item_tbl(i).PRIMARY_ITEM_ID ||
431: ', p_alt_item_tbl(i).OPERATION_SEQUENCE = ' || p_alt_item_tbl(i).OPERATION_SEQUENCE ||
432: ', p_alt_item_tbl(i).ALTERNATE_ITEM_ID = ' || p_alt_item_tbl(i).ALTERNATE_ITEM_ID);

Line 429: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'i = ' || i ||

425: -- a. The entire quantity is changed (no partial quantity changes)
426: -- b. There does NOT already exist a requirement in the Work Order/Operation for the new item
427: FOR i IN p_alt_item_tbl.FIRST..p_alt_item_tbl.LAST LOOP
428: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
429: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'i = ' || i ||
430: ', p_alt_item_tbl(i).PRIMARY_ITEM_ID = ' || p_alt_item_tbl(i).PRIMARY_ITEM_ID ||
431: ', p_alt_item_tbl(i).OPERATION_SEQUENCE = ' || p_alt_item_tbl(i).OPERATION_SEQUENCE ||
432: ', p_alt_item_tbl(i).ALTERNATE_ITEM_ID = ' || p_alt_item_tbl(i).ALTERNATE_ITEM_ID);
433: END IF;

Line 440: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

436: -- Check if a requirement exists for PRIMARY_ITEM_ID and then change it to ALTERNATE_ITEM_ID
437: OPEN get_matching_sched_mat_id(p_wip_entity_id, p_alt_item_tbl(i).PRIMARY_ITEM_ID, p_alt_item_tbl(i).OPERATION_SEQUENCE);
438: FETCH get_matching_sched_mat_id INTO l_scheduled_material_id;
439: IF get_matching_sched_mat_id%FOUND THEN
440: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
441: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Found Matching Schedule Material Id: ' || l_scheduled_material_id);
442: END IF;
443: UPDATE AHL_SCHEDULE_MATERIALS
444: SET inventory_item_id = p_alt_item_tbl(i).ALTERNATE_ITEM_ID,

Line 441: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Found Matching Schedule Material Id: ' || l_scheduled_material_id);

437: OPEN get_matching_sched_mat_id(p_wip_entity_id, p_alt_item_tbl(i).PRIMARY_ITEM_ID, p_alt_item_tbl(i).OPERATION_SEQUENCE);
438: FETCH get_matching_sched_mat_id INTO l_scheduled_material_id;
439: IF get_matching_sched_mat_id%FOUND THEN
440: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
441: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Found Matching Schedule Material Id: ' || l_scheduled_material_id);
442: END IF;
443: UPDATE AHL_SCHEDULE_MATERIALS
444: SET inventory_item_id = p_alt_item_tbl(i).ALTERNATE_ITEM_ID,
445: last_update_date = sysdate,

Line 450: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

446: last_updated_by = fnd_global.user_id,
447: last_update_login = fnd_global.login_id
448: WHERE scheduled_material_id = l_scheduled_material_id;
449: ELSE
450: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
451: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'No Matching Schedule Material record found');
452: END IF;
453: END IF;
454: CLOSE get_matching_sched_mat_id;

Line 451: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'No Matching Schedule Material record found');

447: last_update_login = fnd_global.login_id
448: WHERE scheduled_material_id = l_scheduled_material_id;
449: ELSE
450: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
451: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'No Matching Schedule Material record found');
452: END IF;
453: END IF;
454: CLOSE get_matching_sched_mat_id;
455: END IF;

Line 478: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

474: p_data => x_msg_data,
475: p_encoded => fnd_api.g_false
476: );
477:
478: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
479: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'End Procedure');
480: END IF;
481:
482: EXCEPTION

Line 479: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'End Procedure');

475: p_encoded => fnd_api.g_false
476: );
477:
478: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
479: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'End Procedure');
480: END IF;
481:
482: EXCEPTION
483: WHEN FND_API.G_EXC_ERROR THEN

Line 489: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

485: x_return_status := FND_API.G_RET_STS_ERROR;
486: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
487: p_data => x_msg_data,
488: p_encoded => fnd_api.g_false);
489: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
490: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, L_DEBUG_KEY, 'Execution Error: ' || x_msg_data);
491: END IF;
492:
493: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 490: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, L_DEBUG_KEY, 'Execution Error: ' || x_msg_data);

486: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
487: p_data => x_msg_data,
488: p_encoded => fnd_api.g_false);
489: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
490: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, L_DEBUG_KEY, 'Execution Error: ' || x_msg_data);
491: END IF;
492:
493: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
494: Rollback to update_wo_materials_pvt;

Line 499: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

495: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
496: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
497: p_data => x_msg_data,
498: p_encoded => fnd_api.g_false);
499: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
500: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, L_DEBUG_KEY, 'Unexpected Exception: ' || x_msg_data);
501: END IF;
502:
503: WHEN OTHERS THEN

Line 500: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, L_DEBUG_KEY, 'Unexpected Exception: ' || x_msg_data);

496: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
497: p_data => x_msg_data,
498: p_encoded => fnd_api.g_false);
499: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
500: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, L_DEBUG_KEY, 'Unexpected Exception: ' || x_msg_data);
501: END IF;
502:
503: WHEN OTHERS THEN
504: Rollback to update_wo_materials_pvt;

Line 514: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

510: END IF;
511: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
512: p_data => x_msg_data,
513: p_encoded => fnd_api.g_false);
514: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
515: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, L_DEBUG_KEY, 'Other Exception: ' || x_msg_data);
516: END IF;
517:
518: END update_wo_materials;

Line 515: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, L_DEBUG_KEY, 'Other Exception: ' || x_msg_data);

511: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
512: p_data => x_msg_data,
513: p_encoded => fnd_api.g_false);
514: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
515: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, L_DEBUG_KEY, 'Other Exception: ' || x_msg_data);
516: END IF;
517:
518: END update_wo_materials;
519: