DBA Data[Home] [Help]

APPS.FV_FUNDS_AVAIL_PKG dependencies on FND_LOG

Line 87: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

83: l_module_name VARCHAR2(200);
84: BEGIN
85: l_module_name := g_module_name || 'Main';
86:
87: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
88: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'START OF FUNDS AVAILBILITY MAIN PROCESS ......');
89: END IF;
90:
91: -- Load the parameter global variables

Line 88: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'START OF FUNDS AVAILBILITY MAIN PROCESS ......');

84: BEGIN
85: l_module_name := g_module_name || 'Main';
86:
87: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
88: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'START OF FUNDS AVAILBILITY MAIN PROCESS ......');
89: END IF;
90:
91: -- Load the parameter global variables
92: vp_sob_id := sob_id ;

Line 103: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

99: vp_flex_high := flex_high;
100: vp_period_name := period_name ;
101: vp_units :=units ;
102:
103: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
104: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' SET OF BOOKS ID IS '||TO_CHAR(SOB_ID));
105: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' CHART OF ACCOUNTS ID IS ' || TO_CHAR(VP_COA_ID));
106: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' RANGE FLEX FIELD LOW VALUE IS '||VP_FLEX_LOW);
107: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' RANGE FLEX FIELD HIGH VALUE IS '||VP_FLEX_HIGH);

Line 104: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' SET OF BOOKS ID IS '||TO_CHAR(SOB_ID));

100: vp_period_name := period_name ;
101: vp_units :=units ;
102:
103: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
104: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' SET OF BOOKS ID IS '||TO_CHAR(SOB_ID));
105: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' CHART OF ACCOUNTS ID IS ' || TO_CHAR(VP_COA_ID));
106: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' RANGE FLEX FIELD LOW VALUE IS '||VP_FLEX_LOW);
107: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' RANGE FLEX FIELD HIGH VALUE IS '||VP_FLEX_HIGH);
108: END IF;

Line 105: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' CHART OF ACCOUNTS ID IS ' || TO_CHAR(VP_COA_ID));

101: vp_units :=units ;
102:
103: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
104: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' SET OF BOOKS ID IS '||TO_CHAR(SOB_ID));
105: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' CHART OF ACCOUNTS ID IS ' || TO_CHAR(VP_COA_ID));
106: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' RANGE FLEX FIELD LOW VALUE IS '||VP_FLEX_LOW);
107: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' RANGE FLEX FIELD HIGH VALUE IS '||VP_FLEX_HIGH);
108: END IF;
109:

Line 106: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' RANGE FLEX FIELD LOW VALUE IS '||VP_FLEX_LOW);

102:
103: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
104: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' SET OF BOOKS ID IS '||TO_CHAR(SOB_ID));
105: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' CHART OF ACCOUNTS ID IS ' || TO_CHAR(VP_COA_ID));
106: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' RANGE FLEX FIELD LOW VALUE IS '||VP_FLEX_LOW);
107: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' RANGE FLEX FIELD HIGH VALUE IS '||VP_FLEX_HIGH);
108: END IF;
109:
110: -- Get Qualifier Segments

Line 107: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' RANGE FLEX FIELD HIGH VALUE IS '||VP_FLEX_HIGH);

103: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
104: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' SET OF BOOKS ID IS '||TO_CHAR(SOB_ID));
105: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' CHART OF ACCOUNTS ID IS ' || TO_CHAR(VP_COA_ID));
106: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' RANGE FLEX FIELD LOW VALUE IS '||VP_FLEX_LOW);
107: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' RANGE FLEX FIELD HIGH VALUE IS '||VP_FLEX_HIGH);
108: END IF;
109:
110: -- Get Qualifier Segments
111: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

Line 111: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

107: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' RANGE FLEX FIELD HIGH VALUE IS '||VP_FLEX_HIGH);
108: END IF;
109:
110: -- Get Qualifier Segments
111: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
112: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'DERIVING THE QUALIFIER SEGMENTS.....') ;
113: END IF;
114: Get_Qualifier_Segments;
115: IF vp_retcode = 0 THEN

