362: IF (x_mode = 'I') THEN
363: x_last_updated_by := 1;
364: x_last_update_login := 0;
365: ELSIF (x_mode = 'R') THEN
366: x_last_updated_by := fnd_global.user_id;
367: IF (x_last_updated_by IS NULL) THEN
368: x_last_updated_by := -1;
369: END IF;
370: x_last_update_login := fnd_global.login_id;
366: x_last_updated_by := fnd_global.user_id;
367: IF (x_last_updated_by IS NULL) THEN
368: x_last_updated_by := -1;
369: END IF;
370: x_last_update_login := fnd_global.login_id;
371: IF (x_last_update_login IS NULL) THEN
372: x_last_update_login := -1;
373: END IF;
374: x_request_id := fnd_global.conc_request_id;
370: x_last_update_login := fnd_global.login_id;
371: IF (x_last_update_login IS NULL) THEN
372: x_last_update_login := -1;
373: END IF;
374: x_request_id := fnd_global.conc_request_id;
375: x_program_id := fnd_global.conc_program_id;
376: x_program_application_id := fnd_global.prog_appl_id;
377:
378: IF (x_request_id = -1) THEN
371: IF (x_last_update_login IS NULL) THEN
372: x_last_update_login := -1;
373: END IF;
374: x_request_id := fnd_global.conc_request_id;
375: x_program_id := fnd_global.conc_program_id;
376: x_program_application_id := fnd_global.prog_appl_id;
377:
378: IF (x_request_id = -1) THEN
379: x_request_id := NULL;
372: x_last_update_login := -1;
373: END IF;
374: x_request_id := fnd_global.conc_request_id;
375: x_program_id := fnd_global.conc_program_id;
376: x_program_application_id := fnd_global.prog_appl_id;
377:
378: IF (x_request_id = -1) THEN
379: x_request_id := NULL;
380: x_program_id := NULL;
551: IF (X_MODE = 'I') THEN
552: x_last_updated_by := 1;
553: x_last_update_login := 0;
554: ELSIF (x_mode = 'R') THEN
555: x_last_updated_by := fnd_global.user_id;
556: IF x_last_updated_by IS NULL THEN
557: x_last_updated_by := -1;
558: END IF;
559: x_last_update_login := fnd_global.login_id;
555: x_last_updated_by := fnd_global.user_id;
556: IF x_last_updated_by IS NULL THEN
557: x_last_updated_by := -1;
558: END IF;
559: x_last_update_login := fnd_global.login_id;
560: IF (x_last_update_login IS NULL) THEN
561: x_last_update_login := -1;
562: END IF;
563: ELSE
584: x_lock_flag => x_lock_flag
585: );
586:
587: IF (x_mode = 'R') THEN
588: x_request_id := fnd_global.conc_request_id;
589: x_program_id := fnd_global.conc_program_id;
590: x_program_application_id := fnd_global.prog_appl_id;
591: IF (x_request_id = -1) THEN
592: x_request_id := old_references.request_id;
585: );
586:
587: IF (x_mode = 'R') THEN
588: x_request_id := fnd_global.conc_request_id;
589: x_program_id := fnd_global.conc_program_id;
590: x_program_application_id := fnd_global.prog_appl_id;
591: IF (x_request_id = -1) THEN
592: x_request_id := old_references.request_id;
593: x_program_id := old_references.program_id;
586:
587: IF (x_mode = 'R') THEN
588: x_request_id := fnd_global.conc_request_id;
589: x_program_id := fnd_global.conc_program_id;
590: x_program_application_id := fnd_global.prog_appl_id;
591: IF (x_request_id = -1) THEN
592: x_request_id := old_references.request_id;
593: x_program_id := old_references.program_id;
594: x_program_application_id := old_references.program_application_id;