Post date: Aug 06, 2013 9:51:5 AM
/* Formatted on 2013/08/06 16:41 (Formatter Plus v4.8.8) */
DECLARE
l_responsibility_id NUMBER;
l_application_id NUMBER;
l_user_id NUMBER := fnd_global.user_id;
x_user_id NUMBER;
l_password VARCHAR2 (2000) := 'welcome';
BEGIN
apps.hr_user_acct_internal.create_fnd_user (p_user_name => 'operations',
p_password => l_password,
p_employee_id => NULL,
p_user_id => x_user_id,
p_user_start_date => SYSDATE,
p_email_address => NULL,
p_description => NULL,
p_password_date => NULL
);
DBMS_OUTPUT.put_line (x_user_id);
IF x_user_id IS NOT NULL
THEN
UPDATE fnd_user
SET password_lifespan_days = 90
WHERE user_id = x_user_id;
COMMIT;
END IF;
END;