Line 112: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'DERIVING THE QUALIFIER SEGMENTS.....') ;

108: END IF;
109:
110: -- Get Qualifier Segments
111: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
112: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'DERIVING THE QUALIFIER SEGMENTS.....') ;
113: END IF;
114: Get_Qualifier_Segments;
115: IF vp_retcode = 0 THEN
116: IF (vp_summary_type = 'A' ) THEN

Line 126: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

122: END IF;
123: END IF;
124:
125: IF vp_retcode = 0 THEN
126: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
127: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'SUBMITTING FUNDS AVAILABILITY REPORTS .....');
128: END IF;
129: Submit_Reports ;
130: END IF;

Line 127: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'SUBMITTING FUNDS AVAILABILITY REPORTS .....');

123: END IF;
124:
125: IF vp_retcode = 0 THEN
126: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
127: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'SUBMITTING FUNDS AVAILABILITY REPORTS .....');
128: END IF;
129: Submit_Reports ;
130: END IF;
131: -- Checking for any errors

Line 139: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

135: ROLLBACK;
136: ELSE
137: COMMIT;
138: END IF;
139: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
140: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'END THE FUNDS AVAILABILITY MAIN PROCESS ......');
141: END IF;
142: EXCEPTION
143: WHEN OTHERS THEN

Line 140: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'END THE FUNDS AVAILABILITY MAIN PROCESS ......');

136: ELSE
137: COMMIT;
138: END IF;
139: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
140: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'END THE FUNDS AVAILABILITY MAIN PROCESS ......');
141: END IF;
142: EXCEPTION
143: WHEN OTHERS THEN
144: vp_retcode := SQLCODE ;

Line 149: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',VP_ERRBUF) ;

145: vp_errbuf := SQLERRM ||' -- Error in Main procedure' ;
146: errbuf := vp_errbuf;
147: retcode := vp_retcode;
148:
149: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',VP_ERRBUF) ;
150: RETURN ;
151: END Main;
152: -- ------------------------------------------------------------------
153: -- Procedure Get_Qualifier_Segments

Line 189: fv_utility.log_mesg(fnd_log.level_error, l_module_name,vp_errbuf) ;

185: );
186: IF (NOT l_ret_val) THEN
187: vp_retcode := 2 ;
188: vp_errbuf := 'Cannot read Account Segment Information' ;
189: fv_utility.log_mesg(fnd_log.level_error, l_module_name,vp_errbuf) ;
190: END IF;
191:
192: IF (vp_retcode = 0) THEN
193: l_ret_val := FND_FLEX_APIS.GET_SEGMENT_COLUMN

Line 205: fv_utility.log_mesg(fnd_log.level_error, l_module_name,vp_errbuf) ;

201:
202: IF (NOT l_ret_val) THEN
203: vp_retcode := 2 ;
204: vp_errbuf := 'Cannot read Balancing Segment Information' ;
205: fv_utility.log_mesg(fnd_log.level_error, l_module_name,vp_errbuf) ;
206: END IF;
207: END IF;
208:
209:

Line 211: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level ) THEN

207: END IF;
208:
209:
210: IF (vp_retcode = 0) THEN
211: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level ) THEN
212: fv_utility.debug_mesg(fnd_log.level_statement, l_module_name,' balancing segment is '||vg_bal_segment);
213: fv_utility.debug_mesg(fnd_log.level_statement, l_module_name,' natural accounting segment is '||vg_acct_segment);
214: END IF;
215: END IF;

Line 212: fv_utility.debug_mesg(fnd_log.level_statement, l_module_name,' balancing segment is '||vg_bal_segment);

208:
209:
210: IF (vp_retcode = 0) THEN
211: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level ) THEN
212: fv_utility.debug_mesg(fnd_log.level_statement, l_module_name,' balancing segment is '||vg_bal_segment);
213: fv_utility.debug_mesg(fnd_log.level_statement, l_module_name,' natural accounting segment is '||vg_acct_segment);
214: END IF;
215: END IF;
216:

