The following lines contain the word 'select', 'insert', 'update' or 'delete':
delete
from oie_pol_rates_interface
where
(
(p_ratetype = 'CONUS' and country = 'UNITED STATES' and state_province not in ('HAWAII', 'ALASKA'))
or
(p_ratetype = 'OCONUS' and (country <> 'UNITED STATES' or state_province in ('HAWAII', 'ALASKA')))
);
select territory_code
from fnd_territories_vl
where upper(territory_short_name) = upper(p_country)
and rownum = 1;
select count(1) fuzzy_count
from fnd_territories_vl
where
(
upper(territory_short_name) like '%'||upper(p_country)||'%'
or
upper(description) like '%'||upper(p_country)||'%'
);
select territory_code
from fnd_territories_vl
where
(
upper(territory_short_name) like '%'||upper(p_country)||'%'
or
upper(description) like '%'||upper(p_country)||'%'
)
and rownum = 1;
select count(1) extreme_fuzzy_count
from fnd_territories_vl
where
(
upper(territory_short_name) like '%'||ap_web_upload_pdm_pkg.myreplace(upper(p_country))||'%'
or
upper(description) like '%'||ap_web_upload_pdm_pkg.myreplace(upper(p_country))||'%'
);
select territory_code
from fnd_territories_vl
where
(
upper(territory_short_name) like '%'||ap_web_upload_pdm_pkg.myreplace(upper(p_country))||'%'
or
upper(description) like '%'||ap_web_upload_pdm_pkg.myreplace(upper(p_country))||'%'
)
and rownum = 1;
select count(1) soundex_count
from fnd_territories_vl
where
(
ap_web_upload_pdm_pkg.mysoundex(upper(territory_short_name)) = ap_web_upload_pdm_pkg.mysoundex(upper(p_country))
or
ap_web_upload_pdm_pkg.mysoundex(upper(description)) = ap_web_upload_pdm_pkg.mysoundex(upper(p_country))
);
select territory_code
from fnd_territories_vl
where
(
ap_web_upload_pdm_pkg.mysoundex(territory_short_name) = ap_web_upload_pdm_pkg.mysoundex(p_country)
or
ap_web_upload_pdm_pkg.mysoundex(description) = ap_web_upload_pdm_pkg.mysoundex(p_country)
)
and rownum = 1;
select ap_pol_locations_s.nextval
into l_location_id
from dual;
insert into AP_POL_LOCATIONS_B (
LOCATION_ID,
TERRITORY_CODE,
UNDEFINED_LOCATION_FLAG,
END_DATE,
STATUS,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
LOCATION_TYPE,
CITY_LOCALITY_ID,
COUNTY_ID,
STATE_PROVINCE_ID,
COUNTRY
) values (
--LOCATION_ID,
l_location_id,
--TERRITORY_CODE,
p_territory_code,
--UNDEFINED_LOCATION_FLAG,
nvl(p_undefined_location, 'N'),
--END_DATE,
null,
--STATUS,
decode(p_territory_code, null, decode(p_undefined_location, 'Y', 'ACTIVE', 'INVALID'), 'ACTIVE'),
--CREATION_DATE,
sysdate,
--CREATED_BY,
fnd_global.user_id,
--LAST_UPDATE_DATE,
sysdate,
--LAST_UPDATED_BY,
fnd_global.user_id,
--LAST_UPDATE_LOGIN,
fnd_global.login_id,
--LOCATION_TYPE,
p_location_type,
--CITY_LOCALITY_ID,
p_city_locality_id,
--COUNTY_ID,
p_county_id,
--STATE_PROVINCE_ID,
p_state_province_id,
--COUNTRY
initcap(p_country)
);
insert into AP_POL_LOCATIONS_TL (
LOCATION_ID,
LOCATION,
DESCRIPTION,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
LANGUAGE,
SOURCE_LANG
) select
--LOCATION_ID,
l_location_id,
--LOCATION,
initcap(p_location),
--DESCRIPTION,
initcap(l_description),
--CREATION_DATE,
sysdate,
--CREATED_BY,
fnd_global.user_id,
--LAST_UPDATE_LOGIN,
fnd_global.login_id,
--LAST_UPDATE_DATE,
sysdate,
--LAST_UPDATED_BY,
fnd_global.user_id,
--LANGUAGE,
L.LANGUAGE_CODE,
--SOURCE_LANG
NVL(userenv('LANG'),BASE.LANGUAGE_CODE)
from FND_LANGUAGES L,
FND_LANGUAGES BASE
where L.INSTALLED_FLAG in ('I', 'B')
AND BASE.INSTALLED_FLAG = 'B'
and not exists
(select NULL
from AP_POL_LOCATIONS_TL T
where T.LOCATION_ID = l_location_id
and T.LANGUAGE = L.LANGUAGE_CODE);
l_stmt := 'select location_id from ap_pol_locations_vl '||
'where location_type = '''|| p_location_type ||''''; --bug #9980633
select location_id
from ap_pol_locations_vl
where city_locality_id = l_city_locality_id
and territory_code = 'US'
and rownum = 1;
select location_id
from ap_pol_locations_vl
where undefined_location_flag = 'Y'
and territory_code is null
and rownum = 1;
select status
from ap_pol_locations_vl
where location_id = p_location_id;
select AP_POL_HEADERS_S.NEXTVAL
into l_policy_id
from dual;
insert into AP_POL_HEADERS
(
POLICY_ID,
CATEGORY_CODE,
SCHEDULE_TYPE_CODE,
SOURCE,
POLICY_NAME,
DESCRIPTION,
CURRENCY_CODE,
CURRENCY_PREFERENCE,
ALLOW_RATE_CONVERSION_CODE,
START_DATE,
LOCATION_FLAG,
PER_DIEM_TYPE_CODE,
MEALS_TYPE_CODE,
FREE_MEALS_FLAG,
FREE_MEALS_CODE,
FREE_ACCOMMODATIONS_FLAG,
FREE_ACCOMMODATIONS_CODE,
NIGHT_RATES_CODE,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE,
LAST_UPDATED_BY
)
values
(
--POLICY_ID,
l_policy_id,
--CATEGORY_CODE,
p_expense_category,
--SCHEDULE_TYPE_CODE,
p_expense_category,
--SOURCE,
'CONUS',
--POLICY_NAME,
p_policy_name,
--DESCRIPTION,
p_policy_name,
--CURRENCY_CODE,
'USD',
--CURRENCY_PREFERENCE,
'SRC',
--ALLOW_RATE_CONVERSION_CODE,
'ALLOW_CONVERSION',
--START_DATE,
p_policy_start_date,
--LOCATION_FLAG,
'Y',
--PER_DIEM_TYPE_CODE,
p_per_diem_type_code,
--MEALS_TYPE_CODE,
p_meals_rate,
--FREE_MEALS_FLAG,
decode(p_free_meals_ded, 'SINGLE', 'Y', 'SPECIFIC', 'Y', null),
--FREE_MEALS_CODE,
p_free_meals_ded,
--FREE_ACCOMMODATIONS_FLAG,
decode(p_use_free_acc_add, 'Y', 'Y', decode(p_use_free_acc_ded, 'Y', 'Y', null)),
--FREE_ACCOMMODATIONS_CODE,
decode(p_use_free_acc_add, 'Y', 'ADD', decode(p_use_free_acc_ded, 'Y', 'DEDUCT', null)),
--NIGHT_RATES_CODE,
decode(p_use_free_acc_add, 'Y', 'SINGLE', null),
--CREATION_DATE,
SYSDATE,
--CREATED_BY,
fnd_global.user_id,
--LAST_UPDATE_LOGIN,
fnd_global.login_id,
--LAST_UPDATE_DATE,
SYSDATE,
--LAST_UPDATED_BY
fnd_global.user_id
);
select AP_POL_SCHEDULE_OPTIONS_S.NEXTVAL
into l_schedule_option_id
from dual;
insert into AP_POL_SCHEDULE_OPTIONS
(
SCHEDULE_OPTION_ID,
POLICY_ID,
OPTION_TYPE,
LOCATION_ID,
STATUS,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE,
LAST_UPDATED_BY
)
values
(
--SCHEDULE_OPTION_ID,
l_schedule_option_id,
--POLICY_ID,
p_policy_id,
--OPTION_TYPE,
'LOCATION',
--LOCATION_ID,
p_location_id,
--STATUS,
'SAVED',
--CREATION_DATE,
SYSDATE,
--CREATED_BY,
fnd_global.user_id,
--LAST_UPDATE_LOGIN,
fnd_global.login_id,
--LAST_UPDATE_DATE,
SYSDATE,
--LAST_UPDATED_BY
fnd_global.user_id
);
select AP_POL_SCHEDULE_PERIODS_S.NEXTVAL
into l_schedule_period_id
from dual;
insert into AP_POL_SCHEDULE_PERIODS
(
SCHEDULE_PERIOD_ID,
SCHEDULE_PERIOD_NAME,
POLICY_ID,
START_DATE,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE,
LAST_UPDATED_BY
)
values
(
--SCHEDULE_PERIOD_ID,
l_schedule_period_id,
--SCHEDULE_PERIOD_NAME,
p_period_name,
--POLICY_ID,
p_policy_id,
--START_DATE,
p_period_start_date,
--CREATION_DATE,
SYSDATE,
--CREATED_BY,
fnd_global.user_id,
--LAST_UPDATE_LOGIN,
fnd_global.login_id,
--LAST_UPDATE_DATE,
SYSDATE,
--LAST_UPDATED_BY
fnd_global.user_id
);
select AP_POL_LINES_S.NEXTVAL
into l_policy_line_id
from dual;
insert into AP_POL_LINES
(
POLICY_LINE_ID,
POLICY_ID,
SCHEDULE_PERIOD_ID,
ROLE_ID,
LOCATION_ID,
CURRENCY_CODE,
RATE,
RATE_TYPE_CODE,
CALCULATION_METHOD,
ACCOMMODATION_CALC_METHOD,
ACCOMMODATION_ADJUSTMENT,
MEALS_DEDUCTION,
BREAKFAST_DEDUCTION,
LUNCH_DEDUCTION,
DINNER_DEDUCTION,
STATUS,
START_OF_SEASON,
END_OF_SEASON,
MAX_LODGING_AMT,
NO_GOVT_MEALS_AMT,
PROP_MEALS_AMT,
OFF_BASE_INC_AMT,
FOOTNOTE_AMT,
FOOTNOTE_RATE_AMT,
MAX_PER_DIEM_AMT,
EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE,
LAST_UPDATED_BY
)
values
(
--POLICY_LINE_ID,
l_policy_line_id,
--POLICY_ID,
p_policy_id,
--SCHEDULE_PERIOD_ID,
p_schedule_period_id,
--ROLE_ID,
p_role_id,
--LOCATION_ID,
p_location_id,
--CURRENCY_CODE,
'USD',
--RATE,
p_rate,
--RATE_TYPE_CODE,
'STANDARD',
--CALCULATION_METHOD,
p_calc_method,
-- Accommodataion Calc Method and Accomodation Adjustment is set only to Night Rate Lines if Free Accomodation is Enabled.- bug 6430013
--ACCOMMODATION_CALC_METHOD,
decode(p_use_free_acc_add, 'Y', null, decode(p_use_free_acc_ded, 'Y', 'AMOUNT', null)),
--ACCOMMODATION_ADJUSTMENT,
decode(p_use_free_acc_add, 'Y', null, decode(p_use_free_acc_ded, 'Y', p_max_lodging_amt, null)),
--MEALS_DEDUCTION,
p_single_deduction,
--BREAKFAST_DEDUCTION,
p_breakfast_deduction,
--LUNCH_DEDUCTION,
p_lunch_deduction,
--DINNER_DEDUCTION,
p_dinner_deduction,
--STATUS,
'NEW',
--START_OF_SEASON,
p_start_of_season,
--END_OF_SEASON,
p_end_of_season,
--MAX_LODGING_AMT,
p_max_lodging_amt,
--NO_GOVT_MEALS_AMT,
p_no_govt_meals_amt,
--PROP_MEALS_AMT,
p_prop_meals_amt,
--OFF_BASE_INC_AMT,
p_off_base_inc_amt,
--FOOTNOTE_AMT,
p_footnote_amt,
--FOOTNOTE_RATE_AMT,
p_footnote_rate_amt,
--MAX_PER_DIEM_AMT,
p_max_per_diem_amt,
--EFFECTIVE_START_DATE,
p_effective_start_date,
--EFFECTIVE_END_DATE,
p_effective_end_date,
--CREATION_DATE,
SYSDATE,
--CREATED_BY,
fnd_global.user_id,
--LAST_UPDATE_LOGIN,
fnd_global.login_id,
--LAST_UPDATE_DATE,
SYSDATE,
--LAST_UPDATED_BY
fnd_global.user_id
);
select AP_POL_LINES_S.NEXTVAL
into l_night_rate_line_id
from dual;
insert into AP_POL_LINES
(
POLICY_LINE_ID,
POLICY_ID,
SCHEDULE_PERIOD_ID,
ROLE_ID,
LOCATION_ID,
CURRENCY_CODE,
RATE,
RATE_TYPE_CODE,
CALCULATION_METHOD,
ACCOMMODATION_CALC_METHOD,
ACCOMMODATION_ADJUSTMENT,
MEALS_DEDUCTION,
BREAKFAST_DEDUCTION,
LUNCH_DEDUCTION,
DINNER_DEDUCTION,
STATUS,
START_OF_SEASON,
END_OF_SEASON,
MAX_LODGING_AMT,
NO_GOVT_MEALS_AMT,
PROP_MEALS_AMT,
OFF_BASE_INC_AMT,
FOOTNOTE_AMT,
FOOTNOTE_RATE_AMT,
MAX_PER_DIEM_AMT,
EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE,
LAST_UPDATED_BY
)
values
(
--POLICY_LINE_ID,
l_night_rate_line_id,
--POLICY_ID,
p_policy_id,
--SCHEDULE_PERIOD_ID,
p_schedule_period_id,
--ROLE_ID,
p_role_id,
--LOCATION_ID,
p_location_id,
--CURRENCY_CODE,
'USD',
--RATE,
p_rate,
--RATE_TYPE_CODE,
'NIGHT_RATE',
--CALCULATION_METHOD,
'AMOUNT',
--ACCOMMODATION_CALC_METHOD,
'AMOUNT',
--ACCOMMODATION_ADJUSTMENT,
p_max_lodging_amt,
--MEALS_DEDUCTION,
p_single_deduction,
--BREAKFAST_DEDUCTION,
p_breakfast_deduction,
--LUNCH_DEDUCTION,
p_lunch_deduction,
--DINNER_DEDUCTION,
p_dinner_deduction,
--STATUS,
'NEW',
--START_OF_SEASON,
p_start_of_season,
--END_OF_SEASON,
p_end_of_season,
--MAX_LODGING_AMT,
p_max_lodging_amt,
--NO_GOVT_MEALS_AMT,
p_no_govt_meals_amt,
--PROP_MEALS_AMT,
p_prop_meals_amt,
--OFF_BASE_INC_AMT,
p_off_base_inc_amt,
--FOOTNOTE_AMT,
p_footnote_amt,
--FOOTNOTE_RATE_AMT,
p_footnote_rate_amt,
--MAX_PER_DIEM_AMT,
p_max_per_diem_amt,
--EFFECTIVE_START_DATE,
p_effective_start_date,
--EFFECTIVE_END_DATE,
p_effective_end_date,
--CREATION_DATE,
SYSDATE,
--CREATED_BY,
fnd_global.user_id,
--LAST_UPDATE_LOGIN,
fnd_global.login_id,
--LAST_UPDATE_DATE,
SYSDATE,
--LAST_UPDATED_BY
fnd_global.user_id
);
select policy_id
from ap_pol_headers
where policy_id = p_policy_id
and rownum = 1;
select schedule_option_id
from ap_pol_schedule_options
where policy_id = p_policy_id
and option_type = 'LOCATION'
and location_id = p_location_id
and rownum = 1;
select schedule_period_id
from ap_pol_schedule_periods
where policy_id = p_policy_id
and rownum = 1;
select policy_line_id
from ap_pol_lines
where policy_id = p_policy_id
and schedule_period_id = p_schedule_period_id
and nvl(role_id, -1) = nvl(p_role_id, -1)
and location_id = p_location_id
and nvl(start_of_season, -1) = nvl(p_start_of_season, -1)
and nvl(end_of_season, -1) = nvl(p_end_of_season, -1)
and effective_start_date = p_effective_start_date
and rownum = 1;
select policy_id
from ap_pol_headers
where category_code = p_expense_category
and upper(policy_name) = upper(p_policy_name)
and rownum = 1;
select schedule_period_id
from ap_pol_schedule_periods
where policy_id = p_policy_id
and upper(schedule_period_name) = upper(p_period_name)
and start_date = p_period_start_date
and rownum = 1;
select max(start_date) as start_date
from ap_pol_schedule_periods
where policy_id = p_policy_id
and rownum = 1;
select per_diem_type_code
from ap_pol_headers
where policy_id = p_policy_id
and rownum = 1;
select meals_type_code
from ap_pol_headers
where policy_id = p_policy_id
and rownum = 1;
select 'Y' rates_exist
from oie_pol_rates_interface
where
(
(p_ratetype = 'CONUS' and country = 'UNITED STATES' and state_province not in ('HAWAII', 'ALASKA'))
or
(p_ratetype = 'OCONUS' and (country <> 'UNITED STATES' or state_province in ('HAWAII', 'ALASKA')))
)
and rownum = 1;
select city_locality,
county,
state_province,
country,
start_of_season,
end_of_season,
max_lodging_amt,
no_govt_meals_amt,
prop_meals_amt,
off_base_inc_amt,
footnote_amt,
footnote_rate_amt,
max_per_diem_amt,
effective_date,
'' as effective_end_date
from oie_pol_rates_interface
where
(
(p_ratetype = 'CONUS' and country = 'UNITED STATES' and state_province not in ('HAWAII', 'ALASKA'))
or
(p_ratetype = 'OCONUS' and (country <> 'UNITED STATES' or state_province in ('HAWAII', 'ALASKA')))
)
order by country, state_province, county, city_locality, to_date(effective_date, 'MM/DD/RRRR') desc, start_of_season desc;
select l1.location_id, min(l1.effective_start_date) as effective_start_date,
'01/01' as start_of_season, '12/31' as end_of_season
from ap_pol_lines l1
where l1.policy_id = l_policy_id
and not exists
(select 'Y'
from ap_pol_lines l2
where l2.policy_id = l1.policy_id
and l2.location_id = l1.location_id
and l2.effective_start_date = p_period_start_date
and rownum = 1
) group by l1.location_id;
select rate, '01/01' as start_of_season, '12/31' as end_of_season
from ap_pol_lines
where policy_id = l_policy_id
and location_id = l_undefined_conus_location_id;
select rate, '01/01' as start_of_season, '12/31' as end_of_season
from ap_pol_lines
where policy_id = l_policy_id
and location_id = l_undefined_location_id;
PROCEDURE UpdateEndDates(
p_policy_id IN NUMBER,
p_schedule_period_id IN NUMBER) IS
BEGIN
update ap_pol_lines apl1
set apl1.effective_end_date =
(
select min(apl2.effective_start_date)-1
from ap_pol_lines apl2
where apl2.policy_id = apl1.policy_id
and apl2.schedule_period_id = apl1.schedule_period_id
and apl2.policy_line_id <> apl1.policy_line_id
and apl2.location_id = apl1.location_id
and apl2.effective_start_date > apl1.effective_start_date
)
where policy_id = p_policy_id
and schedule_period_id = p_schedule_period_id
and apl1.effective_end_date is null
and
exists
(select 'Y'
from ap_pol_lines apl3
where apl3.policy_id = apl1.policy_id
and apl3.schedule_period_id = apl1.schedule_period_id
and apl3.policy_line_id <> apl1.policy_line_id
and apl3.location_id = apl1.location_id
and apl3.effective_start_date > apl1.effective_start_date);
g_num_std_rates_updated := sql%rowcount;
END UpdateEndDates;
PROCEDURE UpdateSchedule(errbuf OUT NOCOPY VARCHAR2,
retcode OUT NOCOPY NUMBER,
p_ratetype IN VARCHAR2,
p_expense_category IN VARCHAR2,
p_policy_id IN NUMBER,
p_period_type IN VARCHAR2,
p_period_id IN VARCHAR2,
p_period_name IN VARCHAR2,
p_period_start_date IN DATE,
p_rate_incl_meals IN VARCHAR2,
p_rate_incl_inc IN VARCHAR2,
p_rate_incl_acc IN VARCHAR2,
p_meals_rate IN VARCHAR2,
p_free_meals_ded IN VARCHAR2,
p_use_free_acc_add IN VARCHAR2,
p_use_free_acc_ded IN VARCHAR2,
p_calc_method IN VARCHAR2,
p_single_deduction IN NUMBER,
p_breakfast_deduction IN NUMBER,
p_lunch_deduction IN NUMBER,
p_dinner_deduction IN NUMBER) IS
------------------------------------------------------------------------
l_debug_info VARCHAR2(200);
select role_id
from ap_pol_schedule_options
where policy_id = p_policy_id
and option_type = AP_WEB_POLICY_UTILS.c_EMPLOYEE_ROLE
and role_id is not null;
select 'Y' rates_exist
from oie_pol_rates_interface
where
(
(p_ratetype = 'CONUS' and country = 'UNITED STATES' and state_province not in ('HAWAII', 'ALASKA'))
or
(p_ratetype = 'OCONUS' and (country <> 'UNITED STATES' or state_province in ('HAWAII', 'ALASKA')))
)
and rownum = 1;
select city_locality,
county,
state_province,
country,
start_of_season,
end_of_season,
max_lodging_amt,
no_govt_meals_amt,
prop_meals_amt,
off_base_inc_amt,
footnote_amt,
footnote_rate_amt,
max_per_diem_amt,
effective_date,
'' as effective_end_date
from oie_pol_rates_interface
where
(
(p_ratetype = 'CONUS' and country = 'UNITED STATES' and state_province not in ('HAWAII', 'ALASKA'))
or
(p_ratetype = 'OCONUS' and (country <> 'UNITED STATES' or state_province in ('HAWAII', 'ALASKA')))
)
order by country, state_province, county, city_locality, to_date(effective_date, 'MM/DD/RRRR') desc, start_of_season desc;
select l1.role_id, l1.location_id, min(l1.effective_start_date) as effective_start_date,
'01/01' as start_of_season, '12/31' as end_of_season
from ap_pol_lines l1
where l1.policy_id = p_policy_id
and not exists
(select 'Y'
from ap_pol_lines l2
where l2.policy_id = l1.policy_id
and nvl(l2.role_id, -1) = nvl(l1.role_id, -1)
and l2.location_id = l1.location_id
and l2.effective_start_date = p_period_start_date
and rownum = 1
) group by l1.role_id, l1.location_id;
select rate, '01/01' as start_of_season, '12/31' as end_of_season
from ap_pol_lines
where policy_id = p_policy_id
and nvl(role_id, -1) = nvl(l_role_id, -1)
and location_id = l_undefined_conus_location_id;
select rate, '01/01' as start_of_season, '12/31' as end_of_season
from ap_pol_lines
where policy_id = p_policy_id
and nvl(role_id, -1) = nvl(l_role_id, -1)
and location_id = l_undefined_location_id;
update ap_pol_schedule_periods
set end_date = p_period_start_date - 1
where policy_id = p_policy_id
and end_date is null;
put_line('Update Schedule Period: '||l_schedule_period_id);
put_line('Update End Dates');
UpdateEndDates(p_policy_id => p_policy_id,
p_schedule_period_id => l_schedule_period_id);
END UpdateSchedule;
g_last_updated_by := to_number(FND_GLOBAL.USER_ID);
g_last_update_login := to_number(FND_GLOBAL.LOGIN_ID);
put_line('Last Updated By = ' || g_last_updated_by);
put_line('Last Update Login = ' || g_last_update_login);
elsif ('UPDATE' = p_action) then
if (nvl(retcode, 0) <> 2 and nvl(l_request_status, 'SUCCESS') = 'SUCCESS') then
UpdateSchedule(errbuf,
retcode,
p_ratetype,
p_expense_category,
p_policy_id,
p_period_type,
p_period_id,
p_period_name,
l_period_start_date,
p_rate_incl_meals,
p_rate_incl_inc,
p_rate_incl_acc,
p_meals_rate,
p_free_meals_ded,
p_use_free_acc_add,
p_use_free_acc_ded,
p_calc_method,
p_single_deduction,
p_breakfast_deduction,
p_lunch_deduction,
p_dinner_deduction);
put_line('Total number of Standard Rates updated = ' || g_num_std_rates_updated);