502: IF (x_mode = 'I') THEN
503: x_last_updated_by := 1;
504: x_last_update_login := 0;
505: ELSIF (x_mode = 'R') THEN
506: x_last_updated_by := fnd_global.user_id;
507: IF (x_last_updated_by IS NULL) THEN
508: x_last_updated_by := -1;
509: END IF;
510: x_last_update_login := fnd_global.login_id;
506: x_last_updated_by := fnd_global.user_id;
507: IF (x_last_updated_by IS NULL) THEN
508: x_last_updated_by := -1;
509: END IF;
510: x_last_update_login := fnd_global.login_id;
511: IF (x_last_update_login IS NULL) THEN
512: x_last_update_login := -1;
513: END IF;
514: x_request_id := fnd_global.conc_request_id;
510: x_last_update_login := fnd_global.login_id;
511: IF (x_last_update_login IS NULL) THEN
512: x_last_update_login := -1;
513: END IF;
514: x_request_id := fnd_global.conc_request_id;
515: x_program_id := fnd_global.conc_program_id;
516: x_program_application_id := fnd_global.prog_appl_id;
517:
518: IF (x_request_id = -1) THEN
511: IF (x_last_update_login IS NULL) THEN
512: x_last_update_login := -1;
513: END IF;
514: x_request_id := fnd_global.conc_request_id;
515: x_program_id := fnd_global.conc_program_id;
516: x_program_application_id := fnd_global.prog_appl_id;
517:
518: IF (x_request_id = -1) THEN
519: x_request_id := NULL;
512: x_last_update_login := -1;
513: END IF;
514: x_request_id := fnd_global.conc_request_id;
515: x_program_id := fnd_global.conc_program_id;
516: x_program_application_id := fnd_global.prog_appl_id;
517:
518: IF (x_request_id = -1) THEN
519: x_request_id := NULL;
520: x_program_id := NULL;
676: IF (X_MODE = 'I') THEN
677: x_last_updated_by := 1;
678: x_last_update_login := 0;
679: ELSIF (x_mode = 'R') THEN
680: x_last_updated_by := fnd_global.user_id;
681: IF x_last_updated_by IS NULL THEN
682: x_last_updated_by := -1;
683: END IF;
684: x_last_update_login := fnd_global.login_id;
680: x_last_updated_by := fnd_global.user_id;
681: IF x_last_updated_by IS NULL THEN
682: x_last_updated_by := -1;
683: END IF;
684: x_last_update_login := fnd_global.login_id;
685: IF (x_last_update_login IS NULL) THEN
686: x_last_update_login := -1;
687: END IF;
688: ELSE
707: x_lock_flag => x_lock_flag
708: );
709:
710: IF (x_mode = 'R') THEN
711: x_request_id := fnd_global.conc_request_id;
712: x_program_id := fnd_global.conc_program_id;
713: x_program_application_id := fnd_global.prog_appl_id;
714: IF (x_request_id = -1) THEN
715: x_request_id := old_references.request_id;
708: );
709:
710: IF (x_mode = 'R') THEN
711: x_request_id := fnd_global.conc_request_id;
712: x_program_id := fnd_global.conc_program_id;
713: x_program_application_id := fnd_global.prog_appl_id;
714: IF (x_request_id = -1) THEN
715: x_request_id := old_references.request_id;
716: x_program_id := old_references.program_id;
709:
710: IF (x_mode = 'R') THEN
711: x_request_id := fnd_global.conc_request_id;
712: x_program_id := fnd_global.conc_program_id;
713: x_program_application_id := fnd_global.prog_appl_id;
714: IF (x_request_id = -1) THEN
715: x_request_id := old_references.request_id;
716: x_program_id := old_references.program_id;
717: x_program_application_id := old_references.program_application_id;