Line 213: fv_utility.debug_mesg(fnd_log.level_statement, l_module_name,' natural accounting segment is '||vg_acct_segment);

209:
210: IF (vp_retcode = 0) THEN
211: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level ) THEN
212: fv_utility.debug_mesg(fnd_log.level_statement, l_module_name,' balancing segment is '||vg_bal_segment);
213: fv_utility.debug_mesg(fnd_log.level_statement, l_module_name,' natural accounting segment is '||vg_acct_segment);
214: END IF;
215: END IF;
216:
217: IF (vp_retcode = 0) THEN

Line 234: fv_utility.log_mesg(fnd_log.level_error, l_module_name,vp_errbuf) ;

230:
231: IF (vg_delimiter is NULL) THEN
232: vp_retcode := 2 ;
233: vp_errbuf := 'The Flexfield Structure is not found' ;
234: fv_utility.log_mesg(fnd_log.level_error, l_module_name,vp_errbuf) ;
235: END IF;
236: END IF;
237:
238: IF (vp_retcode = 0) THEN

Line 239: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level ) then

235: END IF;
236: END IF;
237:
238: IF (vp_retcode = 0) THEN
239: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level ) then
240: fv_utility.debug_mesg(fnd_log.level_statement, l_module_name,' delimiter is ' ||vg_delimiter) ;
241: END IF;
242: END IF;
243:

Line 240: fv_utility.debug_mesg(fnd_log.level_statement, l_module_name,' delimiter is ' ||vg_delimiter) ;

236: END IF;
237:
238: IF (vp_retcode = 0) THEN
239: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level ) then
240: fv_utility.debug_mesg(fnd_log.level_statement, l_module_name,' delimiter is ' ||vg_delimiter) ;
241: END IF;
242: END IF;
243:
244: EXCEPTION

Line 248: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',vp_errbuf) ;

244: EXCEPTION
245: WHEN OTHERS THEN
246: vp_retcode := SQLCODE;
247: vp_errbuf := SQLERRM;
248: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',vp_errbuf) ;
249: RAISE;
250: END Get_Qualifier_Segments ;
251:
252: -- ------------------------------------------------------------------

Line 284: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

280: END LOOP;
281:
282: -- Get the Maximum number of segments
283: vl_ctr := vt_seg_name.COUNT;
284: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
285: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' NUMBER OF SEGMENTS ARE '||TO_CHAR(VL_CTR));
286: END IF;
287: -- Calling Get_Segment_Values procedure
288: Get_Segment_Values(vl_ctr);

Line 285: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' NUMBER OF SEGMENTS ARE '||TO_CHAR(VL_CTR));

281:
282: -- Get the Maximum number of segments
283: vl_ctr := vt_seg_name.COUNT;
284: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
285: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' NUMBER OF SEGMENTS ARE '||TO_CHAR(VL_CTR));
286: END IF;
287: -- Calling Get_Segment_Values procedure
288: Get_Segment_Values(vl_ctr);
289:

Line 294: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',vp_errbuf) ;

290: EXCEPTION
291: WHEN OTHERS THEN
292: vp_retcode := SQLCODE;
293: vp_errbuf := SQLERRM;
294: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',vp_errbuf) ;
295: END Get_Application_Col_Names ;
296: -- ------------------------------------------------------------------
297: -- Procedure Get_Segment_Values
298: -- ------------------------------------------------------------------

Line 327: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

323: l_module_name := g_module_name || 'Get_Segment_Values';
324: vg_where := '' ;
325:
326: -- Get low segment values
327: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
328: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' CALLING POPULATE LOW SEGMETNS ' ) ;
329: END IF;
330: vg_nsegs_low := Fnd_Flex_Ext.breakup_segments
331: (vp_flex_low,

Line 328: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' CALLING POPULATE LOW SEGMETNS ' ) ;

