DBA Data[Home] [Help]

APPS.GMD_STABILITY_STUDIES_GRP dependencies on FND_API

Line 99: x_return_status := FND_API.G_RET_STS_SUCCESS;

95:
96: BEGIN
97:
98: l_progress := '010';
99: x_return_status := FND_API.G_RET_STS_SUCCESS;
100:
101: IF p_source_id IS NULL THEN
102: RAISE REQ_FIELDS_MISSING ;
103: END IF;

Line 185: RAISE FND_API.G_EXC_ERROR;

181:
182: EXCEPTION WHEN OTHERS
183: THEN
184: FND_MSG_PUB.ADD;
185: RAISE FND_API.G_EXC_ERROR;
186: END ;
187:
188: l_material_src_sample_qty_tl := l_material_src_sample_qty_tl + l_sample_qty_item_uom ;
189:

Line 205: x_return_status := FND_API.G_RET_STS_ERROR ;

201:
202: EXCEPTION
203: WHEN REQ_FIELDS_MISSING THEN
204: gmd_api_pub.log_message('GMD_REQ_FIELD_MIS','PACKAGE','GMD_STABILITY_STUDIES_GRP.CALCULATE_SAMPLE_QTY');
205: x_return_status := FND_API.G_RET_STS_ERROR ;
206:
207: WHEN MISSING_TIME_POINTS THEN
208: IF cr_all_variants%ISOPEN THEN
209: CLOSE cr_all_variants;

Line 212: x_return_status := FND_API.G_RET_STS_ERROR ;

208: IF cr_all_variants%ISOPEN THEN
209: CLOSE cr_all_variants;
210: END IF ;
211: gmd_api_pub.log_message('GMD_SS_TIME_POINTS_NOT_DEF','VARIANT_NO',to_char(l_variant_no));
212: x_return_status := FND_API.G_RET_STS_ERROR ;
213:
214: WHEN MISSING_SAMPLE_TIME_POINT THEN
215: IF cr_all_variants%ISOPEN THEN
216: CLOSE cr_all_variants;

Line 219: x_return_status := FND_API.G_RET_STS_ERROR ;

215: IF cr_all_variants%ISOPEN THEN
216: CLOSE cr_all_variants;
217: END IF ;
218: gmd_api_pub.log_message('GMD_SS_TIME_POINT_NO_SMPL','VARIANT_NO',to_char(l_variant_no));
219: x_return_status := FND_API.G_RET_STS_ERROR ;
220:
221: WHEN VARIANTS_MISSING THEN
222: IF cr_all_variants%ISOPEN THEN
223: CLOSE cr_all_variants;

Line 226: x_return_status := FND_API.G_RET_STS_ERROR ;

222: IF cr_all_variants%ISOPEN THEN
223: CLOSE cr_all_variants;
224: END IF ;
225: gmd_api_pub.log_message('GMD_SS_NO_RETAIN_SMPL','VARIANT_NO',to_char(l_variant_no));
226: x_return_status := FND_API.G_RET_STS_ERROR ;
227:
228: WHEN MISSING_SAMPLE_QTY_UOM THEN
229: IF cr_all_variants%ISOPEN THEN
230: CLOSE cr_all_variants;

Line 233: x_return_status := FND_API.G_RET_STS_ERROR ;

229: IF cr_all_variants%ISOPEN THEN
230: CLOSE cr_all_variants;
231: END IF ;
232: gmd_api_pub.log_message('GMD_SS_NO_SMPL_QTY_UOM','VARIANT_NO',to_char(l_variant_no));
233: x_return_status := FND_API.G_RET_STS_ERROR ;
234:
235: WHEN MISSING_RETAINED_SAMPLE THEN
236: IF cr_all_variants%ISOPEN THEN
237: CLOSE cr_all_variants;

Line 240: x_return_status := FND_API.G_RET_STS_ERROR ;

236: IF cr_all_variants%ISOPEN THEN
237: CLOSE cr_all_variants;
238: END IF ;
239: gmd_api_pub.log_message('GMD_SS_NO_VARIANT_MTRL_SRC');
240: x_return_status := FND_API.G_RET_STS_ERROR ;
241:
242: WHEN FND_API.G_EXC_ERROR THEN
243: IF cr_all_variants%ISOPEN THEN
244: CLOSE cr_all_variants;

Line 242: WHEN FND_API.G_EXC_ERROR THEN

238: END IF ;
239: gmd_api_pub.log_message('GMD_SS_NO_VARIANT_MTRL_SRC');
240: x_return_status := FND_API.G_RET_STS_ERROR ;
241:
242: WHEN FND_API.G_EXC_ERROR THEN
243: IF cr_all_variants%ISOPEN THEN
244: CLOSE cr_all_variants;
245: END IF ;
246: x_return_status := FND_API.G_RET_STS_ERROR ;

Line 246: x_return_status := FND_API.G_RET_STS_ERROR ;

