DBA Data[Home] [Help]

APPS.JA_CN_UTILITY dependencies on FND_FILE

Line 116: Fnd_File.Put_Line(Fnd_File.Output, l_Error_Msg);

112: NAME => 'JA_CN_PROFILE_NOT_ENABLE');
113: l_Error_Msg := Fnd_Message.Get;
114:
115: --Output error message
116: Fnd_File.Put_Line(Fnd_File.Output, l_Error_Msg);
117: END IF;
118:
119: --To check if current responsibility has profile 'JA: CNAO Legal Entity'
120: IF Fnd_Profile.VALUE(NAME => 'JA_CN_LEGAL_ENTITY') IS NULL

Line 129: Fnd_File.Put_Line(Fnd_File.Output, l_Error_Msg);

125: NAME => 'JA_CN_NO_LEGAL_ENTITY');
126: l_Error_Msg := Fnd_Message.Get;
127:
128: --Output error message
129: Fnd_File.Put_Line(Fnd_File.Output, l_Error_Msg);
130: END IF; -- FND_PROFILE.Value(NAME => 'JA_CN_LEGAL_ENTITY')IS NULL
131:
132: IF l_False_Flag = 'N'
133: THEN

Line 241: Fnd_File.Put_Line(Fnd_File.Output, l_Message);

237: EXCEPTION
238: WHEN No_Data_Found THEN
239: Fnd_Message.Set_Name('JA', 'JA_CN_MISSING_BOOK_INFO');
240: l_Message := Fnd_Message.Get();
241: Fnd_File.Put_Line(Fnd_File.Output, l_Message);
242: IF (l_Exception_Level >= l_Runtime_Level)
243: THEN
244: Fnd_Log.STRING(l_Exception_Level, l_Module_Name, l_Message);
245: END IF; --l_exception_level >= l_runtime_level

Line 563: --Fnd_File.Put(Fnd_File.Output, Substr(p_Clob, l_Pos, l_Tmp));--fix bug 7524912 delete

559: IF (l_Pos_Tag > l_Tmp1)
560: AND (l_Tmp < 0)
561: THEN
562: l_Tmp := l_Pos_Tag - l_Pos + 1;
563: --Fnd_File.Put(Fnd_File.Output, Substr(p_Clob, l_Pos, l_Tmp));--fix bug 7524912 delete
564: Fnd_File.PUT_LINE(Fnd_File.Output, Substr(p_Clob, l_Pos, l_Tmp));--fix bug 7524912 add
565: l_Pos := l_Pos_Tag + 1;
566: ELSE
567: l_Substr := Substr(p_Clob, l_Pos);

Line 564: Fnd_File.PUT_LINE(Fnd_File.Output, Substr(p_Clob, l_Pos, l_Tmp));--fix bug 7524912 add

560: AND (l_Tmp < 0)
561: THEN
562: l_Tmp := l_Pos_Tag - l_Pos + 1;
563: --Fnd_File.Put(Fnd_File.Output, Substr(p_Clob, l_Pos, l_Tmp));--fix bug 7524912 delete
564: Fnd_File.PUT_LINE(Fnd_File.Output, Substr(p_Clob, l_Pos, l_Tmp));--fix bug 7524912 add
565: l_Pos := l_Pos_Tag + 1;
566: ELSE
567: l_Substr := Substr(p_Clob, l_Pos);
568: --Fnd_File.Put(Fnd_File.Output, l_Substr);--fix bug 7524912 delete

Line 568: --Fnd_File.Put(Fnd_File.Output, l_Substr);--fix bug 7524912 delete

564: Fnd_File.PUT_LINE(Fnd_File.Output, Substr(p_Clob, l_Pos, l_Tmp));--fix bug 7524912 add
565: l_Pos := l_Pos_Tag + 1;
566: ELSE
567: l_Substr := Substr(p_Clob, l_Pos);
568: --Fnd_File.Put(Fnd_File.Output, l_Substr);--fix bug 7524912 delete
569: Fnd_File.PUT_LINE(Fnd_File.Output, l_Substr);--fix bug 7524912 add
570: l_Pos := l_Len + 1;
571:
572: END IF;

Line 569: Fnd_File.PUT_LINE(Fnd_File.Output, l_Substr);--fix bug 7524912 add

565: l_Pos := l_Pos_Tag + 1;
566: ELSE
567: l_Substr := Substr(p_Clob, l_Pos);
568: --Fnd_File.Put(Fnd_File.Output, l_Substr);--fix bug 7524912 delete
569: Fnd_File.PUT_LINE(Fnd_File.Output, l_Substr);--fix bug 7524912 add
570: l_Pos := l_Len + 1;
571:
572: END IF;
573:

Line 577: Fnd_File.PUT_LINE(Fnd_File.log, 'Error:' || Sqlcode||Sqlerrm);