324: vg_where := '' ;
325:
326: -- Get low segment values
327: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
328: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' CALLING POPULATE LOW SEGMETNS ' ) ;
329: END IF;
330: vg_nsegs_low := Fnd_Flex_Ext.breakup_segments
331: (vp_flex_low,
332: vg_delimiter,

Line 335: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

331: (vp_flex_low,
332: vg_delimiter,
333: vt_seg_low );
334: -- Get high segment values
335: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
336: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' CALLING POPULATE HIGH SEGMETNS ' ) ;
337: END IF;
338: vg_nsegs_high := Fnd_Flex_Ext.breakup_segments
339: (vp_flex_high,

Line 336: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' CALLING POPULATE HIGH SEGMETNS ' ) ;

332: vg_delimiter,
333: vt_seg_low );
334: -- Get high segment values
335: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
336: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' CALLING POPULATE HIGH SEGMETNS ' ) ;
337: END IF;
338: vg_nsegs_high := Fnd_Flex_Ext.breakup_segments
339: (vp_flex_high,
340: vg_delimiter,

Line 347: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

343: -- Get the Balancing segment segment number for Flexfield
344: OPEN seg_num_cur(vg_bal_segment ) ;
345: FETCH seg_num_cur INTO vl_bal_seg_num ;
346: CLOSE seg_num_cur ;
347: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
348: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' BALANCING SEGMENT NUMBER IS ' ||VL_BAL_SEG_NUM ) ;
349: END IF;
350: -- Get the Accounting segment number for Flexfield
351: OPEN seg_num_cur (vg_acct_segment);

Line 348: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' BALANCING SEGMENT NUMBER IS ' ||VL_BAL_SEG_NUM ) ;

344: OPEN seg_num_cur(vg_bal_segment ) ;
345: FETCH seg_num_cur INTO vl_bal_seg_num ;
346: CLOSE seg_num_cur ;
347: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
348: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' BALANCING SEGMENT NUMBER IS ' ||VL_BAL_SEG_NUM ) ;
349: END IF;
350: -- Get the Accounting segment number for Flexfield
351: OPEN seg_num_cur (vg_acct_segment);
352: FETCH seg_num_cur INTO vl_acc_seg_num ;

Line 354: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

350: -- Get the Accounting segment number for Flexfield
351: OPEN seg_num_cur (vg_acct_segment);
352: FETCH seg_num_cur INTO vl_acc_seg_num ;
353: CLOSE seg_num_cur;
354: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
355: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' ACCOUNTING SEGMENT NUMBER IS ' ||VL_ACC_SEG_NUM ) ;
356: END IF;
357:
358: -- Verify whether user has entered Fund range "Balancing segment"

Line 355: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' ACCOUNTING SEGMENT NUMBER IS ' ||VL_ACC_SEG_NUM ) ;

351: OPEN seg_num_cur (vg_acct_segment);
352: FETCH seg_num_cur INTO vl_acc_seg_num ;
353: CLOSE seg_num_cur;
354: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
355: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' ACCOUNTING SEGMENT NUMBER IS ' ||VL_ACC_SEG_NUM ) ;
356: END IF;
357:
358: -- Verify whether user has entered Fund range "Balancing segment"
359: -- when process run by Accounting range

Line 363: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,vp_errbuf) ;

359: -- when process run by Accounting range
360: IF vt_seg_low(vl_bal_seg_num) IS NULL THEN
361: vp_retcode := 2 ;
362: vp_errbuf :='Balancing segment - Fund range is mandatory when the process is run with Summary Type as Accounting Flexfield';
363: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,vp_errbuf) ;
364: RETURN ;
365: END IF;
366: IF vt_seg_low(vl_acc_seg_num) IS NOT NULL THEN
367: vt_seg_low(i):=NULL ;

Line 369: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

365: END IF;
366: IF vt_seg_low(vl_acc_seg_num) IS NOT NULL THEN
367: vt_seg_low(i):=NULL ;
368: vt_seg_high(i):=NULL ;
369: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
370: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' USER HAS GIVEN ACCOUNT RANGE AS PARAMETERS FOR THIS PROCESS.THIS ACCOUNT RANGE WILL BE OVERRIDEN ');
371: END IF;
372: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
373: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' WITH ACCOUNT RANGES GIVEN IN THE REPORT DEFINITIONS SET UP FORM ') ;

Line 370: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' USER HAS GIVEN ACCOUNT RANGE AS PARAMETERS FOR THIS PROCESS.THIS ACCOUNT RANGE WILL BE OVERRIDEN ');

366: IF vt_seg_low(vl_acc_seg_num) IS NOT NULL THEN
367: vt_seg_low(i):=NULL ;
368: vt_seg_high(i):=NULL ;
369: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
370: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' USER HAS GIVEN ACCOUNT RANGE AS PARAMETERS FOR THIS PROCESS.THIS ACCOUNT RANGE WILL BE OVERRIDEN ');
371: END IF;
372: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
373: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' WITH ACCOUNT RANGES GIVEN IN THE REPORT DEFINITIONS SET UP FORM ') ;
374: END IF;

Line 372: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

368: vt_seg_high(i):=NULL ;
369: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
370: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' USER HAS GIVEN ACCOUNT RANGE AS PARAMETERS FOR THIS PROCESS.THIS ACCOUNT RANGE WILL BE OVERRIDEN ');
371: END IF;
372: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
373: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' WITH ACCOUNT RANGES GIVEN IN THE REPORT DEFINITIONS SET UP FORM ') ;
374: END IF;
375: END IF ;
376: vg_select:= '' ;

Line 373: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' WITH ACCOUNT RANGES GIVEN IN THE REPORT DEFINITIONS SET UP FORM ') ;

369: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
370: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' USER HAS GIVEN ACCOUNT RANGE AS PARAMETERS FOR THIS PROCESS.THIS ACCOUNT RANGE WILL BE OVERRIDEN ');
371: END IF;
372: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
373: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' WITH ACCOUNT RANGES GIVEN IN THE REPORT DEFINITIONS SET UP FORM ') ;
374: END IF;
375: END IF ;
376: vg_select:= '' ;
377: -- Construct the concatenate segments based on the Accounting range entered

Line 394: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

390:
391: vg_select:= vg_select||' , glcc.'||vg_acct_segment||
392: ' , glcc.' ||vg_bal_segment ;
393:
394: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
395: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' SELECT STATEMENT IS ' ||VG_SELECT);
396: END IF;
397:
398: -- Construct a where condition to be used to select the

Line 395: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' SELECT STATEMENT IS ' ||VG_SELECT);

391: vg_select:= vg_select||' , glcc.'||vg_acct_segment||
392: ' , glcc.' ||vg_bal_segment ;
393:
394: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
395: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' SELECT STATEMENT IS ' ||VG_SELECT);
396: END IF;
397:
398: -- Construct a where condition to be used to select the
399: -- transactions from gl_balances and gl_bc_packets

Line 418: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

414: END IF ;
415: END IF ;
416: END LOOP;
417:
418: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
419: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' WHERE CLAUSE IS ' ||VG_WHERE );
420: END IF;
421:
422: Populate_CCIDs(vg_select,vg_where);

Line 419: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' WHERE CLAUSE IS ' ||VG_WHERE );

415: END IF ;
416: END LOOP;
417:
418: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
419: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' WHERE CLAUSE IS ' ||VG_WHERE );
420: END IF;
421:
422: Populate_CCIDs(vg_select,vg_where);
423: EXCEPTION

Line 427: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',vp_errbuf) ;

423: EXCEPTION
424: WHEN OTHERS THEN
425: vp_retcode := SQLCODE;
426: vp_errbuf := SQLERRM;
427: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',vp_errbuf) ;
428: RAISE;
429: END Get_Segment_Values ;
430:
431: -- ------------------------------------------------------------------

