157: FND_MESSAGE.SET_TOKEN('VERSION',
158: p_api_version,
159: FALSE);
160: X_msg_data := FND_MESSAGE.GET;
161: FND_FILE.PUT(FND_FILE.LOG,'API version error');
162: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
163: WHEN ITEM_ID_IS_NULL THEN
164: x_return_status := FND_API.G_RET_STS_ERROR;
165: x_error_code := APP_EXCEPTION.Get_Code;
158: p_api_version,
159: FALSE);
160: X_msg_data := FND_MESSAGE.GET;
161: FND_FILE.PUT(FND_FILE.LOG,'API version error');
162: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
163: WHEN ITEM_ID_IS_NULL THEN
164: x_return_status := FND_API.G_RET_STS_ERROR;
165: x_error_code := APP_EXCEPTION.Get_Code;
166:
169: FND_MESSAGE.SET_TOKEN('CODE',
170: p_item_id,
171: FALSE);
172: X_msg_data := FND_MESSAGE.GET;
173: FND_FILE.PUT(FND_FILE.LOG,'Item Id is null');
174: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
175: WHEN OTHERS THEN
176: x_return_status := 'U';
177: x_error_code := SQLCODE;
170: p_item_id,
171: FALSE);
172: X_msg_data := FND_MESSAGE.GET;
173: FND_FILE.PUT(FND_FILE.LOG,'Item Id is null');
174: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
175: WHEN OTHERS THEN
176: x_return_status := 'U';
177: x_error_code := SQLCODE;
178: l_msg_data := SUBSTR(SQLERRM, 1, 200);
367: FND_MESSAGE.SET_TOKEN('VERSION',
368: p_api_version,
369: FALSE);
370: X_msg_data := FND_MESSAGE.GET;
371: FND_FILE.PUT(FND_FILE.LOG,'API version error');
372: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
373: WHEN ITEM_ID_IS_NULL THEN
374: x_return_status := FND_API.G_RET_STS_ERROR;
375: x_error_code := APP_EXCEPTION.Get_Code;
368: p_api_version,
369: FALSE);
370: X_msg_data := FND_MESSAGE.GET;
371: FND_FILE.PUT(FND_FILE.LOG,'API version error');
372: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
373: WHEN ITEM_ID_IS_NULL THEN
374: x_return_status := FND_API.G_RET_STS_ERROR;
375: x_error_code := APP_EXCEPTION.Get_Code;
376:
379: FND_MESSAGE.SET_TOKEN('CODE',
380: p_item_id,
381: FALSE);
382: X_msg_data := FND_MESSAGE.GET;
383: FND_FILE.PUT(FND_FILE.LOG,'Item Id is null');
384: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
385: WHEN FORMULA_ID_IS_NULL THEN
386: x_return_status := FND_API.G_RET_STS_ERROR;
387: x_error_code := APP_EXCEPTION.Get_Code;
380: p_item_id,
381: FALSE);
382: X_msg_data := FND_MESSAGE.GET;
383: FND_FILE.PUT(FND_FILE.LOG,'Item Id is null');
384: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
385: WHEN FORMULA_ID_IS_NULL THEN
386: x_return_status := FND_API.G_RET_STS_ERROR;
387: x_error_code := APP_EXCEPTION.Get_Code;
388:
391: FND_MESSAGE.SET_TOKEN('CODE',
392: p_formula_no,
393: FALSE);
394: X_msg_data := FND_MESSAGE.GET;
395: FND_FILE.PUT(FND_FILE.LOG,'Formula Id is null');
396: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
397: WHEN OTHERS THEN
398: x_return_status := 'U';
399: x_error_code := SQLCODE;
392: p_formula_no,
393: FALSE);
394: X_msg_data := FND_MESSAGE.GET;
395: FND_FILE.PUT(FND_FILE.LOG,'Formula Id is null');
396: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
397: WHEN OTHERS THEN
398: x_return_status := 'U';
399: x_error_code := SQLCODE;
400: l_msg_data := SUBSTR(SQLERRM, 1, 200);
587: FND_MESSAGE.SET_TOKEN('VERSION',
588: p_api_version,
589: FALSE);
590: X_msg_data := FND_MESSAGE.GET;
591: FND_FILE.PUT(FND_FILE.LOG,'API version error');
592: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
593: WHEN ITEM_ID_IS_NULL THEN
594: x_return_status := FND_API.G_RET_STS_ERROR;
595: x_error_code := APP_EXCEPTION.Get_Code;
588: p_api_version,
589: FALSE);
590: X_msg_data := FND_MESSAGE.GET;
591: FND_FILE.PUT(FND_FILE.LOG,'API version error');
592: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
593: WHEN ITEM_ID_IS_NULL THEN
594: x_return_status := FND_API.G_RET_STS_ERROR;
595: x_error_code := APP_EXCEPTION.Get_Code;
596:
599: FND_MESSAGE.SET_TOKEN('CODE',
600: p_item_id,
601: FALSE);
602: X_msg_data := FND_MESSAGE.GET;
603: FND_FILE.PUT(FND_FILE.LOG,'Item Id is null');
604: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
605: WHEN SO_NUMBER_IS_NULL THEN
606: x_return_status := FND_API.G_RET_STS_ERROR;
607: x_error_code := APP_EXCEPTION.Get_Code;
600: p_item_id,
601: FALSE);
602: X_msg_data := FND_MESSAGE.GET;
603: FND_FILE.PUT(FND_FILE.LOG,'Item Id is null');
604: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
605: WHEN SO_NUMBER_IS_NULL THEN
606: x_return_status := FND_API.G_RET_STS_ERROR;
607: x_error_code := APP_EXCEPTION.Get_Code;
608:
611: FND_MESSAGE.SET_TOKEN('CODE',
612: p_sales_order_no,
613: FALSE);
614: X_msg_data := FND_MESSAGE.GET;
615: FND_FILE.PUT(FND_FILE.LOG,'Sales Order Number is null');
616: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
617: WHEN OTHERS THEN
618: x_return_status := 'U';
619: x_error_code := SQLCODE;
612: p_sales_order_no,
613: FALSE);
614: X_msg_data := FND_MESSAGE.GET;
615: FND_FILE.PUT(FND_FILE.LOG,'Sales Order Number is null');
616: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
617: WHEN OTHERS THEN
618: x_return_status := 'U';
619: x_error_code := SQLCODE;
620: l_msg_data := SUBSTR(SQLERRM, 1, 200);
829: FND_MESSAGE.SET_TOKEN('VERSION',
830: p_api_version,
831: FALSE);
832: X_msg_data := FND_MESSAGE.GET;
833: FND_FILE.PUT(FND_FILE.LOG,'API version error');
834: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
835: WHEN ITEM_ID_IS_NULL THEN
836: x_return_status := FND_API.G_RET_STS_ERROR;
837: x_error_code := APP_EXCEPTION.Get_Code;
830: p_api_version,
831: FALSE);
832: X_msg_data := FND_MESSAGE.GET;
833: FND_FILE.PUT(FND_FILE.LOG,'API version error');
834: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
835: WHEN ITEM_ID_IS_NULL THEN
836: x_return_status := FND_API.G_RET_STS_ERROR;
837: x_error_code := APP_EXCEPTION.Get_Code;
838:
841: FND_MESSAGE.SET_TOKEN('CODE',
842: p_tech_data_id,
843: FALSE);
844: X_msg_data := FND_MESSAGE.GET;
845: FND_FILE.PUT(FND_FILE.LOG,'Item Id is null');
846: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
847: WHEN TECH_DATA_ID_IS_NULL THEN
848: x_return_status := FND_API.G_RET_STS_ERROR;
849: x_error_code := APP_EXCEPTION.Get_Code;
842: p_tech_data_id,
843: FALSE);
844: X_msg_data := FND_MESSAGE.GET;
845: FND_FILE.PUT(FND_FILE.LOG,'Item Id is null');
846: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
847: WHEN TECH_DATA_ID_IS_NULL THEN
848: x_return_status := FND_API.G_RET_STS_ERROR;
849: x_error_code := APP_EXCEPTION.Get_Code;
850:
853: FND_MESSAGE.SET_TOKEN('CODE',
854: p_tech_data_id,
855: FALSE);
856: X_msg_data := FND_MESSAGE.GET;
857: FND_FILE.PUT(FND_FILE.LOG,'Technical Data Id is null');
858: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
859: WHEN OTHERS THEN
860: x_return_status := 'U';
861: x_error_code := SQLCODE;
854: p_tech_data_id,
855: FALSE);
856: X_msg_data := FND_MESSAGE.GET;
857: FND_FILE.PUT(FND_FILE.LOG,'Technical Data Id is null');
858: FND_FILE.NEW_LINE(FND_FILE.LOG,1);
859: WHEN OTHERS THEN
860: x_return_status := 'U';
861: x_error_code := SQLCODE;
862: l_msg_data := SUBSTR(SQLERRM, 1, 200);