I have the following:
CREATE OR REPLACE PACKAGE PRICE_LIST_REPORTING
AS
PROCEDURE insert_price_list_hdr (
p_price_list_hdr_id IN OUT price_list_hdr.price_list_
hdr_id%TYP
E,
p_tough_disc_amt IN price_list_hdr.tough_disc_
amt%TYPE,
p_damp_disc_amt IN price_list_hdr.damp_disc_a
mt%TYPE,
p_stone_disc_amt IN price_list_hdr.stone_disc_
amt%TYPE,
p_tough_stone_disc_amt IN price_list_hdr.tough_stone
_disc_amt%
TYPE,
p_damp_stone_disc_amt IN price_list_hdr.damp_stone_
disc_amt%T
YPE,
p_price_list_status_type_n
ame IN price_list_hdr.price_list_
status_typ
e_name%TYP
E,
p_load_dtm IN price_list_hdr.load_dtm%TY
PE,
p_user_name IN price_list_hdr.user_name%T
YPE,
p_wht_indr_flag IN price_list_hdr.wht_indr_fl
ag%TYPE,
p_durum_indr_flag IN price_list_hdr.durum_indr_
flag%TYPE,
p_bly_indr_flag IN price_list_hdr.bly_indr_fl
ag%TYPE,
p_desigtd_bly_indr_flag IN price_list_hdr.desigtd_bly
_indr_flag
%TYPE,
p_load_type_name IN price_list_hdr.load_type_n
ame%TYPE,
p_wht_basis_num IN price_list_hdr.wht_basis_n
um%TYPE,
p_durum_basis_num IN price_list_hdr.durum_basis
_num%TYPE,
p_bly_basis_num IN price_list_hdr.bly_basis_n
um%TYPE,
p_desigtd_bly_basis_num IN price_list_hdr.desigtd_bly
_basis_num
%TYPE,
p_src_file_path_desc IN price_list_hdr.src_file_pa
th_desc%TY
PE,
p_pool_part_code IN price_list_hdr.pool_part_c
ode%TYPE,
p_sct_price_list_name IN price_list_hdr.sct_price_l
ist_name%T
YPE,
p_sct_effctv_dtm IN price_list_hdr.sct_effctv_
dtm%TYPE,
p_row_cnt_qty IN price_list_hdr.row_cnt_qty
%TYPE,
p_price_sum_amt IN price_list_hdr.price_sum_a
mt%TYPE
);
PROCEDURE update_price_list_hdr (
p_price_list_hdr_id IN price_list_hdr.price_list_
hdr_id%TYP
E,
p_tough_disc_amt IN price_list_hdr.tough_disc_
amt%TYPE,
p_damp_disc_amt IN price_list_hdr.damp_disc_a
mt%TYPE,
p_stone_disc_amt IN price_list_hdr.stone_disc_
amt%TYPE,
p_tough_stone_disc_amt IN price_list_hdr.tough_stone
_disc_amt%
TYPE,
p_damp_stone_disc_amt IN price_list_hdr.damp_stone_
disc_amt%T
YPE,
p_price_list_status_type_n
ame IN price_list_hdr.price_list_
status_typ
e_name%TYP
E,
p_load_dtm IN price_list_hdr.load_dtm%TY
PE,
p_user_name IN price_list_hdr.user_name%T
YPE,
p_wht_indr_flag IN price_list_hdr.wht_indr_fl
ag%TYPE,
p_durum_indr_flag IN price_list_hdr.durum_indr_
flag%TYPE,
p_bly_indr_flag IN price_list_hdr.bly_indr_fl
ag%TYPE,
p_desigtd_bly_indr_flag IN price_list_hdr.desigtd_bly
_indr_flag
%TYPE,
p_load_type_name IN price_list_hdr.load_type_n
ame%TYPE,
p_wht_basis_num IN price_list_hdr.wht_basis_n
um%TYPE,
p_durum_basis_num IN price_list_hdr.durum_basis
_num%TYPE,
p_bly_basis_num IN price_list_hdr.bly_basis_n
um%TYPE,
p_desigtd_bly_basis_num IN price_list_hdr.desigtd_bly
_basis_num
%TYPE,
p_src_file_path_desc IN price_list_hdr.src_file_pa
th_desc%TY
PE,
p_pool_part_code IN price_list_hdr.pool_part_c
ode%TYPE,
p_sct_price_list_name IN price_list_hdr.sct_price_l
ist_name%T
YPE,
p_sct_effctv_dtm IN price_list_hdr.sct_effctv_
dtm%TYPE,
p_row_cnt_qty IN price_list_hdr.row_cnt_qty
%TYPE,
p_price_sum_amt IN price_list_hdr.price_sum_a
mt%TYPE
);
PROCEDURE delete_price_list_hdr (
p_price_list_hdr_id IN price_list_hdr.price_list_
hdr_id%TYP
E
);
END PRICE_LIST_REPORTING;
/
CREATE OR REPLACE PACKAGE BODY PRICE_LIST_REPORTING
AS
PROCEDURE insert_price_list_hdr (
p_price_list_hdr_id IN OUT price_list_hdr.price_list_
hdr_id%TYP
E,
p_tough_disc_amt IN price_list_hdr.tough_disc_
amt%TYPE,
p_damp_disc_amt IN price_list_hdr.damp_disc_a
mt%TYPE,
p_stone_disc_amt IN price_list_hdr.stone_disc_
amt%TYPE,
p_tough_stone_disc_amt IN price_list_hdr.tough_stone
_disc_amt%
TYPE,
p_damp_stone_disc_amt IN price_list_hdr.damp_stone_
disc_amt%T
YPE,
p_price_list_status_type_n
ame IN price_list_hdr.price_list_
status_typ
e_name%TYP
E,
p_load_dtm IN price_list_hdr.load_dtm%TY
PE,
p_user_name IN price_list_hdr.user_name%T
YPE,
p_wht_indr_flag IN price_list_hdr.wht_indr_fl
ag%TYPE,
p_durum_indr_flag IN price_list_hdr.durum_indr_
flag%TYPE,
p_bly_indr_flag IN price_list_hdr.bly_indr_fl
ag%TYPE,
p_desigtd_bly_indr_flag IN price_list_hdr.desigtd_bly
_indr_flag
%TYPE,
p_load_type_name IN price_list_hdr.load_type_n
ame%TYPE,
p_wht_basis_num IN price_list_hdr.wht_basis_n
um%TYPE,
p_durum_basis_num IN price_list_hdr.durum_basis
_num%TYPE,
p_bly_basis_num IN price_list_hdr.bly_basis_n
um%TYPE,
p_desigtd_bly_basis_num IN price_list_hdr.desigtd_bly
_basis_num
%TYPE,
p_src_file_path_desc IN price_list_hdr.src_file_pa
th_desc%TY
PE,
p_pool_part_code IN price_list_hdr.pool_part_c
ode%TYPE,
p_sct_price_list_name IN price_list_hdr.sct_price_l
ist_name%T
YPE,
p_sct_effctv_dtm IN price_list_hdr.sct_effctv_
dtm%TYPE,
p_row_cnt_qty IN price_list_hdr.row_cnt_qty
%TYPE,
p_price_sum_amt IN price_list_hdr.price_sum_a
mt%TYPE
)
IS
BEGIN
INSERT INTO price_list_hdr
(price_list_hdr_id, tough_disc_amt, damp_disc_amt,
stone_disc_amt, tough_stone_disc_amt,
damp_stone_disc_amt, price_list_status_type_nam
e,
load_dtm, user_name, wht_indr_flag,
durum_indr_flag, bly_indr_flag,
desigtd_bly_indr_flag, load_type_name,
wht_basis_num, durum_basis_num, bly_basis_num,
desigtd_bly_basis_num, src_file_path_desc,
pool_part_code, sct_price_list_name,
sct_effctv_dtm, row_cnt_qty, price_sum_amt
)
VALUES (p_price_list_hdr_id, p_tough_disc_amt, p_damp_disc_amt,
p_stone_disc_amt, p_tough_stone_disc_amt,
p_damp_stone_disc_amt, p_price_list_status_type_n
ame,
p_load_dtm, p_user_name, p_wht_indr_flag,
p_durum_indr_flag, p_bly_indr_flag,
p_desigtd_bly_indr_flag, p_load_type_name,
p_wht_basis_num, p_durum_basis_num, p_bly_basis_num,
p_desigtd_bly_basis_num, p_src_file_path_desc,
p_pool_part_code, p_sct_price_list_name,
p_sct_effctv_dtm, p_row_cnt_qty, p_price_sum_amt
);
END insert_price_list_hdr;
PROCEDURE update_price_list_hdr (
p_price_list_hdr_id IN price_list_hdr.price_list_
hdr_id%TYP
E,
p_tough_disc_amt IN price_list_hdr.tough_disc_
amt%TYPE,
p_damp_disc_amt IN price_list_hdr.damp_disc_a
mt%TYPE,
p_stone_disc_amt IN price_list_hdr.stone_disc_
amt%TYPE,
p_tough_stone_disc_amt IN price_list_hdr.tough_stone
_disc_amt%
TYPE,
p_damp_stone_disc_amt IN price_list_hdr.damp_stone_
disc_amt%T
YPE,
p_price_list_status_type_n
ame IN price_list_hdr.price_list_
status_typ
e_name%TYP
E,
p_load_dtm IN price_list_hdr.load_dtm%TY
PE,
p_user_name IN price_list_hdr.user_name%T
YPE,
p_wht_indr_flag IN price_list_hdr.wht_indr_fl
ag%TYPE,
p_durum_indr_flag IN price_list_hdr.durum_indr_
flag%TYPE,
p_bly_indr_flag IN price_list_hdr.bly_indr_fl
ag%TYPE,
p_desigtd_bly_indr_flag IN price_list_hdr.desigtd_bly
_indr_flag
%TYPE,
p_load_type_name IN price_list_hdr.load_type_n
ame%TYPE,
p_wht_basis_num IN price_list_hdr.wht_basis_n
um%TYPE,
p_durum_basis_num IN price_list_hdr.durum_basis
_num%TYPE,
p_bly_basis_num IN price_list_hdr.bly_basis_n
um%TYPE,
p_desigtd_bly_basis_num IN price_list_hdr.desigtd_bly
_basis_num
%TYPE,
p_src_file_path_desc IN price_list_hdr.src_file_pa
th_desc%TY
PE,
p_pool_part_code IN price_list_hdr.pool_part_c
ode%TYPE,
p_sct_price_list_name IN price_list_hdr.sct_price_l
ist_name%T
YPE,
p_sct_effctv_dtm IN price_list_hdr.sct_effctv_
dtm%TYPE,
p_row_cnt_qty IN price_list_hdr.row_cnt_qty
%TYPE,
p_price_sum_amt IN price_list_hdr.price_sum_a
mt%TYPE
)
IS
BEGIN
UPDATE price_list_hdr
SET tough_disc_amt = p_tough_disc_amt,
damp_disc_amt = p_damp_disc_amt,
stone_disc_amt = p_stone_disc_amt,
tough_stone_disc_amt = p_tough_stone_disc_amt,
damp_stone_disc_amt = p_damp_stone_disc_amt,
price_list_status_type_nam
e = p_price_list_status_type_n
ame,
load_dtm = p_load_dtm,
user_name = p_user_name,
wht_indr_flag = p_wht_indr_flag,
durum_indr_flag = p_durum_indr_flag,
bly_indr_flag = p_bly_indr_flag,
desigtd_bly_indr_flag = p_desigtd_bly_indr_flag,
load_type_name = p_load_type_name,
wht_basis_num = p_wht_basis_num,
durum_basis_num = p_durum_basis_num,
bly_basis_num = p_bly_basis_num,
desigtd_bly_basis_num = p_desigtd_bly_basis_num,
src_file_path_desc = p_src_file_path_desc,
pool_part_code = p_pool_part_code,
sct_price_list_name = p_sct_price_list_name,
sct_effctv_dtm = p_sct_effctv_dtm,
row_cnt_qty = p_row_cnt_qty,
price_sum_amt = p_price_sum_amt
WHERE price_list_hdr_id = p_price_list_hdr_id;
END update_price_list_hdr;
PROCEDURE delete_price_list_hdr (
p_price_list_hdr_id IN price_list_hdr.price_list_
hdr_id%TYP
E
)
IS
BEGIN
DELETE FROM price_list_hdr
WHERE price_list_hdr_id = p_price_list_hdr_id;
END delete_price_list_hdr;
END PRICE_LIST_REPORTING;
/
I get error in line one.
Start Free Trial