DBA Data[Home] [Help]

APPS.QP_DATA_COMPARE_PVT dependencies on UTL_FILE

Line 10: l_file UTL_FILE.file_type;

6: p_file_dir VARCHAR2,
7: x_return_status OUT NOCOPY VARCHAR2) IS
8:
9: l_filename VARCHAR2(60);
10: l_file UTL_FILE.file_type;
11: l_html_list_header_id NUMBER;
12: l_forms_list_header_id NUMBER;
13: l_header_string VARCHAR2(2000);
14: l_header_string1 VARCHAR2(255);

Line 79: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'w');

75:
76: l_filename := 'QP_HTML_' || p_html_list_line_id||'_FORMS_'||p_forms_list_line_id || '.dat' ;
77:
78: BEGIN
79: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'w');
80: EXCEPTION
81: WHEN UTL_FILE.INVALID_PATH THEN
82: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
83: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');

Line 81: WHEN UTL_FILE.INVALID_PATH THEN

77:
78: BEGIN
79: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'w');
80: EXCEPTION
81: WHEN UTL_FILE.INVALID_PATH THEN
82: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
83: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
84: RETURN;
85: END;

Line 83: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');

79: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'w');
80: EXCEPTION
81: WHEN UTL_FILE.INVALID_PATH THEN
82: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
83: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
84: RETURN;
85: END;
86:
87: utl_file.put(l_file,'LIST_HEADERS');

Line 87: utl_file.put(l_file,'LIST_HEADERS');

83: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
84: RETURN;
85: END;
86:
87: utl_file.put(l_file,'LIST_HEADERS');
88: utl_file.new_line(l_file);
89:
90: OPEN csr_get_list_header_id(p_html_list_line_id);
91: FETCH csr_get_list_header_id INTO l_html_list_header_id;

Line 88: utl_file.new_line(l_file);

84: RETURN;
85: END;
86:
87: utl_file.put(l_file,'LIST_HEADERS');
88: utl_file.new_line(l_file);
89:
90: OPEN csr_get_list_header_id(p_html_list_line_id);
91: FETCH csr_get_list_header_id INTO l_html_list_header_id;
92: CLOSE csr_get_list_header_id;

Line 109: utl_file.put(l_file,l_header_string);

105: l_header_string4 := 'Locked_From_List_Header_Id,Language,Source_Lang,Name,Description,Version_No';
106: l_header_string := l_header_string1 || l_header_string2 || l_header_string3 || l_header_string4;
107:
108:
109: utl_file.put(l_file,l_header_string);
110: utl_file.new_line(l_file);
111:
112: l_data_rec := 'FORMS' || ',';
113: l_data_rec := l_data_rec || l_header_rec.list_header_id || ',';

Line 110: utl_file.new_line(l_file);

106: l_header_string := l_header_string1 || l_header_string2 || l_header_string3 || l_header_string4;
107:
108:
109: utl_file.put(l_file,l_header_string);
110: utl_file.new_line(l_file);
111:
112: l_data_rec := 'FORMS' || ',';
113: l_data_rec := l_data_rec || l_header_rec.list_header_id || ',';
114: l_data_rec := l_data_rec || l_header_rec.request_id || ',';

Line 155: utl_file.put(l_file,l_data_rec);

151: l_data_rec := l_data_rec || l_header_rec.name || ',';
152: l_data_rec := l_data_rec || l_header_rec.description || ',';
153: l_data_rec := l_data_rec || l_header_rec.version_no;
154:
155: utl_file.put(l_file,l_data_rec);
156: utl_file.new_line(l_file);
157:
158: l_header_rec := l_reset_header_rec;
159:

Line 156: utl_file.new_line(l_file);

152: l_data_rec := l_data_rec || l_header_rec.description || ',';
153: l_data_rec := l_data_rec || l_header_rec.version_no;
154:
155: utl_file.put(l_file,l_data_rec);
156: utl_file.new_line(l_file);
157:
158: l_header_rec := l_reset_header_rec;
159:
160: OPEN csr_get_list_headers(l_html_list_header_id);

Line 207: utl_file.put(l_file,l_data_rec);

203: l_data_rec := l_data_rec || l_header_rec.name || ',';
204: l_data_rec := l_data_rec || l_header_rec.description || ',';
205: l_data_rec := l_data_rec || l_header_rec.version_no;
206:
207: utl_file.put(l_file,l_data_rec);
208:
209: utl_file.fclose(l_file);
210:
211: x_return_status := 'S';

Line 209: utl_file.fclose(l_file);

205: l_data_rec := l_data_rec || l_header_rec.version_no;
206:
207: utl_file.put(l_file,l_data_rec);
208:
209: utl_file.fclose(l_file);
210:
211: x_return_status := 'S';
212:
213: END List_Header_Data;

Line 221: l_file UTL_FILE.file_type;

217: p_file_dir VARCHAR2,
218: x_return_status OUT NOCOPY VARCHAR2) IS
219:
220: l_filename VARCHAR2(60);
221: l_file UTL_FILE.file_type;
222: l_html_list_header_id NUMBER;
223: l_forms_list_header_id NUMBER;
224: l_qual_string VARCHAR2(2000);
225: l_qual_string1 VARCHAR2(255);

Line 289: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');

285:
286: l_filename := 'QP_HTML_' || p_html_list_line_id||'_FORMS_'||p_forms_list_line_id || '.dat' ;
287:
288: BEGIN
289: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');
290: EXCEPTION
291: WHEN UTL_FILE.INVALID_PATH THEN
292: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
293: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');

Line 291: WHEN UTL_FILE.INVALID_PATH THEN

287:
288: BEGIN
289: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');
290: EXCEPTION
291: WHEN UTL_FILE.INVALID_PATH THEN
292: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
293: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
294: RETURN;
295: END;

Line 293: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');

289: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');
290: EXCEPTION
291: WHEN UTL_FILE.INVALID_PATH THEN
292: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
293: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
294: RETURN;
295: END;
296:
297: utl_file.new_line(l_file);

Line 297: utl_file.new_line(l_file);

293: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
294: RETURN;
295: END;
296:
297: utl_file.new_line(l_file);
298: utl_file.put(l_file,'QUALIFIERS');
299: utl_file.new_line(l_file);
300:
301: OPEN csr_get_list_header_id(p_html_list_line_id);

Line 298: utl_file.put(l_file,'QUALIFIERS');

294: RETURN;
295: END;
296:
297: utl_file.new_line(l_file);
298: utl_file.put(l_file,'QUALIFIERS');
299: utl_file.new_line(l_file);
300:
301: OPEN csr_get_list_header_id(p_html_list_line_id);
302: FETCH csr_get_list_header_id INTO l_html_list_header_id;

Line 299: utl_file.new_line(l_file);

295: END;
296:
297: utl_file.new_line(l_file);
298: utl_file.put(l_file,'QUALIFIERS');
299: utl_file.new_line(l_file);
300:
301: OPEN csr_get_list_header_id(p_html_list_line_id);
302: FETCH csr_get_list_header_id INTO l_html_list_header_id;
303: CLOSE csr_get_list_header_id;

Line 315: utl_file.put(l_file,l_qual_string);

311: l_qual_string3 := 'Header_quals_exist_flag, Distinct_row_count,Others_group_cnt, Orig_sys_qualifier_ref, Orig_sys_header_ref, Orig_sys_line_ref, Segment_id,Used_In_Setup';
312: l_qual_string := l_qual_string1 || l_qual_string2 || l_qual_string3;
313:
314:
315: utl_file.put(l_file,l_qual_string);
316:
317: OPEN csr_get_list_qualifiers(l_forms_list_header_id);
318: LOOP
319:

Line 327: utl_file.new_line(l_file);

323: OPEN csr_get_used_in_setup_flag(l_qualifier_rec.qualifier_context , l_qualifier_rec.qualifier_attribute,'QUALIFIER');
324: FETCH csr_get_used_in_setup_flag INTO l_used_in_setup;
325: CLOSE csr_get_used_in_setup_flag;
326:
327: utl_file.new_line(l_file);
328: l_data_rec := 'FORMS' || ',';
329:
330: l_data_rec := l_data_rec || l_qualifier_rec.qualifier_id||',' ;
331: l_data_rec := l_data_rec || l_qualifier_rec.qualifier_grouping_no||',' ;

Line 361: utl_file.put(l_file,l_data_rec);

357: l_data_rec := l_data_rec || l_qualifier_rec.orig_sys_line_ref||',' ;
358: l_data_rec := l_data_rec || l_qualifier_rec.segment_id || ',';
359: l_data_rec := l_data_rec || l_used_in_setup ;
360:
361: utl_file.put(l_file,l_data_rec);
362:
363: END LOOP;
364:
365: CLOSE csr_get_list_qualifiers;

Line 379: utl_file.new_line(l_file);

375: OPEN csr_get_used_in_setup_flag(l_qualifier_rec.qualifier_context , l_qualifier_rec.qualifier_attribute,'QUALIFIER');
376: FETCH csr_get_used_in_setup_flag INTO l_used_in_setup;
377: CLOSE csr_get_used_in_setup_flag;
378:
379: utl_file.new_line(l_file);
380: l_data_rec := 'HTML' || ',';
381:
382: l_data_rec := l_data_rec || l_qualifier_rec.qualifier_id||',' ;
383: l_data_rec := l_data_rec || l_qualifier_rec.qualifier_grouping_no||',' ;

Line 413: utl_file.put(l_file,l_data_rec);

409: l_data_rec := l_data_rec || l_qualifier_rec.orig_sys_line_ref||',' ;
410: l_data_rec := l_data_rec || l_qualifier_rec.segment_id || ',';
411: l_data_rec := l_data_rec || l_used_in_setup ;
412:
413: utl_file.put(l_file,l_data_rec);
414:
415: END LOOP;
416:
417: CLOSE csr_get_list_qualifiers;

