495: IF (x_mode = 'I') THEN
496: x_last_updated_by := 1;
497: x_last_update_login := 0;
498: ELSIF (X_MODE IN ('R', 'S')) THEN
499: x_last_updated_by := fnd_global.user_id;
500: IF (x_last_updated_by IS NULL) THEN
501: x_last_updated_by := -1;
502: END IF;
503: x_last_update_login := fnd_global.login_id;
499: x_last_updated_by := fnd_global.user_id;
500: IF (x_last_updated_by IS NULL) THEN
501: x_last_updated_by := -1;
502: END IF;
503: x_last_update_login := fnd_global.login_id;
504: IF (x_last_update_login IS NULL) THEN
505: x_last_update_login := -1;
506: END IF;
507: x_request_id := fnd_global.conc_request_id;
503: x_last_update_login := fnd_global.login_id;
504: IF (x_last_update_login IS NULL) THEN
505: x_last_update_login := -1;
506: END IF;
507: x_request_id := fnd_global.conc_request_id;
508: x_program_id := fnd_global.conc_program_id;
509: x_program_application_id := fnd_global.prog_appl_id;
510:
511: IF (x_request_id = -1) THEN
504: IF (x_last_update_login IS NULL) THEN
505: x_last_update_login := -1;
506: END IF;
507: x_request_id := fnd_global.conc_request_id;
508: x_program_id := fnd_global.conc_program_id;
509: x_program_application_id := fnd_global.prog_appl_id;
510:
511: IF (x_request_id = -1) THEN
512: x_request_id := NULL;
505: x_last_update_login := -1;
506: END IF;
507: x_request_id := fnd_global.conc_request_id;
508: x_program_id := fnd_global.conc_program_id;
509: x_program_application_id := fnd_global.prog_appl_id;
510:
511: IF (x_request_id = -1) THEN
512: x_request_id := NULL;
513: x_program_id := NULL;
710: IF (X_MODE = 'I') THEN
711: x_last_updated_by := 1;
712: x_last_update_login := 0;
713: ELSIF (X_MODE IN ('R', 'S')) THEN
714: x_last_updated_by := fnd_global.user_id;
715: IF x_last_updated_by IS NULL THEN
716: x_last_updated_by := -1;
717: END IF;
718: x_last_update_login := fnd_global.login_id;
714: x_last_updated_by := fnd_global.user_id;
715: IF x_last_updated_by IS NULL THEN
716: x_last_updated_by := -1;
717: END IF;
718: x_last_update_login := fnd_global.login_id;
719: IF (x_last_update_login IS NULL) THEN
720: x_last_update_login := -1;
721: END IF;
722: ELSE
742: x_last_update_login => x_last_update_login
743: );
744:
745: IF (X_MODE IN ('R', 'S')) THEN
746: x_request_id := fnd_global.conc_request_id;
747: x_program_id := fnd_global.conc_program_id;
748: x_program_application_id := fnd_global.prog_appl_id;
749: IF (x_request_id = -1) THEN
750: x_request_id := old_references.request_id;
743: );
744:
745: IF (X_MODE IN ('R', 'S')) THEN
746: x_request_id := fnd_global.conc_request_id;
747: x_program_id := fnd_global.conc_program_id;
748: x_program_application_id := fnd_global.prog_appl_id;
749: IF (x_request_id = -1) THEN
750: x_request_id := old_references.request_id;
751: x_program_id := old_references.program_id;
744:
745: IF (X_MODE IN ('R', 'S')) THEN
746: x_request_id := fnd_global.conc_request_id;
747: x_program_id := fnd_global.conc_program_id;
748: x_program_application_id := fnd_global.prog_appl_id;
749: IF (x_request_id = -1) THEN
750: x_request_id := old_references.request_id;
751: x_program_id := old_references.program_id;
752: x_program_application_id := old_references.program_application_id;