Line 450: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,vp_errbuf) ;

446: -- Verify IF user entered TAS paramter .
447: IF vp_treasury_symbol_id IS NULL THEN
448: vp_retcode := -1 ;
449: vp_errbuf := 'Treasury symbol parameter should be entered when the process is run with Summary Type as Treasury Symbol ';
450: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,vp_errbuf) ;
451: RETURN ;
452: END IF;
453:
454: -- Verify If Fund values are exists for the Treasury Symbol user entered .

Line 463: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,vp_errbuf) ;

459: vp_retcode := -1 ;
460: vp_errbuf :='There are no Funds defined for the Treasury Symbol Passed.
461: Please define Funds for this Treasury Symbol in the Define Parameters Form' ;
462:
463: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,vp_errbuf) ;
464: RETURN ;
465: END IF;
466:
467: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

Line 467: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

463: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,vp_errbuf) ;
464: RETURN ;
465: END IF;
466:
467: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
468: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' CALLING PROCEDURE GET_BFY_SEGMENT ' ||VG_WHERE);
469: END IF;
470: Get_Bfy_Segment ;
471: IF vp_retcode = 0 THEN

Line 468: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' CALLING PROCEDURE GET_BFY_SEGMENT ' ||VG_WHERE);

464: RETURN ;
465: END IF;
466:
467: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
468: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' CALLING PROCEDURE GET_BFY_SEGMENT ' ||VG_WHERE);
469: END IF;
470: Get_Bfy_Segment ;
471: IF vp_retcode = 0 THEN
472:

Line 476: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

472:
473: vg_select:= 'glcc.'||vg_bal_segment||'||'||''''||vg_delimiter||''''||'||'||
474: 'glcc.'||vg_bfy_segment||' , glcc.'||vg_acct_segment ;
475:
476: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
477: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' SELECT STATMENT WHEN PROCESS RUNS FOR TAS ' || VG_SELECT );
478: END IF;
479:
480: vg_where := 'glcc.'|| vg_bal_segment || ' IN ' ||

Line 477: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' SELECT STATMENT WHEN PROCESS RUNS FOR TAS ' || VG_SELECT );

473: vg_select:= 'glcc.'||vg_bal_segment||'||'||''''||vg_delimiter||''''||'||'||
474: 'glcc.'||vg_bfy_segment||' , glcc.'||vg_acct_segment ;
475:
476: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
477: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' SELECT STATMENT WHEN PROCESS RUNS FOR TAS ' || VG_SELECT );
478: END IF;
479:
480: vg_where := 'glcc.'|| vg_bal_segment || ' IN ' ||
481: '(SELECT FUND_VALUE FROM FV_FUND_PARAMETERS

Line 491: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',vp_errbuf) ;

487: EXCEPTION
488: WHEN OTHERS THEN
489: vp_retcode := SQLCODE;
490: vp_errbuf := SQLERRM;
491: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',vp_errbuf) ;
492: RAISE;
493: END Treasury_Symbol_attributes ;
494:
495: -- ------------------------------------------------------------------

Line 518: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,vp_errbuf) ;

514: FETCH Bfa_segment_cur INTO vg_bfy_segment ;
515: IF Bfa_segment_cur%NOTFOUND THEN
516: vp_retcode := 2;
517: vp_errbuf := 'Budget Fiscal Year Segment not defined in PYA set up for the ledger '||to_char(vp_sob_id);
518: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,vp_errbuf) ;
519: CLOSE Bfa_segment_cur ;
520: RETURN ;
521: END IF ;
522: CLOSE Bfa_segment_cur ;

Line 530: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',vp_errbuf) ;

526: vp_retcode := SQLCODE ;
527: vp_errbuf := SQLERRM ||
528: ' -- Error in Get_Bfy_Segment_Details procedure '
529: ||' while getting the BFY Segment Name.' ;
530: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',vp_errbuf) ;
531: RETURN ;
532: END Get_Bfy_Segment;
533:
534: -- ------------------------------------------------------------------

Line 578: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,vp_errbuf) ;

574:
575: IF vl_seed_count=0 THEN
576: vp_retcode := -1 ;
577: vp_errbuf := ' Please run the Populate Funds Availabiity Report Definitions Process .' ;
578: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,vp_errbuf) ;
579: RETURN ;
580: END IF;
581: -- Check whether Accounts are Defined in the form ,
582: -- Funds Availability Report Definitions .

Line 595: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,vp_errbuf) ;

591: IF vl_Acct_count=0 THEN
592: vp_retcode := -1 ;
593: vp_errbuf := ' Accounts not defined . Please define Accounts in the Funds Availiability Report
594: Definitions Form. ' ;
595: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,vp_errbuf) ;
596: RETURN ;
597: END IF;
598:
599: SELECT period_year,

Line 668: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

664: ' , fvd.report_id, '||
665: ' fvr.column_id ' ;
666:
667:
668: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
669: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'SELECT STATEMENT TO GET DATA FROM GL BALANCES TABLE ' ||VL_SELECT_STMNT);
670: END IF;
671:
672: -- Fetch the Transactions from GL balances

Line 669: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'SELECT STATEMENT TO GET DATA FROM GL BALANCES TABLE ' ||VL_SELECT_STMNT);

665: ' fvr.column_id ' ;
666:
667:
668: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
669: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'SELECT STATEMENT TO GET DATA FROM GL BALANCES TABLE ' ||VL_SELECT_STMNT);
670: END IF;
671:
672: -- Fetch the Transactions from GL balances
673:

Line 699: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

695:
696: FETCH vl_bal_retcur INTO vl_conc_seg , vl_acc_seg , vl_report_id ,
697: vl_column_id , vl_amount ;
698: EXIT WHEN vl_bal_retcur%NOTFOUND ;
699: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
700: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' INSERTING INTO TEMP TABLE FROM GL GL_BALANCES '|| I);
701: END IF;
702:
703: Create_Transactions(vl_conc_seg,

Line 700: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' INSERTING INTO TEMP TABLE FROM GL GL_BALANCES '|| I);

696: FETCH vl_bal_retcur INTO vl_conc_seg , vl_acc_seg , vl_report_id ,
697: vl_column_id , vl_amount ;
698: EXIT WHEN vl_bal_retcur%NOTFOUND ;
699: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
700: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' INSERTING INTO TEMP TABLE FROM GL GL_BALANCES '|| I);
701: END IF;
702:
703: Create_Transactions(vl_conc_seg,
704: NULL ,

Line 713: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

709: i:=i+1 ;
710: END LOOP ;
711: END IF ;
712: CLOSE vl_bal_retcur;
713: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
714: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' CREATED ALL THE TRANSACTIONS FROM GL BALANCES TABLE ');
715: END IF;
716:
717: -- Fetch Transactions from GL BC packets table .

Line 714: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' CREATED ALL THE TRANSACTIONS FROM GL BALANCES TABLE ');

710: END LOOP ;
711: END IF ;
712: CLOSE vl_bal_retcur;
713: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
714: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' CREATED ALL THE TRANSACTIONS FROM GL BALANCES TABLE ');
715: END IF;
716:
717: -- Fetch Transactions from GL BC packets table .
718: i:=1 ;

Line 780: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

776: ' , fvd.report_id, '||
777: ' fvr.column_id ' ;
778:
779:
780: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
781: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'SELECT STATEMENT TO GET DATA FROM GL BC PACKETS TABLE ' ||VL_SELECT_STMNT);
782: END IF;
783:
784: OPEN vl_bal_retcur FOR vl_select_stmnt USING vp_sob_id,vp_sob_id,vg_flex_value_id,

Line 781: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'SELECT STATEMENT TO GET DATA FROM GL BC PACKETS TABLE ' ||VL_SELECT_STMNT);