573:
574: END LOOP;
575: EXCEPTION
576: WHEN OTHERS THEN
577: Fnd_File.PUT_LINE(Fnd_File.log, 'Error:' || Sqlcode||Sqlerrm);
578: END Output_Conc;
579:
580:
581:

Line 1818: FND_FILE.put_line(FND_FILE.output, Get_XML_Tag(pv_sub_root_tag_name, pv_tag_type, pv_module_name));

1814: , 'Enter procedure'
1815: );
1816: END IF; --l_proc_level>=l_dbg_level
1817:
1818: FND_FILE.put_line(FND_FILE.output, Get_XML_Tag(pv_sub_root_tag_name, pv_tag_type, pv_module_name));
1819:
1820:
1821:
1822: --logging for debug

Line 1892: FND_FILE.put_line(FND_FILE.output, Get_XML_Tag(pv_child_tag_name,'S',pv_module_name) || Replace_Special_Characters(pv_text_node_value) || Get_XML_Tag(pv_child_tag_name,'E',pv_module_name));

1888: IF(pv_data_type = GV_TYPE_VARCHAR2)
1889: THEN
1890: IF (pv_text_node_value IS NOT NULL)
1891: THEN
1892: FND_FILE.put_line(FND_FILE.output, Get_XML_Tag(pv_child_tag_name,'S',pv_module_name) || Replace_Special_Characters(pv_text_node_value) || Get_XML_Tag(pv_child_tag_name,'E',pv_module_name));
1893: ELSE
1894: FND_FILE.put_line(FND_FILE.output, Get_XML_Tag(pv_child_tag_name,'B',pv_module_name));
1895: END IF;
1896: ELSIF (pv_data_type = GV_TYPE_NUMBER)

Line 1894: FND_FILE.put_line(FND_FILE.output, Get_XML_Tag(pv_child_tag_name,'B',pv_module_name));

1890: IF (pv_text_node_value IS NOT NULL)
1891: THEN
1892: FND_FILE.put_line(FND_FILE.output, Get_XML_Tag(pv_child_tag_name,'S',pv_module_name) || Replace_Special_Characters(pv_text_node_value) || Get_XML_Tag(pv_child_tag_name,'E',pv_module_name));
1893: ELSE
1894: FND_FILE.put_line(FND_FILE.output, Get_XML_Tag(pv_child_tag_name,'B',pv_module_name));
1895: END IF;
1896: ELSIF (pv_data_type = GV_TYPE_NUMBER)
1897: THEN
1898: IF (pv_text_node_value IS NOT NULL)

Line 1900: FND_FILE.put_line(FND_FILE.output, Get_XML_Tag(pv_child_tag_name,'S',pv_module_name) || pv_text_node_value || Get_XML_Tag(pv_child_tag_name,'E',pv_module_name));

1896: ELSIF (pv_data_type = GV_TYPE_NUMBER)
1897: THEN
1898: IF (pv_text_node_value IS NOT NULL)
1899: THEN
1900: FND_FILE.put_line(FND_FILE.output, Get_XML_Tag(pv_child_tag_name,'S',pv_module_name) || pv_text_node_value || Get_XML_Tag(pv_child_tag_name,'E',pv_module_name));
1901: ELSIF(pv_required = GV_REQUIRED_YES)
1902: THEN
1903: --FND_FILE.put_line(FND_FILE.output, Get_XML_Tag(pv_child_tag_name,'B'));
1904: FND_FILE.put_line(FND_FILE.output, Get_XML_Tag(pv_child_tag_name,'S',pv_module_name) || '0' || Get_XML_Tag(pv_child_tag_name,'E',pv_module_name));

Line 1903: --FND_FILE.put_line(FND_FILE.output, Get_XML_Tag(pv_child_tag_name,'B'));

1899: THEN
1900: FND_FILE.put_line(FND_FILE.output, Get_XML_Tag(pv_child_tag_name,'S',pv_module_name) || pv_text_node_value || Get_XML_Tag(pv_child_tag_name,'E',pv_module_name));
1901: ELSIF(pv_required = GV_REQUIRED_YES)
1902: THEN
1903: --FND_FILE.put_line(FND_FILE.output, Get_XML_Tag(pv_child_tag_name,'B'));
1904: FND_FILE.put_line(FND_FILE.output, Get_XML_Tag(pv_child_tag_name,'S',pv_module_name) || '0' || Get_XML_Tag(pv_child_tag_name,'E',pv_module_name));
1905: END IF;
1906: END IF;
1907: --logging for debug

Line 1904: FND_FILE.put_line(FND_FILE.output, Get_XML_Tag(pv_child_tag_name,'S',pv_module_name) || '0' || Get_XML_Tag(pv_child_tag_name,'E',pv_module_name));