Line 419: utl_file.fclose(l_file);

415: END LOOP;
416:
417: CLOSE csr_get_list_qualifiers;
418:
419: utl_file.fclose(l_file);
420: x_return_status := 'S';
421:
422: END Qualifier_Data;
423:

Line 430: l_file UTL_FILE.file_type;

426: p_file_dir VARCHAR2,
427: x_return_status OUT NOCOPY VARCHAR2) IS
428:
429: l_filename VARCHAR2(60);
430: l_file UTL_FILE.file_type;
431: l_html_list_header_id NUMBER;
432: l_forms_list_header_id NUMBER;
433: l_list_line_string VARCHAR2(2000);
434: l_list_line_string1 VARCHAR2(255);

Line 554: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');

550:
551: l_filename := 'QP_HTML_' || p_html_list_line_id||'_FORMS_'||p_forms_list_line_id || '.dat' ;
552:
553: BEGIN
554: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');
555: EXCEPTION
556: WHEN UTL_FILE.INVALID_PATH THEN
557: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
558: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');

Line 556: WHEN UTL_FILE.INVALID_PATH THEN

552:
553: BEGIN
554: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');
555: EXCEPTION
556: WHEN UTL_FILE.INVALID_PATH THEN
557: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
558: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
559: RETURN;
560: END;

Line 558: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');

554: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');
555: EXCEPTION
556: WHEN UTL_FILE.INVALID_PATH THEN
557: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
558: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
559: RETURN;
560: END;
561:
562: utl_file.new_line(l_file);

Line 562: utl_file.new_line(l_file);

558: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
559: RETURN;
560: END;
561:
562: utl_file.new_line(l_file);
563: utl_file.put(l_file,'LIST_LINES');
564: utl_file.new_line(l_file);
565:
566: l_list_line_string1 := 'DataSource,List_Line_Id, List_Header_Id, List_Line_Type_Code, Start_Date_Active, End_Date_Active, Automatic_Flag, Modifier_Level_Code, Price_By_Formula_Id, Primary_Uom_Flag, Price_Break_Type_Code, Arithmetic_Operator, Operand,';

Line 563: utl_file.put(l_file,'LIST_LINES');

559: RETURN;
560: END;
561:
562: utl_file.new_line(l_file);
563: utl_file.put(l_file,'LIST_LINES');
564: utl_file.new_line(l_file);
565:
566: l_list_line_string1 := 'DataSource,List_Line_Id, List_Header_Id, List_Line_Type_Code, Start_Date_Active, End_Date_Active, Automatic_Flag, Modifier_Level_Code, Price_By_Formula_Id, Primary_Uom_Flag, Price_Break_Type_Code, Arithmetic_Operator, Operand,';
567: l_list_line_string2 := 'Override_Flag,Accrual_Qty, Accrual_Uom_Code, Estim_Accrual_Rate, Generate_Using_Formula_Id, List_Line_No, Estim_Gl_Value, Benefit_Price_List_Line_Id, Expiration_Period_Start_Date, Number_Expiration_Periods,';

Line 564: utl_file.new_line(l_file);

560: END;
561:
562: utl_file.new_line(l_file);
563: utl_file.put(l_file,'LIST_LINES');
564: utl_file.new_line(l_file);
565:
566: l_list_line_string1 := 'DataSource,List_Line_Id, List_Header_Id, List_Line_Type_Code, Start_Date_Active, End_Date_Active, Automatic_Flag, Modifier_Level_Code, Price_By_Formula_Id, Primary_Uom_Flag, Price_Break_Type_Code, Arithmetic_Operator, Operand,';
567: l_list_line_string2 := 'Override_Flag,Accrual_Qty, Accrual_Uom_Code, Estim_Accrual_Rate, Generate_Using_Formula_Id, List_Line_No, Estim_Gl_Value, Benefit_Price_List_Line_Id, Expiration_Period_Start_Date, Number_Expiration_Periods,';
568: l_list_line_string3 := 'Expiration_Period_Uom,Expiration_Date,Accrual_Flag, Pricing_Phase_Id, Pricing_Group_Sequence, Incompatibility_Grp_Code, Product_Precedence, Proration_Type_Code, Accrual_Conversion_Rate, Benefit_Qty, Benefit_Uom_Code,';

Line 573: utl_file.put(l_file,l_list_line_string);

569: l_list_line_string4 := 'Qualification_Ind,Limit_Exists_Flag, Group_Count,Net_Amount_Flag, Recurring_Value, Accum_Context, Accum_Attribute, Accum_Attr_Run_Src_Flag, Break_Uom_Code, Break_Uom_Context, Break_Uom_Attribute, Pattern_Id,Product_Uom_Code,';
570: l_list_line_string5 := 'Pricing_Attribute_Count,Hash_Key, Cache_Key';
571: l_list_line_string := l_list_line_string1 || l_list_line_string2 || l_list_line_string3 || l_list_line_string4 || l_list_line_string5 ;
572:
573: utl_file.put(l_file,l_list_line_string);
574:
575: OPEN csr_get_list_lines(p_forms_list_line_id);
576: LOOP
577:

Line 581: utl_file.new_line(l_file);

577:
578: FETCH csr_get_list_lines INTO l_list_line_rec;
579: EXIT WHEN csr_get_list_lines%NOTFOUND;
580:
581: utl_file.new_line(l_file);
582:
583: l_data_rec := 'FORMS' || ',';
584:
585: l_data_rec := l_data_rec || l_list_line_rec.list_line_id|| ',';

Line 635: utl_file.put(l_file,l_data_rec);

631: l_data_rec := l_data_rec || l_list_line_rec.pricing_attribute_count|| ',';
632: l_data_rec := l_data_rec || l_list_line_rec.hash_key|| ',';
633: l_data_rec := l_data_rec || l_list_line_rec.cache_key;
634:
635: utl_file.put(l_file,l_data_rec);
636:
637: END LOOP;
638:
639: CLOSE csr_get_list_lines;

Line 649: utl_file.new_line(l_file);

645:
646: FETCH csr_get_list_lines INTO l_list_line_rec;
647: EXIT WHEN csr_get_list_lines%NOTFOUND;
648:
649: utl_file.new_line(l_file);
650: l_data_rec := 'HTML' || ',';
651:
652: l_data_rec := l_data_rec || l_list_line_rec.list_line_id|| ',';
653: l_data_rec := l_data_rec || l_list_line_rec.list_header_id|| ',';

Line 702: utl_file.put(l_file,l_data_rec);

698: l_data_rec := l_data_rec || l_list_line_rec.pricing_attribute_count|| ',';
699: l_data_rec := l_data_rec || l_list_line_rec.hash_key|| ',';
700: l_data_rec := l_data_rec || l_list_line_rec.cache_key;
701:
702: utl_file.put(l_file,l_data_rec);
703:
704: END LOOP;
705:
706: CLOSE csr_get_list_lines;

Line 708: utl_file.fclose(l_file);

704: END LOOP;
705:
706: CLOSE csr_get_list_lines;
707:
708: utl_file.fclose(l_file);
709: x_return_status := 'S';
710:
711: END List_Line_Data;
712:

Line 719: l_file UTL_FILE.file_type;

715: p_file_dir VARCHAR2,
716: x_return_status OUT NOCOPY VARCHAR2) IS
717:
718: l_filename VARCHAR2(60);
719: l_file UTL_FILE.file_type;
720: l_pricing_attr_string VARCHAR2(2000);
721: l_pricing_attr_string1 VARCHAR2(255);
722: l_pricing_attr_string2 VARCHAR2(255);
723: l_pricing_attr_string3 VARCHAR2(255);

Line 815: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');

811:
812: l_filename := 'QP_HTML_' || p_html_list_line_id||'_FORMS_'||p_forms_list_line_id || '.dat' ;
813:
814: BEGIN
815: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');
816: EXCEPTION
817: WHEN UTL_FILE.INVALID_PATH THEN
818: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
819: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');

Line 817: WHEN UTL_FILE.INVALID_PATH THEN

813:
814: BEGIN
815: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');
816: EXCEPTION
817: WHEN UTL_FILE.INVALID_PATH THEN
818: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
819: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
820: RETURN;
821: END;

Line 819: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');

815: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');
816: EXCEPTION
817: WHEN UTL_FILE.INVALID_PATH THEN
818: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
819: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
820: RETURN;
821: END;
822:
823: utl_file.new_line(l_file);

Line 823: utl_file.new_line(l_file);

819: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
820: RETURN;
821: END;
822:
823: utl_file.new_line(l_file);
824: utl_file.put(l_file,'PRICING_ATTRIBUTES');
825: utl_file.new_line(l_file);
826:
827: l_pricing_attr_string1 := 'DataSource, Pricing_Attribute_Id, List_Line_Id, Excluder_Flag, Accumulate_Flag, Product_Attribute_Context, Product_Attribute, Product_Attr_Value, Product_Uom_Code, Pricing_Attribute_Context, Pricing_Attribute,';

Line 824: utl_file.put(l_file,'PRICING_ATTRIBUTES');

820: RETURN;
821: END;
822:
823: utl_file.new_line(l_file);
824: utl_file.put(l_file,'PRICING_ATTRIBUTES');
825: utl_file.new_line(l_file);
826:
827: l_pricing_attr_string1 := 'DataSource, Pricing_Attribute_Id, List_Line_Id, Excluder_Flag, Accumulate_Flag, Product_Attribute_Context, Product_Attribute, Product_Attr_Value, Product_Uom_Code, Pricing_Attribute_Context, Pricing_Attribute,';
828: l_pricing_attr_string2 := 'Pricing_Attr_Value_From,Pricing_Attr_Value_To, Attribute_Grouping_No, Product_Attribute_Datatype, Pricing_Attribute_Datatype, Comparison_Operator_Code, List_Header_Id, Pricing_Phase_Id, Qualification_Ind,';

