declare
spriden_id_in varchar2(9) := '999999999';
p_pidm_in number := 0;
loaw_ind_in varchar2(1) := 'W';
request_date date := '11-SEP-2012';
p_leave_term_code varchar2(6) := '201310';
probable_return_term varchar2(6) := 'N/A';
p_leav_code_in varchar2(1) := 'F';
p_wdrl_code_in varchar2(2) := 'WO';
begin
-- get the ID
select spriden_pidm into p_pidm_in
from spriden
where spriden_change_ind is null
and spriden_id = spriden_id_in;
pkg_drew_wf_loa_wd.p_drop_reg ( p_pidm_in => p_pidm_in,
loaw_ind_in => loaw_ind_in,
request_date => request_date,
p_leave_term_code => p_leave_term_code,
probable_return_term => probable_return_term );
pkg_drew_wf_loa_wd.p_update_stdn ( p_pidm_in => p_pidm_in,
loaw_ind_in => loaw_ind_in,
request_date => request_date,
p_leave_term_code => p_leave_term_code,
probable_return_term => probable_return_term,
p_leav_code_in => p_leav_code_in );
pkg_drew_wf_loa_wd.p_add_hold ( p_pidm_in => p_pidm_in,
request_date => request_date );
pkg_drew_wf_loa_wd.p_create_wdrl ( p_pidm_in => p_pidm_in,
request_date => request_date,
p_leave_term_code => p_leave_term_code,
p_wdrl_code_in => p_wdrl_code_in );
commit;
end;
/
|