100: l_stmt_num := 20;
101:
102: Add_Parameters (p_api_version => l_api_version,
103: x_return_status => l_return_status,
104: p_init_msg_list => FND_API.G_FALSE,
105: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
106: x_msg_count => l_msg_count,
107: x_msg_data => l_msg_data,
108: i_title => p_title,
101:
102: Add_Parameters (p_api_version => l_api_version,
103: x_return_status => l_return_status,
104: p_init_msg_list => FND_API.G_FALSE,
105: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
106: x_msg_count => l_msg_count,
107: x_msg_data => l_msg_data,
108: i_title => p_title,
109: i_bal_segment_from => p_bal_segment_from,
111: x_xml_doc => l_xml_doc);
112:
113: -- Standard call to check the return status from API called
114:
115: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
116: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
117: END IF;
118:
119: /*========================================================================*/
112:
113: -- Standard call to check the return status from API called
114:
115: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
116: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
117: END IF;
118:
119: /*========================================================================*/
120: -- Call to Procedure Add Parameters. To add summary data to XML data
122:
123: l_stmt_num := 30;
124:
125: Add_SummaryData (p_api_version => l_api_version,
126: p_init_msg_list => FND_API.G_FALSE,
127: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
128: x_return_status => l_return_status,
129: x_msg_count => l_msg_count,
130: x_msg_data => l_msg_data,
123: l_stmt_num := 30;
124:
125: Add_SummaryData (p_api_version => l_api_version,
126: p_init_msg_list => FND_API.G_FALSE,
127: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
128: x_return_status => l_return_status,
129: x_msg_count => l_msg_count,
130: x_msg_data => l_msg_data,
131: i_title => p_title,
134: x_xml_doc => l_xml_doc);
135:
136: -- Standard call to check the return status from API called
137:
138: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
139: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
140: END IF;
141:
142: -- write the closing tag to the XML data
135:
136: -- Standard call to check the return status from API called
137:
138: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
139: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
140: END IF;
141:
142: -- write the closing tag to the XML data
143:
177: '<<< ' || l_api_name);
178: END IF;
179:
180: EXCEPTION
181: WHEN FND_API.G_EXC_ERROR THEN
182: l_return_status := FND_API.G_RET_STS_ERROR ;
183: FND_MSG_PUB.Count_And_Get
184: ( p_count => l_msg_count,
185: p_data => l_msg_data
178: END IF;
179:
180: EXCEPTION
181: WHEN FND_API.G_EXC_ERROR THEN
182: l_return_status := FND_API.G_RET_STS_ERROR ;
183: FND_MSG_PUB.Count_And_Get
184: ( p_count => l_msg_count,
185: p_data => l_msg_data
186: );
184: ( p_count => l_msg_count,
185: p_data => l_msg_data
186: );
187:
188: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
189: FND_MSG_PUB.Count_And_Get
190: ( p_count => l_msg_count,
191: p_data => l_msg_data
192: );
276: END IF;
277:
278: -- Standard call to check for call compatibility.
279:
280: IF NOT FND_API.Compatible_API_Call ( l_api_version,
281: p_api_version,
282: l_api_name,
283: G_PKG_NAME )
284: THEN
281: p_api_version,
282: l_api_name,
283: G_PKG_NAME )
284: THEN
285: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
286: END IF;
287:
288: -- Initialize message list if p_init_msg_list is set to TRUE.
289:
286: END IF;
287:
288: -- Initialize message list if p_init_msg_list is set to TRUE.
289:
290: IF FND_API.to_Boolean( p_init_msg_list ) THEN
291: FND_MSG_PUB.initialize;
292: END IF;
293:
294: -- Initialize API return status to success
292: END IF;
293:
294: -- Initialize API return status to success
295:
296: x_return_status := FND_API.G_RET_STS_SUCCESS;
297:
298: -- Initialize temporary variable to hold xml data
299:
300: DBMS_LOB.createtemporary(l_xml_temp, TRUE);
396: '<<< ' || l_api_name);
397: END IF;
398:
399: EXCEPTION
400: WHEN FND_API.G_EXC_ERROR THEN
401: x_return_status := FND_API.G_RET_STS_ERROR ;
402: FND_MSG_PUB.Count_And_Get
403: ( p_count => x_msg_count,
404: p_data => x_msg_data
397: END IF;
398:
399: EXCEPTION
400: WHEN FND_API.G_EXC_ERROR THEN
401: x_return_status := FND_API.G_RET_STS_ERROR ;
402: FND_MSG_PUB.Count_And_Get
403: ( p_count => x_msg_count,
404: p_data => x_msg_data
405: );
403: ( p_count => x_msg_count,
404: p_data => x_msg_data
405: );
406:
407: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
408: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
409: FND_MSG_PUB.Count_And_Get
410: ( p_count => x_msg_count,
411: p_data => x_msg_data
404: p_data => x_msg_data
405: );
406:
407: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
408: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
409: FND_MSG_PUB.Count_And_Get
410: ( p_count => x_msg_count,
411: p_data => x_msg_data
412: );
411: p_data => x_msg_data
412: );
413:
414: WHEN OTHERS THEN
415: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
416: IF (l_uLog) THEN
417: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
418: l_module || '.' || l_stmt_num,
419: SUBSTRB (SQLERRM , 1 , 240));
482: END IF;
483:
484: -- Standard call to check for call compatibility.
485:
486: IF NOT FND_API.Compatible_API_Call ( l_api_version,
487: p_api_version,
488: l_api_name,
489: G_PKG_NAME )
490: THEN
487: p_api_version,
488: l_api_name,
489: G_PKG_NAME )
490: THEN
491: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
492: END IF;
493:
494: -- Initialize message list if p_init_msg_list is set to TRUE.
495:
492: END IF;
493:
494: -- Initialize message list if p_init_msg_list is set to TRUE.
495:
496: IF FND_API.to_Boolean( p_init_msg_list ) THEN
497: FND_MSG_PUB.initialize;
498: END IF;
499:
500: -- Initialize API return status to success
498: END IF;
499:
500: -- Initialize API return status to success
501:
502: x_return_status := FND_API.G_RET_STS_SUCCESS;
503:
504: -- Initialize temporary variable to hold xml data
505:
506: DBMS_LOB.createtemporary(l_xml_temp, TRUE);
728: '<<< ' || l_api_name);
729: END IF;
730:
731: EXCEPTION
732: WHEN FND_API.G_EXC_ERROR THEN
733: x_return_status := FND_API.G_RET_STS_ERROR ;
734: FND_MSG_PUB.Count_And_Get
735: ( p_count => x_msg_count,
736: p_data => x_msg_data
729: END IF;
730:
731: EXCEPTION
732: WHEN FND_API.G_EXC_ERROR THEN
733: x_return_status := FND_API.G_RET_STS_ERROR ;
734: FND_MSG_PUB.Count_And_Get
735: ( p_count => x_msg_count,
736: p_data => x_msg_data
737: );
735: ( p_count => x_msg_count,
736: p_data => x_msg_data
737: );
738:
739: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
740: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
741: FND_MSG_PUB.Count_And_Get
742: ( p_count => x_msg_count,
743: p_data => x_msg_data);
736: p_data => x_msg_data
737: );
738:
739: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
740: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
741: FND_MSG_PUB.Count_And_Get
742: ( p_count => x_msg_count,
743: p_data => x_msg_data);
744:
742: ( p_count => x_msg_count,
743: p_data => x_msg_data);
744:
745: WHEN OTHERS THEN
746: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
747: IF (l_uLog) THEN
748: FND_LOG.STRING (FND_LOG.LEVEL_UNEXPECTED,
749: l_module || '.' || l_stmt_num,
750: SUBSTRB (SQLERRM , 1 , 240));