757: IF (x_mode = 'I') THEN
758: x_last_updated_by := 1;
759: x_last_update_login := 0;
760: ELSIF (X_MODE IN ('R', 'S')) THEN
761: x_last_updated_by := fnd_global.user_id;
762: IF (x_last_updated_by IS NULL) THEN
763: x_last_updated_by := -1;
764: END IF;
765: x_last_update_login := fnd_global.login_id;
761: x_last_updated_by := fnd_global.user_id;
762: IF (x_last_updated_by IS NULL) THEN
763: x_last_updated_by := -1;
764: END IF;
765: x_last_update_login := fnd_global.login_id;
766: IF (x_last_update_login IS NULL) THEN
767: x_last_update_login := -1;
768: END IF;
769: x_request_id := fnd_global.conc_request_id;
765: x_last_update_login := fnd_global.login_id;
766: IF (x_last_update_login IS NULL) THEN
767: x_last_update_login := -1;
768: END IF;
769: x_request_id := fnd_global.conc_request_id;
770: x_program_id := fnd_global.conc_program_id;
771: x_program_application_id := fnd_global.prog_appl_id;
772:
773: IF (x_request_id = -1) THEN
766: IF (x_last_update_login IS NULL) THEN
767: x_last_update_login := -1;
768: END IF;
769: x_request_id := fnd_global.conc_request_id;
770: x_program_id := fnd_global.conc_program_id;
771: x_program_application_id := fnd_global.prog_appl_id;
772:
773: IF (x_request_id = -1) THEN
774: x_request_id := NULL;
767: x_last_update_login := -1;
768: END IF;
769: x_request_id := fnd_global.conc_request_id;
770: x_program_id := fnd_global.conc_program_id;
771: x_program_application_id := fnd_global.prog_appl_id;
772:
773: IF (x_request_id = -1) THEN
774: x_request_id := NULL;
775: x_program_id := NULL;
1166: IF (X_MODE = 'I') THEN
1167: x_last_updated_by := 1;
1168: x_last_update_login := 0;
1169: ELSIF (X_MODE IN ('R', 'S')) THEN
1170: x_last_updated_by := fnd_global.user_id;
1171: IF x_last_updated_by IS NULL THEN
1172: x_last_updated_by := -1;
1173: END IF;
1174: x_last_update_login := fnd_global.login_id;
1170: x_last_updated_by := fnd_global.user_id;
1171: IF x_last_updated_by IS NULL THEN
1172: x_last_updated_by := -1;
1173: END IF;
1174: x_last_update_login := fnd_global.login_id;
1175: IF (x_last_update_login IS NULL) THEN
1176: x_last_update_login := -1;
1177: END IF;
1178: ELSE
1228: x_plan_sht_status => x_plan_sht_status
1229: );
1230:
1231: IF (X_MODE IN ('R', 'S')) THEN
1232: x_request_id := fnd_global.conc_request_id;
1233: x_program_id := fnd_global.conc_program_id;
1234: x_program_application_id := fnd_global.prog_appl_id;
1235: IF (x_request_id = -1) THEN
1236: x_request_id := old_references.request_id;
1229: );
1230:
1231: IF (X_MODE IN ('R', 'S')) THEN
1232: x_request_id := fnd_global.conc_request_id;
1233: x_program_id := fnd_global.conc_program_id;
1234: x_program_application_id := fnd_global.prog_appl_id;
1235: IF (x_request_id = -1) THEN
1236: x_request_id := old_references.request_id;
1237: x_program_id := old_references.program_id;
1230:
1231: IF (X_MODE IN ('R', 'S')) THEN
1232: x_request_id := fnd_global.conc_request_id;
1233: x_program_id := fnd_global.conc_program_id;
1234: x_program_application_id := fnd_global.prog_appl_id;
1235: IF (x_request_id = -1) THEN
1236: x_request_id := old_references.request_id;
1237: x_program_id := old_references.program_id;
1238: x_program_application_id := old_references.program_application_id;