66: l_commit VARCHAR2(10) := FND_API.g_false;
67: l_material_avl_tbl Material_Availability_Tbl := p_x_material_avl_tbl;
68: BEGIN
69:
70: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
71: fnd_log.string
72: (
73: fnd_log.level_procedure,
74: 'ahl.plsql.AHL_LTP_REQST_MATRL_PUB.Check_Material_Aval',
67: l_material_avl_tbl Material_Availability_Tbl := p_x_material_avl_tbl;
68: BEGIN
69:
70: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
71: fnd_log.string
72: (
73: fnd_log.level_procedure,
74: 'ahl.plsql.AHL_LTP_REQST_MATRL_PUB.Check_Material_Aval',
75: 'At the start of PLSQL procedure'
69:
70: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
71: fnd_log.string
72: (
73: fnd_log.level_procedure,
74: 'ahl.plsql.AHL_LTP_REQST_MATRL_PUB.Check_Material_Aval',
75: 'At the start of PLSQL procedure'
76: );
77: END IF;
96: END IF;
97: --------------------Start of API Body-----------------------------------
98: IF l_material_avl_tbl.COUNT > 0 THEN
99: --
100: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
101: fnd_log.string
102: (
103: fnd_log.level_statement,
104: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
97: --------------------Start of API Body-----------------------------------
98: IF l_material_avl_tbl.COUNT > 0 THEN
99: --
100: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
101: fnd_log.string
102: (
103: fnd_log.level_statement,
104: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
105: 'Request for Check Material Aval Number of Records : ' || l_material_avl_tbl.COUNT
99: --
100: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
101: fnd_log.string
102: (
103: fnd_log.level_statement,
104: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
105: 'Request for Check Material Aval Number of Records : ' || l_material_avl_tbl.COUNT
106: );
107: fnd_log.string
103: fnd_log.level_statement,
104: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
105: 'Request for Check Material Aval Number of Records : ' || l_material_avl_tbl.COUNT
106: );
107: fnd_log.string
108: (
109: fnd_log.level_statement,
110: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
111: 'Request for Check Material Aval Schedule material Id : ' || l_material_avl_tbl(1).schedule_material_id
105: 'Request for Check Material Aval Number of Records : ' || l_material_avl_tbl.COUNT
106: );
107: fnd_log.string
108: (
109: fnd_log.level_statement,
110: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
111: 'Request for Check Material Aval Schedule material Id : ' || l_material_avl_tbl(1).schedule_material_id
112: );
113:
124: x_msg_count => l_msg_count,
125: x_msg_data => l_msg_data);
126: END IF;
127:
128: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
129: fnd_log.string
130: (
131: fnd_log.level_procedure,
132: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
125: x_msg_data => l_msg_data);
126: END IF;
127:
128: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
129: fnd_log.string
130: (
131: fnd_log.level_procedure,
132: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
133: 'After calling ahl ltp matrl aval pvt.Check Material Aval, Return Status : '|| l_return_status
127:
128: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
129: fnd_log.string
130: (
131: fnd_log.level_procedure,
132: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
133: 'After calling ahl ltp matrl aval pvt.Check Material Aval, Return Status : '|| l_return_status
134: );
135: END IF;
157: p_x_material_avl_tbl(i).error_code := l_material_avl_tbl(i).error_code;
158: p_x_material_avl_tbl(i).error_message := 'For Item'||l_material_avl_tbl(i).item||','||l_material_avl_tbl(i).error_message;
159:
160:
161: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
162: fnd_log.string
163: (
164: fnd_log.level_statement,
165: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Material_Aval',
158: p_x_material_avl_tbl(i).error_message := 'For Item'||l_material_avl_tbl(i).item||','||l_material_avl_tbl(i).error_message;
159:
160:
161: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
162: fnd_log.string
163: (
164: fnd_log.level_statement,
165: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Material_Aval',
166: ' Derieved Value, Visit Task Id: ' || p_x_material_avl_tbl(i).visit_task_id
160:
161: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
162: fnd_log.string
163: (
164: fnd_log.level_statement,
165: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Material_Aval',
166: ' Derieved Value, Visit Task Id: ' || p_x_material_avl_tbl(i).visit_task_id
167: );
168: fnd_log.string
164: fnd_log.level_statement,
165: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Material_Aval',
166: ' Derieved Value, Visit Task Id: ' || p_x_material_avl_tbl(i).visit_task_id
167: );
168: fnd_log.string
169: (
170: fnd_log.level_statement,
171: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Material_Aval',
172: ' Derieved Value, Inventory Item Id: ' || p_x_material_avl_tbl(i).inventory_item_id
166: ' Derieved Value, Visit Task Id: ' || p_x_material_avl_tbl(i).visit_task_id
167: );
168: fnd_log.string
169: (
170: fnd_log.level_statement,
171: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Material_Aval',
172: ' Derieved Value, Inventory Item Id: ' || p_x_material_avl_tbl(i).inventory_item_id
173: );
174: fnd_log.string
170: fnd_log.level_statement,
171: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Material_Aval',
172: ' Derieved Value, Inventory Item Id: ' || p_x_material_avl_tbl(i).inventory_item_id
173: );
174: fnd_log.string
175: (
176: fnd_log.level_statement,
177: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Material_Aval',
178: ' Derieved Value, Quantity: ' || p_x_material_avl_tbl(i).quantity
172: ' Derieved Value, Inventory Item Id: ' || p_x_material_avl_tbl(i).inventory_item_id
173: );
174: fnd_log.string
175: (
176: fnd_log.level_statement,
177: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Material_Aval',
178: ' Derieved Value, Quantity: ' || p_x_material_avl_tbl(i).quantity
179: );
180: fnd_log.string
176: fnd_log.level_statement,
177: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Material_Aval',
178: ' Derieved Value, Quantity: ' || p_x_material_avl_tbl(i).quantity
179: );
180: fnd_log.string
181: (
182: fnd_log.level_statement,
183: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Material_Aval',
184: ' Derieved Value, Quantity Available: ' || p_x_material_avl_tbl(i).quantity_available
178: ' Derieved Value, Quantity: ' || p_x_material_avl_tbl(i).quantity
179: );
180: fnd_log.string
181: (
182: fnd_log.level_statement,
183: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Material_Aval',
184: ' Derieved Value, Quantity Available: ' || p_x_material_avl_tbl(i).quantity_available
185: );
186: fnd_log.string
182: fnd_log.level_statement,
183: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Material_Aval',
184: ' Derieved Value, Quantity Available: ' || p_x_material_avl_tbl(i).quantity_available
185: );
186: fnd_log.string
187: (
188: fnd_log.level_statement,
189: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Material_Aval',
190: ' Derieved Value, Error Message: ' || p_x_material_avl_tbl(i).error_message
184: ' Derieved Value, Quantity Available: ' || p_x_material_avl_tbl(i).quantity_available
185: );
186: fnd_log.string
187: (
188: fnd_log.level_statement,
189: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Material_Aval',
190: ' Derieved Value, Error Message: ' || p_x_material_avl_tbl(i).error_message
191: );
192:
206: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
207: COMMIT;
208: END IF;
209:
210: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
211: fnd_log.string
212: (
213: fnd_log.level_procedure,
214: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check Material Aval.end',
207: COMMIT;
208: END IF;
209:
210: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
211: fnd_log.string
212: (
213: fnd_log.level_procedure,
214: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check Material Aval.end',
215: 'At the end of PLSQL procedure'
209:
210: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
211: fnd_log.string
212: (
213: fnd_log.level_procedure,
214: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check Material Aval.end',
215: 'At the end of PLSQL procedure'
216: );
217: END IF;
292: l_task_req_matrl_tbl Task_Req_Matrl_Tbl;
293: --
294: BEGIN
295:
296: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
297: fnd_log.string
298: (
299: fnd_log.level_procedure,
300: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Get_Visit_Task_Materials.begin',
293: --
294: BEGIN
295:
296: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
297: fnd_log.string
298: (
299: fnd_log.level_procedure,
300: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Get_Visit_Task_Materials.begin',
301: 'At the start of PLSQL procedure'
295:
296: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
297: fnd_log.string
298: (
299: fnd_log.level_procedure,
300: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Get_Visit_Task_Materials.begin',
301: 'At the start of PLSQL procedure'
302: );
303: END IF;
317: THEN
318: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
319: END IF;
320:
321: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
322: fnd_log.string
323: (
324: fnd_log.level_statement,
325: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
318: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
319: END IF;
320:
321: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
322: fnd_log.string
323: (
324: fnd_log.level_statement,
325: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
326: 'Request for Visit Task Materials for Visit Id : ' || p_visit_id
320:
321: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
322: fnd_log.string
323: (
324: fnd_log.level_statement,
325: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
326: 'Request for Visit Task Materials for Visit Id : ' || p_visit_id
327: );
328:
327: );
328:
329: END IF;
330:
331: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
332: fnd_log.string
333: (
334: fnd_log.level_procedure,
335: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
328:
329: END IF;
330:
331: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
332: fnd_log.string
333: (
334: fnd_log.level_procedure,
335: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
336: 'Before calling ahl ltp matrl aval pvt.Get Visit Task Materials'
330:
331: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
332: fnd_log.string
333: (
334: fnd_log.level_procedure,
335: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
336: 'Before calling ahl ltp matrl aval pvt.Get Visit Task Materials'
337: );
338:
350: x_return_status => l_return_status,
351: x_msg_count => l_msg_count,
352: x_msg_data => l_msg_data);
353:
354: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
355: fnd_log.string
356: (
357: fnd_log.level_procedure,
358: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
351: x_msg_count => l_msg_count,
352: x_msg_data => l_msg_data);
353:
354: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
355: fnd_log.string
356: (
357: fnd_log.level_procedure,
358: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
359: 'After calling ahl ltp matrl aval pvt.Get Visit Task Materials, Return Status : '|| l_return_status
353:
354: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
355: fnd_log.string
356: (
357: fnd_log.level_procedure,
358: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
359: 'After calling ahl ltp matrl aval pvt.Get Visit Task Materials, Return Status : '|| l_return_status
360: );
361: END IF;
385: x_task_req_matrl_tbl(i).quantity := l_task_req_matrl_tbl(i).quantity;
386: x_task_req_matrl_tbl(i).scheduled_date := l_task_req_matrl_tbl(i).scheduled_date;
387: x_task_req_matrl_tbl(i).planned_order := l_task_req_matrl_tbl(i).planned_order;
388: --
389: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
390: fnd_log.string
391: (
392: fnd_log.level_statement,
393: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
386: x_task_req_matrl_tbl(i).scheduled_date := l_task_req_matrl_tbl(i).scheduled_date;
387: x_task_req_matrl_tbl(i).planned_order := l_task_req_matrl_tbl(i).planned_order;
388: --
389: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
390: fnd_log.string
391: (
392: fnd_log.level_statement,
393: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
394: 'Schedule Material Id : '||x_task_req_matrl_tbl(i).schedule_material_id
388: --
389: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
390: fnd_log.string
391: (
392: fnd_log.level_statement,
393: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
394: 'Schedule Material Id : '||x_task_req_matrl_tbl(i).schedule_material_id
395: );
396: fnd_log.string
392: fnd_log.level_statement,
393: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
394: 'Schedule Material Id : '||x_task_req_matrl_tbl(i).schedule_material_id
395: );
396: fnd_log.string
397: (
398: fnd_log.level_statement,
399: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
400: 'Object Version Number : '||x_task_req_matrl_tbl(i).object_version_number
394: 'Schedule Material Id : '||x_task_req_matrl_tbl(i).schedule_material_id
395: );
396: fnd_log.string
397: (
398: fnd_log.level_statement,
399: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
400: 'Object Version Number : '||x_task_req_matrl_tbl(i).object_version_number
401: );
402: fnd_log.string
398: fnd_log.level_statement,
399: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
400: 'Object Version Number : '||x_task_req_matrl_tbl(i).object_version_number
401: );
402: fnd_log.string
403: (
404: fnd_log.level_statement,
405: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
406: 'Visit Task Id : '||x_task_req_matrl_tbl(i).visit_task_id
400: 'Object Version Number : '||x_task_req_matrl_tbl(i).object_version_number
401: );
402: fnd_log.string
403: (
404: fnd_log.level_statement,
405: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
406: 'Visit Task Id : '||x_task_req_matrl_tbl(i).visit_task_id
407: );
408: fnd_log.string
404: fnd_log.level_statement,
405: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
406: 'Visit Task Id : '||x_task_req_matrl_tbl(i).visit_task_id
407: );
408: fnd_log.string
409: (
410: fnd_log.level_statement,
411: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
412: 'Visit Task Name : '||x_task_req_matrl_tbl(i).task_name
406: 'Visit Task Id : '||x_task_req_matrl_tbl(i).visit_task_id
407: );
408: fnd_log.string
409: (
410: fnd_log.level_statement,
411: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
412: 'Visit Task Name : '||x_task_req_matrl_tbl(i).task_name
413: );
414: fnd_log.string
410: fnd_log.level_statement,
411: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
412: 'Visit Task Name : '||x_task_req_matrl_tbl(i).task_name
413: );
414: fnd_log.string
415: (
416: fnd_log.level_statement,
417: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
418: 'Inventory Item Id : '||x_task_req_matrl_tbl(i).inventory_item_id
412: 'Visit Task Name : '||x_task_req_matrl_tbl(i).task_name
413: );
414: fnd_log.string
415: (
416: fnd_log.level_statement,
417: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
418: 'Inventory Item Id : '||x_task_req_matrl_tbl(i).inventory_item_id
419: );
420: fnd_log.string
416: fnd_log.level_statement,
417: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
418: 'Inventory Item Id : '||x_task_req_matrl_tbl(i).inventory_item_id
419: );
420: fnd_log.string
421: (
422: fnd_log.level_statement,
423: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
424: 'Item Description : '||x_task_req_matrl_tbl(i).item
418: 'Inventory Item Id : '||x_task_req_matrl_tbl(i).inventory_item_id
419: );
420: fnd_log.string
421: (
422: fnd_log.level_statement,
423: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
424: 'Item Description : '||x_task_req_matrl_tbl(i).item
425: );
426: fnd_log.string
422: fnd_log.level_statement,
423: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
424: 'Item Description : '||x_task_req_matrl_tbl(i).item
425: );
426: fnd_log.string
427: (
428: fnd_log.level_statement,
429: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
430: 'Requested Date : '||x_task_req_matrl_tbl(i).req_arrival_date
424: 'Item Description : '||x_task_req_matrl_tbl(i).item
425: );
426: fnd_log.string
427: (
428: fnd_log.level_statement,
429: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
430: 'Requested Date : '||x_task_req_matrl_tbl(i).req_arrival_date
431: );
432: fnd_log.string
428: fnd_log.level_statement,
429: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
430: 'Requested Date : '||x_task_req_matrl_tbl(i).req_arrival_date
431: );
432: fnd_log.string
433: (
434: fnd_log.level_statement,
435: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
436: 'UOM : '||x_task_req_matrl_tbl(i).uom_code
430: 'Requested Date : '||x_task_req_matrl_tbl(i).req_arrival_date
431: );
432: fnd_log.string
433: (
434: fnd_log.level_statement,
435: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
436: 'UOM : '||x_task_req_matrl_tbl(i).uom_code
437: );
438: fnd_log.string
434: fnd_log.level_statement,
435: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
436: 'UOM : '||x_task_req_matrl_tbl(i).uom_code
437: );
438: fnd_log.string
439: (
440: fnd_log.level_statement,
441: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
442: 'Requested Quantity : '||x_task_req_matrl_tbl(i).quantity
436: 'UOM : '||x_task_req_matrl_tbl(i).uom_code
437: );
438: fnd_log.string
439: (
440: fnd_log.level_statement,
441: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
442: 'Requested Quantity : '||x_task_req_matrl_tbl(i).quantity
443: );
444: fnd_log.string
440: fnd_log.level_statement,
441: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
442: 'Requested Quantity : '||x_task_req_matrl_tbl(i).quantity
443: );
444: fnd_log.string
445: (
446: fnd_log.level_statement,
447: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
448: 'Planned Order Id : '||x_task_req_matrl_tbl(i).planned_order
442: 'Requested Quantity : '||x_task_req_matrl_tbl(i).quantity
443: );
444: fnd_log.string
445: (
446: fnd_log.level_statement,
447: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
448: 'Planned Order Id : '||x_task_req_matrl_tbl(i).planned_order
449: );
450:
466: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
467: COMMIT;
468: END IF;
469:
470: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
471: fnd_log.string
472: (
473: fnd_log.level_procedure,
474: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Get_Visit_Task_Materials.end',
467: COMMIT;
468: END IF;
469:
470: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
471: fnd_log.string
472: (
473: fnd_log.level_procedure,
474: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Get_Visit_Task_Materials.end',
475: 'At the end of PLSQL procedure'
469:
470: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
471: fnd_log.string
472: (
473: fnd_log.level_procedure,
474: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Get_Visit_Task_Materials.end',
475: 'At the end of PLSQL procedure'
476: );
477: END IF;
565: --
566: J NUMBER;
567: BEGIN
568:
569: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
570: fnd_log.string
571: (
572: fnd_log.level_procedure,
573: 'ahl.plsql.AHL_LTP_REQST_MATRL_PUB.Check_Materials_For_All',
566: J NUMBER;
567: BEGIN
568:
569: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
570: fnd_log.string
571: (
572: fnd_log.level_procedure,
573: 'ahl.plsql.AHL_LTP_REQST_MATRL_PUB.Check_Materials_For_All',
574: 'At the start of PLSQL procedure'
568:
569: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
570: fnd_log.string
571: (
572: fnd_log.level_procedure,
573: 'ahl.plsql.AHL_LTP_REQST_MATRL_PUB.Check_Materials_For_All',
574: 'At the start of PLSQL procedure'
575: );
576: END IF;
592: THEN
593: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
594: END IF;
595: --------------------Start of API Body-----------------------------------
596: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
597: fnd_log.string
598: (
599: fnd_log.level_statement,
600: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
593: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
594: END IF;
595: --------------------Start of API Body-----------------------------------
596: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
597: fnd_log.string
598: (
599: fnd_log.level_statement,
600: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
601: 'Request for Check Material For Visit Id : ' || p_visit_id
595: --------------------Start of API Body-----------------------------------
596: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
597: fnd_log.string
598: (
599: fnd_log.level_statement,
600: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
601: 'Request for Check Material For Visit Id : ' || p_visit_id
602: );
603:
605:
606: IF p_visit_id IS NOT NULL AND p_visit_id <> FND_API.G_MISS_NUM
607: THEN
608:
609: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
610: fnd_log.string
611: (
612: fnd_log.level_procedure,
613: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
606: IF p_visit_id IS NOT NULL AND p_visit_id <> FND_API.G_MISS_NUM
607: THEN
608:
609: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
610: fnd_log.string
611: (
612: fnd_log.level_procedure,
613: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
614: 'Before calling ahl ltp matrl aval pvt.Get Visit Task Materials'
608:
609: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
610: fnd_log.string
611: (
612: fnd_log.level_procedure,
613: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
614: 'Before calling ahl ltp matrl aval pvt.Get Visit Task Materials'
615: );
616:
637: x_return_status => l_return_status,
638: x_msg_count => l_msg_count,
639: x_msg_data => l_msg_data);
640: --
641: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
642: fnd_log.string
643: (
644: fnd_log.level_procedure,
645: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
638: x_msg_count => l_msg_count,
639: x_msg_data => l_msg_data);
640: --
641: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
642: fnd_log.string
643: (
644: fnd_log.level_procedure,
645: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
646: 'After calling ahl ltp Matrl Aval pvt.Get Visit Task Materials, Return Status : '|| l_return_status
640: --
641: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
642: fnd_log.string
643: (
644: fnd_log.level_procedure,
645: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
646: 'After calling ahl ltp Matrl Aval pvt.Get Visit Task Materials, Return Status : '|| l_return_status
647: );
648: END IF;
654: RAISE FND_API.G_EXC_ERROR;
655: END IF;
656: END IF;
657:
658: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
659: fnd_log.string
660: (
661: fnd_log.level_statement,
662: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
655: END IF;
656: END IF;
657:
658: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
659: fnd_log.string
660: (
661: fnd_log.level_statement,
662: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
663: ' After Calling Get Visit Task Materials, Number of Records: ' || l_task_req_matrl_tbl.COUNT
657:
658: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
659: fnd_log.string
660: (
661: fnd_log.level_statement,
662: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
663: ' After Calling Get Visit Task Materials, Number of Records: ' || l_task_req_matrl_tbl.COUNT
664: );
665: END IF;
684: l_material_avl_tbl(j).schedule_material_id := l_task_req_matrl_tbl(i).schedule_material_id;
685: j := j + 1;
686: --
687: END LOOP;
688: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
689: fnd_log.string
690: (
691: fnd_log.level_statement,
692: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
685: j := j + 1;
686: --
687: END LOOP;
688: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
689: fnd_log.string
690: (
691: fnd_log.level_statement,
692: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
693: ' Before Calling Ahl ltp Matrl aval pvt Check Material Aval, Number of Records: ' || l_material_avl_tbl.COUNT
687: END LOOP;
688: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
689: fnd_log.string
690: (
691: fnd_log.level_statement,
692: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
693: ' Before Calling Ahl ltp Matrl aval pvt Check Material Aval, Number of Records: ' || l_material_avl_tbl.COUNT
694: );
695: END IF;
706: x_msg_count => l_msg_count,
707: x_msg_data => l_msg_data );
708: END IF;
709: --
710: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
711: fnd_log.string
712: (
713: fnd_log.level_procedure,
714: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
707: x_msg_data => l_msg_data );
708: END IF;
709: --
710: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
711: fnd_log.string
712: (
713: fnd_log.level_procedure,
714: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
715: 'After calling ahl ltp Matrl Aval pvt.Check Material Aval, Return Status : '|| l_return_status
709: --
710: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
711: fnd_log.string
712: (
713: fnd_log.level_procedure,
714: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
715: 'After calling ahl ltp Matrl Aval pvt.Check Material Aval, Return Status : '|| l_return_status
716: );
717: END IF;
723: RAISE FND_API.G_EXC_ERROR;
724: END IF;
725: END IF;
726:
727: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
728: fnd_log.string
729: (
730: fnd_log.level_statement,
731: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
724: END IF;
725: END IF;
726:
727: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
728: fnd_log.string
729: (
730: fnd_log.level_statement,
731: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
732: ' Before Assigning , Number of Records: ' || l_material_avl_tbl.COUNT
726:
727: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
728: fnd_log.string
729: (
730: fnd_log.level_statement,
731: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
732: ' Before Assigning , Number of Records: ' || l_material_avl_tbl.COUNT
733: );
734: END IF;
751: x_task_matrl_aval_tbl(i).schedule_material_id:= l_material_avl_tbl(i).schedule_material_id;
752: x_task_matrl_aval_tbl(i).error_code := l_material_avl_tbl(i).error_code;
753: x_task_matrl_aval_tbl(i).error_message := l_material_avl_tbl(i).item||' '||l_material_avl_tbl(i).error_message;
754:
755: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
756: fnd_log.string
757: (
758: fnd_log.level_statement,
759: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
752: x_task_matrl_aval_tbl(i).error_code := l_material_avl_tbl(i).error_code;
753: x_task_matrl_aval_tbl(i).error_message := l_material_avl_tbl(i).item||' '||l_material_avl_tbl(i).error_message;
754:
755: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
756: fnd_log.string
757: (
758: fnd_log.level_statement,
759: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
760: ' Derieved Value, Visit Task Id: ' || x_task_matrl_aval_tbl(i).visit_task_id
754:
755: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
756: fnd_log.string
757: (
758: fnd_log.level_statement,
759: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
760: ' Derieved Value, Visit Task Id: ' || x_task_matrl_aval_tbl(i).visit_task_id
761: );
762: fnd_log.string
758: fnd_log.level_statement,
759: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
760: ' Derieved Value, Visit Task Id: ' || x_task_matrl_aval_tbl(i).visit_task_id
761: );
762: fnd_log.string
763: (
764: fnd_log.level_statement,
765: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
766: ' Derieved Value, Inventory Item Id: ' || x_task_matrl_aval_tbl(i).inventory_item_id
760: ' Derieved Value, Visit Task Id: ' || x_task_matrl_aval_tbl(i).visit_task_id
761: );
762: fnd_log.string
763: (
764: fnd_log.level_statement,
765: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
766: ' Derieved Value, Inventory Item Id: ' || x_task_matrl_aval_tbl(i).inventory_item_id
767: );
768: fnd_log.string
764: fnd_log.level_statement,
765: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
766: ' Derieved Value, Inventory Item Id: ' || x_task_matrl_aval_tbl(i).inventory_item_id
767: );
768: fnd_log.string
769: (
770: fnd_log.level_statement,
771: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
772: ' Derieved Value, Quantity: ' || x_task_matrl_aval_tbl(i).quantity
766: ' Derieved Value, Inventory Item Id: ' || x_task_matrl_aval_tbl(i).inventory_item_id
767: );
768: fnd_log.string
769: (
770: fnd_log.level_statement,
771: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
772: ' Derieved Value, Quantity: ' || x_task_matrl_aval_tbl(i).quantity
773: );
774: fnd_log.string
770: fnd_log.level_statement,
771: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
772: ' Derieved Value, Quantity: ' || x_task_matrl_aval_tbl(i).quantity
773: );
774: fnd_log.string
775: (
776: fnd_log.level_statement,
777: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
778: ' Derieved Value, Quantity Available: ' || x_task_matrl_aval_tbl(i).quantity_available
772: ' Derieved Value, Quantity: ' || x_task_matrl_aval_tbl(i).quantity
773: );
774: fnd_log.string
775: (
776: fnd_log.level_statement,
777: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
778: ' Derieved Value, Quantity Available: ' || x_task_matrl_aval_tbl(i).quantity_available
779: );
780:
796: --Standard check for commit
797: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
798: COMMIT;
799: END IF;
800: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
801: fnd_log.string
802: (
803: fnd_log.level_procedure,
804: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check Materials For All.end',
797: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
798: COMMIT;
799: END IF;
800: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
801: fnd_log.string
802: (
803: fnd_log.level_procedure,
804: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check Materials For All.end',
805: 'At the end of PLSQL procedure'
799: END IF;
800: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
801: fnd_log.string
802: (
803: fnd_log.level_procedure,
804: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check Materials For All.end',
805: 'At the end of PLSQL procedure'
806: );
807: END IF;
885: l_planned_matrl_tbl Planned_Matrl_Tbl := p_x_planned_matrl_tbl;
886:
887: BEGIN
888:
889: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
890: fnd_log.string
891: (
892: fnd_log.level_procedure,
893: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule_Planned_Matrls.begin',
886:
887: BEGIN
888:
889: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
890: fnd_log.string
891: (
892: fnd_log.level_procedure,
893: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule_Planned_Matrls.begin',
894: 'At the start of PLSQL procedure'
888:
889: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
890: fnd_log.string
891: (
892: fnd_log.level_procedure,
893: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule_Planned_Matrls.begin',
894: 'At the start of PLSQL procedure'
895: );
896: END IF;
911: THEN
912: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
913: END IF;
914:
915: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
916: fnd_log.string
917: (
918: fnd_log.level_statement,
919: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
912: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
913: END IF;
914:
915: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
916: fnd_log.string
917: (
918: fnd_log.level_statement,
919: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
920: 'Request for Schedule Planned Materials for Number of Records : ' || P_x_Planned_Matrl_Tbl.COUNT
914:
915: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
916: fnd_log.string
917: (
918: fnd_log.level_statement,
919: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
920: 'Request for Schedule Planned Materials for Number of Records : ' || P_x_Planned_Matrl_Tbl.COUNT
921: );
922:
921: );
922:
923: END IF;
924:
925: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
926: fnd_log.string
927: (
928: fnd_log.level_procedure,
929: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
922:
923: END IF;
924:
925: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
926: fnd_log.string
927: (
928: fnd_log.level_procedure,
929: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
930: 'Before calling ahl ltp matrl aval pvt.Schedule Planned Matrls'
924:
925: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
926: fnd_log.string
927: (
928: fnd_log.level_procedure,
929: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
930: 'Before calling ahl ltp matrl aval pvt.Schedule Planned Matrls'
931: );
932:
942: x_return_status => l_return_status,
943: x_msg_count => l_msg_count,
944: x_msg_data => l_msg_data);
945:
946: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
947: fnd_log.string
948: (
949: fnd_log.level_procedure,
950: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
943: x_msg_count => l_msg_count,
944: x_msg_data => l_msg_data);
945:
946: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
947: fnd_log.string
948: (
949: fnd_log.level_procedure,
950: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
951: 'After calling ahl ltp matrl aval pvt.Schedule Planned Matrls, Return Status : '|| l_return_status
945:
946: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
947: fnd_log.string
948: (
949: fnd_log.level_procedure,
950: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
951: 'After calling ahl ltp matrl aval pvt.Schedule Planned Matrls, Return Status : '|| l_return_status
952: );
953: END IF;
977: p_x_planned_matrl_tbl(i).primary_uom := l_planned_matrl_tbl(i).primary_uom;
978: p_x_planned_matrl_tbl(i).error_code := l_planned_matrl_tbl(i).error_code;
979: p_x_planned_matrl_tbl(i).error_message := l_planned_matrl_tbl(i).error_message;
980:
981: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
982: fnd_log.string
983: (
984: fnd_log.level_statement,
985: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule Planned Matrls',
978: p_x_planned_matrl_tbl(i).error_code := l_planned_matrl_tbl(i).error_code;
979: p_x_planned_matrl_tbl(i).error_message := l_planned_matrl_tbl(i).error_message;
980:
981: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
982: fnd_log.string
983: (
984: fnd_log.level_statement,
985: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule Planned Matrls',
986: ' Derieved Value, Schedule Material Id: ' || p_x_planned_matrl_tbl(i).schedule_material_id
980:
981: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
982: fnd_log.string
983: (
984: fnd_log.level_statement,
985: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule Planned Matrls',
986: ' Derieved Value, Schedule Material Id: ' || p_x_planned_matrl_tbl(i).schedule_material_id
987: );
988: fnd_log.string
984: fnd_log.level_statement,
985: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule Planned Matrls',
986: ' Derieved Value, Schedule Material Id: ' || p_x_planned_matrl_tbl(i).schedule_material_id
987: );
988: fnd_log.string
989: (
990: fnd_log.level_statement,
991: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule Planned Matrls',
992: ' Derieved Value, Available Quantity: ' || p_x_planned_matrl_tbl(i).quantity_available
986: ' Derieved Value, Schedule Material Id: ' || p_x_planned_matrl_tbl(i).schedule_material_id
987: );
988: fnd_log.string
989: (
990: fnd_log.level_statement,
991: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule Planned Matrls',
992: ' Derieved Value, Available Quantity: ' || p_x_planned_matrl_tbl(i).quantity_available
993: );
994:
1000: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
1001: COMMIT;
1002: END IF;
1003:
1004: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1005: fnd_log.string
1006: (
1007: fnd_log.level_procedure,
1008: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule_Planned_Matrls.end',
1001: COMMIT;
1002: END IF;
1003:
1004: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1005: fnd_log.string
1006: (
1007: fnd_log.level_procedure,
1008: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule_Planned_Matrls.end',
1009: 'At the end of PLSQL procedure'
1003:
1004: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1005: fnd_log.string
1006: (
1007: fnd_log.level_procedure,
1008: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule_Planned_Matrls.end',
1009: 'At the end of PLSQL procedure'
1010: );
1011: END IF;
1098: l_planned_matrl_tbl Planned_Matrl_Tbl;
1099:
1100: BEGIN
1101:
1102: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1103: fnd_log.string
1104: (
1105: fnd_log.level_procedure,
1106: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule_All_Materials.begin',
1099:
1100: BEGIN
1101:
1102: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1103: fnd_log.string
1104: (
1105: fnd_log.level_procedure,
1106: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule_All_Materials.begin',
1107: 'At the start of PLSQL procedure'
1101:
1102: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1103: fnd_log.string
1104: (
1105: fnd_log.level_procedure,
1106: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule_All_Materials.begin',
1107: 'At the start of PLSQL procedure'
1108: );
1109: END IF;
1124: THEN
1125: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1126: END IF;
1127:
1128: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1129: fnd_log.string
1130: (
1131: fnd_log.level_statement,
1132: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1125: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1126: END IF;
1127:
1128: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1129: fnd_log.string
1130: (
1131: fnd_log.level_statement,
1132: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1133: 'Request for Schedule All Materials for Visit Id : ' || P_visit_id
1127:
1128: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1129: fnd_log.string
1130: (
1131: fnd_log.level_statement,
1132: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1133: 'Request for Schedule All Materials for Visit Id : ' || P_visit_id
1134: );
1135:
1134: );
1135:
1136: END IF;
1137:
1138: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
1139: fnd_log.string
1140: (
1141: fnd_log.level_procedure,
1142: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1135:
1136: END IF;
1137:
1138: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
1139: fnd_log.string
1140: (
1141: fnd_log.level_procedure,
1142: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1143: 'Before calling ahl ltp matrl aval pvt.Schedule All Materials'
1137:
1138: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
1139: fnd_log.string
1140: (
1141: fnd_log.level_procedure,
1142: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1143: 'Before calling ahl ltp matrl aval pvt.Schedule All Materials'
1144: );
1145:
1169: x_return_status => l_return_status,
1170: x_msg_count => l_msg_count,
1171: x_msg_data => l_msg_data);
1172:
1173: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
1174: fnd_log.string
1175: (
1176: fnd_log.level_procedure,
1177: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
1170: x_msg_count => l_msg_count,
1171: x_msg_data => l_msg_data);
1172:
1173: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
1174: fnd_log.string
1175: (
1176: fnd_log.level_procedure,
1177: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
1178: 'After calling ahl ltp matrl aval pvt.Schedule All Materials, Return Status : '|| l_return_status
1172:
1173: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
1174: fnd_log.string
1175: (
1176: fnd_log.level_procedure,
1177: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
1178: 'After calling ahl ltp matrl aval pvt.Schedule All Materials, Return Status : '|| l_return_status
1179: );
1180: END IF;
1209: X_Planned_Matrl_Tbl(i).primary_uom := l_Planned_Matrl_Tbl(i).primary_uom;
1210: X_Planned_Matrl_Tbl(i).error_code := l_Planned_Matrl_Tbl(i).error_code;
1211: X_Planned_Matrl_Tbl(i).error_message := l_Planned_Matrl_Tbl(i).error_message;
1212:
1213: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1214: fnd_log.string
1215: (
1216: fnd_log.level_statement,
1217: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule Planned Matrls',
1210: X_Planned_Matrl_Tbl(i).error_code := l_Planned_Matrl_Tbl(i).error_code;
1211: X_Planned_Matrl_Tbl(i).error_message := l_Planned_Matrl_Tbl(i).error_message;
1212:
1213: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1214: fnd_log.string
1215: (
1216: fnd_log.level_statement,
1217: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule Planned Matrls',
1218: ' Derieved Value, Schedule Material Id: ' || X_Planned_Matrl_Tbl(i).schedule_material_id
1212:
1213: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1214: fnd_log.string
1215: (
1216: fnd_log.level_statement,
1217: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule Planned Matrls',
1218: ' Derieved Value, Schedule Material Id: ' || X_Planned_Matrl_Tbl(i).schedule_material_id
1219: );
1220: fnd_log.string
1216: fnd_log.level_statement,
1217: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule Planned Matrls',
1218: ' Derieved Value, Schedule Material Id: ' || X_Planned_Matrl_Tbl(i).schedule_material_id
1219: );
1220: fnd_log.string
1221: (
1222: fnd_log.level_statement,
1223: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule Planned Matrls',
1224: ' Derieved Value, Available Quantity: ' || X_Planned_Matrl_Tbl(i).quantity_available
1218: ' Derieved Value, Schedule Material Id: ' || X_Planned_Matrl_Tbl(i).schedule_material_id
1219: );
1220: fnd_log.string
1221: (
1222: fnd_log.level_statement,
1223: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule Planned Matrls',
1224: ' Derieved Value, Available Quantity: ' || X_Planned_Matrl_Tbl(i).quantity_available
1225: );
1226:
1233: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
1234: COMMIT;
1235: END IF;
1236:
1237: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1238: fnd_log.string
1239: (
1240: fnd_log.level_procedure,
1241: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule_All_Materials.end',
1234: COMMIT;
1235: END IF;
1236:
1237: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1238: fnd_log.string
1239: (
1240: fnd_log.level_procedure,
1241: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule_All_Materials.end',
1242: 'At the end of PLSQL procedure'
1236:
1237: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1238: fnd_log.string
1239: (
1240: fnd_log.level_procedure,
1241: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule_All_Materials.end',
1242: 'At the end of PLSQL procedure'
1243: );
1244: END IF;