Line 825: utl_file.new_line(l_file);

821: END;
822:
823: utl_file.new_line(l_file);
824: utl_file.put(l_file,'PRICING_ATTRIBUTES');
825: utl_file.new_line(l_file);
826:
827: l_pricing_attr_string1 := 'DataSource, Pricing_Attribute_Id, List_Line_Id, Excluder_Flag, Accumulate_Flag, Product_Attribute_Context, Product_Attribute, Product_Attr_Value, Product_Uom_Code, Pricing_Attribute_Context, Pricing_Attribute,';
828: l_pricing_attr_string2 := 'Pricing_Attr_Value_From,Pricing_Attr_Value_To, Attribute_Grouping_No, Product_Attribute_Datatype, Pricing_Attribute_Datatype, Comparison_Operator_Code, List_Header_Id, Pricing_Phase_Id, Qualification_Ind,';
829: l_pricing_attr_string3 := 'Pricing_Attr_Value_From_Number, Pricing_Attr_Value_To_Number,Distinct_Row_Count, Search_Ind, Pattern_Value_From_Positive, Pattern_Value_To_Positive, Pattern_Value_From_Negative, Pattern_Value_To_Negative, Product_Segment_Id,';

Line 834: utl_file.put(l_file,l_pricing_attr_string);

830: l_pricing_attr_string4 := 'Product_Used_In_Setup, Pricing_Segment_Id,Pricing_Attr_Used_In_Setup';
831: l_pricing_attr_string := l_pricing_attr_string1 || l_pricing_attr_string2 || l_pricing_attr_string3 || l_pricing_attr_string4 ;
832:
833:
834: utl_file.put(l_file,l_pricing_attr_string);
835:
836: OPEN csr_get_pricing_attributes(p_forms_list_line_id);
837: LOOP
838:

Line 850: utl_file.new_line(l_file);

846: OPEN csr_get_used_in_setup_flag(l_pricing_attribute_rec.pricing_attribute_context , l_pricing_attribute_rec.pricing_attribute,'PRICING');
847: FETCH csr_get_used_in_setup_flag INTO l_pricing_attr_used_in_setup;
848: CLOSE csr_get_used_in_setup_flag;
849:
850: utl_file.new_line(l_file);
851:
852: l_data_rec := 'FORMS' || ',';
853:
854: l_data_rec := l_data_rec || l_pricing_attribute_rec.pricing_attribute_id|| ',';

Line 886: utl_file.put(l_file,l_data_rec);

882: l_data_rec := l_data_rec || l_product_used_in_setup || ',';
883: l_data_rec := l_data_rec || l_pricing_attribute_rec.pricing_segment_id || ',';
884: l_data_rec := l_data_rec || l_pricing_attr_used_in_setup ;
885:
886: utl_file.put(l_file,l_data_rec);
887:
888: END LOOP;
889:
890: CLOSE csr_get_pricing_attributes;

Line 900: utl_file.new_line(l_file);

896:
897: FETCH csr_get_pricing_attributes INTO l_pricing_attribute_rec;
898: EXIT WHEN csr_get_pricing_attributes%NOTFOUND;
899:
900: utl_file.new_line(l_file);
901: l_data_rec := 'HTML' || ',';
902:
903: l_data_rec := l_data_rec || l_pricing_attribute_rec.pricing_attribute_id|| ',';
904: l_data_rec := l_data_rec || l_pricing_attribute_rec.list_line_id|| ',';

Line 933: utl_file.put(l_file,l_data_rec);

929: l_data_rec := l_data_rec || l_pricing_attribute_rec.pattern_value_to_negative|| ',';
930: l_data_rec := l_data_rec || l_pricing_attribute_rec.product_segment_id|| ',';
931: l_data_rec := l_data_rec || l_pricing_attribute_rec.pricing_segment_id;
932:
933: utl_file.put(l_file,l_data_rec);
934:
935: END LOOP;
936:
937: CLOSE csr_get_pricing_attributes;

Line 939: utl_file.fclose(l_file);

935: END LOOP;
936:
937: CLOSE csr_get_pricing_attributes;
938:
939: utl_file.fclose(l_file);
940: x_return_status := 'S';
941:
942: END Pricing_Attribute_Data;
943:

Line 950: l_file UTL_FILE.file_type;

946: p_file_dir VARCHAR2,
947: x_return_status OUT NOCOPY VARCHAR2) IS
948:
949: l_filename VARCHAR2(60);
950: l_file UTL_FILE.file_type;
951: l_rltd_modifier_string VARCHAR2(2000);
952: l_data_rec VARCHAR2(700);
953: l_rltd_modifier_rec RLTD_MODIFIER_REC_TYPE;
954: l_reset_rltd_modifier_rec RLTD_MODIFIER_REC_TYPE;

Line 970: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');

966:
967: l_filename := 'QP_HTML_' || p_html_list_line_id||'_FORMS_'||p_forms_list_line_id || '.dat' ;
968:
969: BEGIN
970: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');
971: EXCEPTION
972: WHEN UTL_FILE.INVALID_PATH THEN
973: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
974: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');

Line 972: WHEN UTL_FILE.INVALID_PATH THEN

968:
969: BEGIN
970: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');
971: EXCEPTION
972: WHEN UTL_FILE.INVALID_PATH THEN
973: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
974: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
975: RETURN;
976: END;

Line 974: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');

970: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');
971: EXCEPTION
972: WHEN UTL_FILE.INVALID_PATH THEN
973: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
974: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
975: RETURN;
976: END;
977:
978: utl_file.new_line(l_file);

Line 978: utl_file.new_line(l_file);

974: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
975: RETURN;
976: END;
977:
978: utl_file.new_line(l_file);
979: utl_file.put(l_file,'RLTD_MODIFIERS');
980: utl_file.new_line(l_file);
981:
982: l_rltd_modifier_string := 'DataSource, Rltd_Modifier_Id, Rltd_Modifier_Grp_No, From_Rltd_Modifier_Id, To_Rltd_Modifier_Id, Rltd_Modifier_Grp_Type';

Line 979: utl_file.put(l_file,'RLTD_MODIFIERS');

975: RETURN;
976: END;
977:
978: utl_file.new_line(l_file);
979: utl_file.put(l_file,'RLTD_MODIFIERS');
980: utl_file.new_line(l_file);
981:
982: l_rltd_modifier_string := 'DataSource, Rltd_Modifier_Id, Rltd_Modifier_Grp_No, From_Rltd_Modifier_Id, To_Rltd_Modifier_Id, Rltd_Modifier_Grp_Type';
983:

Line 980: utl_file.new_line(l_file);

976: END;
977:
978: utl_file.new_line(l_file);
979: utl_file.put(l_file,'RLTD_MODIFIERS');
980: utl_file.new_line(l_file);
981:
982: l_rltd_modifier_string := 'DataSource, Rltd_Modifier_Id, Rltd_Modifier_Grp_No, From_Rltd_Modifier_Id, To_Rltd_Modifier_Id, Rltd_Modifier_Grp_Type';
983:
984: utl_file.put(l_file,l_rltd_modifier_string);

Line 984: utl_file.put(l_file,l_rltd_modifier_string);

980: utl_file.new_line(l_file);
981:
982: l_rltd_modifier_string := 'DataSource, Rltd_Modifier_Id, Rltd_Modifier_Grp_No, From_Rltd_Modifier_Id, To_Rltd_Modifier_Id, Rltd_Modifier_Grp_Type';
983:
984: utl_file.put(l_file,l_rltd_modifier_string);
985:
986: OPEN csr_get_rltd_modifiers(p_forms_list_line_id);
987: LOOP
988:

Line 992: utl_file.new_line(l_file);

988:
989: FETCH csr_get_rltd_modifiers INTO l_rltd_modifier_rec;
990: EXIT WHEN csr_get_rltd_modifiers%NOTFOUND;
991:
992: utl_file.new_line(l_file);
993:
994: l_data_rec := 'FORMS' || ',';
995:
996: l_data_rec := l_data_rec || l_rltd_modifier_rec.rltd_modifier_id|| ',';

Line 1002: utl_file.put(l_file,l_data_rec);

998: l_data_rec := l_data_rec || l_rltd_modifier_rec.from_rltd_modifier_id|| ',';
999: l_data_rec := l_data_rec || l_rltd_modifier_rec.to_rltd_modifier_id|| ',';
1000: l_data_rec := l_data_rec || l_rltd_modifier_rec.rltd_modifier_grp_type;
1001:
1002: utl_file.put(l_file,l_data_rec);
1003:
1004: END LOOP;
1005:
1006: CLOSE csr_get_rltd_modifiers;

Line 1016: utl_file.new_line(l_file);

1012:
1013: FETCH csr_get_rltd_modifiers INTO l_rltd_modifier_rec;
1014: EXIT WHEN csr_get_rltd_modifiers%NOTFOUND;
1015:
1016: utl_file.new_line(l_file);
1017: l_data_rec := 'HTML' || ',';
1018:
1019: l_data_rec := l_data_rec || l_rltd_modifier_rec.rltd_modifier_id|| ',';
1020: l_data_rec := l_data_rec || l_rltd_modifier_rec.rltd_modifier_grp_no|| ',';

Line 1025: utl_file.put(l_file,l_data_rec);

1021: l_data_rec := l_data_rec || l_rltd_modifier_rec.from_rltd_modifier_id|| ',';
1022: l_data_rec := l_data_rec || l_rltd_modifier_rec.to_rltd_modifier_id|| ',';
1023: l_data_rec := l_data_rec || l_rltd_modifier_rec.rltd_modifier_grp_type;
1024:
1025: utl_file.put(l_file,l_data_rec);
1026:
1027: END LOOP;
1028:
1029: CLOSE csr_get_rltd_modifiers;

Line 1031: utl_file.fclose(l_file);