242: WHEN FND_API.G_EXC_ERROR THEN
243: IF cr_all_variants%ISOPEN THEN
244: CLOSE cr_all_variants;
245: END IF ;
246: x_return_status := FND_API.G_RET_STS_ERROR ;
247: WHEN OTHERS THEN
248: IF cr_all_variants%ISOPEN THEN
249: CLOSE cr_all_variants;
250: END IF ;

Line 252: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

248: IF cr_all_variants%ISOPEN THEN
249: CLOSE cr_all_variants;
250: END IF ;
251: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE','GMD_STABILITY_STUDIES_GRP.CALCULATE_SAMPLE_QTY','ERROR', SUBSTR(SQLERRM,1,100),'POSITION',l_progress);
252: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
253:
254: END calculate_sample_qty ;
255:
256:

Line 277: x_return_status := FND_API.G_RET_STS_SUCCESS;

273:
274:
275: BEGIN
276:
277: x_return_status := FND_API.G_RET_STS_SUCCESS;
278:
279: SELECT inventory_item_id INTO l_inventory_item_id -- INVCONV
280: FROM gmd_stability_studies_b
281: WHERE ss_id = p_ss_id;

Line 302: x_return_status := FND_API.G_RET_STS_ERROR ;

298:
299: IF cr_material_sources_lot_rec.sample_qty > l_onhand_qty THEN
300: l_lot_label := l_lot_number; -- INVCONV
301: gmd_api_pub.log_message('GMD_SS_SMPL_QTY_LESS','LOT',l_lot_label);
302: x_return_status := FND_API.G_RET_STS_ERROR ;
303: RETURN ;
304: END IF;
305: END LOOP;
306:

Line 362: x_return_status := FND_API.G_RET_STS_SUCCESS;

358:
359: BEGIN
360:
361: l_progress := '010';
362: x_return_status := FND_API.G_RET_STS_SUCCESS;
363:
364: FND_MSG_PUB.Initialize;
365:
366: IF p_ss_id IS NULL THEN

Line 385: x_return_status := FND_API.G_RET_STS_ERROR ;

381:
382: l_sample_numbering := l_quality_parameters.sample_assignment_type; --INVCONV
383:
384: if l_sample_numbering < 0 then
385: x_return_status := FND_API.G_RET_STS_ERROR ;
386: RETURN ;
387: elsif l_sample_numbering = 1 THEN -- manual numbering
388: gmd_api_pub.log_message('GMD_SS_SMPL_MANUAL_NUM','ORGN',l_organization_id);
389: x_return_status := FND_API.G_RET_STS_ERROR ;

Line 389: x_return_status := FND_API.G_RET_STS_ERROR ;

385: x_return_status := FND_API.G_RET_STS_ERROR ;
386: RETURN ;
387: elsif l_sample_numbering = 1 THEN -- manual numbering
388: gmd_api_pub.log_message('GMD_SS_SMPL_MANUAL_NUM','ORGN',l_organization_id);
389: x_return_status := FND_API.G_RET_STS_ERROR ;
390: RETURN ;
391: end if;
392:
393: l_progress := '030';

Line 402: x_return_status := FND_API.G_RET_STS_ERROR ;

398: WHERE ss_id = p_ss_id ;
399:
400: IF l_actual_mtrl_src_cnt < l_material_sources_cnt THEN
401: gmd_api_pub.log_message('GMD_SS_MTRL_SRC_CNT_LESS','MTRL_CNT',to_char(l_material_sources_cnt));
402: x_return_status := FND_API.G_RET_STS_ERROR ;
403: RETURN;
404: END IF;
405:
406: -- recalculate the sample qty before approving so that it is latest.

Line 466: x_return_status := FND_API.G_RET_STS_ERROR ;

462: cr_material_src_variant_rec.recipe_no INTO l_source_label
463: FROM DUAL ;
464:
465: gmd_api_pub.log_message('GMD_SS_MTRL_SRC_VAR_MISSING','SOURCE',l_source_label);
466: x_return_status := FND_API.G_RET_STS_ERROR ;
467: RETURN;
468: END LOOP;
469:
470: l_progress := '070';

Line 476: x_return_status := FND_API.G_RET_STS_ERROR ;

472:
473: FOR cr_variants_storage_spec_rec in cr_variants_storage_spec
474: LOOP
475: gmd_api_pub.log_message('GMD_SS_VAR_STORAGE_SPEC','SPEC',cr_variants_storage_spec_rec.spec_name || '-' || cr_variants_storage_spec_rec.spec_vers);
476: x_return_status := FND_API.G_RET_STS_ERROR ;
477: RETURN;
478: END LOOP ;
479:
480: EXCEPTION

Line 483: x_return_status := FND_API.G_RET_STS_ERROR ;

