45: l_exc_lang_limit exception;
46:
47: begin
48:
49: fnd_file.put_line(fnd_file.log,'Parameters..');
50: fnd_file.put_line(fnd_file.log,'p_vat_reporting_entity_id :'||p_vat_reporting_entity_id);
51: fnd_file.put_line(fnd_file.log,'p_rep_period :'||p_rep_period);
52: fnd_file.put_line(fnd_file.log,'p_fax_number :'||p_fax_number);
53: fnd_file.put_line(fnd_file.log,'p_email :'||p_email);
46:
47: begin
48:
49: fnd_file.put_line(fnd_file.log,'Parameters..');
50: fnd_file.put_line(fnd_file.log,'p_vat_reporting_entity_id :'||p_vat_reporting_entity_id);
51: fnd_file.put_line(fnd_file.log,'p_rep_period :'||p_rep_period);
52: fnd_file.put_line(fnd_file.log,'p_fax_number :'||p_fax_number);
53: fnd_file.put_line(fnd_file.log,'p_email :'||p_email);
54: fnd_file.put_line(fnd_file.log,'p_resp_email :'||p_resp_email);
47: begin
48:
49: fnd_file.put_line(fnd_file.log,'Parameters..');
50: fnd_file.put_line(fnd_file.log,'p_vat_reporting_entity_id :'||p_vat_reporting_entity_id);
51: fnd_file.put_line(fnd_file.log,'p_rep_period :'||p_rep_period);
52: fnd_file.put_line(fnd_file.log,'p_fax_number :'||p_fax_number);
53: fnd_file.put_line(fnd_file.log,'p_email :'||p_email);
54: fnd_file.put_line(fnd_file.log,'p_resp_email :'||p_resp_email);
55: fnd_file.put_line(fnd_file.log,'p_trans_resp :'||p_trans_resp);
48:
49: fnd_file.put_line(fnd_file.log,'Parameters..');
50: fnd_file.put_line(fnd_file.log,'p_vat_reporting_entity_id :'||p_vat_reporting_entity_id);
51: fnd_file.put_line(fnd_file.log,'p_rep_period :'||p_rep_period);
52: fnd_file.put_line(fnd_file.log,'p_fax_number :'||p_fax_number);
53: fnd_file.put_line(fnd_file.log,'p_email :'||p_email);
54: fnd_file.put_line(fnd_file.log,'p_resp_email :'||p_resp_email);
55: fnd_file.put_line(fnd_file.log,'p_trans_resp :'||p_trans_resp);
56: fnd_file.put_line(fnd_file.log,'p_trans_ackn :'||p_trans_ackn);
49: fnd_file.put_line(fnd_file.log,'Parameters..');
50: fnd_file.put_line(fnd_file.log,'p_vat_reporting_entity_id :'||p_vat_reporting_entity_id);
51: fnd_file.put_line(fnd_file.log,'p_rep_period :'||p_rep_period);
52: fnd_file.put_line(fnd_file.log,'p_fax_number :'||p_fax_number);
53: fnd_file.put_line(fnd_file.log,'p_email :'||p_email);
54: fnd_file.put_line(fnd_file.log,'p_resp_email :'||p_resp_email);
55: fnd_file.put_line(fnd_file.log,'p_trans_resp :'||p_trans_resp);
56: fnd_file.put_line(fnd_file.log,'p_trans_ackn :'||p_trans_ackn);
57: fnd_file.put_line(fnd_file.log,'p_sec_resp :'||p_sec_resp);
50: fnd_file.put_line(fnd_file.log,'p_vat_reporting_entity_id :'||p_vat_reporting_entity_id);
51: fnd_file.put_line(fnd_file.log,'p_rep_period :'||p_rep_period);
52: fnd_file.put_line(fnd_file.log,'p_fax_number :'||p_fax_number);
53: fnd_file.put_line(fnd_file.log,'p_email :'||p_email);
54: fnd_file.put_line(fnd_file.log,'p_resp_email :'||p_resp_email);
55: fnd_file.put_line(fnd_file.log,'p_trans_resp :'||p_trans_resp);
56: fnd_file.put_line(fnd_file.log,'p_trans_ackn :'||p_trans_ackn);
57: fnd_file.put_line(fnd_file.log,'p_sec_resp :'||p_sec_resp);
58: fnd_file.put_line(fnd_file.log,'p_sec_ackn :'||p_sec_ackn);
51: fnd_file.put_line(fnd_file.log,'p_rep_period :'||p_rep_period);
52: fnd_file.put_line(fnd_file.log,'p_fax_number :'||p_fax_number);
53: fnd_file.put_line(fnd_file.log,'p_email :'||p_email);
54: fnd_file.put_line(fnd_file.log,'p_resp_email :'||p_resp_email);
55: fnd_file.put_line(fnd_file.log,'p_trans_resp :'||p_trans_resp);
56: fnd_file.put_line(fnd_file.log,'p_trans_ackn :'||p_trans_ackn);
57: fnd_file.put_line(fnd_file.log,'p_sec_resp :'||p_sec_resp);
58: fnd_file.put_line(fnd_file.log,'p_sec_ackn :'||p_sec_ackn);
59:
52: fnd_file.put_line(fnd_file.log,'p_fax_number :'||p_fax_number);
53: fnd_file.put_line(fnd_file.log,'p_email :'||p_email);
54: fnd_file.put_line(fnd_file.log,'p_resp_email :'||p_resp_email);
55: fnd_file.put_line(fnd_file.log,'p_trans_resp :'||p_trans_resp);
56: fnd_file.put_line(fnd_file.log,'p_trans_ackn :'||p_trans_ackn);
57: fnd_file.put_line(fnd_file.log,'p_sec_resp :'||p_sec_resp);
58: fnd_file.put_line(fnd_file.log,'p_sec_ackn :'||p_sec_ackn);
59:
60: open c_get_reg_det(p_vat_reporting_entity_id);
53: fnd_file.put_line(fnd_file.log,'p_email :'||p_email);
54: fnd_file.put_line(fnd_file.log,'p_resp_email :'||p_resp_email);
55: fnd_file.put_line(fnd_file.log,'p_trans_resp :'||p_trans_resp);
56: fnd_file.put_line(fnd_file.log,'p_trans_ackn :'||p_trans_ackn);
57: fnd_file.put_line(fnd_file.log,'p_sec_resp :'||p_sec_resp);
58: fnd_file.put_line(fnd_file.log,'p_sec_ackn :'||p_sec_ackn);
59:
60: open c_get_reg_det(p_vat_reporting_entity_id);
61: fetch c_get_reg_det into l_be_reg_number,l_legal_entity_id;
54: fnd_file.put_line(fnd_file.log,'p_resp_email :'||p_resp_email);
55: fnd_file.put_line(fnd_file.log,'p_trans_resp :'||p_trans_resp);
56: fnd_file.put_line(fnd_file.log,'p_trans_ackn :'||p_trans_ackn);
57: fnd_file.put_line(fnd_file.log,'p_sec_resp :'||p_sec_resp);
58: fnd_file.put_line(fnd_file.log,'p_sec_ackn :'||p_sec_ackn);
59:
60: open c_get_reg_det(p_vat_reporting_entity_id);
61: fetch c_get_reg_det into l_be_reg_number,l_legal_entity_id;
62: close c_get_reg_det;
83: --get the value of form/survey code
84:
85: fnd_profile.get('JEBE_CSSR_SURVEY_CODE',l_survey_code);
86:
87: fnd_file.put_line(fnd_file.log,'Survey Code :'||l_survey_code);
88:
89: if (l_survey_code is null ) then
90: raise l_exc_survey_code_null;
91: end if;
101: l_proc_status := 'Initilising the xml';
102:
103: g_vc_spacing := 1;
104:
105: fnd_file.put_line(fnd_file.log,'Generating admin data....');
106:
107: get_admin_data(
108: p_vat_reg_num =>l_be_reg_number,
109: p_email_address =>p_email,
118: p_survey_code =>l_survey_code,
119: p_period =>p_rep_period
120: );
121:
122: fnd_file.put_line(fnd_file.log,'Completed admin data');
123:
124: fnd_file.put_line(fnd_file.log,'Generating content data...');
125: get_content_data (l_survey_code,p_rep_period,p_vat_reporting_entity_id);
126: fnd_file.put_line(fnd_file.log,'Completed content data');
120: );
121:
122: fnd_file.put_line(fnd_file.log,'Completed admin data');
123:
124: fnd_file.put_line(fnd_file.log,'Generating content data...');
125: get_content_data (l_survey_code,p_rep_period,p_vat_reporting_entity_id);
126: fnd_file.put_line(fnd_file.log,'Completed content data');
127:
128: exception
122: fnd_file.put_line(fnd_file.log,'Completed admin data');
123:
124: fnd_file.put_line(fnd_file.log,'Generating content data...');
125: get_content_data (l_survey_code,p_rep_period,p_vat_reporting_entity_id);
126: fnd_file.put_line(fnd_file.log,'Completed content data');
127:
128: exception
129: when l_exc_survey_code_null then
130: fnd_file.put_line(fnd_file.log,'-------------');
126: fnd_file.put_line(fnd_file.log,'Completed content data');
127:
128: exception
129: when l_exc_survey_code_null then
130: fnd_file.put_line(fnd_file.log,'-------------');
131: fnd_file.put_line(fnd_file.log,' ERROR LOG ');
132: fnd_file.put_line(fnd_file.log,'-------------');
133: fnd_file.put_line(fnd_file.log,' JE_BE_CSSR_PKG: JEBE: Survey code Profile Option not set ');
134: fnd_file.put_line(fnd_file.log,'-------------');
127:
128: exception
129: when l_exc_survey_code_null then
130: fnd_file.put_line(fnd_file.log,'-------------');
131: fnd_file.put_line(fnd_file.log,' ERROR LOG ');
132: fnd_file.put_line(fnd_file.log,'-------------');
133: fnd_file.put_line(fnd_file.log,' JE_BE_CSSR_PKG: JEBE: Survey code Profile Option not set ');
134: fnd_file.put_line(fnd_file.log,'-------------');
135: P_RETCODE := 2;
128: exception
129: when l_exc_survey_code_null then
130: fnd_file.put_line(fnd_file.log,'-------------');
131: fnd_file.put_line(fnd_file.log,' ERROR LOG ');
132: fnd_file.put_line(fnd_file.log,'-------------');
133: fnd_file.put_line(fnd_file.log,' JE_BE_CSSR_PKG: JEBE: Survey code Profile Option not set ');
134: fnd_file.put_line(fnd_file.log,'-------------');
135: P_RETCODE := 2;
136: RETURN;
129: when l_exc_survey_code_null then
130: fnd_file.put_line(fnd_file.log,'-------------');
131: fnd_file.put_line(fnd_file.log,' ERROR LOG ');
132: fnd_file.put_line(fnd_file.log,'-------------');
133: fnd_file.put_line(fnd_file.log,' JE_BE_CSSR_PKG: JEBE: Survey code Profile Option not set ');
134: fnd_file.put_line(fnd_file.log,'-------------');
135: P_RETCODE := 2;
136: RETURN;
137:
130: fnd_file.put_line(fnd_file.log,'-------------');
131: fnd_file.put_line(fnd_file.log,' ERROR LOG ');
132: fnd_file.put_line(fnd_file.log,'-------------');
133: fnd_file.put_line(fnd_file.log,' JE_BE_CSSR_PKG: JEBE: Survey code Profile Option not set ');
134: fnd_file.put_line(fnd_file.log,'-------------');
135: P_RETCODE := 2;
136: RETURN;
137:
138: when l_exc_lang_limit then
135: P_RETCODE := 2;
136: RETURN;
137:
138: when l_exc_lang_limit then
139: fnd_file.put_line(fnd_file.log,'-------------');
140: fnd_file.put_line(fnd_file.log,' ERROR LOG ');
141: fnd_file.put_line(fnd_file.log,'-------------');
142: fnd_file.put_line(fnd_file.log,' JE_BE_CSSR_PKG: The Report can be run for only the following languages');
143: fnd_file.put_line(fnd_file.log,' EN DE NL FR ');
136: RETURN;
137:
138: when l_exc_lang_limit then
139: fnd_file.put_line(fnd_file.log,'-------------');
140: fnd_file.put_line(fnd_file.log,' ERROR LOG ');
141: fnd_file.put_line(fnd_file.log,'-------------');
142: fnd_file.put_line(fnd_file.log,' JE_BE_CSSR_PKG: The Report can be run for only the following languages');
143: fnd_file.put_line(fnd_file.log,' EN DE NL FR ');
144: fnd_file.put_line(fnd_file.log,'-------------');
137:
138: when l_exc_lang_limit then
139: fnd_file.put_line(fnd_file.log,'-------------');
140: fnd_file.put_line(fnd_file.log,' ERROR LOG ');
141: fnd_file.put_line(fnd_file.log,'-------------');
142: fnd_file.put_line(fnd_file.log,' JE_BE_CSSR_PKG: The Report can be run for only the following languages');
143: fnd_file.put_line(fnd_file.log,' EN DE NL FR ');
144: fnd_file.put_line(fnd_file.log,'-------------');
145: P_RETCODE := 2;
138: when l_exc_lang_limit then
139: fnd_file.put_line(fnd_file.log,'-------------');
140: fnd_file.put_line(fnd_file.log,' ERROR LOG ');
141: fnd_file.put_line(fnd_file.log,'-------------');
142: fnd_file.put_line(fnd_file.log,' JE_BE_CSSR_PKG: The Report can be run for only the following languages');
143: fnd_file.put_line(fnd_file.log,' EN DE NL FR ');
144: fnd_file.put_line(fnd_file.log,'-------------');
145: P_RETCODE := 2;
146: RETURN;
139: fnd_file.put_line(fnd_file.log,'-------------');
140: fnd_file.put_line(fnd_file.log,' ERROR LOG ');
141: fnd_file.put_line(fnd_file.log,'-------------');
142: fnd_file.put_line(fnd_file.log,' JE_BE_CSSR_PKG: The Report can be run for only the following languages');
143: fnd_file.put_line(fnd_file.log,' EN DE NL FR ');
144: fnd_file.put_line(fnd_file.log,'-------------');
145: P_RETCODE := 2;
146: RETURN;
147:
140: fnd_file.put_line(fnd_file.log,' ERROR LOG ');
141: fnd_file.put_line(fnd_file.log,'-------------');
142: fnd_file.put_line(fnd_file.log,' JE_BE_CSSR_PKG: The Report can be run for only the following languages');
143: fnd_file.put_line(fnd_file.log,' EN DE NL FR ');
144: fnd_file.put_line(fnd_file.log,'-------------');
145: P_RETCODE := 2;
146: RETURN;
147:
148: when others then
145: P_RETCODE := 2;
146: RETURN;
147:
148: when others then
149: fnd_file.put_line(fnd_file.log,'-------------');
150: fnd_file.put_line(fnd_file.log,' ERROR LOG ');
151: fnd_file.put_line(fnd_file.log,'-------------');
152: fnd_file.put_line(fnd_file.log,' Unexpected error occured in the JE_BE_CSSR_PKG package');
153: fnd_file.put_line(fnd_file.log,' Please check if all the setup is done properly');
146: RETURN;
147:
148: when others then
149: fnd_file.put_line(fnd_file.log,'-------------');
150: fnd_file.put_line(fnd_file.log,' ERROR LOG ');
151: fnd_file.put_line(fnd_file.log,'-------------');
152: fnd_file.put_line(fnd_file.log,' Unexpected error occured in the JE_BE_CSSR_PKG package');
153: fnd_file.put_line(fnd_file.log,' Please check if all the setup is done properly');
154: fnd_file.put_line(fnd_file.log,'-------------');
147:
148: when others then
149: fnd_file.put_line(fnd_file.log,'-------------');
150: fnd_file.put_line(fnd_file.log,' ERROR LOG ');
151: fnd_file.put_line(fnd_file.log,'-------------');
152: fnd_file.put_line(fnd_file.log,' Unexpected error occured in the JE_BE_CSSR_PKG package');
153: fnd_file.put_line(fnd_file.log,' Please check if all the setup is done properly');
154: fnd_file.put_line(fnd_file.log,'-------------');
155: raise;
148: when others then
149: fnd_file.put_line(fnd_file.log,'-------------');
150: fnd_file.put_line(fnd_file.log,' ERROR LOG ');
151: fnd_file.put_line(fnd_file.log,'-------------');
152: fnd_file.put_line(fnd_file.log,' Unexpected error occured in the JE_BE_CSSR_PKG package');
153: fnd_file.put_line(fnd_file.log,' Please check if all the setup is done properly');
154: fnd_file.put_line(fnd_file.log,'-------------');
155: raise;
156: end main;
149: fnd_file.put_line(fnd_file.log,'-------------');
150: fnd_file.put_line(fnd_file.log,' ERROR LOG ');
151: fnd_file.put_line(fnd_file.log,'-------------');
152: fnd_file.put_line(fnd_file.log,' Unexpected error occured in the JE_BE_CSSR_PKG package');
153: fnd_file.put_line(fnd_file.log,' Please check if all the setup is done properly');
154: fnd_file.put_line(fnd_file.log,'-------------');
155: raise;
156: end main;
157:
150: fnd_file.put_line(fnd_file.log,' ERROR LOG ');
151: fnd_file.put_line(fnd_file.log,'-------------');
152: fnd_file.put_line(fnd_file.log,' Unexpected error occured in the JE_BE_CSSR_PKG package');
153: fnd_file.put_line(fnd_file.log,' Please check if all the setup is done properly');
154: fnd_file.put_line(fnd_file.log,'-------------');
155: raise;
156: end main;
157:
158: procedure get_admin_data
191: from dual;
192: --main open
193: -- g_xml := '
194: l_var := JE_BE_CSSR_PKG.level_up;
195: fnd_file.put_line(fnd_file.output,l_var);
196:
197: fnd_file.put_line(fnd_file.output,'
198: --admin open
199: l_var := JE_BE_CSSR_PKG.level_up;
193: -- g_xml := '
194: l_var := JE_BE_CSSR_PKG.level_up;
195: fnd_file.put_line(fnd_file.output,l_var);
196:
197: fnd_file.put_line(fnd_file.output,'
199: l_var := JE_BE_CSSR_PKG.level_up;
200: fnd_file.put_line(fnd_file.output,l_var||'
201:
196:
197: fnd_file.put_line(fnd_file.output,'
198: --admin open
199: l_var := JE_BE_CSSR_PKG.level_up;
200: fnd_file.put_line(fnd_file.output,l_var||'
202: -- sender info open
203: l_var := JE_BE_CSSR_PKG.level_up;
204: fnd_file.put_line(fnd_file.output,l_var||'
200: fnd_file.put_line(fnd_file.output,l_var||'
201:
202: -- sender info open
203: l_var := JE_BE_CSSR_PKG.level_up;
204: fnd_file.put_line(fnd_file.output,l_var||'
206: --contact tag open
207: l_var := JE_BE_CSSR_PKG.level_up;
208: fnd_file.put_line(fnd_file.output,l_var||'
204: fnd_file.put_line(fnd_file.output,l_var||'
205:
206: --contact tag open
207: l_var := JE_BE_CSSR_PKG.level_up;
208: fnd_file.put_line(fnd_file.output,l_var||'
210: -- name tag open and close
211: l_var := JE_BE_CSSR_PKG.level_up;
212: if( p_name is not null ) then
209:
210: -- name tag open and close
211: l_var := JE_BE_CSSR_PKG.level_up;
212: if( p_name is not null ) then
213: fnd_file.put_line(fnd_file.output,l_var||'
214: else
215: fnd_file.put_line(fnd_file.output,l_var||'');
216: end if;
217: -- same level ..
211: l_var := JE_BE_CSSR_PKG.level_up;
212: if( p_name is not null ) then
213: fnd_file.put_line(fnd_file.output,l_var||'
214: else
215: fnd_file.put_line(fnd_file.output,l_var||'');
216: end if;
217: -- same level ..
218:
219: if(p_email_address is not null) then
219: if(p_email_address is not null) then
220: l_string := '
223: fnd_file.put_line(fnd_file.output,l_var||l_string);
224: end if;
225:
226: if ( p_tel_num is not null ) then
227: l_string := '
229: p_tel_num || '" />';
230: fnd_file.put_line(fnd_file.output,l_var||l_string);
231: end if;
232:
233: if( p_fax_num is not null ) then
234: l_string := '
236: p_fax_num || '" />';
237: fnd_file.put_line(fnd_file.output,l_var||l_string);
238: end if;
239:
240: -- contact tag close
241: l_var := JE_BE_CSSR_PKG.level_down;
238: end if;
239:
240: -- contact tag close
241: l_var := JE_BE_CSSR_PKG.level_down;
242: fnd_file.put_line(fnd_file.output,l_var||'');
243: -- sender info close
244: l_var := JE_BE_CSSR_PKG.level_down;
245: fnd_file.put_line(fnd_file.output,l_var||'');
246:
241: l_var := JE_BE_CSSR_PKG.level_down;
242: fnd_file.put_line(fnd_file.output,l_var||'');
243: -- sender info close
244: l_var := JE_BE_CSSR_PKG.level_down;
245: fnd_file.put_line(fnd_file.output,l_var||'');
246:
247: fnd_file.put_line(fnd_file.output,l_var||'
248:
249: -- receiver info open
243: -- sender info close
244: l_var := JE_BE_CSSR_PKG.level_down;
245: fnd_file.put_line(fnd_file.output,l_var||'');
246:
247: fnd_file.put_line(fnd_file.output,l_var||'
248:
249: -- receiver info open
250: if( p_email_resp is not null or
251: p_trans_resp is not null or
253: p_sec_resp is not null or
254: p_sec_ackn is not null ) then
255:
256: -- processsing parameters tag open
257: fnd_file.put_line(fnd_file.output,l_var||'
259: l_var := JE_BE_CSSR_PKG.level_up;
260: -- email response tag
261: if ( p_email_resp is not null ) then
258:
259: l_var := JE_BE_CSSR_PKG.level_up;
260: -- email response tag
261: if ( p_email_resp is not null ) then
262: fnd_file.put_line(fnd_file.output,l_var||'
264: end if;
265:
266: -- transform response tag
264: end if;
265:
266: -- transform response tag
267: if ( p_trans_resp is not null ) then
268: fnd_file.put_line(fnd_file.output,l_var||'
270: end if;
271:
272: -- transform acknowledgement tag open
270: end if;
271:
272: -- transform acknowledgement tag open
273: if ( p_trans_ackn is not null ) then
274: fnd_file.put_line(fnd_file.output,l_var||'
276: end if;
277:
278: -- secure response tag
276: end if;
277:
278: -- secure response tag
279: if ( p_sec_resp is not null ) then
280: fnd_file.put_line(fnd_file.output,l_var||'
282: end if;
283:
284: -- secure acknowledgement tag
282: end if;
283:
284: -- secure acknowledgement tag
285: if ( p_sec_ackn is not null ) then
286: fnd_file.put_line(fnd_file.output,l_var||'
288: end if;
289:
290: open c_get_iso_lang;
290: open c_get_iso_lang;
291: fetch c_get_iso_lang into l_iso_lang;
292: close c_get_iso_lang;
293: l_string := '
294: fnd_file.put_line(fnd_file.output,l_var||l_string);
295:
296: l_var := JE_BE_CSSR_PKG.level_down;
297:
298: -- processsing parameters tag close
295:
296: l_var := JE_BE_CSSR_PKG.level_down;
297:
298: -- processsing parameters tag close
299: fnd_file.put_line(fnd_file.output,l_var||'');
300: else
301: fnd_file.put_line(fnd_file.output,l_var||'
302: end if;
303: --admin close
297:
298: -- processsing parameters tag close
299: fnd_file.put_line(fnd_file.output,l_var||'');
300: else
301: fnd_file.put_line(fnd_file.output,l_var||'
302: end if;
303: --admin close
304: l_var := JE_BE_CSSR_PKG.level_down;
305: fnd_file.put_line(fnd_file.output,l_var||'');
301: fnd_file.put_line(fnd_file.output,l_var||'
302: end if;
303: --admin close
304: l_var := JE_BE_CSSR_PKG.level_down;
305: fnd_file.put_line(fnd_file.output,l_var||'');
306:
307: end get_admin_data;
308:
309:
389: ,l_reporting_level
390: ,l_legal_entity_id;
391: close get_disp_period;
392:
393: fnd_file.put_line(fnd_file.log,'Reporting level :'||l_reporting_level);
394: fnd_file.put_line(fnd_file.log,'Legal Entity ID :'||l_legal_entity_id);
395: fnd_file.put_line(fnd_file.log,'Ledger ID :'||l_ledger_id);
396: fnd_file.put_line(fnd_file.log,'Balancing Segment Value :'||l_bsv);
397: fnd_file.put_line(fnd_file.log,'Start Date :'||l_start_date);
390: ,l_legal_entity_id;
391: close get_disp_period;
392:
393: fnd_file.put_line(fnd_file.log,'Reporting level :'||l_reporting_level);
394: fnd_file.put_line(fnd_file.log,'Legal Entity ID :'||l_legal_entity_id);
395: fnd_file.put_line(fnd_file.log,'Ledger ID :'||l_ledger_id);
396: fnd_file.put_line(fnd_file.log,'Balancing Segment Value :'||l_bsv);
397: fnd_file.put_line(fnd_file.log,'Start Date :'||l_start_date);
398: fnd_file.put_line(fnd_file.log,'End Date :'||l_end_date);
391: close get_disp_period;
392:
393: fnd_file.put_line(fnd_file.log,'Reporting level :'||l_reporting_level);
394: fnd_file.put_line(fnd_file.log,'Legal Entity ID :'||l_legal_entity_id);
395: fnd_file.put_line(fnd_file.log,'Ledger ID :'||l_ledger_id);
396: fnd_file.put_line(fnd_file.log,'Balancing Segment Value :'||l_bsv);
397: fnd_file.put_line(fnd_file.log,'Start Date :'||l_start_date);
398: fnd_file.put_line(fnd_file.log,'End Date :'||l_end_date);
399:
392:
393: fnd_file.put_line(fnd_file.log,'Reporting level :'||l_reporting_level);
394: fnd_file.put_line(fnd_file.log,'Legal Entity ID :'||l_legal_entity_id);
395: fnd_file.put_line(fnd_file.log,'Ledger ID :'||l_ledger_id);
396: fnd_file.put_line(fnd_file.log,'Balancing Segment Value :'||l_bsv);
397: fnd_file.put_line(fnd_file.log,'Start Date :'||l_start_date);
398: fnd_file.put_line(fnd_file.log,'End Date :'||l_end_date);
399:
400: l_string := '
393: fnd_file.put_line(fnd_file.log,'Reporting level :'||l_reporting_level);
394: fnd_file.put_line(fnd_file.log,'Legal Entity ID :'||l_legal_entity_id);
395: fnd_file.put_line(fnd_file.log,'Ledger ID :'||l_ledger_id);
396: fnd_file.put_line(fnd_file.log,'Balancing Segment Value :'||l_bsv);
397: fnd_file.put_line(fnd_file.log,'Start Date :'||l_start_date);
398: fnd_file.put_line(fnd_file.log,'End Date :'||l_end_date);
399:
400: l_string := '
394: fnd_file.put_line(fnd_file.log,'Legal Entity ID :'||l_legal_entity_id);
395: fnd_file.put_line(fnd_file.log,'Ledger ID :'||l_ledger_id);
396: fnd_file.put_line(fnd_file.log,'Balancing Segment Value :'||l_bsv);
397: fnd_file.put_line(fnd_file.log,'Start Date :'||l_start_date);
398: fnd_file.put_line(fnd_file.log,'End Date :'||l_end_date);
399:
400: l_string := '
402: || l_disp_period ||'">';
401: ||'xsi:type="BbpAcquisitionDataset" survey="' || p_survey_code ||'" per="'
402: || l_disp_period ||'">';
403: l_var := JE_BE_CSSR_PKG.level_down;
404: l_var := JE_BE_CSSR_PKG.level_up;
405: fnd_file.put_line(fnd_file.output,l_var||l_string);
406:
407: IF l_reporting_level <> 'LE' THEN
408: l_sob_id := l_ledger_id;
409:
413: open get_coa_id(l_sob_id);
414: fetch get_coa_id into l_coa_id;
415: close get_coa_id;
416:
417: fnd_file.put_line(fnd_file.log,'Char of account id :'||l_coa_id);
418:
419: -- Get the accounting/natural segment for the chart of accounts defined.
420:
421: l_status_text := ' Get the accounting/natural segment for coa '||l_coa_id;
420:
421: l_status_text := ' Get the accounting/natural segment for coa '||l_coa_id;
422: l_seg_name := JE_BE_CSSR_PKG.get_accounting_segment(l_coa_id);
423:
424: fnd_file.put_line(fnd_file.log,'Accounting Segment :'||l_seg_name);
425:
426: END IF;
427:
428: l_var := JE_BE_CSSR_PKG.level_up;
427:
428: l_var := JE_BE_CSSR_PKG.level_up;
429: l_string := l_var ||'
773: if( l_cntnt_prsnc_flag = 1 ) then
774: l_string := '';
775: fnd_file.put_line(fnd_file.output,l_var||l_string);
776: else
777: fnd_file.put_line(fnd_file.output,l_string ||' nihil = "true" />');
778: end if;
779:
780: --content tag close
781: l_var := JE_BE_CSSR_PKG.level_down;
778: end if;
779:
780: --content tag close
781: l_var := JE_BE_CSSR_PKG.level_down;
782: fnd_file.put_line(fnd_file.output,l_var||'');
783:
784: --main close
785: l_var := JE_BE_CSSR_PKG.level_down;
786: fnd_file.put_line(fnd_file.output,'');
782: fnd_file.put_line(fnd_file.output,l_var||'');
783:
784: --main close
785: l_var := JE_BE_CSSR_PKG.level_down;
786: fnd_file.put_line(fnd_file.output,'');
787:
788: end get_content_data;
789:
790: function level_up
849: RETURN (bal_segment_value);
850:
851: EXCEPTION
852: WHEN NO_DATA_FOUND THEN
853: fnd_file.put_line(fnd_file.log,' Exception in get_bsv function : ' || SUBSTR(SQLERRM,1,200));
854: RETURN NULL;
855:
856: END get_bsv;
857:
902: RETURN (l_segment);
903:
904: EXCEPTION
905: WHEN NO_DATA_FOUND THEN
906: fnd_file.put_line(fnd_file.log,' No record was returned for the Accounting segment. Error : ' || SUBSTR(SQLERRM,1,200));
907: RETURN NULL;
908:
909: END get_accounting_segment;
910: