Advertisement

06.06.2008 at 02:32PM PDT, ID: 23465149
[x]
Attachment Details

Storeprocs.

Asked by mathieu_cupryk in Oracle Database

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%TYPE,
        p_tough_disc_amt                IN       price_list_hdr.tough_disc_amt%TYPE,
        p_damp_disc_amt                 IN       price_list_hdr.damp_disc_amt%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%TYPE,
        p_price_list_status_type_name   IN       price_list_hdr.price_list_status_type_name%TYPE,
        p_load_dtm                      IN       price_list_hdr.load_dtm%TYPE,
        p_user_name                     IN       price_list_hdr.user_name%TYPE,
        p_wht_indr_flag                 IN       price_list_hdr.wht_indr_flag%TYPE,
        p_durum_indr_flag               IN       price_list_hdr.durum_indr_flag%TYPE,
        p_bly_indr_flag                 IN       price_list_hdr.bly_indr_flag%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_name%TYPE,
        p_wht_basis_num                 IN       price_list_hdr.wht_basis_num%TYPE,
        p_durum_basis_num               IN       price_list_hdr.durum_basis_num%TYPE,
        p_bly_basis_num                 IN       price_list_hdr.bly_basis_num%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_path_desc%TYPE,
        p_pool_part_code                IN       price_list_hdr.pool_part_code%TYPE,
        p_sct_price_list_name           IN       price_list_hdr.sct_price_list_name%TYPE,
        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_amt%TYPE
    );
 
    PROCEDURE update_price_list_hdr (
        p_price_list_hdr_id             IN   price_list_hdr.price_list_hdr_id%TYPE,
        p_tough_disc_amt                IN   price_list_hdr.tough_disc_amt%TYPE,
        p_damp_disc_amt                 IN   price_list_hdr.damp_disc_amt%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%TYPE,
        p_price_list_status_type_name   IN   price_list_hdr.price_list_status_type_name%TYPE,
        p_load_dtm                      IN   price_list_hdr.load_dtm%TYPE,
        p_user_name                     IN   price_list_hdr.user_name%TYPE,
        p_wht_indr_flag                 IN   price_list_hdr.wht_indr_flag%TYPE,
        p_durum_indr_flag               IN   price_list_hdr.durum_indr_flag%TYPE,
        p_bly_indr_flag                 IN   price_list_hdr.bly_indr_flag%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_name%TYPE,
        p_wht_basis_num                 IN   price_list_hdr.wht_basis_num%TYPE,
        p_durum_basis_num               IN   price_list_hdr.durum_basis_num%TYPE,
        p_bly_basis_num                 IN   price_list_hdr.bly_basis_num%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_path_desc%TYPE,
        p_pool_part_code                IN   price_list_hdr.pool_part_code%TYPE,
        p_sct_price_list_name           IN   price_list_hdr.sct_price_list_name%TYPE,
        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_amt%TYPE
    );
 
    PROCEDURE delete_price_list_hdr (
        p_price_list_hdr_id   IN   price_list_hdr.price_list_hdr_id%TYPE
    );
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%TYPE,
        p_tough_disc_amt                IN       price_list_hdr.tough_disc_amt%TYPE,
        p_damp_disc_amt                 IN       price_list_hdr.damp_disc_amt%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%TYPE,
        p_price_list_status_type_name   IN       price_list_hdr.price_list_status_type_name%TYPE,
        p_load_dtm                      IN       price_list_hdr.load_dtm%TYPE,
        p_user_name                     IN       price_list_hdr.user_name%TYPE,
        p_wht_indr_flag                 IN       price_list_hdr.wht_indr_flag%TYPE,
        p_durum_indr_flag               IN       price_list_hdr.durum_indr_flag%TYPE,
        p_bly_indr_flag                 IN       price_list_hdr.bly_indr_flag%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_name%TYPE,
        p_wht_basis_num                 IN       price_list_hdr.wht_basis_num%TYPE,
        p_durum_basis_num               IN       price_list_hdr.durum_basis_num%TYPE,
        p_bly_basis_num                 IN       price_list_hdr.bly_basis_num%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_path_desc%TYPE,
        p_pool_part_code                IN       price_list_hdr.pool_part_code%TYPE,
        p_sct_price_list_name           IN       price_list_hdr.sct_price_list_name%TYPE,
        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_amt%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_name,
                     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_name,
                     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%TYPE,
        p_tough_disc_amt                IN   price_list_hdr.tough_disc_amt%TYPE,
        p_damp_disc_amt                 IN   price_list_hdr.damp_disc_amt%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%TYPE,
        p_price_list_status_type_name   IN   price_list_hdr.price_list_status_type_name%TYPE,
        p_load_dtm                      IN   price_list_hdr.load_dtm%TYPE,
        p_user_name                     IN   price_list_hdr.user_name%TYPE,
        p_wht_indr_flag                 IN   price_list_hdr.wht_indr_flag%TYPE,
        p_durum_indr_flag               IN   price_list_hdr.durum_indr_flag%TYPE,
        p_bly_indr_flag                 IN   price_list_hdr.bly_indr_flag%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_name%TYPE,
        p_wht_basis_num                 IN   price_list_hdr.wht_basis_num%TYPE,
        p_durum_basis_num               IN   price_list_hdr.durum_basis_num%TYPE,
        p_bly_basis_num                 IN   price_list_hdr.bly_basis_num%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_path_desc%TYPE,
        p_pool_part_code                IN   price_list_hdr.pool_part_code%TYPE,
        p_sct_price_list_name           IN   price_list_hdr.sct_price_list_name%TYPE,
        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_amt%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_name = p_price_list_status_type_name,
               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%TYPE
    )
    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