1027: END LOOP;
1028:
1029: CLOSE csr_get_rltd_modifiers;
1030:
1031: utl_file.fclose(l_file);
1032: x_return_status := 'S';
1033:
1034: END Rltd_Modifier_Data;
1035:

Line 1042: l_file UTL_FILE.file_type;

1038: p_file_dir VARCHAR2,
1039: x_return_status OUT NOCOPY VARCHAR2) IS
1040:
1041: l_filename VARCHAR2(60);
1042: l_file UTL_FILE.file_type;
1043: l_html_list_header_id NUMBER;
1044: l_forms_list_header_id NUMBER;
1045: l_list_header_phases_string VARCHAR2(2000);
1046: l_data_rec VARCHAR2(700);

Line 1067: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');

1063:
1064: l_filename := 'QP_HTML_' || p_html_list_line_id||'_FORMS_'||p_forms_list_line_id || '.dat' ;
1065:
1066: BEGIN
1067: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');
1068: EXCEPTION
1069: WHEN UTL_FILE.INVALID_PATH THEN
1070: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
1071: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');

Line 1069: WHEN UTL_FILE.INVALID_PATH THEN

1065:
1066: BEGIN
1067: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');
1068: EXCEPTION
1069: WHEN UTL_FILE.INVALID_PATH THEN
1070: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
1071: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
1072: RETURN;
1073: END;

Line 1071: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');

1067: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');
1068: EXCEPTION
1069: WHEN UTL_FILE.INVALID_PATH THEN
1070: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
1071: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
1072: RETURN;
1073: END;
1074:
1075: utl_file.new_line(l_file);

Line 1075: utl_file.new_line(l_file);

1071: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
1072: RETURN;
1073: END;
1074:
1075: utl_file.new_line(l_file);
1076: utl_file.put(l_file,'LIST_HEADER_PHASES');
1077: utl_file.new_line(l_file);
1078:
1079: l_list_header_phases_string := 'DataSource, List_Header_Id, Pricing_Phase_Id, Qualifier_Flag';

Line 1076: utl_file.put(l_file,'LIST_HEADER_PHASES');

1072: RETURN;
1073: END;
1074:
1075: utl_file.new_line(l_file);
1076: utl_file.put(l_file,'LIST_HEADER_PHASES');
1077: utl_file.new_line(l_file);
1078:
1079: l_list_header_phases_string := 'DataSource, List_Header_Id, Pricing_Phase_Id, Qualifier_Flag';
1080:

Line 1077: utl_file.new_line(l_file);

1073: END;
1074:
1075: utl_file.new_line(l_file);
1076: utl_file.put(l_file,'LIST_HEADER_PHASES');
1077: utl_file.new_line(l_file);
1078:
1079: l_list_header_phases_string := 'DataSource, List_Header_Id, Pricing_Phase_Id, Qualifier_Flag';
1080:
1081: utl_file.put(l_file,l_list_header_phases_string);

Line 1081: utl_file.put(l_file,l_list_header_phases_string);

1077: utl_file.new_line(l_file);
1078:
1079: l_list_header_phases_string := 'DataSource, List_Header_Id, Pricing_Phase_Id, Qualifier_Flag';
1080:
1081: utl_file.put(l_file,l_list_header_phases_string);
1082:
1083: OPEN csr_get_list_header_id(p_html_list_line_id);
1084: FETCH csr_get_list_header_id INTO l_html_list_header_id;
1085: CLOSE csr_get_list_header_id;

Line 1097: utl_file.new_line(l_file);

1093:
1094: FETCH csr_get_list_header_phases INTO l_list_header_phases_rec;
1095: EXIT WHEN csr_get_list_header_phases%NOTFOUND;
1096:
1097: utl_file.new_line(l_file);
1098:
1099: l_data_rec := 'FORMS' || ',';
1100:
1101: l_data_rec := l_data_rec || l_list_header_phases_rec.List_Header_Id || ',' ;

Line 1105: utl_file.put(l_file,l_data_rec);

1101: l_data_rec := l_data_rec || l_list_header_phases_rec.List_Header_Id || ',' ;
1102: l_data_rec := l_data_rec || l_list_header_phases_rec.Pricing_Phase_Id || ',' ;
1103: l_data_rec := l_data_rec || l_list_header_phases_rec.Qualifier_Flag ;
1104:
1105: utl_file.put(l_file,l_data_rec);
1106:
1107: END LOOP;
1108:
1109: CLOSE csr_get_list_header_phases;

Line 1119: utl_file.new_line(l_file);

1115:
1116: FETCH csr_get_list_header_phases INTO l_list_header_phases_rec;
1117: EXIT WHEN csr_get_list_header_phases%NOTFOUND;
1118:
1119: utl_file.new_line(l_file);
1120: l_data_rec := 'HTML' || ',';
1121:
1122: l_data_rec := l_data_rec || l_list_header_phases_rec.List_Header_Id || ',' ;
1123: l_data_rec := l_data_rec || l_list_header_phases_rec.Pricing_Phase_Id || ',' ;

Line 1126: utl_file.put(l_file,l_data_rec);

1122: l_data_rec := l_data_rec || l_list_header_phases_rec.List_Header_Id || ',' ;
1123: l_data_rec := l_data_rec || l_list_header_phases_rec.Pricing_Phase_Id || ',' ;
1124: l_data_rec := l_data_rec || l_list_header_phases_rec.Qualifier_Flag ;
1125:
1126: utl_file.put(l_file,l_data_rec);
1127:
1128: END LOOP;
1129:
1130: CLOSE csr_get_list_header_phases;

Line 1132: utl_file.fclose(l_file);

1128: END LOOP;
1129:
1130: CLOSE csr_get_list_header_phases;
1131:
1132: utl_file.fclose(l_file);
1133: x_return_status := 'S';
1134:
1135: END List_Header_Phases_Data;
1136:

Line 1142: l_file UTL_FILE.file_type;

1138: p_file_dir VARCHAR2,
1139: x_return_status OUT NOCOPY VARCHAR2) IS
1140:
1141: l_filename VARCHAR2(60);
1142: l_file UTL_FILE.file_type;
1143: l_pricing_phases_string VARCHAR2(2000);
1144: l_pricing_phases_string1 VARCHAR2(255);
1145: l_pricing_phases_string2 VARCHAR2(255);
1146: l_data_rec VARCHAR2(700);

Line 1173: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'w');

1169:
1170: l_filename := 'QP_' || p_data_creation_method || '_OTHERS.dat' ;
1171:
1172: BEGIN
1173: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'w');
1174: EXCEPTION
1175: WHEN UTL_FILE.INVALID_PATH THEN
1176: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
1177: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');

Line 1175: WHEN UTL_FILE.INVALID_PATH THEN

1171:
1172: BEGIN
1173: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'w');
1174: EXCEPTION
1175: WHEN UTL_FILE.INVALID_PATH THEN
1176: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
1177: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
1178: RETURN;
1179: END;

Line 1177: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');

1173: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'w');
1174: EXCEPTION
1175: WHEN UTL_FILE.INVALID_PATH THEN
1176: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
1177: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
1178: RETURN;
1179: END;
1180:
1181: utl_file.new_line(l_file);

Line 1181: utl_file.new_line(l_file);

1177: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
1178: RETURN;
1179: END;
1180:
1181: utl_file.new_line(l_file);
1182: utl_file.put(l_file,'PRICING_PHASES');
1183: utl_file.new_line(l_file);
1184:
1185: l_pricing_phases_string1 := 'DataSource, Modifier_Level_Code, Phase_Sequence, Pricing_Phase_Id, Incompat_Resolve_Code, Name, Seeded_Flag, Freeze_Override_Flag, User_Freeze_Override_Flag, User_Incompat_Resolve_Code, Line_Group_Exists, Oid_Exists,';

Line 1182: utl_file.put(l_file,'PRICING_PHASES');

1178: RETURN;
1179: END;
1180:
1181: utl_file.new_line(l_file);
1182: utl_file.put(l_file,'PRICING_PHASES');
1183: utl_file.new_line(l_file);
1184:
1185: l_pricing_phases_string1 := 'DataSource, Modifier_Level_Code, Phase_Sequence, Pricing_Phase_Id, Incompat_Resolve_Code, Name, Seeded_Flag, Freeze_Override_Flag, User_Freeze_Override_Flag, User_Incompat_Resolve_Code, Line_Group_Exists, Oid_Exists,';
1186: l_pricing_phases_string2 := 'Rltd_Exists, Freight_Exists,Manual_Modifier_Flag';

Line 1183: utl_file.new_line(l_file);

1179: END;
1180:
1181: utl_file.new_line(l_file);
1182: utl_file.put(l_file,'PRICING_PHASES');
1183: utl_file.new_line(l_file);
1184:
1185: l_pricing_phases_string1 := 'DataSource, Modifier_Level_Code, Phase_Sequence, Pricing_Phase_Id, Incompat_Resolve_Code, Name, Seeded_Flag, Freeze_Override_Flag, User_Freeze_Override_Flag, User_Incompat_Resolve_Code, Line_Group_Exists, Oid_Exists,';
1186: l_pricing_phases_string2 := 'Rltd_Exists, Freight_Exists,Manual_Modifier_Flag';
1187: l_pricing_phases_string := l_pricing_phases_string1 || l_pricing_phases_string2 ;

Line 1190: utl_file.put(l_file,l_pricing_phases_string);

1186: l_pricing_phases_string2 := 'Rltd_Exists, Freight_Exists,Manual_Modifier_Flag';
1187: l_pricing_phases_string := l_pricing_phases_string1 || l_pricing_phases_string2 ;
1188:
1189:
1190: utl_file.put(l_file,l_pricing_phases_string);
1191:
1192: OPEN csr_get_pricing_phases;
1193: LOOP
1194:

Line 1198: utl_file.new_line(l_file);

1194:
1195: FETCH csr_get_pricing_phases INTO l_pricing_phases_rec;
1196: EXIT WHEN csr_get_pricing_phases%NOTFOUND;
1197:
1198: utl_file.new_line(l_file);
1199:
1200: l_data_rec := p_data_creation_method || ',';
1201:
1202: l_data_rec := l_data_rec || l_pricing_phases_rec.modifier_level_code|| ',';

Line 1217: utl_file.put(l_file,l_data_rec);

1213: l_data_rec := l_data_rec || l_pricing_phases_rec.rltd_exists|| ',';
1214: l_data_rec := l_data_rec || l_pricing_phases_rec.freight_exists|| ',';
1215: l_data_rec := l_data_rec || l_pricing_phases_rec.manual_modifier_flag ;
1216:
1217: utl_file.put(l_file,l_data_rec);
1218:
1219: END LOOP;
1220:
1221: CLOSE csr_get_pricing_phases;

Line 1223: utl_file.fclose(l_file);

1219: END LOOP;
1220:
1221: CLOSE csr_get_pricing_phases;
1222:
1223: utl_file.fclose(l_file);
1224: x_return_status := 'S';
1225:
1226: END Pricing_Phases_Data;
1227:

Line 1234: l_file UTL_FILE.file_type;

1230: p_file_dir VARCHAR2,
1231: x_return_status OUT NOCOPY VARCHAR2) IS
1232:
1233: l_filename VARCHAR2(60);
1234: l_file UTL_FILE.file_type;
1235: l_adv_mod_products_string VARCHAR2(2000);
1236: l_data_rec VARCHAR2(700);
1237: l_adv_mod_product_rec ADV_MOD_PRODUCTS_REC_TYPE;
1238: l_reset_adv_mod_products_rec ADV_MOD_PRODUCTS_REC_TYPE;

Line 1259: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');

1255:
1256: l_filename := 'QP_' || p_data_creation_method || '_OTHERS.dat';
1257:
1258: BEGIN
1259: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');
1260: EXCEPTION
1261: WHEN UTL_FILE.INVALID_PATH THEN
1262: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
1263: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');

Line 1261: WHEN UTL_FILE.INVALID_PATH THEN

1257:
1258: BEGIN
1259: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');
1260: EXCEPTION
1261: WHEN UTL_FILE.INVALID_PATH THEN
1262: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
1263: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
1264: RETURN;
1265: END;

Line 1263: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');

1259: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');
1260: EXCEPTION
1261: WHEN UTL_FILE.INVALID_PATH THEN
1262: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
1263: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
1264: RETURN;
1265: END;
1266:
1267: OPEN csr_get_pricing_phase_id(p_list_line_id);

Line 1271: utl_file.new_line(l_file);

1267: OPEN csr_get_pricing_phase_id(p_list_line_id);
1268: FETCH csr_get_pricing_phase_id INTO l_pricing_phase_id;
1269: CLOSE csr_get_pricing_phase_id;
1270:
1271: utl_file.new_line(l_file);
1272: utl_file.put(l_file,'ADV_MOD_PRODUCTS ' || l_pricing_phase_id);
1273: utl_file.new_line(l_file);
1274:
1275: l_adv_mod_products_string := 'DataSource, Pricing_Phase_Id, Product_Attribute, Product_Attr_Value';

Line 1272: utl_file.put(l_file,'ADV_MOD_PRODUCTS ' || l_pricing_phase_id);

1268: FETCH csr_get_pricing_phase_id INTO l_pricing_phase_id;
1269: CLOSE csr_get_pricing_phase_id;
1270:
1271: utl_file.new_line(l_file);
1272: utl_file.put(l_file,'ADV_MOD_PRODUCTS ' || l_pricing_phase_id);
1273: utl_file.new_line(l_file);
1274:
1275: l_adv_mod_products_string := 'DataSource, Pricing_Phase_Id, Product_Attribute, Product_Attr_Value';
1276:

Line 1273: utl_file.new_line(l_file);

1269: CLOSE csr_get_pricing_phase_id;
1270:
1271: utl_file.new_line(l_file);
1272: utl_file.put(l_file,'ADV_MOD_PRODUCTS ' || l_pricing_phase_id);
1273: utl_file.new_line(l_file);
1274:
1275: l_adv_mod_products_string := 'DataSource, Pricing_Phase_Id, Product_Attribute, Product_Attr_Value';
1276:
1277: utl_file.put(l_file,l_adv_mod_products_string);

Line 1277: utl_file.put(l_file,l_adv_mod_products_string);

1273: utl_file.new_line(l_file);
1274:
1275: l_adv_mod_products_string := 'DataSource, Pricing_Phase_Id, Product_Attribute, Product_Attr_Value';
1276:
1277: utl_file.put(l_file,l_adv_mod_products_string);
1278:
1279:
1280: OPEN csr_get_adv_mod_products(l_pricing_phase_id);
1281: LOOP

Line 1286: utl_file.new_line(l_file);

1282:
1283: FETCH csr_get_adv_mod_products INTO l_adv_mod_product_rec;
1284: EXIT WHEN csr_get_adv_mod_products%NOTFOUND;
1285:
1286: utl_file.new_line(l_file);
1287:
1288: l_data_rec := p_data_creation_method || ',';
1289:
1290: l_data_rec := l_data_rec || l_adv_mod_product_rec.pricing_phase_id|| ',' ;

Line 1294: utl_file.put(l_file,l_data_rec);

1290: l_data_rec := l_data_rec || l_adv_mod_product_rec.pricing_phase_id|| ',' ;
1291: l_data_rec := l_data_rec || l_adv_mod_product_rec.product_attribute|| ',' ;
1292: l_data_rec := l_data_rec || l_adv_mod_product_rec.product_attr_value;
1293:
1294: utl_file.put(l_file,l_data_rec);
1295:
1296: END LOOP;
1297:
1298: CLOSE csr_get_adv_mod_products;

Line 1300: utl_file.fclose(l_file);

1296: END LOOP;
1297:
1298: CLOSE csr_get_adv_mod_products;
1299:
1300: utl_file.fclose(l_file);
1301: x_return_status := 'S';
1302:
1303: END Adv_Mod_Products_Data;
1304:

Line 1311: l_file UTL_FILE.file_type;

1307: p_file_dir VARCHAR2,
1308: x_return_status OUT NOCOPY VARCHAR2) IS
1309:
1310: l_filename VARCHAR2(60);
1311: l_file UTL_FILE.file_type;
1312: l_html_list_header_id NUMBER;
1313: l_forms_list_header_id NUMBER;
1314: l_attribute_group_string VARCHAR2(2000);
1315: l_attribute_group_string1 VARCHAR2(255);

Line 1352: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');

1348:
1349: l_filename := 'QP_HTML_' || p_html_list_line_id||'_FORMS_'||p_forms_list_line_id || '.dat' ;
1350:
1351: BEGIN
1352: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');
1353: EXCEPTION
1354: WHEN UTL_FILE.INVALID_PATH THEN
1355: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
1356: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');

Line 1354: WHEN UTL_FILE.INVALID_PATH THEN

1350:
1351: BEGIN
1352: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');
1353: EXCEPTION
1354: WHEN UTL_FILE.INVALID_PATH THEN
1355: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
1356: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
1357: RETURN;
1358: END;

Line 1356: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');

1352: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');
1353: EXCEPTION
1354: WHEN UTL_FILE.INVALID_PATH THEN
1355: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
1356: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
1357: RETURN;
1358: END;
1359:
1360: utl_file.new_line(l_file);

Line 1360: utl_file.new_line(l_file);

1356: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
1357: RETURN;
1358: END;
1359:
1360: utl_file.new_line(l_file);
1361: utl_file.put(l_file,'ATTRIBUTE_GROUPS');
1362: utl_file.new_line(l_file);
1363:
1364: l_attribute_group_string1 := 'DataSource, List_Header_Id, List_Line_Id, Active_Flag, List_Type_Code, Start_Date_Active_Q, End_Date_Active_Q, Pattern_Id, Currency_Code , Ask_For_Flag, Limit_Exists, Source_System_Code, Effective_Precedence, Grouping_No,';

Line 1361: utl_file.put(l_file,'ATTRIBUTE_GROUPS');

1357: RETURN;
1358: END;
1359:
1360: utl_file.new_line(l_file);
1361: utl_file.put(l_file,'ATTRIBUTE_GROUPS');
1362: utl_file.new_line(l_file);
1363:
1364: l_attribute_group_string1 := 'DataSource, List_Header_Id, List_Line_Id, Active_Flag, List_Type_Code, Start_Date_Active_Q, End_Date_Active_Q, Pattern_Id, Currency_Code , Ask_For_Flag, Limit_Exists, Source_System_Code, Effective_Precedence, Grouping_No,';
1365: l_attribute_group_string2 := 'Pricing_Phase_Id,Modifier_Level_Code, Hash_Key, Cache_Key';

Line 1362: utl_file.new_line(l_file);

1358: END;
1359:
1360: utl_file.new_line(l_file);
1361: utl_file.put(l_file,'ATTRIBUTE_GROUPS');
1362: utl_file.new_line(l_file);
1363:
1364: l_attribute_group_string1 := 'DataSource, List_Header_Id, List_Line_Id, Active_Flag, List_Type_Code, Start_Date_Active_Q, End_Date_Active_Q, Pattern_Id, Currency_Code , Ask_For_Flag, Limit_Exists, Source_System_Code, Effective_Precedence, Grouping_No,';
1365: l_attribute_group_string2 := 'Pricing_Phase_Id,Modifier_Level_Code, Hash_Key, Cache_Key';
1366: l_attribute_group_string := l_attribute_group_string1 || l_attribute_group_string2;

Line 1377: utl_file.put(l_file,l_attribute_group_string);

1373: OPEN csr_get_list_header_id(p_forms_list_line_id);
1374: FETCH csr_get_list_header_id INTO l_forms_list_header_id;
1375: CLOSE csr_get_list_header_id;
1376:
1377: utl_file.put(l_file,l_attribute_group_string);
1378:
1379: OPEN csr_get_attribute_groups(l_forms_list_header_id);
1380: LOOP
1381:

Line 1385: utl_file.new_line(l_file);

1381:
1382: FETCH csr_get_attribute_groups INTO l_attribute_groups_rec;
1383: EXIT WHEN csr_get_attribute_groups%NOTFOUND;
1384:
1385: utl_file.new_line(l_file);
1386:
1387: l_data_rec := 'FORMS' || ',';
1388:
1389: l_data_rec := l_data_rec || l_attribute_groups_rec.list_header_id|| ',';

Line 1407: utl_file.put(l_file,l_data_rec);

1403: l_data_rec := l_data_rec || l_attribute_groups_rec.modifier_level_code|| ',';
1404: l_data_rec := l_data_rec || l_attribute_groups_rec.hash_key|| ',';
1405: l_data_rec := l_data_rec || l_attribute_groups_rec.cache_key;
1406:
1407: utl_file.put(l_file,l_data_rec);
1408:
1409: END LOOP;
1410:
1411: CLOSE csr_get_attribute_groups;

Line 1421: utl_file.new_line(l_file);

1417:
1418: FETCH csr_get_attribute_groups INTO l_attribute_groups_rec;
1419: EXIT WHEN csr_get_attribute_groups%NOTFOUND;
1420:
1421: utl_file.new_line(l_file);
1422: l_data_rec := 'HTML' || ',';
1423:
1424: l_data_rec := l_data_rec || l_attribute_groups_rec.list_header_id|| ',';
1425: l_data_rec := l_data_rec || l_attribute_groups_rec.list_line_id|| ',';

Line 1442: utl_file.put(l_file,l_data_rec);

1438: l_data_rec := l_data_rec || l_attribute_groups_rec.modifier_level_code|| ',';
1439: l_data_rec := l_data_rec || l_attribute_groups_rec.hash_key|| ',';
1440: l_data_rec := l_data_rec || l_attribute_groups_rec.cache_key;
1441:
1442: utl_file.put(l_file,l_data_rec);
1443:
1444: END LOOP;
1445:
1446: CLOSE csr_get_attribute_groups;

Line 1448: utl_file.fclose(l_file);

1444: END LOOP;
1445:
1446: CLOSE csr_get_attribute_groups;
1447:
1448: utl_file.fclose(l_file);
1449: x_return_status := 'S';
1450:
1451: END Attribute_Groups_Data;
1452:

Line 1460: l_file UTL_FILE.file_type;

1456: p_file_dir VARCHAR2,
1457: x_return_status OUT NOCOPY VARCHAR2) IS
1458:
1459: l_filename VARCHAR2(60);
1460: l_file UTL_FILE.file_type;
1461: l_patterns_string VARCHAR2(2000);
1462: l_data_rec VARCHAR2(700);
1463: l_patterns_rec PATTERNS_REC_TYPE;
1464: l_reset_patterns_rec PATTERNS_REC_TYPE;

Line 1493: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');

1489:
1490: l_filename := 'QP_HTML_' || p_html_list_line_id||'_FORMS_'||p_forms_list_line_id || '.dat' ;
1491:
1492: BEGIN
1493: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');
1494: EXCEPTION
1495: WHEN UTL_FILE.INVALID_PATH THEN
1496: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
1497: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');

Line 1495: WHEN UTL_FILE.INVALID_PATH THEN

1491:
1492: BEGIN
1493: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');
1494: EXCEPTION
1495: WHEN UTL_FILE.INVALID_PATH THEN
1496: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
1497: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
1498: RETURN;
1499: END;

Line 1497: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');

1493: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');
1494: EXCEPTION
1495: WHEN UTL_FILE.INVALID_PATH THEN
1496: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
1497: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
1498: RETURN;
1499: END;
1500:
1501: IF (p_pattern_type = 'PRODUCT') THEN

Line 1507: utl_file.new_line(l_file);

1503: OPEN csr_get_prod_pattern_id(p_forms_list_line_id);
1504: FETCH csr_get_prod_pattern_id INTO l_pattern_id;
1505: CLOSE csr_get_prod_pattern_id;
1506:
1507: utl_file.new_line(l_file);
1508: utl_file.put(l_file,'PRODUCT PATTERNS');
1509: utl_file.new_line(l_file);
1510:
1511: l_patterns_string := 'DataSource, List_Line_Id, Pattern_Id, Segment_Id, Pattern_Type, Pattern_String';

Line 1508: utl_file.put(l_file,'PRODUCT PATTERNS');

1504: FETCH csr_get_prod_pattern_id INTO l_pattern_id;
1505: CLOSE csr_get_prod_pattern_id;
1506:
1507: utl_file.new_line(l_file);
1508: utl_file.put(l_file,'PRODUCT PATTERNS');
1509: utl_file.new_line(l_file);
1510:
1511: l_patterns_string := 'DataSource, List_Line_Id, Pattern_Id, Segment_Id, Pattern_Type, Pattern_String';
1512:

Line 1509: utl_file.new_line(l_file);

1505: CLOSE csr_get_prod_pattern_id;
1506:
1507: utl_file.new_line(l_file);
1508: utl_file.put(l_file,'PRODUCT PATTERNS');
1509: utl_file.new_line(l_file);
1510:
1511: l_patterns_string := 'DataSource, List_Line_Id, Pattern_Id, Segment_Id, Pattern_Type, Pattern_String';
1512:
1513: utl_file.put(l_file,l_patterns_string);

Line 1513: utl_file.put(l_file,l_patterns_string);

1509: utl_file.new_line(l_file);
1510:
1511: l_patterns_string := 'DataSource, List_Line_Id, Pattern_Id, Segment_Id, Pattern_Type, Pattern_String';
1512:
1513: utl_file.put(l_file,l_patterns_string);
1514:
1515: OPEN csr_get_patterns(l_pattern_id);
1516: LOOP
1517:

Line 1521: utl_file.new_line(l_file);

1517:
1518: FETCH csr_get_patterns INTO l_patterns_rec;
1519: EXIT WHEN csr_get_patterns%NOTFOUND;
1520:
1521: utl_file.new_line(l_file);
1522:
1523: l_data_rec := 'FORMS' || ',';
1524:
1525: l_data_rec := l_data_rec || p_forms_list_line_id || ',';

Line 1531: utl_file.put(l_file,l_data_rec);

1527: l_data_rec := l_data_rec || l_patterns_rec.segment_id|| ',';
1528: l_data_rec := l_data_rec || l_patterns_rec.pattern_type|| ',';
1529: l_data_rec := l_data_rec || l_patterns_rec.pattern_string;
1530:
1531: utl_file.put(l_file,l_data_rec);
1532:
1533: END LOOP;
1534:
1535: CLOSE csr_get_patterns;

Line 1549: utl_file.new_line(l_file);

1545:
1546: FETCH csr_get_patterns INTO l_patterns_rec;
1547: EXIT WHEN csr_get_patterns%NOTFOUND;
1548:
1549: utl_file.new_line(l_file);
1550:
1551: l_data_rec := 'HTML' || ',';
1552:
1553: l_data_rec := l_data_rec || p_html_list_line_id || ',';

Line 1559: utl_file.put(l_file,l_data_rec);

1555: l_data_rec := l_data_rec || l_patterns_rec.segment_id|| ',';
1556: l_data_rec := l_data_rec || l_patterns_rec.pattern_type|| ',';
1557: l_data_rec := l_data_rec || l_patterns_rec.pattern_string;
1558:
1559: utl_file.put(l_file,l_data_rec);
1560:
1561: END LOOP;
1562:
1563: CLOSE csr_get_patterns;

Line 1572: utl_file.new_line(l_file);

1568:
1569: FOR i IN csr_get_qual_pattern_id(p_forms_list_line_id)
1570: LOOP
1571:
1572: utl_file.new_line(l_file);
1573: utl_file.put(l_file,'QUALIFIER PATTERNS');
1574: utl_file.new_line(l_file);
1575:
1576: l_patterns_string := 'DataSource, List_Line_Id, Pattern_Id, Segment_Id, Pattern_Type, Pattern_String';

Line 1573: utl_file.put(l_file,'QUALIFIER PATTERNS');

1569: FOR i IN csr_get_qual_pattern_id(p_forms_list_line_id)
1570: LOOP
1571:
1572: utl_file.new_line(l_file);
1573: utl_file.put(l_file,'QUALIFIER PATTERNS');
1574: utl_file.new_line(l_file);
1575:
1576: l_patterns_string := 'DataSource, List_Line_Id, Pattern_Id, Segment_Id, Pattern_Type, Pattern_String';
1577:

Line 1574: utl_file.new_line(l_file);

1570: LOOP
1571:
1572: utl_file.new_line(l_file);
1573: utl_file.put(l_file,'QUALIFIER PATTERNS');
1574: utl_file.new_line(l_file);
1575:
1576: l_patterns_string := 'DataSource, List_Line_Id, Pattern_Id, Segment_Id, Pattern_Type, Pattern_String';
1577:
1578: utl_file.put(l_file,l_patterns_string);

Line 1578: utl_file.put(l_file,l_patterns_string);

1574: utl_file.new_line(l_file);
1575:
1576: l_patterns_string := 'DataSource, List_Line_Id, Pattern_Id, Segment_Id, Pattern_Type, Pattern_String';
1577:
1578: utl_file.put(l_file,l_patterns_string);
1579:
1580: OPEN csr_get_patterns(i.pattern_id);
1581: LOOP
1582:

Line 1586: utl_file.new_line(l_file);

1582:
1583: FETCH csr_get_patterns INTO l_patterns_rec;
1584: EXIT WHEN csr_get_patterns%NOTFOUND;
1585:
1586: utl_file.new_line(l_file);
1587:
1588: l_data_rec := 'FORMS' || ',';
1589:
1590: l_data_rec := l_data_rec || p_forms_list_line_id || ',';

Line 1596: utl_file.put(l_file,l_data_rec);

1592: l_data_rec := l_data_rec || l_patterns_rec.segment_id|| ',';
1593: l_data_rec := l_data_rec || l_patterns_rec.pattern_type|| ',';
1594: l_data_rec := l_data_rec || l_patterns_rec.pattern_string;
1595:
1596: utl_file.put(l_file,l_data_rec);
1597:
1598: END LOOP;
1599: CLOSE csr_get_patterns;
1600:

Line 1614: utl_file.new_line(l_file);

1610:
1611: FETCH csr_get_patterns INTO l_patterns_rec;
1612: EXIT WHEN csr_get_patterns%NOTFOUND;
1613:
1614: utl_file.new_line(l_file);
1615:
1616: l_data_rec := 'HTML' || ',';
1617:
1618: l_data_rec := l_data_rec || p_html_list_line_id || ',';

Line 1624: utl_file.put(l_file,l_data_rec);

1620: l_data_rec := l_data_rec || l_patterns_rec.segment_id|| ',';
1621: l_data_rec := l_data_rec || l_patterns_rec.pattern_type|| ',';
1622: l_data_rec := l_data_rec || l_patterns_rec.pattern_string;
1623:
1624: utl_file.put(l_file,l_data_rec);
1625:
1626: END LOOP;
1627: CLOSE csr_get_patterns;
1628:

Line 1632: utl_file.fclose(l_file);

1628:
1629: END LOOP;
1630:
1631: END IF;
1632: utl_file.fclose(l_file);
1633: x_return_status := 'S';
1634:
1635: END Patterns_Data;
1636:

Line 1644: l_file UTL_FILE.file_type;

1640: p_file_dir VARCHAR2,
1641: x_return_status OUT NOCOPY VARCHAR2) IS
1642:
1643: l_filename VARCHAR2(60);
1644: l_file UTL_FILE.file_type;
1645: l_pattern_phases_string VARCHAR2(2000);
1646: l_data_rec VARCHAR2(700);
1647: l_pattern_phases_rec PATTERN_PHASES_REC_TYPE;
1648: l_reset_pattern_phases_rec PATTERN_PHASES_REC_TYPE;

Line 1689: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');

1685:
1686: l_filename := 'QP_HTML_' || p_html_list_line_id||'_FORMS_'||p_forms_list_line_id || '.dat' ;
1687:
1688: BEGIN
1689: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');
1690: EXCEPTION
1691: WHEN UTL_FILE.INVALID_PATH THEN
1692: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
1693: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');

Line 1691: WHEN UTL_FILE.INVALID_PATH THEN

1687:
1688: BEGIN
1689: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');
1690: EXCEPTION
1691: WHEN UTL_FILE.INVALID_PATH THEN
1692: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
1693: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
1694: RETURN;
1695: END;

Line 1693: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');

1689: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');
1690: EXCEPTION
1691: WHEN UTL_FILE.INVALID_PATH THEN
1692: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
1693: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
1694: RETURN;
1695: END;
1696:
1697: IF (p_pattern_type = 'PRODUCT') THEN

Line 1699: utl_file.new_line(l_file);

1695: END;
1696:
1697: IF (p_pattern_type = 'PRODUCT') THEN
1698:
1699: utl_file.new_line(l_file);
1700: utl_file.put(l_file,'PRODUCT PATTERN PHASES');
1701: utl_file.new_line(l_file);
1702:
1703: l_pattern_phases_string := 'DataSource, List_Header_Id, List_Line_Id, Pattern_Id, Pricing_Phase_Id';

Line 1700: utl_file.put(l_file,'PRODUCT PATTERN PHASES');

1696:
1697: IF (p_pattern_type = 'PRODUCT') THEN
1698:
1699: utl_file.new_line(l_file);
1700: utl_file.put(l_file,'PRODUCT PATTERN PHASES');
1701: utl_file.new_line(l_file);
1702:
1703: l_pattern_phases_string := 'DataSource, List_Header_Id, List_Line_Id, Pattern_Id, Pricing_Phase_Id';
1704:

Line 1701: utl_file.new_line(l_file);

1697: IF (p_pattern_type = 'PRODUCT') THEN
1698:
1699: utl_file.new_line(l_file);
1700: utl_file.put(l_file,'PRODUCT PATTERN PHASES');
1701: utl_file.new_line(l_file);
1702:
1703: l_pattern_phases_string := 'DataSource, List_Header_Id, List_Line_Id, Pattern_Id, Pricing_Phase_Id';
1704:
1705: utl_file.put(l_file,l_pattern_phases_string);

Line 1705: utl_file.put(l_file,l_pattern_phases_string);

1701: utl_file.new_line(l_file);
1702:
1703: l_pattern_phases_string := 'DataSource, List_Header_Id, List_Line_Id, Pattern_Id, Pricing_Phase_Id';
1704:
1705: utl_file.put(l_file,l_pattern_phases_string);
1706:
1707: OPEN csr_get_prod_pattern_phases(p_forms_list_line_id);
1708: LOOP
1709:

Line 1713: utl_file.new_line(l_file);

1709:
1710: FETCH csr_get_prod_pattern_phases INTO l_pattern_phases_rec;
1711: EXIT WHEN csr_get_prod_pattern_phases%NOTFOUND;
1712:
1713: utl_file.new_line(l_file);
1714:
1715: l_data_rec := 'FORMS' || ',';
1716:
1717: l_data_rec := l_data_rec || l_pattern_phases_rec.list_header_id || ',';

Line 1722: utl_file.put(l_file,l_data_rec);

1718: l_data_rec := l_data_rec || p_forms_list_line_id || ',';
1719: l_data_rec := l_data_rec || l_pattern_phases_rec.pattern_id || ',';
1720: l_data_rec := l_data_rec || l_pattern_phases_rec.pricing_phase_id;
1721:
1722: utl_file.put(l_file,l_data_rec);
1723:
1724: END LOOP;
1725:
1726: CLOSE csr_get_prod_pattern_phases;

Line 1736: utl_file.new_line(l_file);

1732:
1733: FETCH csr_get_prod_pattern_phases INTO l_pattern_phases_rec;
1734: EXIT WHEN csr_get_prod_pattern_phases%NOTFOUND;
1735:
1736: utl_file.new_line(l_file);
1737:
1738: l_data_rec := 'HTML' || ',';
1739:
1740: l_data_rec := l_data_rec || l_pattern_phases_rec.list_header_id || ',';

Line 1745: utl_file.put(l_file,l_data_rec);

1741: l_data_rec := l_data_rec || p_html_list_line_id || ',';
1742: l_data_rec := l_data_rec || l_pattern_phases_rec.pattern_id || ',';
1743: l_data_rec := l_data_rec || l_pattern_phases_rec.pricing_phase_id;
1744:
1745: utl_file.put(l_file,l_data_rec);
1746:
1747: END LOOP;
1748:
1749: CLOSE csr_get_prod_pattern_phases;

Line 1755: utl_file.new_line(l_file);

1751: END IF;
1752:
1753: IF (p_pattern_type = 'QUALIFIER') THEN
1754:
1755: utl_file.new_line(l_file);
1756: utl_file.put(l_file,'QUALIFIER HEADER PATTERN PHASES' );
1757: utl_file.new_line(l_file);
1758:
1759: l_pattern_phases_string := 'DataSource, List_Header_Id, List_Line_Id , Pattern_Id, Pricing_Phase_Id';

Line 1756: utl_file.put(l_file,'QUALIFIER HEADER PATTERN PHASES' );

1752:
1753: IF (p_pattern_type = 'QUALIFIER') THEN
1754:
1755: utl_file.new_line(l_file);
1756: utl_file.put(l_file,'QUALIFIER HEADER PATTERN PHASES' );
1757: utl_file.new_line(l_file);
1758:
1759: l_pattern_phases_string := 'DataSource, List_Header_Id, List_Line_Id , Pattern_Id, Pricing_Phase_Id';
1760:

Line 1757: utl_file.new_line(l_file);

1753: IF (p_pattern_type = 'QUALIFIER') THEN
1754:
1755: utl_file.new_line(l_file);
1756: utl_file.put(l_file,'QUALIFIER HEADER PATTERN PHASES' );
1757: utl_file.new_line(l_file);
1758:
1759: l_pattern_phases_string := 'DataSource, List_Header_Id, List_Line_Id , Pattern_Id, Pricing_Phase_Id';
1760:
1761: utl_file.put(l_file,l_pattern_phases_string);

Line 1761: utl_file.put(l_file,l_pattern_phases_string);

1757: utl_file.new_line(l_file);
1758:
1759: l_pattern_phases_string := 'DataSource, List_Header_Id, List_Line_Id , Pattern_Id, Pricing_Phase_Id';
1760:
1761: utl_file.put(l_file,l_pattern_phases_string);
1762:
1763: OPEN csr_get_hqual_pattern_phases(p_forms_list_line_id);
1764: LOOP
1765:

Line 1769: utl_file.new_line(l_file);

1765:
1766: FETCH csr_get_hqual_pattern_phases INTO l_pattern_phases_rec;
1767: EXIT WHEN csr_get_hqual_pattern_phases%NOTFOUND;
1768:
1769: utl_file.new_line(l_file);
1770:
1771: l_data_rec := 'FORMS' || ',';
1772:
1773: l_data_rec := l_data_rec || l_pattern_phases_rec.list_header_id || ',';

Line 1778: utl_file.put(l_file,l_data_rec);

1774: l_data_rec := l_data_rec || p_forms_list_line_id || ',';
1775: l_data_rec := l_data_rec || l_pattern_phases_rec.pattern_id || ',';
1776: l_data_rec := l_data_rec || l_pattern_phases_rec.pricing_phase_id;
1777:
1778: utl_file.put(l_file,l_data_rec);
1779:
1780: END LOOP;
1781:
1782: CLOSE csr_get_hqual_pattern_phases;

