707: if(X_MODE = 'I') then
708: X_LAST_UPDATED_BY := 1;
709: X_LAST_UPDATE_LOGIN := 0;
710: elsif (X_MODE = 'R') then
711: X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
712: if X_LAST_UPDATED_BY is NULL then
713: X_LAST_UPDATED_BY := -1;
714: end if;
715: X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
711: X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
712: if X_LAST_UPDATED_BY is NULL then
713: X_LAST_UPDATED_BY := -1;
714: end if;
715: X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
716: if X_LAST_UPDATE_LOGIN is NULL then
717: X_LAST_UPDATE_LOGIN := -1;
718: end if;
719: X_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
715: X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
716: if X_LAST_UPDATE_LOGIN is NULL then
717: X_LAST_UPDATE_LOGIN := -1;
718: end if;
719: X_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
720: X_PROGRAM_ID := FND_GLOBAL.CONC_PROGRAM_ID;
721: X_PROGRAM_APPLICATION_ID := FND_GLOBAL.PROG_APPL_ID;
722: if (X_REQUEST_ID = -1) then
723: X_REQUEST_ID := NULL;
716: if X_LAST_UPDATE_LOGIN is NULL then
717: X_LAST_UPDATE_LOGIN := -1;
718: end if;
719: X_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
720: X_PROGRAM_ID := FND_GLOBAL.CONC_PROGRAM_ID;
721: X_PROGRAM_APPLICATION_ID := FND_GLOBAL.PROG_APPL_ID;
722: if (X_REQUEST_ID = -1) then
723: X_REQUEST_ID := NULL;
724: X_PROGRAM_ID := NULL;
717: X_LAST_UPDATE_LOGIN := -1;
718: end if;
719: X_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
720: X_PROGRAM_ID := FND_GLOBAL.CONC_PROGRAM_ID;
721: X_PROGRAM_APPLICATION_ID := FND_GLOBAL.PROG_APPL_ID;
722: if (X_REQUEST_ID = -1) then
723: X_REQUEST_ID := NULL;
724: X_PROGRAM_ID := NULL;
725: X_PROGRAM_APPLICATION_ID := NULL;
1094: if(X_MODE = 'I') then
1095: X_LAST_UPDATED_BY := 1;
1096: X_LAST_UPDATE_LOGIN := 0;
1097: elsif (X_MODE = 'R') then
1098: X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
1099: if X_LAST_UPDATED_BY is NULL then
1100: X_LAST_UPDATED_BY := -1;
1101: end if;
1102: X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
1098: X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
1099: if X_LAST_UPDATED_BY is NULL then
1100: X_LAST_UPDATED_BY := -1;
1101: end if;
1102: X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
1103: if X_LAST_UPDATE_LOGIN is NULL then
1104: X_LAST_UPDATE_LOGIN := -1;
1105: end if;
1106: else
1157: x_last_update_login=>X_LAST_UPDATE_LOGIN,
1158: x_pkg_reduct_ind => X_PKG_REDUCT_IND
1159: );
1160: if (X_MODE = 'R') then
1161: X_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
1162: X_PROGRAM_ID := FND_GLOBAL.CONC_PROGRAM_ID;
1163: X_PROGRAM_APPLICATION_ID := FND_GLOBAL.PROG_APPL_ID;
1164: if (X_REQUEST_ID = -1) then
1165: X_REQUEST_ID := OLD_REFERENCES.REQUEST_ID;
1158: x_pkg_reduct_ind => X_PKG_REDUCT_IND
1159: );
1160: if (X_MODE = 'R') then
1161: X_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
1162: X_PROGRAM_ID := FND_GLOBAL.CONC_PROGRAM_ID;
1163: X_PROGRAM_APPLICATION_ID := FND_GLOBAL.PROG_APPL_ID;
1164: if (X_REQUEST_ID = -1) then
1165: X_REQUEST_ID := OLD_REFERENCES.REQUEST_ID;
1166: X_PROGRAM_ID := OLD_REFERENCES. PROGRAM_ID;
1159: );
1160: if (X_MODE = 'R') then
1161: X_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
1162: X_PROGRAM_ID := FND_GLOBAL.CONC_PROGRAM_ID;
1163: X_PROGRAM_APPLICATION_ID := FND_GLOBAL.PROG_APPL_ID;
1164: if (X_REQUEST_ID = -1) then
1165: X_REQUEST_ID := OLD_REFERENCES.REQUEST_ID;
1166: X_PROGRAM_ID := OLD_REFERENCES. PROGRAM_ID;
1167: X_PROGRAM_APPLICATION_ID :=