92: p_user_id,
93: p_result_status,
94: 'N');
95:
96: insert into QP_ARCH_CRITERIA_LINES
97: (request_id,
98: parameter_name,
99: parameter_value)
100: values
101: (p_conc_request_id,
102: 'ENTITY_TYPE',
103: p_entity_type);
104:
105: insert into QP_ARCH_CRITERIA_LINES
106: (request_id,
107: parameter_name,
108: parameter_value)
109: values
112: p_entity);
113:
114: IF nvl(p_all_lines,'N') = 'Y' THEN
115:
116: insert into QP_ARCH_CRITERIA_LINES
117: (request_id,
118: parameter_name,
119: parameter_value)
120: values
126: ELSE --All Lines not checked
127:
128: IF p_product_context is not null THEN
129:
130: insert into QP_ARCH_CRITERIA_LINES
131: (request_id,
132: parameter_name,
133: parameter_value)
134: values
139: END IF;
140:
141: IF p_product_attribute is not null THEN
142:
143: insert into QP_ARCH_CRITERIA_LINES
144: (request_id,
145: parameter_name,
146: parameter_value)
147: values
152: END IF;
153:
154: IF p_product_attr_value_from is not null THEN
155:
156: insert into QP_ARCH_CRITERIA_LINES
157: (request_id,
158: parameter_name,
159: parameter_value)
160: values
165: END IF;
166:
167: IF p_product_attr_value_to is not null THEN
168:
169: insert into QP_ARCH_CRITERIA_LINES
170: (request_id,
171: parameter_name,
172: parameter_value)
173: values
178: END IF;
179:
180: IF p_start_date_active is not null THEN
181:
182: insert into QP_ARCH_CRITERIA_LINES
183: (request_id,
184: parameter_name,
185: parameter_value)
186: values
191: END IF;
192:
193: IF p_end_date_active is not null THEN
194:
195: insert into QP_ARCH_CRITERIA_LINES
196: (request_id,
197: parameter_name,
198: parameter_value)
199: values
204: END IF;
205:
206: IF p_created_by is not null THEN
207:
208: insert into QP_ARCH_CRITERIA_LINES
209: (request_id,
210: parameter_name,
211: parameter_value)
212: values
217: END IF;
218:
219: IF p_creation_date is not null THEN
220:
221: insert into QP_ARCH_CRITERIA_LINES
222: (request_id,
223: parameter_name,
224: parameter_value)
225: values
2456:
2457: errbuf := '';
2458: retcode := 0;
2459:
2460: --Call INSERT_CRITERIA to insert records into QP_ARCH_CRITERIA_HEADERS and QP_ARCH_CRITERIA_LINES
2461: INSERT_CRITERIA(p_archive_name,p_entity_type,p_source_system_code,p_entity,p_all_lines,p_product_context,
2462: p_product_attribute,p_product_attr_value_from,p_product_attr_value_to,p_start_date_active,
2463: p_end_date_active,p_creation_date,p_created_by,l_user_id,l_conc_request_id,'S');
2464: ELSE
2467:
2468: errbuf := 'Few lines matching the criteria were not Archived';
2469: retcode := 0;
2470:
2471: --Call INSERT_CRITERIA to insert records into QP_ARCH_CRITERIA_HEADERS and QP_ARCH_CRITERIA_LINES
2472: INSERT_CRITERIA(p_archive_name,p_entity_type,p_source_system_code,p_entity,p_all_lines,p_product_context,
2473: p_product_attribute,p_product_attr_value_from,p_product_attr_value_to,p_start_date_active,
2474: p_end_date_active,p_creation_date,p_created_by,l_user_id,l_conc_request_id,'S');
2475: END IF; --l_err_count
2481:
2482: errbuf := 'No Data Found - 0 Records Archived';
2483: retcode := 1;
2484:
2485: --Call INSERT_CRITERIA to insert records into QP_ARCH_CRITERIA_HEADERS and QP_ARCH_CRITERIA_LINES
2486: INSERT_CRITERIA(p_archive_name,p_entity_type,p_source_system_code,p_entity,p_all_lines,p_product_context,
2487: p_product_attribute,p_product_attr_value_from,p_product_attr_value_to,p_start_date_active,
2488: p_end_date_active,p_creation_date,p_created_by,l_user_id,l_conc_request_id,'W');
2489: WHEN OTHERS THEN
2491: fnd_file.put_line(FND_FILE.LOG,substr(sqlerrm,1,300));
2492:
2493: retcode := 2;
2494:
2495: --Call INSERT_CRITERIA to insert records into QP_ARCH_CRITERIA_HEADERS and QP_ARCH_CRITERIA_LINES
2496: INSERT_CRITERIA(p_archive_name,p_entity_type,p_source_system_code,p_entity,p_all_lines,p_product_context,
2497: p_product_attribute,p_product_attr_value_from,p_product_attr_value_to,p_start_date_active,
2498: p_end_date_active,p_creation_date,p_created_by,l_user_id,l_conc_request_id,'F');
2499: END ARCHIVE_ENTITY;