Line 1792: utl_file.new_line(l_file);

1788:
1789: FETCH csr_get_hqual_pattern_phases INTO l_pattern_phases_rec;
1790: EXIT WHEN csr_get_hqual_pattern_phases%NOTFOUND;
1791:
1792: utl_file.new_line(l_file);
1793:
1794: l_data_rec := 'HTML' || ',';
1795:
1796: l_data_rec := l_data_rec || l_pattern_phases_rec.list_header_id || ',';

Line 1801: utl_file.put(l_file,l_data_rec);

1797: l_data_rec := l_data_rec || p_forms_list_line_id || ',';
1798: l_data_rec := l_data_rec || l_pattern_phases_rec.pattern_id || ',';
1799: l_data_rec := l_data_rec || l_pattern_phases_rec.pricing_phase_id;
1800:
1801: utl_file.put(l_file,l_data_rec);
1802:
1803: END LOOP;
1804:
1805: CLOSE csr_get_hqual_pattern_phases;

Line 1807: utl_file.new_line(l_file);

1803: END LOOP;
1804:
1805: CLOSE csr_get_hqual_pattern_phases;
1806:
1807: utl_file.new_line(l_file);
1808: utl_file.put(l_file,'QUALIFIER LINE PATTERN PHASES' );
1809: utl_file.new_line(l_file);
1810:
1811: l_pattern_phases_string := 'DataSource, List_Header_Id, List_Line_Id , Pattern_Id, Pricing_Phase_Id';

Line 1808: utl_file.put(l_file,'QUALIFIER LINE PATTERN PHASES' );

1804:
1805: CLOSE csr_get_hqual_pattern_phases;
1806:
1807: utl_file.new_line(l_file);
1808: utl_file.put(l_file,'QUALIFIER LINE PATTERN PHASES' );
1809: utl_file.new_line(l_file);
1810:
1811: l_pattern_phases_string := 'DataSource, List_Header_Id, List_Line_Id , Pattern_Id, Pricing_Phase_Id';
1812:

Line 1809: utl_file.new_line(l_file);

1805: CLOSE csr_get_hqual_pattern_phases;
1806:
1807: utl_file.new_line(l_file);
1808: utl_file.put(l_file,'QUALIFIER LINE PATTERN PHASES' );
1809: utl_file.new_line(l_file);
1810:
1811: l_pattern_phases_string := 'DataSource, List_Header_Id, List_Line_Id , Pattern_Id, Pricing_Phase_Id';
1812:
1813: utl_file.put(l_file,l_pattern_phases_string);

Line 1813: utl_file.put(l_file,l_pattern_phases_string);

1809: utl_file.new_line(l_file);
1810:
1811: l_pattern_phases_string := 'DataSource, List_Header_Id, List_Line_Id , Pattern_Id, Pricing_Phase_Id';
1812:
1813: utl_file.put(l_file,l_pattern_phases_string);
1814:
1815: OPEN csr_get_lqual_pattern_phases(p_forms_list_line_id);
1816: LOOP
1817:

Line 1821: utl_file.new_line(l_file);

1817:
1818: FETCH csr_get_lqual_pattern_phases INTO l_pattern_phases_rec;
1819: EXIT WHEN csr_get_lqual_pattern_phases%NOTFOUND;
1820:
1821: utl_file.new_line(l_file);
1822:
1823: l_data_rec := 'FORMS' || ',';
1824:
1825: l_data_rec := l_data_rec || l_pattern_phases_rec.list_header_id || ',';

Line 1830: utl_file.put(l_file,l_data_rec);

1826: l_data_rec := l_data_rec || p_forms_list_line_id || ',';
1827: l_data_rec := l_data_rec || l_pattern_phases_rec.pattern_id || ',';
1828: l_data_rec := l_data_rec || l_pattern_phases_rec.pricing_phase_id;
1829:
1830: utl_file.put(l_file,l_data_rec);
1831:
1832: END LOOP;
1833:
1834: CLOSE csr_get_lqual_pattern_phases;

Line 1844: utl_file.new_line(l_file);

1840:
1841: FETCH csr_get_lqual_pattern_phases INTO l_pattern_phases_rec;
1842: EXIT WHEN csr_get_lqual_pattern_phases%NOTFOUND;
1843:
1844: utl_file.new_line(l_file);
1845:
1846: l_data_rec := 'HTML' || ',';
1847:
1848: l_data_rec := l_data_rec || l_pattern_phases_rec.list_header_id || ',';

Line 1853: utl_file.put(l_file,l_data_rec);

1849: l_data_rec := l_data_rec || p_forms_list_line_id || ',';
1850: l_data_rec := l_data_rec || l_pattern_phases_rec.pattern_id || ',';
1851: l_data_rec := l_data_rec || l_pattern_phases_rec.pricing_phase_id;
1852:
1853: utl_file.put(l_file,l_data_rec);
1854:
1855: END LOOP;
1856:
1857: CLOSE csr_get_lqual_pattern_phases;

Line 1861: utl_file.fclose(l_file);

1857: CLOSE csr_get_lqual_pattern_phases;
1858:
1859: END IF;
1860:
1861: utl_file.fclose(l_file);
1862: x_return_status := 'S';
1863:
1864: END Pattern_Phases_Data;
1865:

Line 1872: l_file UTL_FILE.file_type;

1868: p_file_dir VARCHAR2,
1869: x_return_status OUT NOCOPY VARCHAR2) IS
1870:
1871: l_filename VARCHAR2(60);
1872: l_file UTL_FILE.file_type;
1873: l_profiles_string VARCHAR2(2000);
1874: l_data_rec VARCHAR2(700);
1875: l_profile_value VARCHAR2(30);
1876:

Line 1886: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');

1882:
1883: l_filename := 'QP_' || p_data_creation_method || '_OTHERS.dat';
1884:
1885: BEGIN
1886: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');
1887: EXCEPTION
1888: WHEN UTL_FILE.INVALID_PATH THEN
1889: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
1890: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');

Line 1888: WHEN UTL_FILE.INVALID_PATH THEN

1884:
1885: BEGIN
1886: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');
1887: EXCEPTION
1888: WHEN UTL_FILE.INVALID_PATH THEN
1889: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
1890: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
1891: RETURN;
1892: END;

Line 1890: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');

1886: l_file := UTL_FILE.fopen(p_file_dir, l_filename, 'a');
1887: EXCEPTION
1888: WHEN UTL_FILE.INVALID_PATH THEN
1889: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR: Log directory, '||p_file_dir||' is not accessible');
1890: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Please select a directory included in the utl_file_dir parameter for this database');
1891: RETURN;
1892: END;
1893:
1894: OPEN csr_get_profile_value('QP_HVOP_PRICING_SETUP');

Line 1898: utl_file.new_line(l_file);

1894: OPEN csr_get_profile_value('QP_HVOP_PRICING_SETUP');
1895: FETCH csr_get_profile_value INTO l_profile_value;
1896: CLOSE csr_get_profile_value;
1897:
1898: utl_file.new_line(l_file);
1899: utl_file.put(l_file,'PROFILE VALUES ' );
1900: utl_file.new_line(l_file);
1901:
1902: l_profiles_string := 'DataSource, List_Line_Id , Profile_Name , Profile_Value';

Line 1899: utl_file.put(l_file,'PROFILE VALUES ' );

1895: FETCH csr_get_profile_value INTO l_profile_value;
1896: CLOSE csr_get_profile_value;
1897:
1898: utl_file.new_line(l_file);
1899: utl_file.put(l_file,'PROFILE VALUES ' );
1900: utl_file.new_line(l_file);
1901:
1902: l_profiles_string := 'DataSource, List_Line_Id , Profile_Name , Profile_Value';
1903:

Line 1900: utl_file.new_line(l_file);

1896: CLOSE csr_get_profile_value;
1897:
1898: utl_file.new_line(l_file);
1899: utl_file.put(l_file,'PROFILE VALUES ' );
1900: utl_file.new_line(l_file);
1901:
1902: l_profiles_string := 'DataSource, List_Line_Id , Profile_Name , Profile_Value';
1903:
1904: utl_file.put(l_file,l_profiles_string);

Line 1904: utl_file.put(l_file,l_profiles_string);

1900: utl_file.new_line(l_file);
1901:
1902: l_profiles_string := 'DataSource, List_Line_Id , Profile_Name , Profile_Value';
1903:
1904: utl_file.put(l_file,l_profiles_string);
1905: utl_file.new_line(l_file);
1906:
1907: l_data_rec := p_data_creation_method || ',';
1908:

Line 1905: utl_file.new_line(l_file);

1901:
1902: l_profiles_string := 'DataSource, List_Line_Id , Profile_Name , Profile_Value';
1903:
1904: utl_file.put(l_file,l_profiles_string);
1905: utl_file.new_line(l_file);
1906:
1907: l_data_rec := p_data_creation_method || ',';
1908:
1909: l_data_rec := l_data_rec || p_list_line_id || ',' ;

Line 1913: utl_file.put(l_file,l_data_rec);

1909: l_data_rec := l_data_rec || p_list_line_id || ',' ;
1910: l_data_rec := l_data_rec || 'QP_HVOP_PRICING_SETUP ' || ',' ;
1911: l_data_rec := l_data_rec || l_profile_value ;
1912:
1913: utl_file.put(l_file,l_data_rec);
1914:
1915: utl_file.fclose(l_file);
1916: x_return_status := 'S';
1917:

Line 1915: utl_file.fclose(l_file);

1911: l_data_rec := l_data_rec || l_profile_value ;
1912:
1913: utl_file.put(l_file,l_data_rec);
1914:
1915: utl_file.fclose(l_file);
1916: x_return_status := 'S';
1917:
1918: END Profiles_Data;
1919: