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;
160: --Make the schedule date returned by the private API, available to the out param of the public API
161: p_x_material_avl_tbl(i).scheduled_date := l_material_avl_tbl(i).scheduled_date;
162:
163:
164: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
165: fnd_log.string
166: (
167: fnd_log.level_statement,
168: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Material_Aval',
161: p_x_material_avl_tbl(i).scheduled_date := l_material_avl_tbl(i).scheduled_date;
162:
163:
164: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
165: fnd_log.string
166: (
167: fnd_log.level_statement,
168: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Material_Aval',
169: ' Derieved Value, Visit Task Id: ' || p_x_material_avl_tbl(i).visit_task_id
163:
164: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
165: fnd_log.string
166: (
167: fnd_log.level_statement,
168: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Material_Aval',
169: ' Derieved Value, Visit Task Id: ' || p_x_material_avl_tbl(i).visit_task_id
170: );
171: fnd_log.string
167: fnd_log.level_statement,
168: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Material_Aval',
169: ' Derieved Value, Visit Task Id: ' || p_x_material_avl_tbl(i).visit_task_id
170: );
171: fnd_log.string
172: (
173: fnd_log.level_statement,
174: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Material_Aval',
175: ' Derieved Value, Inventory Item Id: ' || p_x_material_avl_tbl(i).inventory_item_id
169: ' Derieved Value, Visit Task Id: ' || p_x_material_avl_tbl(i).visit_task_id
170: );
171: fnd_log.string
172: (
173: fnd_log.level_statement,
174: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Material_Aval',
175: ' Derieved Value, Inventory Item Id: ' || p_x_material_avl_tbl(i).inventory_item_id
176: );
177: fnd_log.string
173: fnd_log.level_statement,
174: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Material_Aval',
175: ' Derieved Value, Inventory Item Id: ' || p_x_material_avl_tbl(i).inventory_item_id
176: );
177: fnd_log.string
178: (
179: fnd_log.level_statement,
180: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Material_Aval',
181: ' Derieved Value, Quantity: ' || p_x_material_avl_tbl(i).quantity
175: ' Derieved Value, Inventory Item Id: ' || p_x_material_avl_tbl(i).inventory_item_id
176: );
177: fnd_log.string
178: (
179: fnd_log.level_statement,
180: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Material_Aval',
181: ' Derieved Value, Quantity: ' || p_x_material_avl_tbl(i).quantity
182: );
183: fnd_log.string
179: fnd_log.level_statement,
180: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Material_Aval',
181: ' Derieved Value, Quantity: ' || p_x_material_avl_tbl(i).quantity
182: );
183: fnd_log.string
184: (
185: fnd_log.level_statement,
186: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Material_Aval',
187: ' Derieved Value, Quantity Available: ' || p_x_material_avl_tbl(i).quantity_available
181: ' Derieved Value, Quantity: ' || p_x_material_avl_tbl(i).quantity
182: );
183: fnd_log.string
184: (
185: fnd_log.level_statement,
186: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Material_Aval',
187: ' Derieved Value, Quantity Available: ' || p_x_material_avl_tbl(i).quantity_available
188: );
189: fnd_log.string
185: fnd_log.level_statement,
186: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Material_Aval',
187: ' Derieved Value, Quantity Available: ' || p_x_material_avl_tbl(i).quantity_available
188: );
189: fnd_log.string
190: (
191: fnd_log.level_statement,
192: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Material_Aval',
193: ' Derieved Value, Error Message: ' || p_x_material_avl_tbl(i).error_message
187: ' Derieved Value, Quantity Available: ' || p_x_material_avl_tbl(i).quantity_available
188: );
189: fnd_log.string
190: (
191: fnd_log.level_statement,
192: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Material_Aval',
193: ' Derieved Value, Error Message: ' || p_x_material_avl_tbl(i).error_message
194: );
195:
209: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
210: COMMIT;
211: END IF;
212:
213: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
214: fnd_log.string
215: (
216: fnd_log.level_procedure,
217: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check Material Aval.end',
210: COMMIT;
211: END IF;
212:
213: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
214: fnd_log.string
215: (
216: fnd_log.level_procedure,
217: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check Material Aval.end',
218: 'At the end of PLSQL procedure'
212:
213: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
214: fnd_log.string
215: (
216: fnd_log.level_procedure,
217: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check Material Aval.end',
218: 'At the end of PLSQL procedure'
219: );
220: END IF;
295: l_task_req_matrl_tbl Task_Req_Matrl_Tbl;
296: --
297: BEGIN
298:
299: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
300: fnd_log.string
301: (
302: fnd_log.level_procedure,
303: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Get_Visit_Task_Materials.begin',
296: --
297: BEGIN
298:
299: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
300: fnd_log.string
301: (
302: fnd_log.level_procedure,
303: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Get_Visit_Task_Materials.begin',
304: 'At the start of PLSQL procedure'
298:
299: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
300: fnd_log.string
301: (
302: fnd_log.level_procedure,
303: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Get_Visit_Task_Materials.begin',
304: 'At the start of PLSQL procedure'
305: );
306: END IF;
320: THEN
321: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
322: END IF;
323:
324: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
325: fnd_log.string
326: (
327: fnd_log.level_statement,
328: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
321: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
322: END IF;
323:
324: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
325: fnd_log.string
326: (
327: fnd_log.level_statement,
328: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
329: 'Request for Visit Task Materials for Visit Id : ' || p_visit_id
323:
324: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
325: fnd_log.string
326: (
327: fnd_log.level_statement,
328: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
329: 'Request for Visit Task Materials for Visit Id : ' || p_visit_id
330: );
331:
330: );
331:
332: END IF;
333:
334: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
335: fnd_log.string
336: (
337: fnd_log.level_procedure,
338: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
331:
332: END IF;
333:
334: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
335: fnd_log.string
336: (
337: fnd_log.level_procedure,
338: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
339: 'Before calling ahl ltp matrl aval pvt.Get Visit Task Materials'
333:
334: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
335: fnd_log.string
336: (
337: fnd_log.level_procedure,
338: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
339: 'Before calling ahl ltp matrl aval pvt.Get Visit Task Materials'
340: );
341:
353: x_return_status => l_return_status,
354: x_msg_count => l_msg_count,
355: x_msg_data => l_msg_data);
356:
357: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
358: fnd_log.string
359: (
360: fnd_log.level_procedure,
361: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
354: x_msg_count => l_msg_count,
355: x_msg_data => l_msg_data);
356:
357: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
358: fnd_log.string
359: (
360: fnd_log.level_procedure,
361: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
362: 'After calling ahl ltp matrl aval pvt.Get Visit Task Materials, Return Status : '|| l_return_status
356:
357: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
358: fnd_log.string
359: (
360: fnd_log.level_procedure,
361: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
362: 'After calling ahl ltp matrl aval pvt.Get Visit Task Materials, Return Status : '|| l_return_status
363: );
364: END IF;
388: x_task_req_matrl_tbl(i).quantity := l_task_req_matrl_tbl(i).quantity;
389: x_task_req_matrl_tbl(i).scheduled_date := l_task_req_matrl_tbl(i).scheduled_date;
390: x_task_req_matrl_tbl(i).planned_order := l_task_req_matrl_tbl(i).planned_order;
391: --
392: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
393: fnd_log.string
394: (
395: fnd_log.level_statement,
396: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
389: x_task_req_matrl_tbl(i).scheduled_date := l_task_req_matrl_tbl(i).scheduled_date;
390: x_task_req_matrl_tbl(i).planned_order := l_task_req_matrl_tbl(i).planned_order;
391: --
392: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
393: fnd_log.string
394: (
395: fnd_log.level_statement,
396: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
397: 'Schedule Material Id : '||x_task_req_matrl_tbl(i).schedule_material_id
391: --
392: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
393: fnd_log.string
394: (
395: fnd_log.level_statement,
396: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
397: 'Schedule Material Id : '||x_task_req_matrl_tbl(i).schedule_material_id
398: );
399: fnd_log.string
395: fnd_log.level_statement,
396: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
397: 'Schedule Material Id : '||x_task_req_matrl_tbl(i).schedule_material_id
398: );
399: fnd_log.string
400: (
401: fnd_log.level_statement,
402: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
403: 'Object Version Number : '||x_task_req_matrl_tbl(i).object_version_number
397: 'Schedule Material Id : '||x_task_req_matrl_tbl(i).schedule_material_id
398: );
399: fnd_log.string
400: (
401: fnd_log.level_statement,
402: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
403: 'Object Version Number : '||x_task_req_matrl_tbl(i).object_version_number
404: );
405: fnd_log.string
401: fnd_log.level_statement,
402: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
403: 'Object Version Number : '||x_task_req_matrl_tbl(i).object_version_number
404: );
405: fnd_log.string
406: (
407: fnd_log.level_statement,
408: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
409: 'Visit Task Id : '||x_task_req_matrl_tbl(i).visit_task_id
403: 'Object Version Number : '||x_task_req_matrl_tbl(i).object_version_number
404: );
405: fnd_log.string
406: (
407: fnd_log.level_statement,
408: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
409: 'Visit Task Id : '||x_task_req_matrl_tbl(i).visit_task_id
410: );
411: fnd_log.string
407: fnd_log.level_statement,
408: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
409: 'Visit Task Id : '||x_task_req_matrl_tbl(i).visit_task_id
410: );
411: fnd_log.string
412: (
413: fnd_log.level_statement,
414: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
415: 'Visit Task Name : '||x_task_req_matrl_tbl(i).task_name
409: 'Visit Task Id : '||x_task_req_matrl_tbl(i).visit_task_id
410: );
411: fnd_log.string
412: (
413: fnd_log.level_statement,
414: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
415: 'Visit Task Name : '||x_task_req_matrl_tbl(i).task_name
416: );
417: fnd_log.string
413: fnd_log.level_statement,
414: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
415: 'Visit Task Name : '||x_task_req_matrl_tbl(i).task_name
416: );
417: fnd_log.string
418: (
419: fnd_log.level_statement,
420: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
421: 'Inventory Item Id : '||x_task_req_matrl_tbl(i).inventory_item_id
415: 'Visit Task Name : '||x_task_req_matrl_tbl(i).task_name
416: );
417: fnd_log.string
418: (
419: fnd_log.level_statement,
420: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
421: 'Inventory Item Id : '||x_task_req_matrl_tbl(i).inventory_item_id
422: );
423: fnd_log.string
419: fnd_log.level_statement,
420: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
421: 'Inventory Item Id : '||x_task_req_matrl_tbl(i).inventory_item_id
422: );
423: fnd_log.string
424: (
425: fnd_log.level_statement,
426: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
427: 'Item Description : '||x_task_req_matrl_tbl(i).item
421: 'Inventory Item Id : '||x_task_req_matrl_tbl(i).inventory_item_id
422: );
423: fnd_log.string
424: (
425: fnd_log.level_statement,
426: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
427: 'Item Description : '||x_task_req_matrl_tbl(i).item
428: );
429: fnd_log.string
425: fnd_log.level_statement,
426: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
427: 'Item Description : '||x_task_req_matrl_tbl(i).item
428: );
429: fnd_log.string
430: (
431: fnd_log.level_statement,
432: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
433: 'Requested Date : '||x_task_req_matrl_tbl(i).req_arrival_date
427: 'Item Description : '||x_task_req_matrl_tbl(i).item
428: );
429: fnd_log.string
430: (
431: fnd_log.level_statement,
432: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
433: 'Requested Date : '||x_task_req_matrl_tbl(i).req_arrival_date
434: );
435: fnd_log.string
431: fnd_log.level_statement,
432: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
433: 'Requested Date : '||x_task_req_matrl_tbl(i).req_arrival_date
434: );
435: fnd_log.string
436: (
437: fnd_log.level_statement,
438: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
439: 'UOM : '||x_task_req_matrl_tbl(i).uom_code
433: 'Requested Date : '||x_task_req_matrl_tbl(i).req_arrival_date
434: );
435: fnd_log.string
436: (
437: fnd_log.level_statement,
438: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
439: 'UOM : '||x_task_req_matrl_tbl(i).uom_code
440: );
441: fnd_log.string
437: fnd_log.level_statement,
438: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
439: 'UOM : '||x_task_req_matrl_tbl(i).uom_code
440: );
441: fnd_log.string
442: (
443: fnd_log.level_statement,
444: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
445: 'Requested Quantity : '||x_task_req_matrl_tbl(i).quantity
439: 'UOM : '||x_task_req_matrl_tbl(i).uom_code
440: );
441: fnd_log.string
442: (
443: fnd_log.level_statement,
444: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
445: 'Requested Quantity : '||x_task_req_matrl_tbl(i).quantity
446: );
447: fnd_log.string
443: fnd_log.level_statement,
444: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
445: 'Requested Quantity : '||x_task_req_matrl_tbl(i).quantity
446: );
447: fnd_log.string
448: (
449: fnd_log.level_statement,
450: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
451: 'Planned Order Id : '||x_task_req_matrl_tbl(i).planned_order
445: 'Requested Quantity : '||x_task_req_matrl_tbl(i).quantity
446: );
447: fnd_log.string
448: (
449: fnd_log.level_statement,
450: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
451: 'Planned Order Id : '||x_task_req_matrl_tbl(i).planned_order
452: );
453:
469: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
470: COMMIT;
471: END IF;
472:
473: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
474: fnd_log.string
475: (
476: fnd_log.level_procedure,
477: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Get_Visit_Task_Materials.end',
470: COMMIT;
471: END IF;
472:
473: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
474: fnd_log.string
475: (
476: fnd_log.level_procedure,
477: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Get_Visit_Task_Materials.end',
478: 'At the end of PLSQL procedure'
472:
473: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
474: fnd_log.string
475: (
476: fnd_log.level_procedure,
477: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Get_Visit_Task_Materials.end',
478: 'At the end of PLSQL procedure'
479: );
480: END IF;
568: --
569: J NUMBER;
570: BEGIN
571:
572: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
573: fnd_log.string
574: (
575: fnd_log.level_procedure,
576: 'ahl.plsql.AHL_LTP_REQST_MATRL_PUB.Check_Materials_For_All',
569: J NUMBER;
570: BEGIN
571:
572: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
573: fnd_log.string
574: (
575: fnd_log.level_procedure,
576: 'ahl.plsql.AHL_LTP_REQST_MATRL_PUB.Check_Materials_For_All',
577: 'At the start of PLSQL procedure'
571:
572: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
573: fnd_log.string
574: (
575: fnd_log.level_procedure,
576: 'ahl.plsql.AHL_LTP_REQST_MATRL_PUB.Check_Materials_For_All',
577: 'At the start of PLSQL procedure'
578: );
579: END IF;
595: THEN
596: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
597: END IF;
598: --------------------Start of API Body-----------------------------------
599: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
600: fnd_log.string
601: (
602: fnd_log.level_statement,
603: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
596: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
597: END IF;
598: --------------------Start of API Body-----------------------------------
599: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
600: fnd_log.string
601: (
602: fnd_log.level_statement,
603: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
604: 'Request for Check Material For Visit Id : ' || p_visit_id
598: --------------------Start of API Body-----------------------------------
599: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
600: fnd_log.string
601: (
602: fnd_log.level_statement,
603: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
604: 'Request for Check Material For Visit Id : ' || p_visit_id
605: );
606:
608:
609: IF p_visit_id IS NOT NULL AND p_visit_id <> FND_API.G_MISS_NUM
610: THEN
611:
612: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
613: fnd_log.string
614: (
615: fnd_log.level_procedure,
616: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
609: IF p_visit_id IS NOT NULL AND p_visit_id <> FND_API.G_MISS_NUM
610: THEN
611:
612: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
613: fnd_log.string
614: (
615: fnd_log.level_procedure,
616: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
617: 'Before calling ahl ltp matrl aval pvt.Get Visit Task Materials'
611:
612: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
613: fnd_log.string
614: (
615: fnd_log.level_procedure,
616: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
617: 'Before calling ahl ltp matrl aval pvt.Get Visit Task Materials'
618: );
619:
640: x_return_status => l_return_status,
641: x_msg_count => l_msg_count,
642: x_msg_data => l_msg_data);
643: --
644: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
645: fnd_log.string
646: (
647: fnd_log.level_procedure,
648: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
641: x_msg_count => l_msg_count,
642: x_msg_data => l_msg_data);
643: --
644: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
645: fnd_log.string
646: (
647: fnd_log.level_procedure,
648: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
649: 'After calling ahl ltp Matrl Aval pvt.Get Visit Task Materials, Return Status : '|| l_return_status
643: --
644: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
645: fnd_log.string
646: (
647: fnd_log.level_procedure,
648: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
649: 'After calling ahl ltp Matrl Aval pvt.Get Visit Task Materials, Return Status : '|| l_return_status
650: );
651: END IF;
657: RAISE FND_API.G_EXC_ERROR;
658: END IF;
659: END IF;
660:
661: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
662: fnd_log.string
663: (
664: fnd_log.level_statement,
665: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
658: END IF;
659: END IF;
660:
661: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
662: fnd_log.string
663: (
664: fnd_log.level_statement,
665: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
666: ' After Calling Get Visit Task Materials, Number of Records: ' || l_task_req_matrl_tbl.COUNT
660:
661: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
662: fnd_log.string
663: (
664: fnd_log.level_statement,
665: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
666: ' After Calling Get Visit Task Materials, Number of Records: ' || l_task_req_matrl_tbl.COUNT
667: );
668: END IF;
687: l_material_avl_tbl(j).schedule_material_id := l_task_req_matrl_tbl(i).schedule_material_id;
688: j := j + 1;
689: --
690: END LOOP;
691: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
692: fnd_log.string
693: (
694: fnd_log.level_statement,
695: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
688: j := j + 1;
689: --
690: END LOOP;
691: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
692: fnd_log.string
693: (
694: fnd_log.level_statement,
695: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
696: ' Before Calling Ahl ltp Matrl aval pvt Check Material Aval, Number of Records: ' || l_material_avl_tbl.COUNT
690: END LOOP;
691: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
692: fnd_log.string
693: (
694: fnd_log.level_statement,
695: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
696: ' Before Calling Ahl ltp Matrl aval pvt Check Material Aval, Number of Records: ' || l_material_avl_tbl.COUNT
697: );
698: END IF;
709: x_msg_count => l_msg_count,
710: x_msg_data => l_msg_data );
711: END IF;
712: --
713: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
714: fnd_log.string
715: (
716: fnd_log.level_procedure,
717: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
710: x_msg_data => l_msg_data );
711: END IF;
712: --
713: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
714: fnd_log.string
715: (
716: fnd_log.level_procedure,
717: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
718: 'After calling ahl ltp Matrl Aval pvt.Check Material Aval, Return Status : '|| l_return_status
712: --
713: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
714: fnd_log.string
715: (
716: fnd_log.level_procedure,
717: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
718: 'After calling ahl ltp Matrl Aval pvt.Check Material Aval, Return Status : '|| l_return_status
719: );
720: END IF;
726: RAISE FND_API.G_EXC_ERROR;
727: END IF;
728: END IF;
729:
730: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
731: fnd_log.string
732: (
733: fnd_log.level_statement,
734: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
727: END IF;
728: END IF;
729:
730: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
731: fnd_log.string
732: (
733: fnd_log.level_statement,
734: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
735: ' Before Assigning , Number of Records: ' || l_material_avl_tbl.COUNT
729:
730: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
731: fnd_log.string
732: (
733: fnd_log.level_statement,
734: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
735: ' Before Assigning , Number of Records: ' || l_material_avl_tbl.COUNT
736: );
737: END IF;
757: --SKPATHAK :: Bug 8392521 :: 02-APR-2009
758: --Make the schedule date returned by the private API, available to the out param of the public API
759: x_task_matrl_aval_tbl(i).scheduled_date := l_material_avl_tbl(i).scheduled_date;
760:
761: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
762: fnd_log.string
763: (
764: fnd_log.level_statement,
765: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
758: --Make the schedule date returned by the private API, available to the out param of the public API
759: x_task_matrl_aval_tbl(i).scheduled_date := l_material_avl_tbl(i).scheduled_date;
760:
761: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
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, Visit Task Id: ' || x_task_matrl_aval_tbl(i).visit_task_id
760:
761: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
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, Visit Task Id: ' || x_task_matrl_aval_tbl(i).visit_task_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, Visit Task Id: ' || x_task_matrl_aval_tbl(i).visit_task_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, Inventory Item Id: ' || x_task_matrl_aval_tbl(i).inventory_item_id
766: ' Derieved Value, Visit Task Id: ' || x_task_matrl_aval_tbl(i).visit_task_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, Inventory Item Id: ' || x_task_matrl_aval_tbl(i).inventory_item_id
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, Inventory Item Id: ' || x_task_matrl_aval_tbl(i).inventory_item_id
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: ' || x_task_matrl_aval_tbl(i).quantity
772: ' Derieved Value, Inventory Item Id: ' || x_task_matrl_aval_tbl(i).inventory_item_id
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: ' || x_task_matrl_aval_tbl(i).quantity
779: );
780: fnd_log.string
776: fnd_log.level_statement,
777: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
778: ' Derieved Value, Quantity: ' || x_task_matrl_aval_tbl(i).quantity
779: );
780: fnd_log.string
781: (
782: fnd_log.level_statement,
783: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
784: ' Derieved Value, Quantity Available: ' || x_task_matrl_aval_tbl(i).quantity_available
778: ' Derieved Value, Quantity: ' || x_task_matrl_aval_tbl(i).quantity
779: );
780: fnd_log.string
781: (
782: fnd_log.level_statement,
783: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
784: ' Derieved Value, Quantity Available: ' || x_task_matrl_aval_tbl(i).quantity_available
785: );
786: fnd_log.string
782: fnd_log.level_statement,
783: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
784: ' Derieved Value, Quantity Available: ' || x_task_matrl_aval_tbl(i).quantity_available
785: );
786: fnd_log.string
787: (
788: fnd_log.level_statement,
789: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
790: 'at last x_task_matrl_aval_tbl(i).scheduled_date ' || x_task_matrl_aval_tbl(i).scheduled_date
784: ' Derieved Value, Quantity Available: ' || x_task_matrl_aval_tbl(i).quantity_available
785: );
786: fnd_log.string
787: (
788: fnd_log.level_statement,
789: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check_Materials_For_All',
790: 'at last x_task_matrl_aval_tbl(i).scheduled_date ' || x_task_matrl_aval_tbl(i).scheduled_date
791: );
792:
808: --Standard check for commit
809: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
810: COMMIT;
811: END IF;
812: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
813: fnd_log.string
814: (
815: fnd_log.level_procedure,
816: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check Materials For All.end',
809: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
810: COMMIT;
811: END IF;
812: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
813: fnd_log.string
814: (
815: fnd_log.level_procedure,
816: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check Materials For All.end',
817: 'At the end of PLSQL procedure'
811: END IF;
812: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
813: fnd_log.string
814: (
815: fnd_log.level_procedure,
816: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Check Materials For All.end',
817: 'At the end of PLSQL procedure'
818: );
819: END IF;
897: l_planned_matrl_tbl Planned_Matrl_Tbl := p_x_planned_matrl_tbl;
898:
899: BEGIN
900:
901: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
902: fnd_log.string
903: (
904: fnd_log.level_procedure,
905: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule_Planned_Matrls.begin',
898:
899: BEGIN
900:
901: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
902: fnd_log.string
903: (
904: fnd_log.level_procedure,
905: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule_Planned_Matrls.begin',
906: 'At the start of PLSQL procedure'
900:
901: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
902: fnd_log.string
903: (
904: fnd_log.level_procedure,
905: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule_Planned_Matrls.begin',
906: 'At the start of PLSQL procedure'
907: );
908: END IF;
923: THEN
924: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
925: END IF;
926:
927: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
928: fnd_log.string
929: (
930: fnd_log.level_statement,
931: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
924: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
925: END IF;
926:
927: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
928: fnd_log.string
929: (
930: fnd_log.level_statement,
931: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
932: 'Request for Schedule Planned Materials for Number of Records : ' || P_x_Planned_Matrl_Tbl.COUNT
926:
927: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
928: fnd_log.string
929: (
930: fnd_log.level_statement,
931: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
932: 'Request for Schedule Planned Materials for Number of Records : ' || P_x_Planned_Matrl_Tbl.COUNT
933: );
934:
933: );
934:
935: END IF;
936:
937: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
938: fnd_log.string
939: (
940: fnd_log.level_procedure,
941: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
934:
935: END IF;
936:
937: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
938: fnd_log.string
939: (
940: fnd_log.level_procedure,
941: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
942: 'Before calling ahl ltp matrl aval pvt.Schedule Planned Matrls'
936:
937: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
938: fnd_log.string
939: (
940: fnd_log.level_procedure,
941: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
942: 'Before calling ahl ltp matrl aval pvt.Schedule Planned Matrls'
943: );
944:
954: x_return_status => l_return_status,
955: x_msg_count => l_msg_count,
956: x_msg_data => l_msg_data);
957:
958: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
959: fnd_log.string
960: (
961: fnd_log.level_procedure,
962: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
955: x_msg_count => l_msg_count,
956: x_msg_data => l_msg_data);
957:
958: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
959: fnd_log.string
960: (
961: fnd_log.level_procedure,
962: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
963: 'After calling ahl ltp matrl aval pvt.Schedule Planned Matrls, Return Status : '|| l_return_status
957:
958: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
959: fnd_log.string
960: (
961: fnd_log.level_procedure,
962: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
963: 'After calling ahl ltp matrl aval pvt.Schedule Planned Matrls, Return Status : '|| l_return_status
964: );
965: END IF;
992: p_x_planned_matrl_tbl(i).primary_uom := l_planned_matrl_tbl(i).primary_uom;
993: p_x_planned_matrl_tbl(i).error_code := l_planned_matrl_tbl(i).error_code;
994: p_x_planned_matrl_tbl(i).error_message := l_planned_matrl_tbl(i).error_message;
995:
996: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
997: fnd_log.string
998: (
999: fnd_log.level_statement,
1000: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule Planned Matrls',
993: p_x_planned_matrl_tbl(i).error_code := l_planned_matrl_tbl(i).error_code;
994: p_x_planned_matrl_tbl(i).error_message := l_planned_matrl_tbl(i).error_message;
995:
996: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
997: fnd_log.string
998: (
999: fnd_log.level_statement,
1000: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule Planned Matrls',
1001: ' Derieved Value, Schedule Material Id: ' || p_x_planned_matrl_tbl(i).schedule_material_id
995:
996: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
997: fnd_log.string
998: (
999: fnd_log.level_statement,
1000: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule Planned Matrls',
1001: ' Derieved Value, Schedule Material Id: ' || p_x_planned_matrl_tbl(i).schedule_material_id
1002: );
1003: fnd_log.string
999: fnd_log.level_statement,
1000: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule Planned Matrls',
1001: ' Derieved Value, Schedule Material Id: ' || p_x_planned_matrl_tbl(i).schedule_material_id
1002: );
1003: fnd_log.string
1004: (
1005: fnd_log.level_statement,
1006: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule Planned Matrls',
1007: ' Derieved Value, Available Quantity: ' || p_x_planned_matrl_tbl(i).quantity_available
1001: ' Derieved Value, Schedule Material Id: ' || p_x_planned_matrl_tbl(i).schedule_material_id
1002: );
1003: fnd_log.string
1004: (
1005: fnd_log.level_statement,
1006: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule Planned Matrls',
1007: ' Derieved Value, Available Quantity: ' || p_x_planned_matrl_tbl(i).quantity_available
1008: );
1009: fnd_log.string
1005: fnd_log.level_statement,
1006: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule Planned Matrls',
1007: ' Derieved Value, Available Quantity: ' || p_x_planned_matrl_tbl(i).quantity_available
1008: );
1009: fnd_log.string
1010: (
1011: fnd_log.level_statement,
1012: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule Planned Matrls',
1013: 'p_x_planned_matrl_tbl(i).scheduled_date: ' || p_x_planned_matrl_tbl(i).scheduled_date
1007: ' Derieved Value, Available Quantity: ' || p_x_planned_matrl_tbl(i).quantity_available
1008: );
1009: fnd_log.string
1010: (
1011: fnd_log.level_statement,
1012: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule Planned Matrls',
1013: 'p_x_planned_matrl_tbl(i).scheduled_date: ' || p_x_planned_matrl_tbl(i).scheduled_date
1014: );
1015:
1021: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
1022: COMMIT;
1023: END IF;
1024:
1025: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1026: fnd_log.string
1027: (
1028: fnd_log.level_procedure,
1029: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule_Planned_Matrls.end',
1022: COMMIT;
1023: END IF;
1024:
1025: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1026: fnd_log.string
1027: (
1028: fnd_log.level_procedure,
1029: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule_Planned_Matrls.end',
1030: 'At the end of PLSQL procedure'
1024:
1025: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1026: fnd_log.string
1027: (
1028: fnd_log.level_procedure,
1029: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule_Planned_Matrls.end',
1030: 'At the end of PLSQL procedure'
1031: );
1032: END IF;
1119: l_planned_matrl_tbl Planned_Matrl_Tbl;
1120:
1121: BEGIN
1122:
1123: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1124: fnd_log.string
1125: (
1126: fnd_log.level_procedure,
1127: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule_All_Materials.begin',
1120:
1121: BEGIN
1122:
1123: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1124: fnd_log.string
1125: (
1126: fnd_log.level_procedure,
1127: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule_All_Materials.begin',
1128: 'At the start of PLSQL procedure'
1122:
1123: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1124: fnd_log.string
1125: (
1126: fnd_log.level_procedure,
1127: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule_All_Materials.begin',
1128: 'At the start of PLSQL procedure'
1129: );
1130: END IF;
1145: THEN
1146: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1147: END IF;
1148:
1149: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1150: fnd_log.string
1151: (
1152: fnd_log.level_statement,
1153: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1146: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1147: END IF;
1148:
1149: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1150: fnd_log.string
1151: (
1152: fnd_log.level_statement,
1153: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1154: 'Request for Schedule All Materials for Visit Id : ' || P_visit_id
1148:
1149: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1150: fnd_log.string
1151: (
1152: fnd_log.level_statement,
1153: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1154: 'Request for Schedule All Materials for Visit Id : ' || P_visit_id
1155: );
1156:
1155: );
1156:
1157: END IF;
1158:
1159: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
1160: fnd_log.string
1161: (
1162: fnd_log.level_procedure,
1163: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1156:
1157: END IF;
1158:
1159: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
1160: fnd_log.string
1161: (
1162: fnd_log.level_procedure,
1163: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1164: 'Before calling ahl ltp matrl aval pvt.Schedule All Materials'
1158:
1159: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
1160: fnd_log.string
1161: (
1162: fnd_log.level_procedure,
1163: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||':',
1164: 'Before calling ahl ltp matrl aval pvt.Schedule All Materials'
1165: );
1166:
1190: x_return_status => l_return_status,
1191: x_msg_count => l_msg_count,
1192: x_msg_data => l_msg_data);
1193:
1194: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
1195: fnd_log.string
1196: (
1197: fnd_log.level_procedure,
1198: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
1191: x_msg_count => l_msg_count,
1192: x_msg_data => l_msg_data);
1193:
1194: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
1195: fnd_log.string
1196: (
1197: fnd_log.level_procedure,
1198: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
1199: 'After calling ahl ltp matrl aval pvt.Schedule All Materials, Return Status : '|| l_return_status
1193:
1194: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
1195: fnd_log.string
1196: (
1197: fnd_log.level_procedure,
1198: 'ahl.plsql.'||g_pkg_name||'.'||l_api_name||': End API',
1199: 'After calling ahl ltp matrl aval pvt.Schedule All Materials, Return Status : '|| l_return_status
1200: );
1201: END IF;
1233: X_Planned_Matrl_Tbl(i).primary_uom := l_Planned_Matrl_Tbl(i).primary_uom;
1234: X_Planned_Matrl_Tbl(i).error_code := l_Planned_Matrl_Tbl(i).error_code;
1235: X_Planned_Matrl_Tbl(i).error_message := l_Planned_Matrl_Tbl(i).error_message;
1236:
1237: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1238: fnd_log.string
1239: (
1240: fnd_log.level_statement,
1241: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule Planned Matrls',
1234: X_Planned_Matrl_Tbl(i).error_code := l_Planned_Matrl_Tbl(i).error_code;
1235: X_Planned_Matrl_Tbl(i).error_message := l_Planned_Matrl_Tbl(i).error_message;
1236:
1237: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1238: fnd_log.string
1239: (
1240: fnd_log.level_statement,
1241: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule Planned Matrls',
1242: ' Derieved Value, Schedule Material Id: ' || X_Planned_Matrl_Tbl(i).schedule_material_id
1236:
1237: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
1238: fnd_log.string
1239: (
1240: fnd_log.level_statement,
1241: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule Planned Matrls',
1242: ' Derieved Value, Schedule Material Id: ' || X_Planned_Matrl_Tbl(i).schedule_material_id
1243: );
1244: fnd_log.string
1240: fnd_log.level_statement,
1241: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule Planned Matrls',
1242: ' Derieved Value, Schedule Material Id: ' || X_Planned_Matrl_Tbl(i).schedule_material_id
1243: );
1244: fnd_log.string
1245: (
1246: fnd_log.level_statement,
1247: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule Planned Matrls',
1248: ' Derieved Value, Available Quantity: ' || X_Planned_Matrl_Tbl(i).quantity_available
1242: ' Derieved Value, Schedule Material Id: ' || X_Planned_Matrl_Tbl(i).schedule_material_id
1243: );
1244: fnd_log.string
1245: (
1246: fnd_log.level_statement,
1247: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule Planned Matrls',
1248: ' Derieved Value, Available Quantity: ' || X_Planned_Matrl_Tbl(i).quantity_available
1249: );
1250: fnd_log.string
1246: fnd_log.level_statement,
1247: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule Planned Matrls',
1248: ' Derieved Value, Available Quantity: ' || X_Planned_Matrl_Tbl(i).quantity_available
1249: );
1250: fnd_log.string
1251: (
1252: fnd_log.level_statement,
1253: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule Planned Matrls',
1254: 'X_Planned_Matrl_Tbl(i).scheduled_date: ' ||X_Planned_Matrl_Tbl(i).scheduled_date
1248: ' Derieved Value, Available Quantity: ' || X_Planned_Matrl_Tbl(i).quantity_available
1249: );
1250: fnd_log.string
1251: (
1252: fnd_log.level_statement,
1253: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule Planned Matrls',
1254: 'X_Planned_Matrl_Tbl(i).scheduled_date: ' ||X_Planned_Matrl_Tbl(i).scheduled_date
1255: );
1256:
1263: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
1264: COMMIT;
1265: END IF;
1266:
1267: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1268: fnd_log.string
1269: (
1270: fnd_log.level_procedure,
1271: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule_All_Materials.end',
1264: COMMIT;
1265: END IF;
1266:
1267: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1268: fnd_log.string
1269: (
1270: fnd_log.level_procedure,
1271: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule_All_Materials.end',
1272: 'At the end of PLSQL procedure'
1266:
1267: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
1268: fnd_log.string
1269: (
1270: fnd_log.level_procedure,
1271: 'ahl.plsql.AHL_LTP_MATRL_AVAL_PUB.Schedule_All_Materials.end',
1272: 'At the end of PLSQL procedure'
1273: );
1274: END IF;