1900: FND_FILE.put_line(FND_FILE.output, Get_XML_Tag(pv_child_tag_name,'S',pv_module_name) || pv_text_node_value || Get_XML_Tag(pv_child_tag_name,'E',pv_module_name));
1901: ELSIF(pv_required = GV_REQUIRED_YES)
1902: THEN
1903: --FND_FILE.put_line(FND_FILE.output, Get_XML_Tag(pv_child_tag_name,'B'));
1904: FND_FILE.put_line(FND_FILE.output, Get_XML_Tag(pv_child_tag_name,'S',pv_module_name) || '0' || Get_XML_Tag(pv_child_tag_name,'E',pv_module_name));
1905: END IF;
1906: END IF;
1907: --logging for debug
1908: IF (ln_proc_level>=ln_dbg_level)

Line 1978: FND_FILE.put_line(FND_FILE.output, Get_XML_Tag(pv_child_tag_name, GV_TAG_TYPE_START, pv_module_name) || pv_text_node_value || Get_XML_Tag(pv_child_tag_name, GV_TAG_TYPE_END, pv_module_name));

1974: IF(pv_text_node_value IS NOT NULL)
1975: THEN
1976: IF(length(pv_text_node_value) = pn_fixed_length)
1977: THEN
1978: FND_FILE.put_line(FND_FILE.output, Get_XML_Tag(pv_child_tag_name, GV_TAG_TYPE_START, pv_module_name) || pv_text_node_value || Get_XML_Tag(pv_child_tag_name, GV_TAG_TYPE_END, pv_module_name));
1979: ELSE
1980: RAISE LENGTH_IS_NOT_MATCHED;
1981: END IF;
1982: ELSE

Line 1988: FND_FILE.put_line(FND_FILE.output, Get_XML_Tag(pv_child_tag_name, GV_TAG_TYPE_START, pv_module_name) || lv_text_node_value || Get_XML_Tag(pv_child_tag_name, GV_TAG_TYPE_END, pv_module_name));

1984: THEN
1985: SELECT rpad(NVL(NULL, '0'), pn_fixed_length, '0')
1986: INTO lv_text_node_value
1987: FROM dual;
1988: FND_FILE.put_line(FND_FILE.output, Get_XML_Tag(pv_child_tag_name, GV_TAG_TYPE_START, pv_module_name) || lv_text_node_value || Get_XML_Tag(pv_child_tag_name, GV_TAG_TYPE_END, pv_module_name));
1989: --ELSE
1990: --FND_FILE.put_line(FND_FILE.output, Get_XML_Tag(pv_child_tag_name, GV_TAG_TYPE_BLANK));
1991: END IF;
1992:

Line 1990: --FND_FILE.put_line(FND_FILE.output, Get_XML_Tag(pv_child_tag_name, GV_TAG_TYPE_BLANK));

1986: INTO lv_text_node_value
1987: FROM dual;
1988: FND_FILE.put_line(FND_FILE.output, Get_XML_Tag(pv_child_tag_name, GV_TAG_TYPE_START, pv_module_name) || lv_text_node_value || Get_XML_Tag(pv_child_tag_name, GV_TAG_TYPE_END, pv_module_name));
1989: --ELSE
1990: --FND_FILE.put_line(FND_FILE.output, Get_XML_Tag(pv_child_tag_name, GV_TAG_TYPE_BLANK));
1991: END IF;
1992:
1993: END IF;
1994:

Line 2014: FND_FILE.put_line(FND_FILE.log, 'The length of the element ' || pv_child_tag_name || ' should be ' || pn_fixed_length);

2010: l_Module_Prefix || '.' || lv_procedure_name ||
2011: '.exception',
2012: 'The length of the element ' || pv_child_tag_name || ' should be ' || pn_fixed_length);
2013: END IF; --l_proc_level>=l_dbg_level
2014: FND_FILE.put_line(FND_FILE.log, 'The length of the element ' || pv_child_tag_name || ' should be ' || pn_fixed_length);
2015: RAISE;
2016: WHEN OTHERS THEN
2017: IF(FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
2018: THEN

Line 2345: Fnd_File.Put_Line(Fnd_File.Output, lv_Error_Msg);

2341: NAME => 'JA_CN_MISSING_BOOK_INFO');
2342: lv_Error_Msg := Fnd_Message.Get;
2343:
2344: --Output error message
2345: Fnd_File.Put_Line(Fnd_File.Output, lv_Error_Msg);
2346: END IF; --v_row.book_num IS NULL OR v_row.book_name IS NULL OR
2347: --v_row.company_name IS NULL OR v_row.organization_id IS NULL OR
2348: --v_row.ent_quality IS NULL OR v_row.ent_industry IS NULL OR
2349: --v_row.cnao_stand_ver IS NULL

Line 2360: Fnd_File.Put_Line(Fnd_File.Output, lv_Error_Msg);

2356: Fnd_Message.Set_Name(Application => 'JA',
2357: NAME => 'JA_CN_MISSING_BOOK_INFO');
2358: lv_Error_Msg := Fnd_Message.Get;
2359: --Output error message
2360: Fnd_File.Put_Line(Fnd_File.Output, lv_Error_Msg);
2361: END IF; --ln_row_count = 0
2362:
2363:
2364: IF lv_False_Flag = 'N'

Line 2445: FND_FILE.put_line(FND_FILE.log, FND_MESSAGE.Get);

2441: ,NAME => 'JA_CN_LOG_STEP'
2442: );
2443: FND_MESSAGE.SET_TOKEN('STEP_NUMBER', pv_step_number);
2444: FND_MESSAGE.SET_TOKEN('REPORT_NAME', Get_XML_Tag(pv_report_name,'O',pv_module_name));
2445: FND_FILE.put_line(FND_FILE.log, FND_MESSAGE.Get);
2446:
2447: --logging for debug
2448: IF (ln_proc_level>=ln_dbg_level)
2449: THEN

Line 2501: FND_FILE.put_line(FND_FILE.log, FND_MESSAGE.Get);

2497: FND_MESSAGE.Set_Name( APPLICATION => 'JA'
2498: ,NAME => 'JA_CN_NO_DATA_FOR_REPORT'
2499: );
2500: FND_MESSAGE.SET_TOKEN('REPORT_NAME', Get_XML_Tag(pv_report_name,'O',pv_module_name));
2501: FND_FILE.put_line(FND_FILE.log, FND_MESSAGE.Get);
2502:
2503: --logging for debug
2504: IF (ln_proc_level>=ln_dbg_level)
2505: THEN

Line 2639: FND_FILE.PUT_LINE(Fnd_FILE.LOG, 'lv_attribute_column='||lv_attribute_column);

2635: --Cursor for getting segment or attribute column
2636: FOR v_attribute_column_row IN attribute_column_cur
2637: LOOP
2638: lv_attribute_column := v_attribute_column_row.Attribute_Column;
2639: FND_FILE.PUT_LINE(Fnd_FILE.LOG, 'lv_attribute_column='||lv_attribute_column);
2640: EXIT;
2641: END LOOP;
2642:
2643: --logging for debug

Line 2719: FND_FILE.PUT_LINE(Fnd_FILE.LOG, 'lv_segment_value_desc='||lv_segment_value_desc);

2715: --Cursor for getting segment value
2716: FOR v_segment_value_row IN segment_value_cur
2717: LOOP
2718: lv_segment_value_desc := v_segment_value_row.Segment_Value_Description;
2719: FND_FILE.PUT_LINE(Fnd_FILE.LOG, 'lv_segment_value_desc='||lv_segment_value_desc);
2720: EXIT;
2721: END LOOP;
2722:
2723: --logging for debug

Line 2798: FND_FILE.PUT_LINE(Fnd_FILE.LOG, 'lv_atrribute_value='||lv_atrribute_value);

2794: --Cursor for getting attribute value
2795: OPEN lc_attribute_value FOR lv_cursor_sql;
2796: FETCH lc_attribute_value
2797: INTO lv_atrribute_value;
2798: FND_FILE.PUT_LINE(Fnd_FILE.LOG, 'lv_atrribute_value='||lv_atrribute_value);
2799: CLOSE lc_attribute_value;
2800:
2801: --logging for debug
2802: IF (ln_proc_level>=ln_dbg_level)

Line 2875: FND_FILE.PUT_LINE(Fnd_FILE.LOG, 'lv_attribute_value_desc='||lv_attribute_value_desc);

2871: --Cursor for getting attribute value description
2872: FOR v_attribute_value_row IN attribute_value_cur
2873: LOOP
2874: lv_attribute_value_desc := v_attribute_value_row.Attribute_Value_Desc;
2875: FND_FILE.PUT_LINE(Fnd_FILE.LOG, 'lv_attribute_value_desc='||lv_attribute_value_desc);
2876: EXIT;
2877: END LOOP;
2878:
2879: --logging for debug

Line 3099: FND_FILE.PUT_LINE(Fnd_FILE.LOG, 'lv_budget_type_value='||lv_budget_type_value);

3095: --Cursor for getting budget type value
3096: OPEN lc_budget_type_value FOR lv_cursor_sql;
3097: FETCH lc_budget_type_value
3098: INTO lv_budget_type_value;
3099: FND_FILE.PUT_LINE(Fnd_FILE.LOG, 'lv_budget_type_value='||lv_budget_type_value);
3100: CLOSE lc_budget_type_value;
3101:
3102: --logging for debug
3103: IF (ln_proc_level>=ln_dbg_level)