APPS.GMP_APS_OUTPUT_PKG dependencies on FND_MESSAGE

Line 581: FND_MESSAGE.SET_NAME('GMP','MR_REQ_SUBMITTED');

577: --
578: IF X_conc_id = 0 THEN
579: RAISE ERROR_SUBMITTING_REQUEST;
580: ELSE
581: FND_MESSAGE.SET_NAME('GMP','MR_REQ_SUBMITTED');
582: FND_MESSAGE.SET_TOKEN('CONC_ID', X_conc_id);
583: FND_FILE.PUT_LINE ( FND_FILE.LOG,'-'||FND_MESSAGE.GET);
584: COMMIT ;
585: END IF;

Line 582: FND_MESSAGE.SET_TOKEN('CONC_ID', X_conc_id);

578: IF X_conc_id = 0 THEN
579: RAISE ERROR_SUBMITTING_REQUEST;
580: ELSE
581: FND_MESSAGE.SET_NAME('GMP','MR_REQ_SUBMITTED');
582: FND_MESSAGE.SET_TOKEN('CONC_ID', X_conc_id);
583: FND_FILE.PUT_LINE ( FND_FILE.LOG,'-'||FND_MESSAGE.GET);
584: COMMIT ;
585: END IF;
586: ELSE

Line 583: FND_FILE.PUT_LINE ( FND_FILE.LOG,'-'||FND_MESSAGE.GET);

579: RAISE ERROR_SUBMITTING_REQUEST;
580: ELSE
581: FND_MESSAGE.SET_NAME('GMP','MR_REQ_SUBMITTED');
582: FND_MESSAGE.SET_TOKEN('CONC_ID', X_conc_id);
583: FND_FILE.PUT_LINE ( FND_FILE.LOG,'-'||FND_MESSAGE.GET);
584: COMMIT ;
585: END IF;
586: ELSE
587: FND_FILE.PUT_LINE(FND_FILE.LOG,'Profile implement APS Suggestions is NOT turned ON, Use concurrent program or Use the GMP forms to implement APS suggestions ');

Line 592: G_log_text := FND_MESSAGE.GET;

588: END IF;
589:
590: EXCEPTION
591: WHEN ERROR_SUBMITTING_REQUEST THEN
592: G_log_text := FND_MESSAGE.GET;
593: FND_FILE.PUT_LINE ( FND_FILE.LOG,'Error submitting concurrent Request '||G_log_text);
594: retcode:=2; /* Error */
595: WHEN others THEN
596: errbuf := 'Call to Perform Auto release failed: ' ||sqlerrm;