DBA Data[Home] [Help]

APPS.IGS_FI_ACCOUNT_INT dependencies on FND_MESSAGE

Line 30: FND_MESSAGE.Set_Name('IGS',

26: BEGIN
27: -- As per the SFCR005, this concurrent program is obsoleted
28: -- and if the user tries to run this program, then an error
29: -- message should be written to the log file that this is obsolete
30: FND_MESSAGE.Set_Name('IGS',
31: 'IGS_GE_OBSOLETE_JOB');
32: FND_FILE.Put_Line(FND_FILE.Log,
33: FND_MESSAGE.Get);
34: retcode := 0;

Line 33: FND_MESSAGE.Get);

29: -- message should be written to the log file that this is obsolete
30: FND_MESSAGE.Set_Name('IGS',
31: 'IGS_GE_OBSOLETE_JOB');
32: FND_FILE.Put_Line(FND_FILE.Log,
33: FND_MESSAGE.Get);
34: retcode := 0;
35: EXCEPTION
36: WHEN Others THEN
37: retcode := 2;

Line 38: FND_MESSAGE.Set_Name('IGS',

34: retcode := 0;
35: EXCEPTION
36: WHEN Others THEN
37: retcode := 2;
38: FND_MESSAGE.Set_Name('IGS',
39: 'IGS_GE_UNHANDLED_EXCEPTION');
40: errbuf := FND_MESSAGE.Get;
41: IGS_GE_MSG_STACK.Conc_Exception_Hndl;
42: END account_int;

Line 40: errbuf := FND_MESSAGE.Get;

36: WHEN Others THEN
37: retcode := 2;
38: FND_MESSAGE.Set_Name('IGS',
39: 'IGS_GE_UNHANDLED_EXCEPTION');
40: errbuf := FND_MESSAGE.Get;
41: IGS_GE_MSG_STACK.Conc_Exception_Hndl;
42: END account_int;
43: END IGS_FI_ACCOUNT_INT;