1: PACKAGE BODY PQP_FLXDU_COLUMNS_PKG AS
2: /* $Header: pqpflxcol.pkb 120.0 2006/04/26 23:52:10 pbhure noship $ */
3:
4: -- ===========================================================================
5: -- This procedure loads data into pqp_flxdu_columns table
1: PACKAGE BODY PQP_FLXDU_COLUMNS_PKG AS
2: /* $Header: pqpflxcol.pkb 120.0 2006/04/26 23:52:10 pbhure noship $ */
3:
4: -- ===========================================================================
5: -- This procedure loads data into pqp_flxdu_columns table
6: -- If data is already there then update else insert
7: -- ===========================================================================
8: PROCEDURE load_row
9: (x_flxdu_column_id IN NUMBER
21: ,x_object_version_number IN NUMBER) IS
22: BEGIN
23: BEGIN
24: -- update row
25: pqp_flxdu_columns_pkg.update_row
26: (x_flxdu_column_id => x_flxdu_column_id
27: ,x_flxdu_column_name => x_flxdu_column_name
28: ,x_flxdu_column_xml_tag => x_flxdu_column_xml_tag
29: ,x_flxdu_column_data_type => x_flxdu_column_data_type
43: ,x_last_update_login => 0 );
44: EXCEPTION
45: -- when no data found then insert
46: WHEN NO_DATA_FOUND THEN
47: pqp_flxdu_columns_pkg.insert_row
48: (x_flxdu_column_id => x_flxdu_column_id
49: ,x_flxdu_column_name => x_flxdu_column_name
50: ,x_flxdu_column_xml_tag => x_flxdu_column_xml_tag
51: ,x_flxdu_column_data_type => x_flxdu_column_data_type
67: END load_row;
68:
69:
70: -- =============================================================================
71: -- This procedure inserts data into pqp_flxdu_columns table
72: -- =============================================================================
73: PROCEDURE insert_row
74: (x_flxdu_column_id IN NUMBER
75: ,x_flxdu_column_name IN VARCHAR2
92:
93: -- cursor to find no of rows being inserted
94: CURSOR cur_flxdu_columns IS
95: SELECT rowid
96: FROM pqp_flxdu_columns;
97:
98: x_rowid rowid;
99:
100: BEGIN
97:
98: x_rowid rowid;
99:
100: BEGIN
101: -- insert into table pqp_flxdu_columns
102: INSERT INTO pqp_flxdu_columns
103: (flxdu_column_id
104: ,flxdu_column_name
105: ,flxdu_column_xml_tag
98: x_rowid rowid;
99:
100: BEGIN
101: -- insert into table pqp_flxdu_columns
102: INSERT INTO pqp_flxdu_columns
103: (flxdu_column_id
104: ,flxdu_column_name
105: ,flxdu_column_xml_tag
106: ,flxdu_column_data_type
149: END insert_row;
150:
151:
152: -- =============================================================================
153: -- This procedure updates data in pqp_flxdu_columns table
154: -- =============================================================================
155: PROCEDURE update_row
156: (x_flxdu_column_id IN NUMBER
157: ,x_flxdu_column_name IN VARCHAR2
171: ,x_last_update_date IN DATE
172: ,x_last_updated_by IN NUMBER
173: ,x_last_update_login IN NUMBER) IS
174: BEGIN
175: -- update table pqp_flxdu_columns
176: UPDATE pqp_flxdu_columns
177: SET flxdu_column_id = x_flxdu_column_id
178: ,flxdu_column_name = x_flxdu_column_name
179: ,flxdu_column_xml_tag = x_flxdu_column_xml_tag
172: ,x_last_updated_by IN NUMBER
173: ,x_last_update_login IN NUMBER) IS
174: BEGIN
175: -- update table pqp_flxdu_columns
176: UPDATE pqp_flxdu_columns
177: SET flxdu_column_id = x_flxdu_column_id
178: ,flxdu_column_name = x_flxdu_column_name
179: ,flxdu_column_xml_tag = x_flxdu_column_xml_tag
180: ,flxdu_column_data_type = x_flxdu_column_data_type
198: RAISE no_data_found;
199: END IF;
200: END update_row;
201:
202: END pqp_flxdu_columns_pkg;