777: ' fvr.column_id ' ;
778:
779:
780: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
781: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'SELECT STATEMENT TO GET DATA FROM GL BC PACKETS TABLE ' ||VL_SELECT_STMNT);
782: END IF;
783:
784: OPEN vl_bal_retcur FOR vl_select_stmnt USING vp_sob_id,vp_sob_id,vg_flex_value_id,
785: vp_coa_id,vp_sob_id,vp_currency_code,l_period_year, l_period_num, vp_report_id;

Line 825: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',vp_errbuf) ;

821: EXCEPTION
822: WHEN OTHERS THEN
823: vp_retcode := SQLCODE;
824: vp_errbuf := SQLERRM;
825: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',vp_errbuf) ;
826: RAISE;
827:
828: END Populate_CCIDs ;
829:

Line 862: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,vp_errbuf) ;

858: FETCH treasury_symbol_c into treasury_symbol;
859: CLOSE treasury_symbol_c;
860: vp_errbuf := 'No Data Found for treasury symbol ' || treasury_symbol ||
861: ' in the period ' || vp_period_name || '.' ;
862: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,vp_errbuf) ;
863: ELSE
864: vp_errbuf := 'No Data Found for accounts between ' || vp_flex_low ||
865: ' and '|| vp_flex_high || ' in the period ' || vp_period_name || '.' ;
866: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,vp_errbuf) ;

Line 866: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,vp_errbuf) ;

862: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,vp_errbuf) ;
863: ELSE
864: vp_errbuf := 'No Data Found for accounts between ' || vp_flex_low ||
865: ' and '|| vp_flex_high || ' in the period ' || vp_period_name || '.' ;
866: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,vp_errbuf) ;
867: END IF;
868:
869: RETURN ;
870: END IF;

Line 887: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,vp_errbuf) ;

883: FETCH treasury_symbol_c into treasury_symbol;
884: CLOSE treasury_symbol_c;
885: vp_errbuf:= 'Zero balances available for treasury symbol ' || treasury_symbol ||
886: ' in the period ' || vp_period_name || '.' ;
887: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,vp_errbuf) ;
888: ELSE
889: vp_errbuf := 'Zero balances available for accounts between ' || vp_flex_low ||
890: ' and ' || vp_flex_high || ' in the period ' || vp_period_name || '.' ;
891: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,vp_errbuf) ;

Line 891: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,vp_errbuf) ;

887: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,vp_errbuf) ;
888: ELSE
889: vp_errbuf := 'Zero balances available for accounts between ' || vp_flex_low ||
890: ' and ' || vp_flex_high || ' in the period ' || vp_period_name || '.' ;
891: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,vp_errbuf) ;
892: END IF;
893: RETURN ;
894: END IF;
895:

Line 904: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,vp_errbuf) ;

900: VP_PERIOD_NAME,VP_CURRENCY_CODE,vp_units ) ;
901: IF (vl_req_id = 0) THEN
902: vp_retcode := 2 ;
903: vp_errbuf := 'Error in Submit_Reports procedure, while submitting Funds Available Report .' ;
904: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,vp_errbuf) ;
905:
906: RETURN ;
907: END IF;
908:

Line 913: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',vp_errbuf) ;

909: EXCEPTION
910: WHEN OTHERS THEN
911: vp_retcode := SQLCODE ;
912: vp_errbuf := SQLERRM ||' -- Error in Submit_Reports procedure.' ;
913: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',vp_errbuf) ;
914: RETURN ;
915: END Submit_Reports;
916:
917: -- ------------------------------------------------------------------

Line 955: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',vp_errbuf) ;

951: WHEN OTHERS THEN
952: vp_retcode := SQLCODE ;
953: vp_errbuf := SQLERRM ||' -- Error in Submit_Reports procedure.' ;
954:
955: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',vp_errbuf) ;
956: RETURN ;
957:
958: END ;
959: BEGIN