382: IF (x_mode = 'I') THEN
383: x_last_updated_by := 1;
384: x_last_update_login := 0;
385: ELSIF (x_mode = 'R') THEN
386: x_last_updated_by := fnd_global.user_id;
387: IF (x_last_updated_by IS NULL) THEN
388: x_last_updated_by := -1;
389: END IF;
390: x_last_update_login := fnd_global.login_id;
386: x_last_updated_by := fnd_global.user_id;
387: IF (x_last_updated_by IS NULL) THEN
388: x_last_updated_by := -1;
389: END IF;
390: x_last_update_login := fnd_global.login_id;
391: IF (x_last_update_login IS NULL) THEN
392: x_last_update_login := -1;
393: END IF;
394: x_request_id := fnd_global.conc_request_id;
390: x_last_update_login := fnd_global.login_id;
391: IF (x_last_update_login IS NULL) THEN
392: x_last_update_login := -1;
393: END IF;
394: x_request_id := fnd_global.conc_request_id;
395: x_program_id := fnd_global.conc_program_id;
396: x_program_application_id := fnd_global.prog_appl_id;
397:
398: IF (x_request_id = -1) THEN
391: IF (x_last_update_login IS NULL) THEN
392: x_last_update_login := -1;
393: END IF;
394: x_request_id := fnd_global.conc_request_id;
395: x_program_id := fnd_global.conc_program_id;
396: x_program_application_id := fnd_global.prog_appl_id;
397:
398: IF (x_request_id = -1) THEN
399: x_request_id := NULL;
392: x_last_update_login := -1;
393: END IF;
394: x_request_id := fnd_global.conc_request_id;
395: x_program_id := fnd_global.conc_program_id;
396: x_program_application_id := fnd_global.prog_appl_id;
397:
398: IF (x_request_id = -1) THEN
399: x_request_id := NULL;
400: x_program_id := NULL;
785: IF (X_MODE = 'I') THEN
786: x_last_updated_by := 1;
787: x_last_update_login := 0;
788: ELSIF (x_mode = 'R') THEN
789: x_last_updated_by := fnd_global.user_id;
790: IF x_last_updated_by IS NULL THEN
791: x_last_updated_by := -1;
792: END IF;
793: x_last_update_login := fnd_global.login_id;
789: x_last_updated_by := fnd_global.user_id;
790: IF x_last_updated_by IS NULL THEN
791: x_last_updated_by := -1;
792: END IF;
793: x_last_update_login := fnd_global.login_id;
794: IF (x_last_update_login IS NULL) THEN
795: x_last_update_login := -1;
796: END IF;
797: ELSE
849: x_source_invoice_id => x_source_invoice_id
850: );
851:
852: IF (x_mode = 'R') THEN
853: x_request_id := fnd_global.conc_request_id;
854: x_program_id := fnd_global.conc_program_id;
855: x_program_application_id := fnd_global.prog_appl_id;
856: IF (x_request_id = -1) THEN
857: x_request_id := old_references.request_id;
850: );
851:
852: IF (x_mode = 'R') THEN
853: x_request_id := fnd_global.conc_request_id;
854: x_program_id := fnd_global.conc_program_id;
855: x_program_application_id := fnd_global.prog_appl_id;
856: IF (x_request_id = -1) THEN
857: x_request_id := old_references.request_id;
858: x_program_id := old_references.program_id;
851:
852: IF (x_mode = 'R') THEN
853: x_request_id := fnd_global.conc_request_id;
854: x_program_id := fnd_global.conc_program_id;
855: x_program_application_id := fnd_global.prog_appl_id;
856: IF (x_request_id = -1) THEN
857: x_request_id := old_references.request_id;
858: x_program_id := old_references.program_id;
859: x_program_application_id := old_references.program_application_id;