583: IF (x_mode = 'I') THEN
584: x_last_updated_by := 1;
585: x_last_update_login := 0;
586: ELSIF (x_mode = 'R') THEN
587: x_last_updated_by := fnd_global.user_id;
588: IF (x_last_updated_by IS NULL) THEN
589: x_last_updated_by := -1;
590: END IF;
591: x_last_update_login := fnd_global.login_id;
587: x_last_updated_by := fnd_global.user_id;
588: IF (x_last_updated_by IS NULL) THEN
589: x_last_updated_by := -1;
590: END IF;
591: x_last_update_login := fnd_global.login_id;
592: IF (x_last_update_login IS NULL) THEN
593: x_last_update_login := -1;
594: END IF;
595: x_request_id := fnd_global.conc_request_id;
591: x_last_update_login := fnd_global.login_id;
592: IF (x_last_update_login IS NULL) THEN
593: x_last_update_login := -1;
594: END IF;
595: x_request_id := fnd_global.conc_request_id;
596: x_program_id := fnd_global.conc_program_id;
597: x_program_application_id := fnd_global.prog_appl_id;
598:
599: IF (x_request_id = -1) THEN
592: IF (x_last_update_login IS NULL) THEN
593: x_last_update_login := -1;
594: END IF;
595: x_request_id := fnd_global.conc_request_id;
596: x_program_id := fnd_global.conc_program_id;
597: x_program_application_id := fnd_global.prog_appl_id;
598:
599: IF (x_request_id = -1) THEN
600: x_request_id := NULL;
593: x_last_update_login := -1;
594: END IF;
595: x_request_id := fnd_global.conc_request_id;
596: x_program_id := fnd_global.conc_program_id;
597: x_program_application_id := fnd_global.prog_appl_id;
598:
599: IF (x_request_id = -1) THEN
600: x_request_id := NULL;
601: x_program_id := NULL;
1194: IF (X_MODE = 'I') THEN
1195: x_last_updated_by := 1;
1196: x_last_update_login := 0;
1197: ELSIF (x_mode = 'R') THEN
1198: x_last_updated_by := fnd_global.user_id;
1199: IF x_last_updated_by IS NULL THEN
1200: x_last_updated_by := -1;
1201: END IF;
1202: x_last_update_login := fnd_global.login_id;
1198: x_last_updated_by := fnd_global.user_id;
1199: IF x_last_updated_by IS NULL THEN
1200: x_last_updated_by := -1;
1201: END IF;
1202: x_last_update_login := fnd_global.login_id;
1203: IF (x_last_update_login IS NULL) THEN
1204: x_last_update_login := -1;
1205: END IF;
1206: ELSE
1285: x_direct_to_borr_flag => x_direct_to_borr_flag
1286: );
1287:
1288: IF (x_mode = 'R') THEN
1289: x_request_id := fnd_global.conc_request_id;
1290: x_program_id := fnd_global.conc_program_id;
1291: x_program_application_id := fnd_global.prog_appl_id;
1292: IF (x_request_id = -1) THEN
1293: x_request_id := old_references.request_id;
1286: );
1287:
1288: IF (x_mode = 'R') THEN
1289: x_request_id := fnd_global.conc_request_id;
1290: x_program_id := fnd_global.conc_program_id;
1291: x_program_application_id := fnd_global.prog_appl_id;
1292: IF (x_request_id = -1) THEN
1293: x_request_id := old_references.request_id;
1294: x_program_id := old_references.program_id;
1287:
1288: IF (x_mode = 'R') THEN
1289: x_request_id := fnd_global.conc_request_id;
1290: x_program_id := fnd_global.conc_program_id;
1291: x_program_application_id := fnd_global.prog_appl_id;
1292: IF (x_request_id = -1) THEN
1293: x_request_id := old_references.request_id;
1294: x_program_id := old_references.program_id;
1295: x_program_application_id := old_references.program_application_id;