352: if(X_MODE = 'I') then
353: X_LAST_UPDATED_BY := 1;
354: X_LAST_UPDATE_LOGIN := 0;
355: elsif (X_MODE = 'R') then
356: X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
357: if X_LAST_UPDATED_BY is NULL then
358: X_LAST_UPDATED_BY := -1;
359: end if;
360: X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
356: X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
357: if X_LAST_UPDATED_BY is NULL then
358: X_LAST_UPDATED_BY := -1;
359: end if;
360: X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
361: if X_LAST_UPDATE_LOGIN is NULL then
362: X_LAST_UPDATE_LOGIN := -1;
363: end if;
364: X_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
360: X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
361: if X_LAST_UPDATE_LOGIN is NULL then
362: X_LAST_UPDATE_LOGIN := -1;
363: end if;
364: X_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
365: X_PROGRAM_ID := FND_GLOBAL.CONC_PROGRAM_ID;
366:
367: X_PROGRAM_APPLICATION_ID :=
368: FND_GLOBAL.PROG_APPL_ID;
361: if X_LAST_UPDATE_LOGIN is NULL then
362: X_LAST_UPDATE_LOGIN := -1;
363: end if;
364: X_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
365: X_PROGRAM_ID := FND_GLOBAL.CONC_PROGRAM_ID;
366:
367: X_PROGRAM_APPLICATION_ID :=
368: FND_GLOBAL.PROG_APPL_ID;
369: if (X_REQUEST_ID = -1) then
364: X_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
365: X_PROGRAM_ID := FND_GLOBAL.CONC_PROGRAM_ID;
366:
367: X_PROGRAM_APPLICATION_ID :=
368: FND_GLOBAL.PROG_APPL_ID;
369: if (X_REQUEST_ID = -1) then
370: X_REQUEST_ID := NULL;
371: X_PROGRAM_ID := NULL;
372: X_PROGRAM_APPLICATION_ID := NULL;
546: if(X_MODE = 'I') then
547: X_LAST_UPDATED_BY := 1;
548: X_LAST_UPDATE_LOGIN := 0;
549: elsif (X_MODE = 'R') then
550: X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
551: if X_LAST_UPDATED_BY is NULL then
552: X_LAST_UPDATED_BY := -1;
553: end if;
554: X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
550: X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
551: if X_LAST_UPDATED_BY is NULL then
552: X_LAST_UPDATED_BY := -1;
553: end if;
554: X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
555: if X_LAST_UPDATE_LOGIN is NULL then
556: X_LAST_UPDATE_LOGIN := -1;
557: end if;
558: else
580: x_last_update_login=>X_LAST_UPDATE_LOGIN,
581: x_grading_period_cd=>X_GRADING_PERIOD_CD
582: );
583: if (X_MODE = 'R') then
584: X_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
585: X_PROGRAM_ID := FND_GLOBAL.CONC_PROGRAM_ID;
586: X_PROGRAM_APPLICATION_ID := FND_GLOBAL.PROG_APPL_ID;
587: if (X_REQUEST_ID = -1) then
588: X_REQUEST_ID := OLD_REFERENCES.REQUEST_ID;
581: x_grading_period_cd=>X_GRADING_PERIOD_CD
582: );
583: if (X_MODE = 'R') then
584: X_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
585: X_PROGRAM_ID := FND_GLOBAL.CONC_PROGRAM_ID;
586: X_PROGRAM_APPLICATION_ID := FND_GLOBAL.PROG_APPL_ID;
587: if (X_REQUEST_ID = -1) then
588: X_REQUEST_ID := OLD_REFERENCES.REQUEST_ID;
589: X_PROGRAM_ID := OLD_REFERENCES. PROGRAM_ID;
582: );
583: if (X_MODE = 'R') then
584: X_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
585: X_PROGRAM_ID := FND_GLOBAL.CONC_PROGRAM_ID;
586: X_PROGRAM_APPLICATION_ID := FND_GLOBAL.PROG_APPL_ID;
587: if (X_REQUEST_ID = -1) then
588: X_REQUEST_ID := OLD_REFERENCES.REQUEST_ID;
589: X_PROGRAM_ID := OLD_REFERENCES. PROGRAM_ID;
590: X_PROGRAM_APPLICATION_ID := OLD_REFERENCES.PROGRAM_APPLICATION_ID;