[+][-]06.06.2008 at 02:35PM PDT, ID: 21732870

Often, when Experts are collaborating with members who have asked questions, they will request additional information about the problem. Askers respond with an author comment like this one.

Start your 7-day free trial to view this Author Comment or ask the Experts your question.

 
[+][-]06.07.2008 at 04:28AM PDT, ID: 21735067

At Experts Exchange, members can ask their questions to thousands of technology professionals, also known as Experts. Experts compete and collaborate to answer those questions by leaving comments like this one.

Start your 7-day free trial to view this Expert Comment or ask the Experts your question.

 
[+][-]06.07.2008 at 06:53AM PDT, ID: 21735459

At Experts Exchange, members can ask their questions to thousands of technology professionals, also known as Experts. Experts compete and collaborate to answer those questions by leaving comments like this one.

Start your 7-day free trial to view this Expert Comment or ask the Experts your question.

 
[+][-]06.07.2008 at 08:43AM PDT, ID: 21735915

Often, when Experts are collaborating with members who have asked questions, they will request additional information about the problem. Askers respond with an author comment like this one.

Start your 7-day free trial to view this Author Comment or ask the Experts your question.

 
[+][-]06.07.2008 at 09:17AM PDT, ID: 21736039

At Experts Exchange, members can ask their questions to thousands of technology professionals, also known as Experts. Experts compete and collaborate to answer those questions by leaving comments like this one.

Start your 7-day free trial to view this Expert Comment or ask the Experts your question.

 
[+][-]06.07.2008 at 09:18AM PDT, ID: 21736041

View this solution now by starting your 7-day free trial. Setting up your free trial is quick, easy, and secure. We will return you to this solution, unlocked, when you're done.

 

About this solution

Zone: Oracle Database
Sign Up Now!
Solution Provided By: mathieu_cupryk
Participating Experts: 2
Solution Grade: A
 
 
[+][-]06.07.2008 at 09:35AM PDT, ID: 21736076

At Experts Exchange, members can ask their questions to thousands of technology professionals, also known as Experts. Experts compete and collaborate to answer those questions by leaving comments like this one.

Start your 7-day free trial to view this Expert Comment or ask the Experts your question.

 
[+][-]06.07.2008 at 09:37AM PDT, ID: 21736080

Often, when Experts are collaborating with members who have asked questions, they will request additional information about the problem. Askers respond with an author comment like this one.

Start your 7-day free trial to view this Author Comment or ask the Experts your question.

 
[+][-]06.07.2008 at 09:37AM PDT, ID: 21736081

At Experts Exchange, members can ask their questions to thousands of technology professionals, also known as Experts. Experts compete and collaborate to answer those questions by leaving comments like this one.

Start your 7-day free trial to view this Expert Comment or ask the Experts your question.

 
[+][-]06.07.2008 at 09:39AM PDT, ID: 21736083

Often, when Experts are collaborating with members who have asked questions, they will request additional information about the problem. Askers respond with an author comment like this one.

Start your 7-day free trial to view this Author Comment or ask the Experts your question.

 
[+][-]06.07.2008 at 11:16AM PDT, ID: 21736379

Experts Exchange has a courteous staff of administrators who help members get the most out of the website by means of administrative comments like this one.

Start your 7-day free trial to view this Administrative Comment or ask the Experts your question.

 
[+][-]06.07.2008 at 03:45PM PDT, ID: 21736978

Often, when Experts are collaborating with members who have asked questions, they will request additional information about the problem. Askers respond with an author comment like this one.

Start your 7-day free trial to view this Author Comment or ask the Experts your question.

 
[+][-]06.08.2008 at 03:29AM PDT, ID: 21738043

Experts Exchange has a courteous staff of administrators who help members get the most out of the website by means of administrative comments like this one.

Start your 7-day free trial to view this Administrative Comment or ask the Experts your question.

 
[+][-]06.08.2008 at 06:43AM PDT, ID: 21738355

At Experts Exchange, members can ask their questions to thousands of technology professionals, also known as Experts. Experts compete and collaborate to answer those questions by leaving comments like this one.

Start your 7-day free trial to view this Expert Comment or ask the Experts your question.

 
[+][-]06.08.2008 at 12:35PM PDT, ID: 21739305

Often, when Experts are collaborating with members who have asked questions, they will request additional information about the problem. Askers respond with an author comment like this one.

Start your 7-day free trial to view this Author Comment or ask the Experts your question.

 
[+][-]06.08.2008 at 01:33PM PDT, ID: 21739459

Experts Exchange has a courteous staff of administrators who help members get the most out of the website by means of administrative comments like this one.

Start your 7-day free trial to view this Administrative Comment or ask the Experts your question.

 
[+][-]06.08.2008 at 01:36PM PDT, ID: 21739471

Often, when Experts are collaborating with members who have asked questions, they will request additional information about the problem. Askers respond with an author comment like this one.

Start your 7-day free trial to view this Author Comment or ask the Experts your question.

 
 
Loading Advertisement...
20080716-EE-VQP-32 / EE_QW_2_20070628