479:
480: EXCEPTION
481: WHEN REQ_FIELDS_MISSING THEN
482: gmd_api_pub.log_message('GMD_REQ_FIELD_MIS','PACKAGE','GMD_STABILITY_STUDIES_GRP.SS_APPROVAL_CHECKLIST_OK');
483: x_return_status := FND_API.G_RET_STS_ERROR ;
484:
485: WHEN OTHERS THEN
486: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE','GMD_STABILITY_STUDIES_GRP.SS_APPROVAL_CHECKLIST_OK','ERROR', SUBSTR(SQLERRM,1,100),'POSITION',l_progress);
487: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 487: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

483: x_return_status := FND_API.G_RET_STS_ERROR ;
484:
485: WHEN OTHERS THEN
486: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE','GMD_STABILITY_STUDIES_GRP.SS_APPROVAL_CHECKLIST_OK','ERROR', SUBSTR(SQLERRM,1,100),'POSITION',l_progress);
487: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
488:
489: END ss_approval_checklist_ok ;
490:
491: PROCEDURE ss_launch_checklist_ok(p_ss_id IN NUMBER ,

Line 539: x_return_status := FND_API.G_RET_STS_SUCCESS;

535:
536: BEGIN
537:
538: l_progress := '010';
539: x_return_status := FND_API.G_RET_STS_SUCCESS;
540:
541: FND_MSG_PUB.Initialize;
542:
543: IF p_ss_id IS NULL THEN

Line 575: x_return_status := FND_API.G_RET_STS_ERROR ;

571: gmd_api_pub.log_message('GMD_SS_MTRL_SRC_LOT_MISSING','SOURCE',l_source_label);
572: ELSE
573: gmd_api_pub.log_message('GMD_SS_MTRL_SRC_EVENT_MISSING','SOURCE',l_source_label);
574: END IF;
575: x_return_status := FND_API.G_RET_STS_ERROR ;
576: RETURN;
577: END LOOP;
578:
579: l_progress := '040';

Line 601: x_return_status := FND_API.G_RET_STS_ERROR ;

597: gmd_api_pub.log_message('GMD_SS_MTRL_SRC_YIELD_MISSING','SOURCE',l_source_label);
598: ELSE
599: gmd_api_pub.log_message('GMD_SS_INVALID_VAR_SCH_DATE','SOURCE',l_source_label,'VARIANT',cr_material_src_yield_date_rec.variant_no);
600: END IF;
601: x_return_status := FND_API.G_RET_STS_ERROR ;
602: RETURN;
603: END LOOP;
604:
605: l_progress := '050';

Line 623: x_return_status := FND_API.G_RET_STS_ERROR ;

619:
620: FOR cr_variant_storage_date_rec in cr_variant_storage_date
621: LOOP
622: gmd_api_pub.log_message('GMD_SS_MISS_VAR_STORAGE_DATE','VARIANT',cr_variant_storage_date_rec.variant_no);
623: x_return_status := FND_API.G_RET_STS_ERROR ;
624: RETURN;
625: END LOOP;
626:
627:

Line 631: x_return_status := FND_API.G_RET_STS_ERROR ;

627:
628: EXCEPTION
629: WHEN REQ_FIELDS_MISSING THEN
630: gmd_api_pub.log_message('GMD_REQ_FIELD_MIS','PACKAGE','GMD_STABILITY_STUDIES_GRP.SS_LAUNCH_CHECKLIST_OK');
631: x_return_status := FND_API.G_RET_STS_ERROR ;
632:
633: WHEN OTHERS THEN
634: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE','GMD_STABILITY_STUDIES_GRP.SS_LAUNCH_CHECKLIST_OK','ERROR', SUBSTR(SQLERRM,1,100),'POSITION',l_progress);
635: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 635: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

631: x_return_status := FND_API.G_RET_STS_ERROR ;
632:
633: WHEN OTHERS THEN
634: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE','GMD_STABILITY_STUDIES_GRP.SS_LAUNCH_CHECKLIST_OK','ERROR', SUBSTR(SQLERRM,1,100),'POSITION',l_progress);
635: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
636:
637: END ss_launch_checklist_ok ;
638:
639: PROCEDURE change_ss_status( p_ss_id IN NUMBER,

Line 665: x_return_status := FND_API.G_RET_STS_SUCCESS;

661:
662:
663: BEGIN
664:
665: x_return_status := FND_API.G_RET_STS_SUCCESS;
666: FND_MSG_PUB.Initialize;
667:
668: l_progress := '010' ;
669:

Line 764: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

760:
761: EXCEPTION
762: WHEN OTHERS THEN
763: gmd_api_pub.log_message('GMD_API_ERROR','PACKAGE','GMD_STABILITY_STUDIES_GRP.CHANGE_SS_STATUS','ERROR', SUBSTR(SQLERRM,1,100),'POSITION',l_progress);
764: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
765: --x_message := FND_MESSAGE.GET;
766: FND_MSG_PUB.GET(p_msg_index => -3,
767: p_data => X_message,
768: p_encoded => 'F',