eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.IEX_DUNNING_PVT dependencies on FND_API

Line 178: IF FND_API.to_Boolean( p_init_msg_list )

174: primary_flag = 'Y';
175:
176: BEGIN
177:
178: IF FND_API.to_Boolean( p_init_msg_list )
179: THEN
180: FND_MSG_PUB.initialize;
181: END IF;
182:

Line 183: x_return_status := FND_API.G_RET_STS_SUCCESS;

179: THEN
180: FND_MSG_PUB.initialize;
181: END IF;
182:
183: x_return_status := FND_API.G_RET_STS_SUCCESS;
184:
185: WriteLog('----------' || l_api_name || '----------');
186: WriteLog(l_api_name || ': input parameters:');
187: WriteLog(l_api_name || ': P_PARTY_ID: ' || P_PARTY_ID);

Line 298: WHEN FND_API.G_EXC_ERROR THEN

294: WriteLog(l_api_name || ': X_CONTACT_ID = ' || X_CONTACT_ID);
295: WriteLog(l_api_name || ': X_CONTACT_POINT_ID = ' || X_CONTACT_POINT_ID);
296:
297: EXCEPTION
298: WHEN FND_API.G_EXC_ERROR THEN
299: x_return_status := FND_API.G_RET_STS_ERROR;
300: FND_MSG_PUB.Count_And_Get
301: ( p_count => x_msg_count,
302: p_data => x_msg_data );

Line 299: x_return_status := FND_API.G_RET_STS_ERROR;

295: WriteLog(l_api_name || ': X_CONTACT_POINT_ID = ' || X_CONTACT_POINT_ID);
296:
297: EXCEPTION
298: WHEN FND_API.G_EXC_ERROR THEN
299: x_return_status := FND_API.G_RET_STS_ERROR;
300: FND_MSG_PUB.Count_And_Get
301: ( p_count => x_msg_count,
302: p_data => x_msg_data );
303: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception error='||SQLERRM);

Line 305: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

301: ( p_count => x_msg_count,
302: p_data => x_msg_data );
303: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception error='||SQLERRM);
304:
305: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
306: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
307: FND_MSG_PUB.Count_And_Get
308: ( p_count => x_msg_count,
309: p_data => x_msg_data );

Line 306: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

302: p_data => x_msg_data );
303: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception error='||SQLERRM);
304:
305: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
306: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
307: FND_MSG_PUB.Count_And_Get
308: ( p_count => x_msg_count,
309: p_data => x_msg_data );
310: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UnExc Exception error='||SQLERRM);

Line 313: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

309: p_data => x_msg_data );
310: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UnExc Exception error='||SQLERRM);
311:
312: WHEN OTHERS THEN
313: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
314: FND_MSG_PUB.Count_And_Get
315: ( p_count => x_msg_count,
316: p_data => x_msg_data );
317: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Other Exception error='||SQLERRM);

Line 444: IF FND_API.to_Boolean( p_init_msg_list )

440: par_site.party_site_id = acct_site.party_site_id;
441:
442: BEGIN
443:
444: IF FND_API.to_Boolean( p_init_msg_list )
445: THEN
446: FND_MSG_PUB.initialize;
447: END IF;
448:

Line 451: x_return_status := FND_API.G_RET_STS_SUCCESS;

447: END IF;
448:
449: l_dun_contact_level := nvl(fnd_profile.value('IEX_DUNNING_CONTACT_SELECTION_METHOD'), 'ALL'); --Added for bug 6500750 gnramasa 13-Nov-07
450:
451: x_return_status := FND_API.G_RET_STS_SUCCESS;
452:
453: WriteLog('----------' || l_api_name || '----------');
454: WriteLog(l_api_name || ': input parameters:');
455: WriteLog(l_api_name || ': P_SITE_USE_ID: ' || P_SITE_USE_ID);

Line 612: WHEN FND_API.G_EXC_ERROR THEN

608: ( p_count => x_msg_count,
609: p_data => x_msg_data );
610:
611: EXCEPTION
612: WHEN FND_API.G_EXC_ERROR THEN
613: x_return_status := FND_API.G_RET_STS_ERROR;
614: FND_MSG_PUB.Count_And_Get
615: ( p_count => x_msg_count,
616: p_data => x_msg_data );

Line 613: x_return_status := FND_API.G_RET_STS_ERROR;

609: p_data => x_msg_data );
610:
611: EXCEPTION
612: WHEN FND_API.G_EXC_ERROR THEN
613: x_return_status := FND_API.G_RET_STS_ERROR;
614: FND_MSG_PUB.Count_And_Get
615: ( p_count => x_msg_count,
616: p_data => x_msg_data );
617: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception error='||SQLERRM);

Line 619: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

615: ( p_count => x_msg_count,
616: p_data => x_msg_data );
617: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception error='||SQLERRM);
618:
619: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
620: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
621: FND_MSG_PUB.Count_And_Get
622: ( p_count => x_msg_count,
623: p_data => x_msg_data );

Line 620: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

616: p_data => x_msg_data );
617: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception error='||SQLERRM);
618:
619: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
620: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
621: FND_MSG_PUB.Count_And_Get
622: ( p_count => x_msg_count,
623: p_data => x_msg_data );
624: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UnExc Exception error='||SQLERRM);

Line 627: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

623: p_data => x_msg_data );
624: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UnExc Exception error='||SQLERRM);
625:
626: WHEN OTHERS THEN
627: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
628: FND_MSG_PUB.Count_And_Get
629: ( p_count => x_msg_count,
630: p_data => x_msg_data );
631: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Other Exception error='||SQLERRM);

Line 780: IF FND_API.to_Boolean( p_init_msg_list )

776: -- End for bug 6500750 gnramasa 13-Nov-07
777:
778: BEGIN
779:
780: IF FND_API.to_Boolean( p_init_msg_list )
781: THEN
782: FND_MSG_PUB.initialize;
783: END IF;
784:

Line 787: x_return_status := FND_API.G_RET_STS_SUCCESS;

783: END IF;
784:
785: l_dun_contact_level := nvl(fnd_profile.value('IEX_DUNNING_CONTACT_SELECTION_METHOD'), 'ALL'); --Added for bug 6500750 gnramasa 13-Nov-07
786:
787: x_return_status := FND_API.G_RET_STS_SUCCESS;
788:
789: WriteLog('----------' || l_api_name || '----------');
790: WriteLog(l_api_name || ': input parameters:');
791: WriteLog(l_api_name || ': P_CUST_ACCT_ID: ' || P_CUST_ACCT_ID);

Line 839: x_return_status := FND_API.G_RET_STS_ERROR;

835: WriteLog(l_api_name || ': ERROR: Multiple Bill-To locations found');
836: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_MULT_LOC');
837: FND_MESSAGE.Set_Token('USAGE', 'bill-to', FALSE);
838: FND_MSG_PUB.Add;
839: x_return_status := FND_API.G_RET_STS_ERROR;
840: else
841: X_LOCATION_ID := l_location_id;
842: end if;
843: exit;

Line 1053: WHEN FND_API.G_EXC_ERROR THEN

1049: ( p_count => x_msg_count,
1050: p_data => x_msg_data );
1051:
1052: EXCEPTION
1053: WHEN FND_API.G_EXC_ERROR THEN
1054: x_return_status := FND_API.G_RET_STS_ERROR;
1055: FND_MSG_PUB.Count_And_Get
1056: ( p_count => x_msg_count,
1057: p_data => x_msg_data );

Line 1054: x_return_status := FND_API.G_RET_STS_ERROR;

1050: p_data => x_msg_data );
1051:
1052: EXCEPTION
1053: WHEN FND_API.G_EXC_ERROR THEN
1054: x_return_status := FND_API.G_RET_STS_ERROR;
1055: FND_MSG_PUB.Count_And_Get
1056: ( p_count => x_msg_count,
1057: p_data => x_msg_data );
1058: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception error='||SQLERRM);

Line 1060: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1056: ( p_count => x_msg_count,
1057: p_data => x_msg_data );
1058: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception error='||SQLERRM);
1059:
1060: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1061: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1062: FND_MSG_PUB.Count_And_Get
1063: ( p_count => x_msg_count,
1064: p_data => x_msg_data );

Line 1061: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1057: p_data => x_msg_data );
1058: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception error='||SQLERRM);
1059:
1060: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1061: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1062: FND_MSG_PUB.Count_And_Get
1063: ( p_count => x_msg_count,
1064: p_data => x_msg_data );
1065: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UnExc Exception error='||SQLERRM);

Line 1068: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1064: p_data => x_msg_data );
1065: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UnExc Exception error='||SQLERRM);
1066:
1067: WHEN OTHERS THEN
1068: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1069: FND_MSG_PUB.Count_And_Get
1070: ( p_count => x_msg_count,
1071: p_data => x_msg_data );
1072: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Other Exception error='||SQLERRM);

Line 1155: IF FND_API.to_Boolean( p_init_msg_list )

1151: par_site.identifying_address_flag = P_IDENT_FLAG and
1152: site_use.primary_flag = P_PRIMARY_FLAG;
1153: BEGIN
1154:
1155: IF FND_API.to_Boolean( p_init_msg_list )
1156: THEN
1157: FND_MSG_PUB.initialize;
1158: END IF;
1159:

Line 1160: x_return_status := FND_API.G_RET_STS_SUCCESS;

1156: THEN
1157: FND_MSG_PUB.initialize;
1158: END IF;
1159:
1160: x_return_status := FND_API.G_RET_STS_SUCCESS;
1161:
1162: WriteLog('----------' || l_api_name || '----------');
1163: WriteLog(l_api_name || ': input parameters:');
1164: WriteLog(l_api_name || ': P_PARTY_ID: ' || P_PARTY_ID);

Line 1191: RAISE FND_API.G_EXC_ERROR;

1187:
1188: if l_cust_account_id is null then
1189: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_ACCOUNT');
1190: FND_MSG_PUB.ADD;
1191: RAISE FND_API.G_EXC_ERROR;
1192: end if;
1193:
1194: WriteLog(l_api_name || ': Found account:');
1195: WriteLog(l_api_name || ': l_display_order: ' || l_display_order);

Line 1213: x_return_status := FND_API.G_RET_STS_ERROR;

1209: WriteLog(l_api_name || ': ERROR: Multiple locations found');
1210: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_MULT_LOC');
1211: FND_MESSAGE.Set_Token('USAGE', l_site_use_code, FALSE);
1212: FND_MSG_PUB.Add;
1213: x_return_status := FND_API.G_RET_STS_ERROR;
1214: end if;
1215:
1216: -- call GET_ACCT_DUNNING_DATA for found account
1217: WriteLog(l_api_name || ': Calling GET_ACCT_DUNNING_DATA for account ' || l_cust_account_id);

Line 1219: p_init_msg_list => FND_API.G_FALSE,

1215:
1216: -- call GET_ACCT_DUNNING_DATA for found account
1217: WriteLog(l_api_name || ': Calling GET_ACCT_DUNNING_DATA for account ' || l_cust_account_id);
1218: GET_ACCT_DUNNING_DATA(p_api_version => 1.0,
1219: p_init_msg_list => FND_API.G_FALSE,
1220: p_commit => FND_API.G_FALSE,
1221: P_CUST_ACCT_ID => l_cust_account_id,
1222: P_CONTACT_POINT_TYPE => P_CONTACT_POINT_TYPE,
1223: X_LOCATION_ID => X_LOCATION_ID,

Line 1220: p_commit => FND_API.G_FALSE,

1216: -- call GET_ACCT_DUNNING_DATA for found account
1217: WriteLog(l_api_name || ': Calling GET_ACCT_DUNNING_DATA for account ' || l_cust_account_id);
1218: GET_ACCT_DUNNING_DATA(p_api_version => 1.0,
1219: p_init_msg_list => FND_API.G_FALSE,
1220: p_commit => FND_API.G_FALSE,
1221: P_CUST_ACCT_ID => l_cust_account_id,
1222: P_CONTACT_POINT_TYPE => P_CONTACT_POINT_TYPE,
1223: X_LOCATION_ID => X_LOCATION_ID,
1224: X_CONTACT_ID => X_CONTACT_ID,

Line 1243: WHEN FND_API.G_EXC_ERROR THEN

1239: ( p_count => x_msg_count,
1240: p_data => x_msg_data );
1241:
1242: EXCEPTION
1243: WHEN FND_API.G_EXC_ERROR THEN
1244: x_return_status := FND_API.G_RET_STS_ERROR;
1245: FND_MSG_PUB.Count_And_Get
1246: ( p_count => x_msg_count,
1247: p_data => x_msg_data );

Line 1244: x_return_status := FND_API.G_RET_STS_ERROR;

1240: p_data => x_msg_data );
1241:
1242: EXCEPTION
1243: WHEN FND_API.G_EXC_ERROR THEN
1244: x_return_status := FND_API.G_RET_STS_ERROR;
1245: FND_MSG_PUB.Count_And_Get
1246: ( p_count => x_msg_count,
1247: p_data => x_msg_data );
1248: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception error='||SQLERRM);

Line 1250: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1246: ( p_count => x_msg_count,
1247: p_data => x_msg_data );
1248: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception error='||SQLERRM);
1249:
1250: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1251: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1252: FND_MSG_PUB.Count_And_Get
1253: ( p_count => x_msg_count,
1254: p_data => x_msg_data );

Line 1251: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1247: p_data => x_msg_data );
1248: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception error='||SQLERRM);
1249:
1250: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1251: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1252: FND_MSG_PUB.Count_And_Get
1253: ( p_count => x_msg_count,
1254: p_data => x_msg_data );
1255: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UnExc Exception error='||SQLERRM);

Line 1258: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1254: p_data => x_msg_data );
1255: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UnExc Exception error='||SQLERRM);
1256:
1257: WHEN OTHERS THEN
1258: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1259: FND_MSG_PUB.Count_And_Get
1260: ( p_count => x_msg_count,
1261: p_data => x_msg_data );
1262: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Other Exception error='||SQLERRM);

Line 1307: IF FND_API.to_Boolean( p_init_msg_list )

1303: where delinquency_id = p_delinquency_id;
1304:
1305: begin
1306:
1307: IF FND_API.to_Boolean( p_init_msg_list )
1308: THEN
1309: FND_MSG_PUB.initialize;
1310: END IF;
1311:

Line 1312: x_return_status := FND_API.G_RET_STS_SUCCESS;

1308: THEN
1309: FND_MSG_PUB.initialize;
1310: END IF;
1311:
1312: x_return_status := FND_API.G_RET_STS_SUCCESS;
1313:
1314: WriteLog('----------' || l_api_name || '----------');
1315: WriteLog(l_api_name || ': input parameters:');
1316: WriteLog(l_api_name || ': p_level: ' || p_level);

Line 1342: p_init_msg_list => FND_API.G_TRUE,

1338: WriteLog(l_api_name || ': party_id = ' || l_party_id);
1339:
1340: WriteLog(l_api_name || ': Calling GET_CUST_DUNNING_DATA_OW...');
1341: GET_CUST_DUNNING_DATA_OW(p_api_version => 1.0,
1342: p_init_msg_list => FND_API.G_TRUE,
1343: p_commit => FND_API.G_FALSE,
1344: P_PARTY_ID => l_party_id,
1345: P_CONTACT_POINT_TYPE => p_send_method,
1346: X_LOCATION_ID => X_LOCATION_ID,

Line 1343: p_commit => FND_API.G_FALSE,

1339:
1340: WriteLog(l_api_name || ': Calling GET_CUST_DUNNING_DATA_OW...');
1341: GET_CUST_DUNNING_DATA_OW(p_api_version => 1.0,
1342: p_init_msg_list => FND_API.G_TRUE,
1343: p_commit => FND_API.G_FALSE,
1344: P_PARTY_ID => l_party_id,
1345: P_CONTACT_POINT_TYPE => p_send_method,
1346: X_LOCATION_ID => X_LOCATION_ID,
1347: X_CONTACT_ID => X_CONTACT_ID,

Line 1366: p_init_msg_list => FND_API.G_TRUE,

1362: if p_level = 'CUSTOMER' then
1363:
1364: WriteLog(l_api_name || ': Calling GET_CUST_DUNNING_DATA...');
1365: GET_CUST_DUNNING_DATA(p_api_version => 1.0,
1366: p_init_msg_list => FND_API.G_TRUE,
1367: p_commit => FND_API.G_FALSE,
1368: P_PARTY_ID => p_source_id,
1369: P_CONTACT_POINT_TYPE => p_send_method,
1370: X_LOCATION_ID => X_LOCATION_ID,

Line 1367: p_commit => FND_API.G_FALSE,

1363:
1364: WriteLog(l_api_name || ': Calling GET_CUST_DUNNING_DATA...');
1365: GET_CUST_DUNNING_DATA(p_api_version => 1.0,
1366: p_init_msg_list => FND_API.G_TRUE,
1367: p_commit => FND_API.G_FALSE,
1368: P_PARTY_ID => p_source_id,
1369: P_CONTACT_POINT_TYPE => p_send_method,
1370: X_LOCATION_ID => X_LOCATION_ID,
1371: X_CONTACT_ID => X_CONTACT_ID,

Line 1381: p_init_msg_list => FND_API.G_TRUE,

1377: elsif p_level = 'ACCOUNT' then
1378:
1379: WriteLog(l_api_name || ': Calling GET_ACCT_DUNNING_DATA...');
1380: GET_ACCT_DUNNING_DATA(p_api_version => 1.0,
1381: p_init_msg_list => FND_API.G_TRUE,
1382: p_commit => FND_API.G_FALSE,
1383: P_CUST_ACCT_ID => p_source_id,
1384: P_CONTACT_POINT_TYPE => p_send_method,
1385: X_LOCATION_ID => X_LOCATION_ID,

Line 1382: p_commit => FND_API.G_FALSE,

1378:
1379: WriteLog(l_api_name || ': Calling GET_ACCT_DUNNING_DATA...');
1380: GET_ACCT_DUNNING_DATA(p_api_version => 1.0,
1381: p_init_msg_list => FND_API.G_TRUE,
1382: p_commit => FND_API.G_FALSE,
1383: P_CUST_ACCT_ID => p_source_id,
1384: P_CONTACT_POINT_TYPE => p_send_method,
1385: X_LOCATION_ID => X_LOCATION_ID,
1386: X_CONTACT_ID => X_CONTACT_ID,

Line 1396: p_init_msg_list => FND_API.G_TRUE,

1392: elsif p_level = 'BILL_TO' then
1393:
1394: WriteLog(l_api_name || ': Calling GET_SITE_DUNNING_DATA...');
1395: GET_SITE_DUNNING_DATA(p_api_version => 1.0,
1396: p_init_msg_list => FND_API.G_TRUE,
1397: p_commit => FND_API.G_FALSE,
1398: P_SITE_USE_ID => p_source_id,
1399: P_CONTACT_POINT_TYPE => p_send_method,
1400: X_LOCATION_ID => X_LOCATION_ID,

Line 1397: p_commit => FND_API.G_FALSE,

1393:
1394: WriteLog(l_api_name || ': Calling GET_SITE_DUNNING_DATA...');
1395: GET_SITE_DUNNING_DATA(p_api_version => 1.0,
1396: p_init_msg_list => FND_API.G_TRUE,
1397: p_commit => FND_API.G_FALSE,
1398: P_SITE_USE_ID => p_source_id,
1399: P_CONTACT_POINT_TYPE => p_send_method,
1400: X_LOCATION_ID => X_LOCATION_ID,
1401: X_CONTACT_ID => X_CONTACT_ID,

Line 1412: p_init_msg_list => FND_API.G_TRUE,

1408:
1409: WriteLog(l_api_name || ': site_use_id = ' || l_temp_site_use_id);
1410: WriteLog(l_api_name || ': Calling GET_SITE_DUNNING_DATA...');
1411: GET_SITE_DUNNING_DATA(p_api_version => 1.0,
1412: p_init_msg_list => FND_API.G_TRUE,
1413: p_commit => FND_API.G_FALSE,
1414: P_SITE_USE_ID => l_temp_site_use_id,
1415: P_CONTACT_POINT_TYPE => p_send_method,
1416: X_LOCATION_ID => X_LOCATION_ID,

Line 1413: p_commit => FND_API.G_FALSE,

1409: WriteLog(l_api_name || ': site_use_id = ' || l_temp_site_use_id);
1410: WriteLog(l_api_name || ': Calling GET_SITE_DUNNING_DATA...');
1411: GET_SITE_DUNNING_DATA(p_api_version => 1.0,
1412: p_init_msg_list => FND_API.G_TRUE,
1413: p_commit => FND_API.G_FALSE,
1414: P_SITE_USE_ID => l_temp_site_use_id,
1415: P_CONTACT_POINT_TYPE => p_send_method,
1416: X_LOCATION_ID => X_LOCATION_ID,
1417: X_CONTACT_ID => X_CONTACT_ID,

Line 1436: WHEN FND_API.G_EXC_ERROR THEN

1432: WriteLog(l_api_name || ': x_return_status: ' || x_return_status);
1433: WriteLog(l_api_name || ': x_msg_count: ' || x_msg_count);
1434:
1435: EXCEPTION
1436: WHEN FND_API.G_EXC_ERROR THEN
1437: x_return_status := FND_API.G_RET_STS_ERROR;
1438: FND_MSG_PUB.Count_And_Get
1439: ( p_count => x_msg_count,
1440: p_data => x_msg_data );

Line 1437: x_return_status := FND_API.G_RET_STS_ERROR;

1433: WriteLog(l_api_name || ': x_msg_count: ' || x_msg_count);
1434:
1435: EXCEPTION
1436: WHEN FND_API.G_EXC_ERROR THEN
1437: x_return_status := FND_API.G_RET_STS_ERROR;
1438: FND_MSG_PUB.Count_And_Get
1439: ( p_count => x_msg_count,
1440: p_data => x_msg_data );
1441: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception error='||SQLERRM);

Line 1443: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1439: ( p_count => x_msg_count,
1440: p_data => x_msg_data );
1441: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception error='||SQLERRM);
1442:
1443: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1444: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1445: FND_MSG_PUB.Count_And_Get
1446: ( p_count => x_msg_count,
1447: p_data => x_msg_data );

Line 1444: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1440: p_data => x_msg_data );
1441: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception error='||SQLERRM);
1442:
1443: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1444: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1445: FND_MSG_PUB.Count_And_Get
1446: ( p_count => x_msg_count,
1447: p_data => x_msg_data );
1448: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UnExc Exception error='||SQLERRM);

Line 1451: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1447: p_data => x_msg_data );
1448: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UnExc Exception error='||SQLERRM);
1449:
1450: WHEN OTHERS THEN
1451: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1452: FND_MSG_PUB.Count_And_Get
1453: ( p_count => x_msg_count,
1454: p_data => x_msg_data );
1455: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Other Exception error='||SQLERRM);

Line 1536: IF FND_API.to_Boolean( p_init_msg_list )

1532: where cm_request_id = p_cm_request_id;
1533:
1534: begin
1535:
1536: IF FND_API.to_Boolean( p_init_msg_list )
1537: THEN
1538: FND_MSG_PUB.initialize;
1539: END IF;
1540:

Line 1541: x_return_status := FND_API.G_RET_STS_SUCCESS;

1537: THEN
1538: FND_MSG_PUB.initialize;
1539: END IF;
1540:
1541: x_return_status := FND_API.G_RET_STS_SUCCESS;
1542:
1543: WriteLog('----------' || l_api_name || '----------');
1544: WriteLog(l_api_name || ': input parameters:');
1545: WriteLog(l_api_name || ': p_level: ' || p_level);

Line 1876: p_init_msg_list => FND_API.G_TRUE,

1872: end if;
1873:
1874: WriteLog(l_api_name || ': Calling GET_DEFAULT_DUN_DEST...');
1875: GET_DEFAULT_DUN_DEST(p_api_version => 1.0,
1876: p_init_msg_list => FND_API.G_TRUE,
1877: p_commit => FND_API.G_FALSE,
1878: p_level => p_level,
1879: p_source_id => p_source_id,
1880: p_send_method => p_send_method,

Line 1877: p_commit => FND_API.G_FALSE,

1873:
1874: WriteLog(l_api_name || ': Calling GET_DEFAULT_DUN_DEST...');
1875: GET_DEFAULT_DUN_DEST(p_api_version => 1.0,
1876: p_init_msg_list => FND_API.G_TRUE,
1877: p_commit => FND_API.G_FALSE,
1878: p_level => p_level,
1879: p_source_id => p_source_id,
1880: p_send_method => p_send_method,
1881: X_LOCATION_ID => l_location_id,

Line 1943: WHEN FND_API.G_EXC_ERROR THEN

1939: WriteLog(l_api_name || ': x_return_status: ' || x_return_status);
1940: WriteLog(l_api_name || ': x_msg_count: ' || x_msg_count);
1941:
1942: EXCEPTION
1943: WHEN FND_API.G_EXC_ERROR THEN
1944: x_return_status := FND_API.G_RET_STS_ERROR;
1945: FND_MSG_PUB.Count_And_Get
1946: ( p_count => x_msg_count,
1947: p_data => x_msg_data );

Line 1944: x_return_status := FND_API.G_RET_STS_ERROR;

1940: WriteLog(l_api_name || ': x_msg_count: ' || x_msg_count);
1941:
1942: EXCEPTION
1943: WHEN FND_API.G_EXC_ERROR THEN
1944: x_return_status := FND_API.G_RET_STS_ERROR;
1945: FND_MSG_PUB.Count_And_Get
1946: ( p_count => x_msg_count,
1947: p_data => x_msg_data );
1948: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception error='||SQLERRM);

Line 1950: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1946: ( p_count => x_msg_count,
1947: p_data => x_msg_data );
1948: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception error='||SQLERRM);
1949:
1950: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1951: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1952: FND_MSG_PUB.Count_And_Get
1953: ( p_count => x_msg_count,
1954: p_data => x_msg_data );

Line 1951: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1947: p_data => x_msg_data );
1948: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception error='||SQLERRM);
1949:
1950: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1951: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1952: FND_MSG_PUB.Count_And_Get
1953: ( p_count => x_msg_count,
1954: p_data => x_msg_data );
1955: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UnExc Exception error='||SQLERRM);

Line 1958: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1954: p_data => x_msg_data );
1955: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UnExc Exception error='||SQLERRM);
1956:
1957: WHEN OTHERS THEN
1958: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1959: FND_MSG_PUB.Count_And_Get
1960: ( p_count => x_msg_count,
1961: p_data => x_msg_data );
1962: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Other Exception error='||SQLERRM);

Line 1984: IF FND_API.to_Boolean( p_init_msg_list )

1980: l_delinquency_id NUMBER;
1981:
1982: BEGIN
1983: -- Initialize message list IF p_init_msg_list is set to TRUE.
1984: IF FND_API.to_Boolean( p_init_msg_list )
1985: THEN
1986: FND_MSG_PUB.initialize;
1987: END IF;
1988:

Line 1990: x_return_status := FND_API.G_RET_STS_SUCCESS;

1986: FND_MSG_PUB.initialize;
1987: END IF;
1988:
1989: -- Initialize API return status to SUCCESS
1990: x_return_status := FND_API.G_RET_STS_SUCCESS;
1991:
1992: IF P_delinquency_ID is NULL
1993: or P_delinquency_ID = FND_API.G_MISS_NUM
1994: THEN

Line 1993: or P_delinquency_ID = FND_API.G_MISS_NUM

1989: -- Initialize API return status to SUCCESS
1990: x_return_status := FND_API.G_RET_STS_SUCCESS;
1991:
1992: IF P_delinquency_ID is NULL
1993: or P_delinquency_ID = FND_API.G_MISS_NUM
1994: THEN
1995: FND_MESSAGE.Set_Name('IEX', 'API_INVALID_ID');
1996: FND_MESSAGE.Set_Token('COLUMN', 'delinquency_ID', FALSE);
1997: FND_MESSAGE.Set_Token('VALUE', p_delinquency_id, FALSE);

Line 1999: x_return_status := FND_API.G_RET_STS_ERROR;

1995: FND_MESSAGE.Set_Name('IEX', 'API_INVALID_ID');
1996: FND_MESSAGE.Set_Token('COLUMN', 'delinquency_ID', FALSE);
1997: FND_MESSAGE.Set_Token('VALUE', p_delinquency_id, FALSE);
1998: FND_MSG_PUB.Add;
1999: x_return_status := FND_API.G_RET_STS_ERROR;
2000:
2001: ELSE
2002:
2003: OPEN C_Get_Del (p_delinquency_id);

Line 2015: x_return_status := FND_API.G_RET_STS_ERROR;

2011: FND_MESSAGE.Set_Token('COLUMN', 'delinquency_ID', FALSE);
2012: FND_MESSAGE.Set_Token('VALUE', p_delinquency_id, FALSE);
2013: FND_MSG_PUB.Add;
2014: END IF;
2015: x_return_status := FND_API.G_RET_STS_ERROR;
2016: END IF;
2017: CLOSE C_GET_Del;
2018: END IF;
2019:

Line 2056: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

2052:
2053: l_ag_dn_xref_rec := p_ag_dn_xref_rec;
2054:
2055: -- Standard call to check for call compatibility.
2056: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2057: p_api_version,
2058: l_api_name,
2059: G_PKG_NAME)
2060: THEN

Line 2061: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2057: p_api_version,
2058: l_api_name,
2059: G_PKG_NAME)
2060: THEN
2061: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2062: END IF;
2063:
2064: -- Initialize message list if p_init_msg_list is set to TRUE.
2065: IF FND_API.to_Boolean( p_init_msg_list )

Line 2065: IF FND_API.to_Boolean( p_init_msg_list )

2061: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2062: END IF;
2063:
2064: -- Initialize message list if p_init_msg_list is set to TRUE.
2065: IF FND_API.to_Boolean( p_init_msg_list )
2066: THEN
2067: FND_MSG_PUB.initialize;
2068: END IF;
2069:

Line 2074: x_return_status := FND_API.G_RET_STS_SUCCESS;

2070: WriteLog(l_api_name || G_PKG_NAME || ' ' || l_api_name || ' - Start');
2071:
2072:
2073: -- Initialize API return status to SUCCESS
2074: x_return_status := FND_API.G_RET_STS_SUCCESS;
2075:
2076: --
2077: -- API body
2078: --

Line 2115: IF FND_API.to_Boolean( p_commit )

2111: -- End of API body
2112: --
2113:
2114: -- Standard check for p_commit
2115: IF FND_API.to_Boolean( p_commit )
2116: THEN
2117: COMMIT WORK;
2118: END IF;
2119:

Line 2130: WHEN FND_API.G_EXC_ERROR THEN

2126: p_data => x_msg_data
2127: );
2128:
2129: EXCEPTION
2130: WHEN FND_API.G_EXC_ERROR THEN
2131: x_return_status := FND_API.G_RET_STS_ERROR;
2132: FND_MSG_PUB.Count_And_Get
2133: ( p_count => x_msg_count,
2134: p_data => x_msg_data );

Line 2131: x_return_status := FND_API.G_RET_STS_ERROR;

2127: );
2128:
2129: EXCEPTION
2130: WHEN FND_API.G_EXC_ERROR THEN
2131: x_return_status := FND_API.G_RET_STS_ERROR;
2132: FND_MSG_PUB.Count_And_Get
2133: ( p_count => x_msg_count,
2134: p_data => x_msg_data );
2135: ROLLBACK TO CREATE_AG_DN_PVT;

Line 2138: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2134: p_data => x_msg_data );
2135: ROLLBACK TO CREATE_AG_DN_PVT;
2136: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - error='||SQLERRM);
2137:
2138: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2139: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2140: FND_MSG_PUB.Count_And_Get
2141: ( p_count => x_msg_count,
2142: p_data => x_msg_data );

Line 2139: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2135: ROLLBACK TO CREATE_AG_DN_PVT;
2136: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - error='||SQLERRM);
2137:
2138: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2139: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2140: FND_MSG_PUB.Count_And_Get
2141: ( p_count => x_msg_count,
2142: p_data => x_msg_data );
2143: ROLLBACK TO CREATE_AG_DN_PVT;

Line 2147: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2143: ROLLBACK TO CREATE_AG_DN_PVT;
2144: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - error='||SQLERRM);
2145:
2146: WHEN OTHERS THEN
2147: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2148: FND_MSG_PUB.Count_And_Get
2149: ( p_count => x_msg_count,
2150: p_data => x_msg_data );
2151: ROLLBACK TO CREATE_AG_DN_PVT;

Line 2211: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

2207:
2208: l_AG_DN_XREF_REC := p_AG_DN_XREF_rec;
2209:
2210: -- Standard call to check for call compatibility.
2211: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2212: p_api_version,
2213: l_api_name,
2214: G_PKG_NAME)
2215: THEN

Line 2216: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2212: p_api_version,
2213: l_api_name,
2214: G_PKG_NAME)
2215: THEN
2216: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2217: END IF;
2218:
2219: -- Initialize message list if p_init_msg_list is set to TRUE.
2220: IF FND_API.to_Boolean( p_init_msg_list )

Line 2220: IF FND_API.to_Boolean( p_init_msg_list )

2216: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2217: END IF;
2218:
2219: -- Initialize message list if p_init_msg_list is set to TRUE.
2220: IF FND_API.to_Boolean( p_init_msg_list )
2221: THEN
2222: FND_MSG_PUB.initialize;
2223: END IF;
2224:

Line 2226: x_return_status := FND_API.G_RET_STS_SUCCESS;

2222: FND_MSG_PUB.initialize;
2223: END IF;
2224:
2225: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Start');
2226: x_return_status := FND_API.G_RET_STS_SUCCESS;
2227: --
2228: -- Api body
2229: --
2230: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Open C_GET_AGDN_XREF_REC');

Line 2262: raise FND_API.G_EXC_ERROR;

2258: FND_MESSAGE.Set_Name('AS', 'API_MISSING_UPDATE_TARGET');
2259: FND_MESSAGE.Set_Token ('INFO', 'IEX_AG_DN_XREF', FALSE);
2260: FND_MSG_PUB.Add;
2261: END IF;
2262: raise FND_API.G_EXC_ERROR;
2263: END IF;
2264:
2265: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Close C_GET_AGDN_XREF_REC');
2266: Close C_Get_AG_DN_XREF_Rec;

Line 2269: l_ag_Dn_xref_rec.last_update_date = FND_API.G_MISS_Date )

2265: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Close C_GET_AGDN_XREF_REC');
2266: Close C_Get_AG_DN_XREF_Rec;
2267:
2268: If (l_ag_Dn_xref_rec.last_update_date is NULL or
2269: l_ag_Dn_xref_rec.last_update_date = FND_API.G_MISS_Date )
2270: Then
2271: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2272: THEN
2273: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_ID');

Line 2277: raise FND_API.G_EXC_ERROR;

2273: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_ID');
2274: FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
2275: FND_MSG_PUB.ADD;
2276: END IF;
2277: raise FND_API.G_EXC_ERROR;
2278: End if;
2279: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Transfer Data into target rec');
2280:
2281: -- Transfer Data into target record

Line 2288: IF (l_ag_dn_xref_rec.callback_flag = FND_API.G_MISS_CHAR or

2284:
2285: -- dont update aging_bucket_id and aging_bucket_line_id
2286: -- dont update dunning_level
2287:
2288: IF (l_ag_dn_xref_rec.callback_flag = FND_API.G_MISS_CHAR or
2289: l_ag_dn_xref_rec.callback_flag is null ) Then
2290: l_ag_dn_xref_rec.callback_flag := l_ag_dn_xref_REF_rec.callback_flag;
2291: END IF;
2292: IF (l_ag_dn_xref_rec.callback_days = FND_API.G_MISS_NUM or

Line 2292: IF (l_ag_dn_xref_rec.callback_days = FND_API.G_MISS_NUM or

2288: IF (l_ag_dn_xref_rec.callback_flag = FND_API.G_MISS_CHAR or
2289: l_ag_dn_xref_rec.callback_flag is null ) Then
2290: l_ag_dn_xref_rec.callback_flag := l_ag_dn_xref_REF_rec.callback_flag;
2291: END IF;
2292: IF (l_ag_dn_xref_rec.callback_days = FND_API.G_MISS_NUM or
2293: l_ag_dn_xref_rec.callback_days is null ) Then
2294: l_ag_dn_xref_rec.callback_days := l_ag_dn_xref_REF_rec.callback_days;
2295: END IF;
2296: IF (l_ag_dn_xref_rec.fm_method = FND_API.G_MISS_CHAR or

Line 2296: IF (l_ag_dn_xref_rec.fm_method = FND_API.G_MISS_CHAR or

2292: IF (l_ag_dn_xref_rec.callback_days = FND_API.G_MISS_NUM or
2293: l_ag_dn_xref_rec.callback_days is null ) Then
2294: l_ag_dn_xref_rec.callback_days := l_ag_dn_xref_REF_rec.callback_days;
2295: END IF;
2296: IF (l_ag_dn_xref_rec.fm_method = FND_API.G_MISS_CHAR or
2297: l_ag_dn_xref_rec.fm_method is null) Then
2298: l_ag_dn_xref_rec.fm_method := l_ag_dn_xref_REF_rec.fm_method;
2299: END IF;
2300: IF (l_ag_dn_xref_rec.template_ID = FND_API.G_MISS_NUM or

Line 2300: IF (l_ag_dn_xref_rec.template_ID = FND_API.G_MISS_NUM or

2296: IF (l_ag_dn_xref_rec.fm_method = FND_API.G_MISS_CHAR or
2297: l_ag_dn_xref_rec.fm_method is null) Then
2298: l_ag_dn_xref_rec.fm_method := l_ag_dn_xref_REF_rec.fm_method;
2299: END IF;
2300: IF (l_ag_dn_xref_rec.template_ID = FND_API.G_MISS_NUM or
2301: l_ag_dn_xref_rec.template_id is null ) Then
2302: l_ag_dn_xref_rec.template_ID := l_ag_dn_xref_ref_rec.template_ID;
2303: END IF;
2304: IF (l_ag_dn_xref_rec.xdo_template_ID = FND_API.G_MISS_NUM or

Line 2304: IF (l_ag_dn_xref_rec.xdo_template_ID = FND_API.G_MISS_NUM or

2300: IF (l_ag_dn_xref_rec.template_ID = FND_API.G_MISS_NUM or
2301: l_ag_dn_xref_rec.template_id is null ) Then
2302: l_ag_dn_xref_rec.template_ID := l_ag_dn_xref_ref_rec.template_ID;
2303: END IF;
2304: IF (l_ag_dn_xref_rec.xdo_template_ID = FND_API.G_MISS_NUM or
2305: l_ag_dn_xref_rec.xdo_template_id is null ) Then
2306: l_ag_dn_xref_rec.xdo_template_ID := l_ag_dn_xref_ref_rec.xdo_template_ID;
2307: END IF;
2308: IF (l_ag_dn_xref_rec.score_range_low = FND_API.G_MISS_NUM or

Line 2308: IF (l_ag_dn_xref_rec.score_range_low = FND_API.G_MISS_NUM or

2304: IF (l_ag_dn_xref_rec.xdo_template_ID = FND_API.G_MISS_NUM or
2305: l_ag_dn_xref_rec.xdo_template_id is null ) Then
2306: l_ag_dn_xref_rec.xdo_template_ID := l_ag_dn_xref_ref_rec.xdo_template_ID;
2307: END IF;
2308: IF (l_ag_dn_xref_rec.score_range_low = FND_API.G_MISS_NUM or
2309: l_ag_dn_xref_rec.score_range_low is null ) Then
2310: l_ag_dn_xref_rec.score_range_low := l_ag_dn_xref_ref_rec.score_range_low;
2311: END IF;
2312: IF (l_ag_dn_xref_rec.score_range_high = FND_API.G_MISS_NUM or

Line 2312: IF (l_ag_dn_xref_rec.score_range_high = FND_API.G_MISS_NUM or

2308: IF (l_ag_dn_xref_rec.score_range_low = FND_API.G_MISS_NUM or
2309: l_ag_dn_xref_rec.score_range_low is null ) Then
2310: l_ag_dn_xref_rec.score_range_low := l_ag_dn_xref_ref_rec.score_range_low;
2311: END IF;
2312: IF (l_ag_dn_xref_rec.score_range_high = FND_API.G_MISS_NUM or
2313: l_ag_dn_xref_rec.score_range_high is null ) Then
2314: l_ag_dn_xref_rec.score_range_high := l_ag_dn_xref_ref_rec.score_range_high;
2315: END IF;
2316: IF (l_ag_dn_xref_rec.object_version_number = FND_API.G_MISS_NUM or

Line 2316: IF (l_ag_dn_xref_rec.object_version_number = FND_API.G_MISS_NUM or

2312: IF (l_ag_dn_xref_rec.score_range_high = FND_API.G_MISS_NUM or
2313: l_ag_dn_xref_rec.score_range_high is null ) Then
2314: l_ag_dn_xref_rec.score_range_high := l_ag_dn_xref_ref_rec.score_range_high;
2315: END IF;
2316: IF (l_ag_dn_xref_rec.object_version_number = FND_API.G_MISS_NUM or
2317: l_ag_dn_xref_rec.object_version_number is null ) Then
2318: l_ag_dn_xref_rec.object_version_number := l_ag_dn_xref_ref_rec.object_version_number;
2319: END IF;
2320:

Line 2349: IF FND_API.to_Boolean( p_commit )

2345: -- End of API body.
2346: --
2347:
2348: -- Standard check for p_commit
2349: IF FND_API.to_Boolean( p_commit )
2350: THEN
2351: COMMIT WORK;
2352: END IF;
2353:

Line 2361: WHEN FND_API.G_EXC_ERROR THEN

2357: ( p_count => x_msg_count,
2358: p_data => x_msg_data );
2359:
2360: EXCEPTION
2361: WHEN FND_API.G_EXC_ERROR THEN
2362: x_return_status := FND_API.G_RET_STS_ERROR;
2363: FND_MSG_PUB.Count_And_Get
2364: ( p_count => x_msg_count,
2365: p_data => x_msg_data );

Line 2362: x_return_status := FND_API.G_RET_STS_ERROR;

2358: p_data => x_msg_data );
2359:
2360: EXCEPTION
2361: WHEN FND_API.G_EXC_ERROR THEN
2362: x_return_status := FND_API.G_RET_STS_ERROR;
2363: FND_MSG_PUB.Count_And_Get
2364: ( p_count => x_msg_count,
2365: p_data => x_msg_data );
2366: ROLLBACK TO UPDATE_AG_DN_PVT;

Line 2370: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2366: ROLLBACK TO UPDATE_AG_DN_PVT;
2367: errmsg := SQLERRM;
2368: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - error='||SQLERRM);
2369:
2370: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2371: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2372: FND_MSG_PUB.Count_And_Get
2373: ( p_count => x_msg_count,
2374: p_data => x_msg_data );

Line 2371: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2367: errmsg := SQLERRM;
2368: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - error='||SQLERRM);
2369:
2370: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2371: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2372: FND_MSG_PUB.Count_And_Get
2373: ( p_count => x_msg_count,
2374: p_data => x_msg_data );
2375: ROLLBACK TO UPDATE_AG_DN_PVT;

Line 2379: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2375: ROLLBACK TO UPDATE_AG_DN_PVT;
2376: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - error='||SQLERRM);
2377:
2378: WHEN OTHERS THEN
2379: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2380: FND_MSG_PUB.Count_And_Get
2381: ( p_count => x_msg_count,
2382: p_data => x_msg_data );
2383: ROLLBACK TO UPDATE_AG_DN_PVT;

Line 2418: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

2414: -- Standard Start of API savepoint
2415: SAVEPOINT DELETE_AG_DN_PVT;
2416:
2417: -- Standard call to check for call compatibility.
2418: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2419: p_api_version,
2420: l_api_name,
2421: G_PKG_NAME)
2422: THEN

Line 2423: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2419: p_api_version,
2420: l_api_name,
2421: G_PKG_NAME)
2422: THEN
2423: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2424: END IF;
2425:
2426: -- Initialize message list if p_init_msg_list is set to TRUE.
2427: IF FND_API.to_Boolean( p_init_msg_list )

Line 2427: IF FND_API.to_Boolean( p_init_msg_list )

2423: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2424: END IF;
2425:
2426: -- Initialize message list if p_init_msg_list is set to TRUE.
2427: IF FND_API.to_Boolean( p_init_msg_list )
2428: THEN
2429: FND_MSG_PUB.initialize;
2430: END IF;
2431:

Line 2433: x_return_status := FND_API.G_RET_STS_SUCCESS;

2429: FND_MSG_PUB.initialize;
2430: END IF;
2431:
2432: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Start');
2433: x_return_status := FND_API.G_RET_STS_SUCCESS;
2434: --
2435: -- Api body
2436: --
2437: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Open Cursor');

Line 2453: raise FND_API.G_EXC_ERROR;

2449: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
2450: FND_MESSAGE.Set_Token ('INFO', 'IEX_AG_DN_XREF', FALSE);
2451: FND_MSG_PUB.Add;
2452: END IF;
2453: raise FND_API.G_EXC_ERROR;
2454: END IF;
2455:
2456: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - agdnxerfid='||l_ag_dn_xref_id);
2457: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Close Cursor');

Line 2465: IF x_return_status = FND_API.G_RET_STS_ERROR then

2461: -- Invoke table handler
2462: IEX_AG_DN_PKG.Delete_Row(
2463: p_AG_DN_XREF_ID => l_AG_DN_XREF_ID);
2464:
2465: IF x_return_status = FND_API.G_RET_STS_ERROR then
2466: raise FND_API.G_EXC_ERROR;
2467: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2468: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2469: END IF;

Line 2466: raise FND_API.G_EXC_ERROR;

2462: IEX_AG_DN_PKG.Delete_Row(
2463: p_AG_DN_XREF_ID => l_AG_DN_XREF_ID);
2464:
2465: IF x_return_status = FND_API.G_RET_STS_ERROR then
2466: raise FND_API.G_EXC_ERROR;
2467: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2468: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2469: END IF;
2470:

Line 2467: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then

2463: p_AG_DN_XREF_ID => l_AG_DN_XREF_ID);
2464:
2465: IF x_return_status = FND_API.G_RET_STS_ERROR then
2466: raise FND_API.G_EXC_ERROR;
2467: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2468: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2469: END IF;
2470:
2471: --

Line 2468: raise FND_API.G_EXC_UNEXPECTED_ERROR;

2464:
2465: IF x_return_status = FND_API.G_RET_STS_ERROR then
2466: raise FND_API.G_EXC_ERROR;
2467: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2468: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2469: END IF;
2470:
2471: --
2472: -- End of API body

Line 2476: IF FND_API.to_Boolean( p_commit )

2472: -- End of API body
2473: --
2474:
2475: -- Standard check for p_commit
2476: IF FND_API.to_Boolean( p_commit )
2477: THEN
2478: COMMIT WORK;
2479: END IF;
2480:

Line 2488: WHEN FND_API.G_EXC_ERROR THEN

2484: ( p_count => x_msg_count,
2485: p_data => x_msg_data );
2486:
2487: EXCEPTION
2488: WHEN FND_API.G_EXC_ERROR THEN
2489: x_return_status := FND_API.G_RET_STS_ERROR;
2490: FND_MSG_PUB.Count_And_Get
2491: ( p_count => x_msg_count,
2492: p_data => x_msg_data );

Line 2489: x_return_status := FND_API.G_RET_STS_ERROR;

2485: p_data => x_msg_data );
2486:
2487: EXCEPTION
2488: WHEN FND_API.G_EXC_ERROR THEN
2489: x_return_status := FND_API.G_RET_STS_ERROR;
2490: FND_MSG_PUB.Count_And_Get
2491: ( p_count => x_msg_count,
2492: p_data => x_msg_data );
2493: ROLLBACK TO DELETE_AG_DN_PVT;

Line 2496: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2492: p_data => x_msg_data );
2493: ROLLBACK TO DELETE_AG_DN_PVT;
2494: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - DeleteAgDn:error='||SQLERRM);
2495:
2496: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2497: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2498: FND_MSG_PUB.Count_And_Get
2499: ( p_count => x_msg_count,
2500: p_data => x_msg_data );

Line 2497: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2493: ROLLBACK TO DELETE_AG_DN_PVT;
2494: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - DeleteAgDn:error='||SQLERRM);
2495:
2496: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2497: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2498: FND_MSG_PUB.Count_And_Get
2499: ( p_count => x_msg_count,
2500: p_data => x_msg_data );
2501: ROLLBACK TO DELETE_AG_DN_PVT;

Line 2505: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2501: ROLLBACK TO DELETE_AG_DN_PVT;
2502: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - DeleteAgDn:error='||SQLERRM);
2503:
2504: WHEN OTHERS THEN
2505: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2506: FND_MSG_PUB.Count_And_Get
2507: ( p_count => x_msg_count,
2508: p_data => x_msg_data );
2509: ROLLBACK TO DELETE_AG_DN_PVT;

Line 2542: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

2538:
2539: l_dunning_rec := p_dunning_rec;
2540:
2541: -- Standard call to check for call compatibility.
2542: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2543: p_api_version,
2544: l_api_name,
2545: G_PKG_NAME)
2546: THEN

Line 2547: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2543: p_api_version,
2544: l_api_name,
2545: G_PKG_NAME)
2546: THEN
2547: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2548: END IF;
2549:
2550: -- Initialize message list if p_init_msg_list is set to TRUE.
2551: IF FND_API.to_Boolean( p_init_msg_list )

Line 2551: IF FND_API.to_Boolean( p_init_msg_list )

2547: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2548: END IF;
2549:
2550: -- Initialize message list if p_init_msg_list is set to TRUE.
2551: IF FND_API.to_Boolean( p_init_msg_list )
2552: THEN
2553: FND_MSG_PUB.initialize;
2554: END IF;
2555:

Line 2557: x_return_status := FND_API.G_RET_STS_SUCCESS;

2553: FND_MSG_PUB.initialize;
2554: END IF;
2555:
2556: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - START');
2557: x_return_status := FND_API.G_RET_STS_SUCCESS;
2558: --
2559: -- API body
2560: --
2561: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - InsertRow');

Line 2597: IF x_return_status = FND_API.G_RET_STS_ERROR then

2593: , p_contact_party_id => l_dunning_rec.contact_party_id
2594: );
2595:
2596:
2597: IF x_return_status = FND_API.G_RET_STS_ERROR then
2598: raise FND_API.G_EXC_ERROR;
2599: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2600: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2601: END IF;

Line 2598: raise FND_API.G_EXC_ERROR;

2594: );
2595:
2596:
2597: IF x_return_status = FND_API.G_RET_STS_ERROR then
2598: raise FND_API.G_EXC_ERROR;
2599: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2600: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2601: END IF;
2602:

Line 2599: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then

2595:
2596:
2597: IF x_return_status = FND_API.G_RET_STS_ERROR then
2598: raise FND_API.G_EXC_ERROR;
2599: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2600: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2601: END IF;
2602:
2603: --

Line 2600: raise FND_API.G_EXC_UNEXPECTED_ERROR;

2596:
2597: IF x_return_status = FND_API.G_RET_STS_ERROR then
2598: raise FND_API.G_EXC_ERROR;
2599: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2600: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2601: END IF;
2602:
2603: --
2604: -- End of API body

Line 2608: IF FND_API.to_Boolean( p_commit )

2604: -- End of API body
2605: --
2606:
2607: -- Standard check for p_commit
2608: IF FND_API.to_Boolean( p_commit )
2609: THEN
2610: COMMIT WORK;
2611: END IF;
2612:

Line 2620: WHEN FND_API.G_EXC_ERROR THEN

2616: p_data => x_msg_data
2617: );
2618:
2619: EXCEPTION
2620: WHEN FND_API.G_EXC_ERROR THEN
2621: x_return_status := FND_API.G_RET_STS_ERROR;
2622: FND_MSG_PUB.Count_And_Get
2623: ( p_count => x_msg_count,
2624: p_data => x_msg_data );

Line 2621: x_return_status := FND_API.G_RET_STS_ERROR;

2617: );
2618:
2619: EXCEPTION
2620: WHEN FND_API.G_EXC_ERROR THEN
2621: x_return_status := FND_API.G_RET_STS_ERROR;
2622: FND_MSG_PUB.Count_And_Get
2623: ( p_count => x_msg_count,
2624: p_data => x_msg_data );
2625: ROLLBACK TO CREATE_DUNNING_PVT;

Line 2628: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2624: p_data => x_msg_data );
2625: ROLLBACK TO CREATE_DUNNING_PVT;
2626: WriteLog(G_PKG_NAME || ' ' || l_api_name || 'exception ' || SQLERRM);
2627:
2628: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2629: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2630: FND_MSG_PUB.Count_And_Get
2631: ( p_count => x_msg_count,
2632: p_data => x_msg_data );

Line 2629: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2625: ROLLBACK TO CREATE_DUNNING_PVT;
2626: WriteLog(G_PKG_NAME || ' ' || l_api_name || 'exception ' || SQLERRM);
2627:
2628: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2629: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2630: FND_MSG_PUB.Count_And_Get
2631: ( p_count => x_msg_count,
2632: p_data => x_msg_data );
2633: ROLLBACK TO CREATE_DUNNING_PVT;

Line 2637: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2633: ROLLBACK TO CREATE_DUNNING_PVT;
2634: WriteLog(G_PKG_NAME || ' ' || l_api_name || 'error ' || SQLERRM);
2635:
2636: WHEN OTHERS THEN
2637: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2638: FND_MSG_PUB.Count_And_Get
2639: ( p_count => x_msg_count,
2640: p_data => x_msg_data );
2641: ROLLBACK TO CREATE_DUNNING_PVT;

Line 2714: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

2710:
2711: l_dunning_rec := p_dunning_rec;
2712:
2713: -- Standard call to check for call compatibility.
2714: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2715: p_api_version,
2716: l_api_name,
2717: G_PKG_NAME)
2718: THEN

Line 2719: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2715: p_api_version,
2716: l_api_name,
2717: G_PKG_NAME)
2718: THEN
2719: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2720: END IF;
2721:
2722: -- Initialize message list if p_init_msg_list is set to TRUE.
2723: IF FND_API.to_Boolean( p_init_msg_list )

Line 2723: IF FND_API.to_Boolean( p_init_msg_list )

2719: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2720: END IF;
2721:
2722: -- Initialize message list if p_init_msg_list is set to TRUE.
2723: IF FND_API.to_Boolean( p_init_msg_list )
2724: THEN
2725: FND_MSG_PUB.initialize;
2726: END IF;
2727:

Line 2729: x_return_status := FND_API.G_RET_STS_SUCCESS;

2725: FND_MSG_PUB.initialize;
2726: END IF;
2727:
2728: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - START');
2729: x_return_status := FND_API.G_RET_STS_SUCCESS;
2730: --
2731: -- Api body
2732: --
2733: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Open C_GET_DUNNING_REC');

Line 2778: raise FND_API.G_EXC_ERROR;

2774: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
2775: FND_MESSAGE.Set_Token ('INFO', 'iex_DUNNINGs', FALSE);
2776: FND_MSG_PUB.Add;
2777: END IF;
2778: raise FND_API.G_EXC_ERROR;
2779: END IF;
2780:
2781: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - CLOSE C_GET_DUNNING_REC');
2782: Close C_Get_DUNNING_REC;

Line 2786: l_dunning_rec.last_update_date = FND_API.G_MISS_Date )

2782: Close C_Get_DUNNING_REC;
2783: -- Start bug 5924158 05/06/07 by gnramasa
2784: /*
2785: If (l_dunning_rec.last_update_date is NULL or
2786: l_dunning_rec.last_update_date = FND_API.G_MISS_Date )
2787: Then
2788: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2789: THEN
2790: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_ID');

Line 2794: raise FND_API.G_EXC_ERROR;

2790: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_ID');
2791: FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
2792: FND_MSG_PUB.ADD;
2793: END IF;
2794: raise FND_API.G_EXC_ERROR;
2795: End if;
2796: */
2797: -- End bug 5924158 05/06/07 by gnramasa
2798: -- Transfer Data into target record

Line 2819: IF (l_dunning_rec.xml_request_id = FND_API.G_MISS_NUM OR

2815: -- dont update dunning_id and delinquency_id
2816: -- dont update dunning_method
2817: -- dont update dunning_object_id and dunning_level
2818:
2819: IF (l_dunning_rec.xml_request_id = FND_API.G_MISS_NUM OR
2820: l_dunning_rec.xml_request_id is null) Then
2821: l_dunning_rec.xml_request_id := l_dunning_ref_rec.xml_request_id;
2822: END IF;
2823: IF (l_dunning_rec.xml_template_id = FND_API.G_MISS_NUM OR

Line 2823: IF (l_dunning_rec.xml_template_id = FND_API.G_MISS_NUM OR

2819: IF (l_dunning_rec.xml_request_id = FND_API.G_MISS_NUM OR
2820: l_dunning_rec.xml_request_id is null) Then
2821: l_dunning_rec.xml_request_id := l_dunning_ref_rec.xml_request_id;
2822: END IF;
2823: IF (l_dunning_rec.xml_template_id = FND_API.G_MISS_NUM OR
2824: l_dunning_rec.xml_template_id is null) Then
2825: l_dunning_rec.xml_template_id := l_dunning_ref_rec.xml_template_id;
2826: END IF;
2827: IF (l_dunning_rec.ffm_request_id = FND_API.G_MISS_NUM OR

Line 2827: IF (l_dunning_rec.ffm_request_id = FND_API.G_MISS_NUM OR

2823: IF (l_dunning_rec.xml_template_id = FND_API.G_MISS_NUM OR
2824: l_dunning_rec.xml_template_id is null) Then
2825: l_dunning_rec.xml_template_id := l_dunning_ref_rec.xml_template_id;
2826: END IF;
2827: IF (l_dunning_rec.ffm_request_id = FND_API.G_MISS_NUM OR
2828: l_dunning_rec.ffm_request_id is null) Then
2829: l_dunning_rec.ffm_request_id := l_dunning_ref_rec.ffm_request_id;
2830: END IF;
2831: IF (l_dunning_rec.callback_YN = FND_API.G_MISS_CHAR or

Line 2831: IF (l_dunning_rec.callback_YN = FND_API.G_MISS_CHAR or

2827: IF (l_dunning_rec.ffm_request_id = FND_API.G_MISS_NUM OR
2828: l_dunning_rec.ffm_request_id is null) Then
2829: l_dunning_rec.ffm_request_id := l_dunning_ref_rec.ffm_request_id;
2830: END IF;
2831: IF (l_dunning_rec.callback_YN = FND_API.G_MISS_CHAR or
2832: l_dunning_rec.callback_YN is null ) Then
2833: l_dunning_rec.callback_YN := l_dunning_ref_rec.callback_YN;
2834: END IF;
2835: IF (l_dunning_rec.callback_date = FND_API.G_MISS_DATE or

Line 2835: IF (l_dunning_rec.callback_date = FND_API.G_MISS_DATE or

2831: IF (l_dunning_rec.callback_YN = FND_API.G_MISS_CHAR or
2832: l_dunning_rec.callback_YN is null ) Then
2833: l_dunning_rec.callback_YN := l_dunning_ref_rec.callback_YN;
2834: END IF;
2835: IF (l_dunning_rec.callback_date = FND_API.G_MISS_DATE or
2836: l_dunning_rec.callback_date is null ) Then
2837: l_dunning_rec.callback_date := l_dunning_ref_rec.callback_date;
2838: END IF;
2839: IF (l_dunning_rec.status = FND_API.G_MISS_CHAR or

Line 2839: IF (l_dunning_rec.status = FND_API.G_MISS_CHAR or

2835: IF (l_dunning_rec.callback_date = FND_API.G_MISS_DATE or
2836: l_dunning_rec.callback_date is null ) Then
2837: l_dunning_rec.callback_date := l_dunning_ref_rec.callback_date;
2838: END IF;
2839: IF (l_dunning_rec.status = FND_API.G_MISS_CHAR or
2840: l_dunning_rec.status is null ) Then
2841: l_dunning_rec.status := l_dunning_ref_rec.status;
2842: END IF;
2843: IF (l_dunning_rec.template_ID = FND_API.G_MISS_NUM or

Line 2843: IF (l_dunning_rec.template_ID = FND_API.G_MISS_NUM or

2839: IF (l_dunning_rec.status = FND_API.G_MISS_CHAR or
2840: l_dunning_rec.status is null ) Then
2841: l_dunning_rec.status := l_dunning_ref_rec.status;
2842: END IF;
2843: IF (l_dunning_rec.template_ID = FND_API.G_MISS_NUM or
2844: l_dunning_rec.template_id is null ) Then
2845: l_dunning_rec.template_ID := l_dunning_ref_rec.template_ID;
2846: END IF;
2847: IF (l_dunning_rec.campaign_sched_id = FND_API.G_MISS_NUM or

Line 2847: IF (l_dunning_rec.campaign_sched_id = FND_API.G_MISS_NUM or

2843: IF (l_dunning_rec.template_ID = FND_API.G_MISS_NUM or
2844: l_dunning_rec.template_id is null ) Then
2845: l_dunning_rec.template_ID := l_dunning_ref_rec.template_ID;
2846: END IF;
2847: IF (l_dunning_rec.campaign_sched_id = FND_API.G_MISS_NUM or
2848: l_dunning_rec.campaign_sched_id is null ) Then
2849: l_dunning_rec.campaign_sched_id := l_dunning_ref_rec.campaign_sched_id;
2850: END IF;
2851: IF (l_dunning_rec.object_ID = FND_API.G_MISS_NUM or

Line 2851: IF (l_dunning_rec.object_ID = FND_API.G_MISS_NUM or

2847: IF (l_dunning_rec.campaign_sched_id = FND_API.G_MISS_NUM or
2848: l_dunning_rec.campaign_sched_id is null ) Then
2849: l_dunning_rec.campaign_sched_id := l_dunning_ref_rec.campaign_sched_id;
2850: END IF;
2851: IF (l_dunning_rec.object_ID = FND_API.G_MISS_NUM or
2852: l_dunning_rec.object_id is null ) Then
2853: l_dunning_rec.object_ID := l_dunning_ref_rec.object_ID;
2854: END IF;
2855: IF (l_dunning_rec.object_type = FND_API.G_MISS_CHAR or

Line 2855: IF (l_dunning_rec.object_type = FND_API.G_MISS_CHAR or

2851: IF (l_dunning_rec.object_ID = FND_API.G_MISS_NUM or
2852: l_dunning_rec.object_id is null ) Then
2853: l_dunning_rec.object_ID := l_dunning_ref_rec.object_ID;
2854: END IF;
2855: IF (l_dunning_rec.object_type = FND_API.G_MISS_CHAR or
2856: l_dunning_rec.object_type is null ) Then
2857: l_dunning_rec.object_type := l_dunning_ref_rec.object_type;
2858: END IF;
2859: IF (l_dunning_rec.delivery_status = FND_API.G_MISS_CHAR or

Line 2859: IF (l_dunning_rec.delivery_status = FND_API.G_MISS_CHAR or

2855: IF (l_dunning_rec.object_type = FND_API.G_MISS_CHAR or
2856: l_dunning_rec.object_type is null ) Then
2857: l_dunning_rec.object_type := l_dunning_ref_rec.object_type;
2858: END IF;
2859: IF (l_dunning_rec.delivery_status = FND_API.G_MISS_CHAR or
2860: l_dunning_rec.delivery_status is null ) Then
2861: l_dunning_rec.delivery_status := l_dunning_ref_rec.delivery_status;
2862: END IF;
2863: IF (l_dunning_rec.PARENT_DUNNING_ID = FND_API.G_MISS_NUM or

Line 2863: IF (l_dunning_rec.PARENT_DUNNING_ID = FND_API.G_MISS_NUM or

2859: IF (l_dunning_rec.delivery_status = FND_API.G_MISS_CHAR or
2860: l_dunning_rec.delivery_status is null ) Then
2861: l_dunning_rec.delivery_status := l_dunning_ref_rec.delivery_status;
2862: END IF;
2863: IF (l_dunning_rec.PARENT_DUNNING_ID = FND_API.G_MISS_NUM or
2864: l_dunning_rec.PARENT_DUNNING_ID is null ) Then
2865: l_dunning_rec.PARENT_DUNNING_ID := l_dunning_ref_rec.PARENT_DUNNING_ID;
2866: END IF;
2867:

Line 2869: IF (l_dunning_rec.contact_destination = FND_API.G_MISS_CHAR or

2865: l_dunning_rec.PARENT_DUNNING_ID := l_dunning_ref_rec.PARENT_DUNNING_ID;
2866: END IF;
2867:
2868: -- begin bug 3955222 ctlee 10/05/2005
2869: IF (l_dunning_rec.contact_destination = FND_API.G_MISS_CHAR or
2870: l_dunning_rec.contact_destination is null ) Then
2871: l_dunning_rec.contact_destination := l_dunning_ref_rec.contact_destination;
2872: END IF;
2873:

Line 2874: IF (l_dunning_rec.contact_party_id = FND_API.G_MISS_NUM or

2870: l_dunning_rec.contact_destination is null ) Then
2871: l_dunning_rec.contact_destination := l_dunning_ref_rec.contact_destination;
2872: END IF;
2873:
2874: IF (l_dunning_rec.contact_party_id = FND_API.G_MISS_NUM or
2875: l_dunning_rec.contact_party_id is null ) Then
2876: l_dunning_rec.contact_party_id := l_dunning_ref_rec.contact_party_id;
2877: END IF;
2878: -- end bug 3955222 ctlee 10/05/2005

Line 2920: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2916: , p_contact_party_id => l_dunning_rec.contact_party_id -- bug 3955222
2917:
2918: );
2919:
2920: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2921: RAISE FND_API.G_EXC_ERROR;
2922: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2923: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2924: END IF;

Line 2921: RAISE FND_API.G_EXC_ERROR;

2917:
2918: );
2919:
2920: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2921: RAISE FND_API.G_EXC_ERROR;
2922: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2923: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2924: END IF;
2925:

Line 2922: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then

2918: );
2919:
2920: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2921: RAISE FND_API.G_EXC_ERROR;
2922: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2923: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2924: END IF;
2925:
2926: --

Line 2923: raise FND_API.G_EXC_UNEXPECTED_ERROR;

2919:
2920: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2921: RAISE FND_API.G_EXC_ERROR;
2922: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2923: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2924: END IF;
2925:
2926: --
2927: -- End of API body.

Line 2931: IF FND_API.to_Boolean( p_commit )

2927: -- End of API body.
2928: --
2929:
2930: -- Standard check for p_commit
2931: IF FND_API.to_Boolean( p_commit )
2932: THEN
2933: COMMIT WORK;
2934: END IF;
2935:

Line 2943: WHEN FND_API.G_EXC_ERROR THEN

2939: ( p_count => x_msg_count,
2940: p_data => x_msg_data );
2941:
2942: EXCEPTION
2943: WHEN FND_API.G_EXC_ERROR THEN
2944: x_return_status := FND_API.G_RET_STS_ERROR;
2945: FND_MSG_PUB.Count_And_Get
2946: ( p_count => x_msg_count,
2947: p_data => x_msg_data );

Line 2944: x_return_status := FND_API.G_RET_STS_ERROR;

2940: p_data => x_msg_data );
2941:
2942: EXCEPTION
2943: WHEN FND_API.G_EXC_ERROR THEN
2944: x_return_status := FND_API.G_RET_STS_ERROR;
2945: FND_MSG_PUB.Count_And_Get
2946: ( p_count => x_msg_count,
2947: p_data => x_msg_data );
2948: ROLLBACK TO UPDATE_DUNNING_PVT;

Line 2951: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2947: p_data => x_msg_data );
2948: ROLLBACK TO UPDATE_DUNNING_PVT;
2949: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception error='||SQLERRM);
2950:
2951: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2952: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2953: FND_MSG_PUB.Count_And_Get
2954: ( p_count => x_msg_count,
2955: p_data => x_msg_data );

Line 2952: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2948: ROLLBACK TO UPDATE_DUNNING_PVT;
2949: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception error='||SQLERRM);
2950:
2951: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2952: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2953: FND_MSG_PUB.Count_And_Get
2954: ( p_count => x_msg_count,
2955: p_data => x_msg_data );
2956: ROLLBACK TO UPDATE_DUNNING_PVT;

Line 2960: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2956: ROLLBACK TO UPDATE_DUNNING_PVT;
2957: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UnExc Exception error='||SQLERRM);
2958:
2959: WHEN OTHERS THEN
2960: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2961: FND_MSG_PUB.Count_And_Get
2962: ( p_count => x_msg_count,
2963: p_data => x_msg_data );
2964: ROLLBACK TO UPDATE_DUNNING_PVT;

Line 3141: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

3137: l_org_id:= mo_global.get_current_org_id;
3138:
3139:
3140: -- Standard call to check for call compatibility.
3141: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3142: p_api_version,
3143: l_api_name,
3144: G_PKG_NAME)
3145: THEN

Line 3146: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

3142: p_api_version,
3143: l_api_name,
3144: G_PKG_NAME)
3145: THEN
3146: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3147: END IF;
3148:
3149: -- Initialize message list if p_init_msg_list is set to TRUE.
3150: IF FND_API.to_Boolean( p_init_msg_list )

Line 3150: IF FND_API.to_Boolean( p_init_msg_list )

3146: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3147: END IF;
3148:
3149: -- Initialize message list if p_init_msg_list is set to TRUE.
3150: IF FND_API.to_Boolean( p_init_msg_list )
3151: THEN
3152: FND_MSG_PUB.initialize;
3153: END IF;
3154:

Line 3169: x_return_status := FND_API.G_RET_STS_SUCCESS;

3165: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - p_previous_request_id ' || p_previous_request_id);
3166: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - delcnt= ' || p_delinquencies_tbl.count);
3167:
3168: -- Initialize API return status to SUCCESS
3169: x_return_status := FND_API.G_RET_STS_SUCCESS;
3170: --
3171: -- Api body
3172: --
3173:

Line 3286: RAISE FND_API.G_EXC_ERROR;

3282: FND_MSG_PUB.Add;
3283: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Missing Score');
3284: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Missing Score');
3285: Close C_Get_SCORE;
3286: RAISE FND_API.G_EXC_ERROR;
3287: END IF;
3288: Close C_Get_SCORE;
3289: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - get Score='||l_score);
3290:

Line 3314: If ( x_return_status <> FND_API.G_RET_STS_SUCCESS) Then

3310: , x_msg_data => x_msg_data
3311: , x_aging_bucket_line_id => l_bucket_line_id);
3312:
3313: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - AgingDel status='||x_return_status);
3314: If ( x_return_status <> FND_API.G_RET_STS_SUCCESS) Then
3315: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_AGINGBUCKETLINE');
3316: FND_MSG_PUB.Add;
3317: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - AgingBucketLineId notfound');
3318: FND_FILE.PUT_LINE(FND_FILE.LOG, 'AgingBucketLineId NotFound');

Line 3319: RAISE FND_API.G_EXC_ERROR;

3315: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_AGINGBUCKETLINE');
3316: FND_MSG_PUB.Add;
3317: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - AgingBucketLineId notfound');
3318: FND_FILE.PUT_LINE(FND_FILE.LOG, 'AgingBucketLineId NotFound');
3319: RAISE FND_API.G_EXC_ERROR;
3320: END IF;
3321: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - lineid='||l_bucket_line_id);
3322:
3323: /*===========================================

Line 3343: RAISE FND_API.G_EXC_ERROR;

3339: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_TEMPLATE');
3340: FND_MSG_PUB.Add;
3341: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Missing corresponding template');
3342: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Missing corresponding template');
3343: RAISE FND_API.G_EXC_ERROR;
3344: END IF;
3345:
3346: --WriteLog('iexvdunb:SendLevelDunn:close C_GET_TEMPLATE');
3347: Close C_Get_TEMPLATE;

Line 3370: RAISE FND_API.G_EXC_ERROR;

3366: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_TEMPLATE');
3367: FND_MSG_PUB.Add;
3368: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Missing corresponding template');
3369: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Missing corresponding template');
3370: RAISE FND_API.G_EXC_ERROR;
3371:
3372: end if;
3373:
3374: /*===========================================

Line 3409: x_return_status := FND_API.G_RET_STS_ERROR;

3405: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_DUNNING_PROFILE_NO');
3406: FND_MSG_PUB.Add;
3407: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Send dunning in customer profile set to no ');
3408: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Send dunning in customer profile set to no ');
3409: x_return_status := FND_API.G_RET_STS_ERROR;
3410: GOTO end_api;
3411: end if;
3412:
3413:

Line 3423: x_return_status := FND_API.G_RET_STS_ERROR;

3419: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_DUNNING_AMOUNT_MIN');
3420: FND_MSG_PUB.Add;
3421: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Required min Dunning amount in customer profile ');
3422: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Required min Dunning amount in customer profile ');
3423: x_return_status := FND_API.G_RET_STS_ERROR;
3424: GOTO end_api;
3425: end if;
3426:
3427: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - end check customer profile');

Line 3446: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

3442: , x_msg_data => x_msg_data);
3443:
3444: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - CloseDunning status='|| x_return_status);
3445:
3446: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3447: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot Close Dunning');
3448: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Cannot Close Dunning');
3449: x_return_status := FND_API.G_RET_STS_ERROR;
3450: GOTO end_api;

Line 3449: x_return_status := FND_API.G_RET_STS_ERROR;

3445:
3446: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3447: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot Close Dunning');
3448: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Cannot Close Dunning');
3449: x_return_status := FND_API.G_RET_STS_ERROR;
3450: GOTO end_api;
3451: END IF;
3452: --WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - EndCloseDunn');
3453:

Line 3471: Get_Callback_Date(p_init_msg_list => FND_API.G_FALSE

3467: *==================================================*/
3468: IF (l_callback_flag = 'Y') THEN
3469:
3470: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - CallbackFlag is Y: GetCallbackDate');
3471: Get_Callback_Date(p_init_msg_list => FND_API.G_FALSE
3472: ,p_callback_days => l_callback_days
3473: ,x_callback_date => l_callback_date
3474: ,x_return_status => x_return_status
3475: ,x_msg_count => x_msg_count

Line 3480: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

3476: ,x_msg_data => x_msg_data);
3477:
3478: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - GetCallbackDate status='|| x_return_status);
3479:
3480: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3481: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_CALLBACKDATE');
3482: FND_MSG_PUB.Add;
3483: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot find callback date');
3484: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Cannot find callback date');

Line 3485: x_return_status := FND_API.G_RET_STS_ERROR;

3481: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_CALLBACKDATE');
3482: FND_MSG_PUB.Add;
3483: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot find callback date');
3484: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Cannot find callback date');
3485: x_return_status := FND_API.G_RET_STS_ERROR;
3486: GOTO end_api;
3487: END IF;
3488:
3489: ELSE

Line 3532: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

3528: , x_msg_data => x_msg_data);
3529:
3530: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - CreateDunning status='|| x_return_status);
3531:
3532: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3533: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot Create Dunning');
3534: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Cannot Create Dunning');
3535: x_return_status := FND_API.G_RET_STS_ERROR;
3536: GOTO end_api;

Line 3535: x_return_status := FND_API.G_RET_STS_ERROR;

3531:
3532: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3533: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot Create Dunning');
3534: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Cannot Create Dunning');
3535: x_return_status := FND_API.G_RET_STS_ERROR;
3536: GOTO end_api;
3537: END IF;
3538:
3539: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - DunningId='||l_dunning_id);

Line 3575: ,p_init_msg_list => FND_API.G_FALSE

3571: */
3572: if (l_curr_dmethod = 'FFM') then
3573:
3574: Send_Fulfillment(p_api_version => p_api_version
3575: ,p_init_msg_list => FND_API.G_FALSE
3576: ,p_commit => FND_API.G_TRUE
3577: ,p_fulfillment_bind_tbl => l_bind_tbl
3578: ,p_template_id => l_template_id
3579: ,p_method => l_method

Line 3576: ,p_commit => FND_API.G_TRUE

3572: if (l_curr_dmethod = 'FFM') then
3573:
3574: Send_Fulfillment(p_api_version => p_api_version
3575: ,p_init_msg_list => FND_API.G_FALSE
3576: ,p_commit => FND_API.G_TRUE
3577: ,p_fulfillment_bind_tbl => l_bind_tbl
3578: ,p_template_id => l_template_id
3579: ,p_method => l_method
3580: ,p_party_id => l_party_cust_id

Line 3591: ,p_init_msg_list => FND_API.G_FALSE

3587: );
3588: else
3589:
3590: Send_XML(p_api_version => p_api_version
3591: ,p_init_msg_list => FND_API.G_FALSE
3592: ,p_commit => FND_API.G_TRUE
3593: ,p_resend => 'N'
3594: ,p_request_id => null
3595: ,p_fulfillment_bind_tbl => l_bind_tbl

Line 3592: ,p_commit => FND_API.G_TRUE

3588: else
3589:
3590: Send_XML(p_api_version => p_api_version
3591: ,p_init_msg_list => FND_API.G_FALSE
3592: ,p_commit => FND_API.G_TRUE
3593: ,p_resend => 'N'
3594: ,p_request_id => null
3595: ,p_fulfillment_bind_tbl => l_bind_tbl
3596: ,p_template_id => l_xdo_template_id

Line 3613: IF x_return_status <> FND_API.G_RET_STS_SUCCESS and x_return_status <> 'W' THEN

3609: end if;
3610:
3611: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - SEND status='|| x_return_status);
3612:
3613: IF x_return_status <> FND_API.G_RET_STS_SUCCESS and x_return_status <> 'W' THEN
3614: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Sending process failed');
3615: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Sending process failed ');
3616: x_return_status := FND_API.G_RET_STS_ERROR;
3617: GOTO end_api;

Line 3616: x_return_status := FND_API.G_RET_STS_ERROR;

3612:
3613: IF x_return_status <> FND_API.G_RET_STS_SUCCESS and x_return_status <> 'W' THEN
3614: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Sending process failed');
3615: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Sending process failed ');
3616: x_return_status := FND_API.G_RET_STS_ERROR;
3617: GOTO end_api;
3618: elsif x_return_status = 'W' then
3619: l_warning_flag := 'W';
3620: END IF;

Line 3635: , p_init_msg_list => FND_API.G_FALSE

3631: end if;
3632:
3633: IEX_DUNNING_PVT.Update_DUNNING(
3634: p_api_version => 1.0
3635: , p_init_msg_list => FND_API.G_FALSE
3636: , p_commit => FND_API.G_TRUE
3637: , p_dunning_rec => l_dunning_rec_upd
3638: , x_return_status => l_return_status
3639: , x_msg_count => l_msg_count

Line 3636: , p_commit => FND_API.G_TRUE

3632:
3633: IEX_DUNNING_PVT.Update_DUNNING(
3634: p_api_version => 1.0
3635: , p_init_msg_list => FND_API.G_FALSE
3636: , p_commit => FND_API.G_TRUE
3637: , p_dunning_rec => l_dunning_rec_upd
3638: , x_return_status => l_return_status
3639: , x_msg_count => l_msg_count
3640: , x_msg_data => l_msg_data

Line 3645: if (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN

3641: );
3642:
3643: <>
3644:
3645: if (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
3646: FND_MSG_PUB.Count_And_Get
3647: ( p_count => x_msg_count,
3648: p_data => x_msg_data );
3649: for i in 1..x_msg_count loop

Line 3665: x_return_status := 'SKIP'; --FND_API.G_EXC_ERROR;

3661: FND_FILE.PUT_LINE(FND_FILE.LOG, 'all delinquencies disputed' );
3662: FND_FILE.PUT_LINE(FND_FILE.LOG, 'skip this party/account/site' );
3663: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
3664: p_data => x_msg_data );
3665: x_return_status := 'SKIP'; --FND_API.G_EXC_ERROR;
3666:
3667: end if; -- end of if (l_noskip>0)
3668:
3669: if l_warning_flag = 'W' then

Line 3686: WHEN FND_API.G_EXC_ERROR THEN

3682: ( p_count => x_msg_count,
3683: p_data => x_msg_data );
3684:
3685: EXCEPTION
3686: WHEN FND_API.G_EXC_ERROR THEN
3687: COMMIT WORK;
3688: x_return_status := FND_API.G_RET_STS_ERROR;
3689: FND_MSG_PUB.Count_And_Get
3690: ( p_count => x_msg_count,

Line 3688: x_return_status := FND_API.G_RET_STS_ERROR;

3684:
3685: EXCEPTION
3686: WHEN FND_API.G_EXC_ERROR THEN
3687: COMMIT WORK;
3688: x_return_status := FND_API.G_RET_STS_ERROR;
3689: FND_MSG_PUB.Count_And_Get
3690: ( p_count => x_msg_count,
3691: p_data => x_msg_data );
3692: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception');

Line 3697: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3693: FND_FILE.PUT_LINE(FND_FILE.LOG, 'expect exception' );
3694: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - error='||SQLERRM);
3695:
3696:
3697: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3698: COMMIT WORK;
3699: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3700: FND_MSG_PUB.Count_And_Get
3701: ( p_count => x_msg_count,

Line 3699: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3695:
3696:
3697: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3698: COMMIT WORK;
3699: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3700: FND_MSG_PUB.Count_And_Get
3701: ( p_count => x_msg_count,
3702: p_data => x_msg_data );
3703: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UnExc Exception');

Line 3710: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3706:
3707:
3708: WHEN OTHERS THEN
3709: COMMIT WORK;
3710: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3711: FND_MSG_PUB.Count_And_Get
3712: ( p_count => x_msg_count,
3713: p_data => x_msg_data );
3714: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Other Exception');

Line 3850: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

3846: --l_org_id := fnd_profile.value('ORG_ID');
3847: l_org_id:= mo_global.get_current_org_id;
3848:
3849: -- Standard call to check for call compatibility.
3850: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3851: p_api_version,
3852: l_api_name,
3853: G_PKG_NAME)
3854: THEN

Line 3855: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

3851: p_api_version,
3852: l_api_name,
3853: G_PKG_NAME)
3854: THEN
3855: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3856: END IF;
3857:
3858: -- Initialize message list if p_init_msg_list is set to TRUE.
3859: IF FND_API.to_Boolean( p_init_msg_list )

Line 3859: IF FND_API.to_Boolean( p_init_msg_list )

3855: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3856: END IF;
3857:
3858: -- Initialize message list if p_init_msg_list is set to TRUE.
3859: IF FND_API.to_Boolean( p_init_msg_list )
3860: THEN
3861: FND_MSG_PUB.initialize;
3862: END IF;
3863:

Line 3867: x_return_status := FND_API.G_RET_STS_SUCCESS;

3863:
3864: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Start');
3865:
3866: -- Initialize API return status to SUCCESS
3867: x_return_status := FND_API.G_RET_STS_SUCCESS;
3868:
3869: --
3870: -- Api body
3871: --

Line 3953: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

3949: , x_aging_bucket_line_id => l_bucket_line_id);
3950:
3951: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - AgingDel status='||x_return_status);
3952:
3953: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3954: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
3955: --FND_MESSAGE.Set_Token ('INFO', 'iex:AginBucketLineId', FALSE);
3956: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_AGINGBUCKETLINE');
3957: FND_MSG_PUB.Add;

Line 4028: x_return_status := FND_API.G_RET_STS_ERROR;

4024: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_TEMPLATE');
4025: FND_MSG_PUB.Add;
4026: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Missing corresponding template');
4027: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Missing corresponding template' );
4028: x_return_status := FND_API.G_RET_STS_ERROR;
4029: GOTO end_loop;
4030: end if;
4031:
4032: /*===========================================

Line 4086: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

4082: , x_msg_data => x_msg_data);
4083:
4084: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - CloseDunning status='|| x_return_status);
4085:
4086: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4087: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot Close Dunning');
4088: --msg
4089: GOTO end_loop;
4090: END IF;

Line 4118: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

4114:
4115: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - GetCallbackDate status='|| x_return_status);
4116: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - CallbackDate='||l_callback_date);
4117:
4118: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4119: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Not Get CallbackDate');
4120: GOTO end_loop;
4121: END IF;
4122:

Line 4184: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

4180: , x_msg_data => x_msg_data);
4181:
4182: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - CreateDunning status='|| x_return_status);
4183:
4184: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4185: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot Create Dunning');
4186: GOTO end_loop;
4187: END IF;
4188:

Line 4229: ,p_init_msg_list => FND_API.G_TRUE

4225: l_bind_tbl(7).key_value := l_dunning_id;
4226:
4227: if (l_curr_dmethod = 'FFM') then
4228: Send_Fulfillment(p_api_version => p_api_version
4229: ,p_init_msg_list => FND_API.G_TRUE
4230: ,p_commit => FND_API.G_TRUE
4231: ,p_fulfillment_bind_tbl => l_bind_tbl
4232: ,p_template_id => l_template_id
4233: ,p_method => l_method

Line 4230: ,p_commit => FND_API.G_TRUE

4226:
4227: if (l_curr_dmethod = 'FFM') then
4228: Send_Fulfillment(p_api_version => p_api_version
4229: ,p_init_msg_list => FND_API.G_TRUE
4230: ,p_commit => FND_API.G_TRUE
4231: ,p_fulfillment_bind_tbl => l_bind_tbl
4232: ,p_template_id => l_template_id
4233: ,p_method => l_method
4234: ,p_party_id => l_party_cust_id

Line 4247: ,p_init_msg_list => FND_API.G_TRUE

4243: l_object_code := 'IEX_DELINQUENCY';
4244: l_object_id := l_delinquency_id;
4245:
4246: Send_XML(p_api_version => p_api_version
4247: ,p_init_msg_list => FND_API.G_TRUE
4248: ,p_commit => FND_API.G_TRUE
4249: ,p_resend => 'N'
4250: ,p_request_id => null
4251: ,p_fulfillment_bind_tbl => l_bind_tbl

Line 4248: ,p_commit => FND_API.G_TRUE

4244: l_object_id := l_delinquency_id;
4245:
4246: Send_XML(p_api_version => p_api_version
4247: ,p_init_msg_list => FND_API.G_TRUE
4248: ,p_commit => FND_API.G_TRUE
4249: ,p_resend => 'N'
4250: ,p_request_id => null
4251: ,p_fulfillment_bind_tbl => l_bind_tbl
4252: ,p_template_id => l_xdo_template_id

Line 4270: IF x_return_status <> FND_API.G_RET_STS_SUCCESS and x_return_status <> 'W' THEN

4266: end if;
4267:
4268: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Send status = ' || x_return_status);
4269:
4270: IF x_return_status <> FND_API.G_RET_STS_SUCCESS and x_return_status <> 'W' THEN
4271: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Not Sending Letters');
4272: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
4273: p_data => x_msg_data );
4274: for i in 1..x_msg_count loop

Line 4296: , p_init_msg_list => FND_API.G_TRUE

4292: l_dunning_rec_upd.xml_request_id := l_request_id;
4293: end if;
4294:
4295: IEX_DUNNING_PVT.Update_DUNNING(p_api_version => 1.0
4296: , p_init_msg_list => FND_API.G_TRUE
4297: , p_commit => FND_API.G_TRUE
4298: , p_dunning_rec => l_dunning_rec_upd
4299: , x_return_status => l_return_status
4300: , x_msg_count => l_msg_count

Line 4297: , p_commit => FND_API.G_TRUE

4293: end if;
4294:
4295: IEX_DUNNING_PVT.Update_DUNNING(p_api_version => 1.0
4296: , p_init_msg_list => FND_API.G_TRUE
4297: , p_commit => FND_API.G_TRUE
4298: , p_dunning_rec => l_dunning_rec_upd
4299: , x_return_status => l_return_status
4300: , x_msg_count => l_msg_count
4301: , x_msg_data => l_msg_data);

Line 4342: WHEN FND_API.G_EXC_ERROR THEN

4338: ( p_count => x_msg_count,
4339: p_data => x_msg_data );
4340:
4341: EXCEPTION
4342: WHEN FND_API.G_EXC_ERROR THEN
4343: COMMIT WORK;
4344: x_return_status := FND_API.G_RET_STS_ERROR;
4345: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - error='||SQLERRM);
4346: FND_MSG_PUB.Count_And_Get

Line 4344: x_return_status := FND_API.G_RET_STS_ERROR;

4340:
4341: EXCEPTION
4342: WHEN FND_API.G_EXC_ERROR THEN
4343: COMMIT WORK;
4344: x_return_status := FND_API.G_RET_STS_ERROR;
4345: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - error='||SQLERRM);
4346: FND_MSG_PUB.Count_And_Get
4347: ( p_count => x_msg_count,
4348: p_data => x_msg_data );

Line 4350: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

4346: FND_MSG_PUB.Count_And_Get
4347: ( p_count => x_msg_count,
4348: p_data => x_msg_data );
4349:
4350: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4351: COMMIT WORK;
4352: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4353: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - error='||SQLERRM);
4354: FND_MSG_PUB.Count_And_Get

Line 4352: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4348: p_data => x_msg_data );
4349:
4350: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4351: COMMIT WORK;
4352: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4353: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - error='||SQLERRM);
4354: FND_MSG_PUB.Count_And_Get
4355: ( p_count => x_msg_count,
4356: p_data => x_msg_data );

Line 4360: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4356: p_data => x_msg_data );
4357:
4358: WHEN OTHERS THEN
4359: COMMIT WORK;
4360: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4361: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - error='||SQLERRM);
4362: FND_MSG_PUB.Count_And_Get
4363: ( p_count => x_msg_count,
4364: p_data => x_msg_data );

Line 4490: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

4486: --Value of profile ORG_ID shouldn't be used for getting ORG_ID after MOAC implementation
4487: l_org_id:= mo_global.get_current_org_id;
4488:
4489: -- Standard call to check for call compatibility.
4490: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
4491: p_api_version,
4492: l_api_name,
4493: G_PKG_NAME)
4494: THEN

Line 4495: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4491: p_api_version,
4492: l_api_name,
4493: G_PKG_NAME)
4494: THEN
4495: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4496: END IF;
4497:
4498: -- Initialize message list if p_init_msg_list is set to TRUE.
4499: IF FND_API.to_Boolean( p_init_msg_list )

Line 4499: IF FND_API.to_Boolean( p_init_msg_list )

4495: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4496: END IF;
4497:
4498: -- Initialize message list if p_init_msg_list is set to TRUE.
4499: IF FND_API.to_Boolean( p_init_msg_list )
4500: THEN
4501: FND_MSG_PUB.initialize;
4502: END IF;
4503:

Line 4511: x_return_status := FND_API.G_RET_STS_SUCCESS;

4507: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Start');
4508: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - running_level='||p_running_level);
4509:
4510: -- Initialize API return status to SUCCESS
4511: x_return_status := FND_API.G_RET_STS_SUCCESS;
4512:
4513: --
4514: -- Api body
4515: --

Line 4630: x_return_status := FND_API.G_RET_STS_ERROR;

4626: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_SCORE');
4627: FND_MSG_PUB.Add;
4628: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Score NotFound');
4629: Close C_Get_SCORE;
4630: x_return_status := FND_API.G_RET_STS_ERROR;
4631: GOTO end_api;
4632: END IF;
4633:
4634: --WriteLog('iexvdunb:ResendLevelDunn:CLOSE C_GET_SCORE', l_write);

Line 4663: If ( x_return_status <> FND_API.G_RET_STS_SUCCESS) Then

4659: , x_aging_bucket_line_id => l_bucket_line_id);
4660:
4661: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - AgingDel status='||x_return_status);
4662:
4663: If ( x_return_status <> FND_API.G_RET_STS_SUCCESS) Then
4664: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
4665: --FND_MESSAGE.Set_Token ('INFO', 'AgingBucketLineId', FALSE);
4666: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_AGINGBUCKETLINE');
4667: FND_MSG_PUB.Add;

Line 4669: x_return_status := FND_API.G_RET_STS_ERROR;

4665: --FND_MESSAGE.Set_Token ('INFO', 'AgingBucketLineId', FALSE);
4666: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_AGINGBUCKETLINE');
4667: FND_MSG_PUB.Add;
4668: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - AgingBucketLineId notfound');
4669: x_return_status := FND_API.G_RET_STS_ERROR;
4670: GOTO end_api;
4671: END IF;
4672:
4673: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - lineid='||l_bucket_line_id);

Line 4693: x_return_status := FND_API.G_RET_STS_ERROR;

4689: If ( C_GET_TEMPLATE%NOTFOUND) Then
4690: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_TEMPLATE');
4691: FND_MSG_PUB.Add;
4692: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - template notfound');
4693: x_return_status := FND_API.G_RET_STS_ERROR;
4694: GOTO end_api;
4695: END IF;
4696:
4697: Close C_Get_TEMPLATE;

Line 4720: x_return_status := FND_API.G_RET_STS_ERROR;

4716: --FND_MESSAGE.Set_Token ('INFO', 'Template_ID', FALSE);
4717: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_TEMPLATE');
4718: FND_MSG_PUB.Add;
4719: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Template notfound');
4720: x_return_status := FND_API.G_RET_STS_ERROR;
4721: GOTO end_api;
4722: end if;
4723:
4724: /*===========================================

Line 4759: x_return_status := FND_API.G_RET_STS_ERROR;

4755: ) then
4756: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_DUNNING_PROFILE_NO');
4757: FND_MSG_PUB.Add;
4758: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Send dunning in customer profile set to no ');
4759: x_return_status := FND_API.G_RET_STS_ERROR;
4760: GOTO end_api;
4761: end if;
4762:
4763:

Line 4772: x_return_status := FND_API.G_RET_STS_ERROR;

4768: ) then
4769: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_DUNNING_AMOUNT_MIN');
4770: FND_MSG_PUB.Add;
4771: WriteLog('iexvdunb:ResendLevelDunn: Required min Dunning amount in customer profile ');
4772: x_return_status := FND_API.G_RET_STS_ERROR;
4773: GOTO end_api;
4774: end if;
4775:
4776: WriteLog('iexvdunb:ResendLevelDunn: end check customer profile');

Line 4855: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

4851: end if;
4852:
4853: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - SEND status='|| x_return_status);
4854:
4855: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4856: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Not Sending Letters', l_write);
4857: x_return_status := FND_API.G_RET_STS_ERROR;
4858: GOTO end_api;
4859: END IF;

Line 4857: x_return_status := FND_API.G_RET_STS_ERROR;

4853: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - SEND status='|| x_return_status);
4854:
4855: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4856: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Not Sending Letters', l_write);
4857: x_return_status := FND_API.G_RET_STS_ERROR;
4858: GOTO end_api;
4859: END IF;
4860:
4861:

Line 4889: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

4885: , x_msg_data => x_msg_data);
4886:
4887: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - CloseDunning status='|| x_return_status, l_write);
4888:
4889: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4890: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot Close Dunning', l_write);
4891: x_return_status := FND_API.G_RET_STS_ERROR;
4892: GOTO end_api;
4893: END IF;

Line 4891: x_return_status := FND_API.G_RET_STS_ERROR;

4887: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - CloseDunning status='|| x_return_status, l_write);
4888:
4889: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4890: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot Close Dunning', l_write);
4891: x_return_status := FND_API.G_RET_STS_ERROR;
4892: GOTO end_api;
4893: END IF;
4894: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - EndCloseDunn', l_write);
4895:

Line 4921: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

4917: , x_msg_data => x_msg_data);
4918:
4919: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - GetCallbackDate status='|| x_return_status, l_write);
4920:
4921: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4922: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_CALLBACKDATE');
4923: FND_MSG_PUB.Add;
4924: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Not Get CallbackDate', l_write);
4925: x_return_status := FND_API.G_RET_STS_ERROR;

Line 4925: x_return_status := FND_API.G_RET_STS_ERROR;

4921: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4922: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_CALLBACKDATE');
4923: FND_MSG_PUB.Add;
4924: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Not Get CallbackDate', l_write);
4925: x_return_status := FND_API.G_RET_STS_ERROR;
4926: GOTO end_api;
4927: END IF;
4928:
4929: ELSE

Line 4974: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

4970: , x_msg_data => x_msg_data);
4971:
4972: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - CreateDunning status='|| x_return_status, l_write);
4973:
4974: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4975: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot Create Dunning', l_write);
4976: x_return_status := FND_API.G_RET_STS_ERROR;
4977: GOTO end_api;
4978: END IF;

Line 4976: x_return_status := FND_API.G_RET_STS_ERROR;

4972: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - CreateDunning status='|| x_return_status, l_write);
4973:
4974: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4975: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot Create Dunning', l_write);
4976: x_return_status := FND_API.G_RET_STS_ERROR;
4977: GOTO end_api;
4978: END IF;
4979:
4980: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - DunningId='||l_dunning_id, l_write);

Line 5001: if (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN

4997: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - ==========End Summary===========');
4998:
4999:
5000: <>
5001: if (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
5002: ROLLBACK TO Resend_Level_DUNNING_PVT;
5003: FND_MSG_PUB.Count_And_Get
5004: ( p_count => x_msg_count,
5005: p_data => x_msg_data );

Line 5009: --x_return_status := 'SKIP'; --FND_API.G_EXC_ERROR;

5005: p_data => x_msg_data );
5006: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - end_api:error on this party/accnt/site', l_write);
5007: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - end_api:status='||x_return_status, l_write);
5008: --Resend need return the exact status
5009: --x_return_status := 'SKIP'; --FND_API.G_EXC_ERROR;
5010: end if;
5011: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - end_api', l_write);
5012:
5013: ELSE -- l_noskip = 0

Line 5021: --x_return_status := 'SKIP'; --FND_API.G_EXC_ERROR;

5017: FND_MSG_PUB.Count_And_Get
5018: ( p_count => x_msg_count,
5019: p_data => x_msg_data );
5020: --Resend need return the exact status
5021: --x_return_status := 'SKIP'; --FND_API.G_EXC_ERROR;
5022:
5023: end if; -- end of if (l_noskip>0)
5024: --
5025: -- End of API body

Line 5033: IF FND_API.to_Boolean( p_commit )

5029: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - request_id='||x_request_id, l_write);
5030: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - status='||x_return_status, l_write);
5031:
5032: -- Standard check for p_commit
5033: IF FND_API.to_Boolean( p_commit )
5034: THEN
5035: COMMIT WORK;
5036: END IF;
5037:

Line 5045: WHEN FND_API.G_EXC_ERROR THEN

5041: ( p_count => x_msg_count,
5042: p_data => x_msg_data );
5043:
5044: EXCEPTION
5045: WHEN FND_API.G_EXC_ERROR THEN
5046: x_return_status := FND_API.G_RET_STS_ERROR;
5047: FND_MSG_PUB.Count_And_Get
5048: ( p_count => x_msg_count,
5049: p_data => x_msg_data );

Line 5046: x_return_status := FND_API.G_RET_STS_ERROR;

5042: p_data => x_msg_data );
5043:
5044: EXCEPTION
5045: WHEN FND_API.G_EXC_ERROR THEN
5046: x_return_status := FND_API.G_RET_STS_ERROR;
5047: FND_MSG_PUB.Count_And_Get
5048: ( p_count => x_msg_count,
5049: p_data => x_msg_data );
5050: ROLLBACK TO Resend_Level_DUNNING_PVT;

Line 5053: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

5049: p_data => x_msg_data );
5050: ROLLBACK TO Resend_Level_DUNNING_PVT;
5051: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - error='||SQLERRM, l_write);
5052:
5053: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5054: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5055: FND_MSG_PUB.Count_And_Get
5056: ( p_count => x_msg_count,
5057: p_data => x_msg_data );

Line 5054: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5050: ROLLBACK TO Resend_Level_DUNNING_PVT;
5051: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - error='||SQLERRM, l_write);
5052:
5053: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5054: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5055: FND_MSG_PUB.Count_And_Get
5056: ( p_count => x_msg_count,
5057: p_data => x_msg_data );
5058: ROLLBACK TO Resend_Level_DUNNING_PVT;

Line 5062: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5058: ROLLBACK TO Resend_Level_DUNNING_PVT;
5059: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - error='||SQLERRM, l_write);
5060:
5061: WHEN OTHERS THEN
5062: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5063: FND_MSG_PUB.Count_And_Get
5064: ( p_count => x_msg_count,
5065: p_data => x_msg_data );
5066: ROLLBACK TO Resend_Level_DUNNING_PVT;

Line 5189: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

5185: --l_org_id := fnd_profile.value('ORG_ID');
5186: l_org_id:= mo_global.get_current_org_id;
5187:
5188: -- Standard call to check for call compatibility.
5189: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
5190: p_api_version,
5191: l_api_name,
5192: G_PKG_NAME)
5193: THEN

Line 5194: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

5190: p_api_version,
5191: l_api_name,
5192: G_PKG_NAME)
5193: THEN
5194: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5195: END IF;
5196:
5197: -- Initialize message list if p_init_msg_list is set to TRUE.
5198: IF FND_API.to_Boolean( p_init_msg_list )

Line 5198: IF FND_API.to_Boolean( p_init_msg_list )

5194: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5195: END IF;
5196:
5197: -- Initialize message list if p_init_msg_list is set to TRUE.
5198: IF FND_API.to_Boolean( p_init_msg_list )
5199: THEN
5200: FND_MSG_PUB.initialize;
5201: END IF;
5202:

Line 5206: x_return_status := FND_API.G_RET_STS_SUCCESS;

5202:
5203: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Start');
5204:
5205: -- Initialize API return status to SUCCESS
5206: x_return_status := FND_API.G_RET_STS_SUCCESS;
5207:
5208: --dont write into FND_FILE
5209: --l_write := 0;
5210:

Line 5298: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

5294: , x_aging_bucket_line_id => l_bucket_line_id);
5295:
5296: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - AgingDel status='||x_return_status);
5297:
5298: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5299: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_AGINGBUCKETLINE');
5300: FND_MSG_PUB.Add;
5301: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot Get AgingBucketLineId');
5302: GOTO end_loop;

Line 5355: x_return_status := FND_API.G_RET_STS_ERROR;

5351: (l_curr_dmethod = 'XML' and l_xdo_template_id is null ) ) then
5352: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_TEMPLATE');
5353: FND_MSG_PUB.Add;
5354: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Template notfound');
5355: x_return_status := FND_API.G_RET_STS_ERROR;
5356: GOTO end_loop;
5357: end if;
5358:
5359: /*===========================================

Line 5482: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

5478: end if;
5479:
5480: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - send status='|| x_return_status);
5481:
5482: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5483: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Sending process failed');
5484: GOTO end_loop;
5485: END IF;
5486:

Line 5511: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

5507: , x_msg_data => x_msg_data);
5508:
5509: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - CloseDunning status='|| x_return_status);
5510:
5511: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5512: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot Close Dunning');
5513: GOTO end_loop;
5514: END IF;
5515: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - EndCloseDunn');

Line 5542: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

5538:
5539: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - GetCallbackDate status='|| x_return_status);
5540: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - CallbackDate='||l_callback_date);
5541:
5542: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5543: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Not Get CallbackDate');
5544: GOTO end_loop;
5545: END IF;
5546:

Line 5613: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

5609: , x_msg_data => x_msg_data);
5610:
5611: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - CreateDunning status='|| x_return_status);
5612:
5613: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5614: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot Create Dunning');
5615: GOTO end_loop;
5616: END IF;
5617:

Line 5656: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

5652: -- End of API body
5653: --
5654:
5655: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - return status='||x_return_status);
5656: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5657: RAISE FND_API.G_EXC_ERROR;
5658: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
5659: raise FND_API.G_EXC_UNEXPECTED_ERROR;
5660: END IF;

Line 5657: RAISE FND_API.G_EXC_ERROR;

5653: --
5654:
5655: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - return status='||x_return_status);
5656: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5657: RAISE FND_API.G_EXC_ERROR;
5658: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
5659: raise FND_API.G_EXC_UNEXPECTED_ERROR;
5660: END IF;
5661:

Line 5658: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then

5654:
5655: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - return status='||x_return_status);
5656: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5657: RAISE FND_API.G_EXC_ERROR;
5658: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
5659: raise FND_API.G_EXC_UNEXPECTED_ERROR;
5660: END IF;
5661:
5662: -- Standard check for p_commit

Line 5659: raise FND_API.G_EXC_UNEXPECTED_ERROR;

5655: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - return status='||x_return_status);
5656: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5657: RAISE FND_API.G_EXC_ERROR;
5658: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
5659: raise FND_API.G_EXC_UNEXPECTED_ERROR;
5660: END IF;
5661:
5662: -- Standard check for p_commit
5663: IF FND_API.to_Boolean( p_commit )

Line 5663: IF FND_API.to_Boolean( p_commit )

5659: raise FND_API.G_EXC_UNEXPECTED_ERROR;
5660: END IF;
5661:
5662: -- Standard check for p_commit
5663: IF FND_API.to_Boolean( p_commit )
5664: THEN
5665: COMMIT WORK;
5666: END IF;
5667:

Line 5677: WHEN FND_API.G_EXC_ERROR THEN

5673: p_data => x_msg_data );
5674:
5675:
5676: EXCEPTION
5677: WHEN FND_API.G_EXC_ERROR THEN
5678: x_return_status := FND_API.G_RET_STS_ERROR;
5679: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception');
5680: FND_MSG_PUB.Count_And_Get
5681: ( p_count => x_msg_count,

Line 5678: x_return_status := FND_API.G_RET_STS_ERROR;

5674:
5675:
5676: EXCEPTION
5677: WHEN FND_API.G_EXC_ERROR THEN
5678: x_return_status := FND_API.G_RET_STS_ERROR;
5679: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception');
5680: FND_MSG_PUB.Count_And_Get
5681: ( p_count => x_msg_count,
5682: p_data => x_msg_data );

Line 5687: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

5683: errmsg := SQLERRM;
5684: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - error='||errmsg);
5685: ROLLBACK TO Resend_DUNNING_PVT;
5686:
5687: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5688: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5689: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UnExc Exception');
5690: FND_MSG_PUB.Count_And_Get
5691: ( p_count => x_msg_count,

Line 5688: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5684: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - error='||errmsg);
5685: ROLLBACK TO Resend_DUNNING_PVT;
5686:
5687: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5688: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5689: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UnExc Exception');
5690: FND_MSG_PUB.Count_And_Get
5691: ( p_count => x_msg_count,
5692: p_data => x_msg_data );

Line 5698: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5694: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - error='||errmsg);
5695: ROLLBACK TO Resend_DUNNING_PVT;
5696:
5697: WHEN OTHERS THEN
5698: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5699: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Other Exception');
5700: FND_MSG_PUB.Count_And_Get
5701: ( p_count => x_msg_count,
5702: p_data => x_msg_data );

Line 5802: l_commit := FND_API.G_TRUE;

5798: BEGIN
5799: -- Standard Start of API savepoint
5800: SAVEPOINT AGING_DEL_PVT;
5801:
5802: l_commit := FND_API.G_TRUE;
5803:
5804: -- Initialize message list IF p_init_msg_list is set to TRUE.
5805: IF FND_API.to_Boolean( p_init_msg_list )
5806: THEN

Line 5805: IF FND_API.to_Boolean( p_init_msg_list )

5801:
5802: l_commit := FND_API.G_TRUE;
5803:
5804: -- Initialize message list IF p_init_msg_list is set to TRUE.
5805: IF FND_API.to_Boolean( p_init_msg_list )
5806: THEN
5807: FND_MSG_PUB.initialize;
5808: END IF;
5809:

Line 5811: l_return_status := FND_API.G_RET_STS_SUCCESS;

5807: FND_MSG_PUB.initialize;
5808: END IF;
5809:
5810: -- Initialize API return status to SUCCESS
5811: l_return_status := FND_API.G_RET_STS_SUCCESS;
5812:
5813: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - p_object_code='||p_object_code);
5814: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - p_object_id='||p_object_id);
5815:

Line 5824: l_return_status := FND_API.G_RET_STS_ERROR;

5820: If ( C_GET_PARTY_DAYS%NOTFOUND) Then
5821: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - PaymentSchedId NotFound');
5822: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_PAYMENTSCHEDULE');
5823: FND_MSG_PUB.Add;
5824: l_return_status := FND_API.G_RET_STS_ERROR;
5825: Close C_Get_PARTY_DAYS;
5826: GOTO end_get_line;
5827: end if;
5828: --

Line 5837: l_return_status := FND_API.G_RET_STS_ERROR;

5833: If ( C_GET_ACCT_DAYS%NOTFOUND) Then
5834: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - PaymentSchedId NotFound');
5835: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_PAYMENTSCHEDULE');
5836: FND_MSG_PUB.Add;
5837: l_return_status := FND_API.G_RET_STS_ERROR;
5838: Close C_Get_ACCT_DAYS;
5839: GOTO end_get_line;
5840: end if;
5841: --

Line 5850: l_return_status := FND_API.G_RET_STS_ERROR;

5846: If ( C_GET_SITE_DAYS%NOTFOUND) Then
5847: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - PaymentSchedId NotFound');
5848: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_PAYMENTSCHEDULE');
5849: FND_MSG_PUB.Add;
5850: l_return_status := FND_API.G_RET_STS_ERROR;
5851: Close C_Get_SITE_DAYS;
5852: GOTO end_get_line;
5853: end if;
5854: --

Line 5867: l_return_status := FND_API.G_RET_STS_ERROR;

5863: If ( C_GET_DAYS%NOTFOUND) Then
5864: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - PaymentSchedId NotFound');
5865: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_PAYMENTSCHEDULE');
5866: FND_MSG_PUB.Add;
5867: l_return_status := FND_API.G_RET_STS_ERROR;
5868: Close C_Get_DAYS;
5869: GOTO end_get_line;
5870: end if;
5871: --

Line 5883: l_return_status := FND_API.G_RET_STS_ERROR;

5879: If ( C_GET_BUCKET_LINE%NOTFOUND) Then
5880: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - BucketLine NotFound');
5881: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_BUCKET_LINE');
5882: FND_MSG_PUB.Add;
5883: l_return_status := FND_API.G_RET_STS_ERROR;
5884: Close C_Get_BUCKET_LINE;
5885: GOTO end_get_line;
5886: else
5887: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - bucketlineid='||l_bucket_line_id);

Line 5896: if (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

5892: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - end_get_line');
5893: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - status=' || l_return_status);
5894:
5895: x_return_status := l_return_status;
5896: if (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
5897: l_bucket_line_id := 0;
5898: END IF;
5899: x_aging_bucket_line_id := l_bucket_line_id;
5900:

Line 5909: WHEN FND_API.G_EXC_ERROR THEN

5905: ( p_count => x_msg_count,
5906: p_data => x_msg_data );
5907:
5908: EXCEPTION
5909: WHEN FND_API.G_EXC_ERROR THEN
5910: x_return_status := FND_API.G_RET_STS_ERROR;
5911: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception');
5912: errmsg := SQLERRM;
5913: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - error='||errmsg);

Line 5910: x_return_status := FND_API.G_RET_STS_ERROR;

5906: p_data => x_msg_data );
5907:
5908: EXCEPTION
5909: WHEN FND_API.G_EXC_ERROR THEN
5910: x_return_status := FND_API.G_RET_STS_ERROR;
5911: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception');
5912: errmsg := SQLERRM;
5913: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - error='||errmsg);
5914: ROLLBACK TO AGING_DEL_PVT;

Line 5919: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

5915: FND_MSG_PUB.Count_And_Get
5916: ( p_count => x_msg_count,
5917: p_data => x_msg_data);
5918:
5919: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5920: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5921: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UnExc Exception');
5922: errmsg := SQLERRM;
5923: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - error='||errmsg);

Line 5920: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5916: ( p_count => x_msg_count,
5917: p_data => x_msg_data);
5918:
5919: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5920: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5921: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UnExc Exception');
5922: errmsg := SQLERRM;
5923: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - error='||errmsg);
5924: ROLLBACK TO AGING_DEL_PVT;

Line 5930: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5926: ( p_count => x_msg_count,
5927: p_data => x_msg_data);
5928:
5929: WHEN OTHERS THEN
5930: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5931: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Other Exception');
5932: errmsg := SQLERRM;
5933: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - error='||errmsg);
5934: ROLLBACK TO AGING_DEL_PVT;

Line 6031: IF FND_API.to_Boolean( p_init_msg_list )

6027: BEGIN
6028:
6029: SAVEPOINT CALL_FFM_PVT;
6030:
6031: IF FND_API.to_Boolean( p_init_msg_list )
6032: THEN
6033: FND_MSG_PUB.initialize;
6034: END IF;
6035:

Line 6036: l_return_status := FND_API.G_RET_STS_SUCCESS;

6032: THEN
6033: FND_MSG_PUB.initialize;
6034: END IF;
6035:
6036: l_return_status := FND_API.G_RET_STS_SUCCESS;
6037:
6038: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - start');
6039: if (p_template_id is null) then
6040: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No TEMPLATE_ID');

Line 6044: l_return_status := FND_API.G_RET_STS_ERROR;

6040: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No TEMPLATE_ID');
6041: FND_MESSAGE.Set_Name('IEX', 'API_FAIL_SEND_FFM');
6042: FND_MESSAGE.Set_Token ('INFO', 'No Template_ID');
6043: FND_MSG_PUB.Add;
6044: l_return_status := FND_API.G_RET_STS_ERROR;
6045: GOTO end_call_ffm;
6046: end if;
6047: if (p_party_id is null) then
6048: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No PARTY_ID');

Line 6052: l_return_status := FND_API.G_RET_STS_ERROR;

6048: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No PARTY_ID');
6049: FND_MESSAGE.Set_Name('IEX', 'API_FAIL_SEND_FFM');
6050: FND_MESSAGE.Set_Token ('INFO', 'No Party_Id');
6051: FND_MSG_PUB.Add;
6052: l_return_status := FND_API.G_RET_STS_ERROR;
6053: GOTO end_call_ffm;
6054: end if;
6055: if (p_method is null) then
6056: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No METHOD');

Line 6060: l_return_status := FND_API.G_RET_STS_ERROR;

6056: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No METHOD');
6057: FND_MESSAGE.Set_Name('IEX', 'API_FAIL_SEND_FFM');
6058: FND_MESSAGE.Set_Token ('INFO', 'No Method');
6059: FND_MSG_PUB.Add;
6060: l_return_status := FND_API.G_RET_STS_ERROR;
6061: GOTO end_call_ffm;
6062: end if;
6063:
6064: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - TEMPLATE_ID='||p_template_id);

Line 6088: l_return_status := FND_API.G_RET_STS_ERROR;

6084: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Customer NotFound');
6085: FND_MESSAGE.Set_Name('IEX', 'API_FAIL_SEND_FFM');
6086: FND_MESSAGE.Set_Token ('INFO', 'Customer NotFound');
6087: FND_MSG_PUB.Add;
6088: l_return_status := FND_API.G_RET_STS_ERROR;
6089: Close C_Get_ORG_EMAIL;
6090: Close C_Get_CONTACT_EMAIL;
6091: GOTO end_call_ffm;
6092: end if;

Line 6099: l_return_status := FND_API.G_RET_STS_ERROR;

6095: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No Email');
6096: FND_MESSAGE.Set_Name('IEX', 'API_FAIL_SEND_FFM');
6097: FND_MESSAGE.Set_Token ('INFO', 'No Email_Address');
6098: FND_MSG_PUB.Add;
6099: l_return_status := FND_API.G_RET_STS_ERROR;
6100: Close C_Get_ORG_EMAIL;
6101: Close C_Get_CONTACT_EMAIL;
6102: GOTO end_call_ffm;
6103: end if;

Line 6113: l_return_status := FND_API.G_RET_STS_ERROR;

6109: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No Email');
6110: FND_MESSAGE.Set_Name('IEX', 'API_FAIL_SEND_FFM');
6111: FND_MESSAGE.Set_Token ('INFO', 'No Email_Address');
6112: FND_MSG_PUB.Add;
6113: l_return_status := FND_API.G_RET_STS_ERROR;
6114: Close C_Get_CONTACT_EMAIL;
6115: GOTO end_call_ffm;
6116: END if;
6117:

Line 6131: l_return_status := FND_API.G_RET_STS_ERROR;

6127: END IF;
6128: FND_MESSAGE.Set_Name('IEX', 'API_FAIL_SEND_FFM');
6129: FND_MESSAGE.Set_Token ('INFO', 'No Printer');
6130: FND_MSG_PUB.Add;
6131: l_return_status := FND_API.G_RET_STS_ERROR;
6132: GOTO end_call_ffm;
6133: end if;
6134: END IF; -- end of p_method=EMAIL
6135:

Line 6151: l_return_status := FND_API.G_RET_STS_ERROR;

6147: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No Contents');
6148: FND_MESSAGE.Set_Name('IEX', 'API_FAIL_SEND_FFM');
6149: FND_MESSAGE.Set_Token ('INFO', 'No Contents for selected template ');
6150: FND_MSG_PUB.Add;
6151: l_return_status := FND_API.G_RET_STS_ERROR;
6152: end if;
6153: exit;
6154: else
6155: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Content_Id='||l_content_id);

Line 6228: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

6224: x_msg_data => l_msg_data);
6225:
6226: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - after send_ffm:'||l_return_status);
6227:
6228: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6229: l_return_status := FND_API.G_RET_STS_ERROR;
6230: x_msg_count := l_msg_count;
6231: x_msg_data := l_msg_data;
6232: --handle error_msg in main procedure (send_dunning)

Line 6229: l_return_status := FND_API.G_RET_STS_ERROR;

6225:
6226: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - after send_ffm:'||l_return_status);
6227:
6228: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6229: l_return_status := FND_API.G_RET_STS_ERROR;
6230: x_msg_count := l_msg_count;
6231: x_msg_data := l_msg_data;
6232: --handle error_msg in main procedure (send_dunning)
6233: END IF;

Line 6246: WHEN FND_API.G_EXC_ERROR THEN

6242: ( p_count => x_msg_count,
6243: p_data => x_msg_data );
6244:
6245: EXCEPTION
6246: WHEN FND_API.G_EXC_ERROR THEN
6247: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - error='||SQLERRM);
6248: ROLLBACK TO CALL_FFM_PVT;
6249: x_return_status := FND_API.G_RET_STS_ERROR;
6250: FND_MSG_PUB.Count_And_Get

Line 6249: x_return_status := FND_API.G_RET_STS_ERROR;

6245: EXCEPTION
6246: WHEN FND_API.G_EXC_ERROR THEN
6247: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - error='||SQLERRM);
6248: ROLLBACK TO CALL_FFM_PVT;
6249: x_return_status := FND_API.G_RET_STS_ERROR;
6250: FND_MSG_PUB.Count_And_Get
6251: ( p_count => x_msg_count,
6252: p_data => x_msg_data
6253: );

Line 6255: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

6251: ( p_count => x_msg_count,
6252: p_data => x_msg_data
6253: );
6254:
6255: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6256: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UnExc Exception');
6257: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - error='||SQLERRM);
6258: ROLLBACK TO CALL_FFM_PVT;
6259: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 6259: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6255: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6256: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UnExc Exception');
6257: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - error='||SQLERRM);
6258: ROLLBACK TO CALL_FFM_PVT;
6259: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6260: FND_MSG_PUB.Count_And_Get
6261: ( p_count => x_msg_count,
6262: p_data => x_msg_data
6263: );

Line 6269: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6265: WHEN OTHERS THEN
6266: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Other Exception');
6267: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - error='||SQLERRM);
6268: ROLLBACK TO CALL_FFM_PVT;
6269: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6270: FND_MSG_PUB.Count_And_Get
6271: ( p_count => x_msg_count,
6272: p_data => x_msg_data
6273: );

Line 6316: IF FND_API.to_Boolean( p_init_msg_list )

6312: vstr4 := 'SELECT SYSDATE + ' ;
6313: vstr5 := ' FROM DUAL ';
6314:
6315: -- Initialize message list IF p_init_msg_list is set to TRUE.
6316: IF FND_API.to_Boolean( p_init_msg_list )
6317: THEN
6318: FND_MSG_PUB.initialize;
6319: END IF;
6320:

Line 6322: x_return_status := FND_API.G_RET_STS_SUCCESS;

6318: FND_MSG_PUB.initialize;
6319: END IF;
6320:
6321: -- Initialize API return status to SUCCESS
6322: x_return_status := FND_API.G_RET_STS_SUCCESS;
6323:
6324: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Start');
6325:
6326:

Line 6394: x_return_status := FND_API.G_RET_STS_ERROR;

6390: p_data => x_msg_data );
6391:
6392: EXCEPTION
6393: WHEN OTHERS THEN
6394: x_return_status := FND_API.G_RET_STS_ERROR;
6395: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - exception');
6396: errmsg := SQLERRM;
6397: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - errmsg='||errmsg);
6398:

Line 6540: IF FND_API.to_Boolean( p_init_msg_list )

6536: --Bug#4679639 schekuri 20-OCT-2005
6537: --Value of profile ORG_ID shouldn't be used for getting ORG_ID after MOAC implementation
6538: l_org_id:= mo_global.get_current_org_id;
6539:
6540: IF FND_API.to_Boolean( p_init_msg_list )
6541: THEN
6542: FND_MSG_PUB.initialize;
6543: END IF;
6544:

Line 6545: l_return_status := FND_API.G_RET_STS_SUCCESS;

6541: THEN
6542: FND_MSG_PUB.initialize;
6543: END IF;
6544:
6545: l_return_status := FND_API.G_RET_STS_SUCCESS;
6546:
6547: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - SEND_FFM:');
6548: if (p_template_id is null) then
6549: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No TEMPLATE_ID');

Line 6552: l_return_status := FND_API.G_RET_STS_ERROR;

6548: if (p_template_id is null) then
6549: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No TEMPLATE_ID');
6550: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_TEMPLATE');
6551: FND_MSG_PUB.Add;
6552: l_return_status := FND_API.G_RET_STS_ERROR;
6553: GOTO end_call_ffm;
6554: end if;
6555: if (p_party_id is null AND (p_email IS NULL OR p_email = FND_API.G_MISS_CHAR)) then
6556: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No PARTY_ID or EMAIL');

Line 6555: if (p_party_id is null AND (p_email IS NULL OR p_email = FND_API.G_MISS_CHAR)) then

6551: FND_MSG_PUB.Add;
6552: l_return_status := FND_API.G_RET_STS_ERROR;
6553: GOTO end_call_ffm;
6554: end if;
6555: if (p_party_id is null AND (p_email IS NULL OR p_email = FND_API.G_MISS_CHAR)) then
6556: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No PARTY_ID or EMAIL');
6557: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_PARTY');
6558: FND_MSG_PUB.Add;
6559: l_return_status := FND_API.G_RET_STS_ERROR;

Line 6559: l_return_status := FND_API.G_RET_STS_ERROR;

6555: if (p_party_id is null AND (p_email IS NULL OR p_email = FND_API.G_MISS_CHAR)) then
6556: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No PARTY_ID or EMAIL');
6557: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_PARTY');
6558: FND_MSG_PUB.Add;
6559: l_return_status := FND_API.G_RET_STS_ERROR;
6560: GOTO end_call_ffm;
6561: end if;
6562: if (p_method is null) then
6563: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No METHOD');

Line 6566: l_return_status := FND_API.G_RET_STS_ERROR;

6562: if (p_method is null) then
6563: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No METHOD');
6564: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_METHOD');
6565: FND_MSG_PUB.Add;
6566: l_return_status := FND_API.G_RET_STS_ERROR;
6567: GOTO end_call_ffm;
6568: end if;
6569:
6570: --clchang updated 07/18/2003 subject cannot be hardcoded

Line 6577: l_return_status := FND_API.G_RET_STS_ERROR;

6573: if (l_subject is null or l_subject = '') then
6574: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No FFM Subject',0);
6575: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_SUBJECT');
6576: FND_MSG_PUB.Add;
6577: l_return_status := FND_API.G_RET_STS_ERROR;
6578: GOTO end_call_ffm;
6579: end if;
6580:
6581: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - TEMPLATE_ID='||p_template_id);

Line 6592: if(p_email IS NULL OR p_email = FND_API.G_MISS_CHAR) THEN

6588: * get the primary contact email first;
6589: * if not found, get org email address;
6590: =======================================*/
6591:
6592: if(p_email IS NULL OR p_email = FND_API.G_MISS_CHAR) THEN
6593:
6594: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Call GetContactInfo');
6595:
6596: GetContactInfo(

Line 6613: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

6609: );
6610:
6611: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - status='||l_return_status);
6612:
6613: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6614: l_return_status := FND_API.G_RET_STS_ERROR;
6615: x_msg_count := l_msg_count;
6616: x_msg_data := l_msg_data;
6617: --handle error_msg in main procedure

Line 6614: l_return_status := FND_API.G_RET_STS_ERROR;

6610:
6611: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - status='||l_return_status);
6612:
6613: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6614: l_return_status := FND_API.G_RET_STS_ERROR;
6615: x_msg_count := l_msg_count;
6616: x_msg_data := l_msg_data;
6617: --handle error_msg in main procedure
6618: GOTO end_call_ffm;

Line 6629: if(p_email IS NULL OR p_email = FND_API.G_MISS_CHAR) THEN

6625: -- user could pass fax/email by p_email parameter,
6626: -- then dont call GetContactInfo
6627: --
6628: IF (p_method = 'EMAIL') THEN
6629: if(p_email IS NULL OR p_email = FND_API.G_MISS_CHAR) THEN
6630: l_email := l_contact;
6631: else
6632: l_email := p_email;
6633: end if;

Line 6640: if(p_email IS NULL OR p_email = FND_API.G_MISS_CHAR) THEN

6636: l_fax := '99999999';
6637: --
6638: ELSIF (p_method = 'PRINTER' or p_method = 'PRINT') THEN
6639: -- p_email could be fax or email
6640: if(p_email IS NULL OR p_email = FND_API.G_MISS_CHAR) THEN
6641: l_printer := l_contact;
6642: else
6643: l_printer := p_email;
6644: end if;

Line 6652: if(p_email IS NULL OR p_email = FND_API.G_MISS_CHAR) THEN

6648: --
6649: ELSIF (p_method = 'FAX') THEN
6650: -- clchang 07/09/03 updated
6651: -- p_email could be fax or email
6652: if(p_email IS NULL OR p_email = FND_API.G_MISS_CHAR) THEN
6653: l_fax := l_contact;
6654: else
6655: l_fax := p_email;
6656: end if;

Line 6676: l_return_status := FND_API.G_RET_STS_ERROR;

6672: if (nIdx = 0) then
6673: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Contents NotFound');
6674: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_FFMCONTENT');
6675: FND_MSG_PUB.Add;
6676: l_return_status := FND_API.G_RET_STS_ERROR;
6677: end if;
6678: GOTO end_call_ffm;
6679: --exit;
6680: else

Line 6804: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

6800:
6801: --
6802: -- If any errors(like template no contents), dont call send_ffm;
6803: --
6804: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
6805:
6806: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Call SEND_FFM');
6807: IEX_SEND_FFM_PVT.Send_FFM(
6808: p_api_version_number => l_api_version,

Line 6827: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

6823: x_msg_data => l_msg_data);
6824:
6825: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - After SEND_FFM:'||l_return_status);
6826:
6827: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6828: l_return_status := FND_API.G_RET_STS_ERROR;
6829: x_msg_count := l_msg_count;
6830: x_msg_data := l_msg_data;
6831: --handle error_msg in main procedure (send_dunning)

Line 6828: l_return_status := FND_API.G_RET_STS_ERROR;

6824:
6825: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - After SEND_FFM:'||l_return_status);
6826:
6827: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6828: l_return_status := FND_API.G_RET_STS_ERROR;
6829: x_msg_count := l_msg_count;
6830: x_msg_data := l_msg_data;
6831: --handle error_msg in main procedure (send_dunning)
6832: GOTO end_call_ffm;

Line 6880: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

6876:
6877: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - CreateDunning status='|| x_return_status);
6878: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - dunning_id='||l_dunning_id);
6879:
6880: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6881: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot Create Dunning');
6882: l_return_status := FND_API.G_RET_STS_ERROR;
6883: x_msg_count := l_msg_count;
6884: x_msg_data := l_msg_data;

Line 6882: l_return_status := FND_API.G_RET_STS_ERROR;

6878: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - dunning_id='||l_dunning_id);
6879:
6880: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6881: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot Create Dunning');
6882: l_return_status := FND_API.G_RET_STS_ERROR;
6883: x_msg_count := l_msg_count;
6884: x_msg_data := l_msg_data;
6885: END IF;
6886: END IF; -- end of p_object

Line 6900: WHEN FND_API.G_EXC_ERROR THEN

6896: ( p_count => x_msg_count,
6897: p_data => x_msg_data );
6898:
6899: EXCEPTION
6900: WHEN FND_API.G_EXC_ERROR THEN
6901: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception');
6902: errmsg := SQLERRM;
6903: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exception errmsg='||errmsg);
6904: ROLLBACK TO SEND_FULFILLMENT_PVT;

Line 6905: x_return_status := FND_API.G_RET_STS_ERROR;

6901: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception');
6902: errmsg := SQLERRM;
6903: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exception errmsg='||errmsg);
6904: ROLLBACK TO SEND_FULFILLMENT_PVT;
6905: x_return_status := FND_API.G_RET_STS_ERROR;
6906: FND_MSG_PUB.Count_And_Get
6907: ( p_count => x_msg_count,
6908: p_data => x_msg_data
6909: );

Line 6911: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

6907: ( p_count => x_msg_count,
6908: p_data => x_msg_data
6909: );
6910:
6911: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6912: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UnExc Exception');
6913: errmsg := SQLERRM;
6914: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exception errmsg='||errmsg);
6915: ROLLBACK TO SEND_FULFILLMENT_PVT;

Line 6916: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6912: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UnExc Exception');
6913: errmsg := SQLERRM;
6914: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exception errmsg='||errmsg);
6915: ROLLBACK TO SEND_FULFILLMENT_PVT;
6916: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6917: FND_MSG_PUB.Count_And_Get
6918: ( p_count => x_msg_count,
6919: p_data => x_msg_data
6920: );

Line 6927: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6923: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Other Exception');
6924: errmsg := SQLERRM;
6925: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exception errmsg='||errmsg);
6926: ROLLBACK TO SEND_FULFILLMENT_PVT;
6927: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6928: FND_MSG_PUB.Count_And_Get
6929: ( p_count => x_msg_count,
6930: p_data => x_msg_data
6931: );

Line 7116: l_return_status := FND_API.G_RET_STS_SUCCESS;

7112: -- end clchang added 11/08/04 for 11.5.11
7113:
7114: FND_MSG_PUB.initialize;
7115:
7116: l_return_status := FND_API.G_RET_STS_SUCCESS;
7117:
7118: if (p_object_code is null) then
7119: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No OBJECT_ID',0);
7120: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_OBJECT');

Line 7122: l_return_status := FND_API.G_RET_STS_ERROR;

7118: if (p_object_code is null) then
7119: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No OBJECT_ID',0);
7120: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_OBJECT');
7121: FND_MSG_PUB.Add;
7122: l_return_status := FND_API.G_RET_STS_ERROR;
7123: GOTO end_call_ffm;
7124: end if;
7125:
7126: if (p_template_id is null) then

Line 7130: l_return_status := FND_API.G_RET_STS_ERROR;

7126: if (p_template_id is null) then
7127: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No TEMPLATE_ID',0);
7128: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_TEMPLATE');
7129: FND_MSG_PUB.Add;
7130: l_return_status := FND_API.G_RET_STS_ERROR;
7131: GOTO end_call_ffm;
7132: end if;
7133:
7134: if (p_party_id is null AND (p_email IS NULL OR p_email = FND_API.G_MISS_CHAR)) then

Line 7134: if (p_party_id is null AND (p_email IS NULL OR p_email = FND_API.G_MISS_CHAR)) then

7130: l_return_status := FND_API.G_RET_STS_ERROR;
7131: GOTO end_call_ffm;
7132: end if;
7133:
7134: if (p_party_id is null AND (p_email IS NULL OR p_email = FND_API.G_MISS_CHAR)) then
7135: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No PARTY_ID or EMAIL',0);
7136: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_PARTY');
7137: FND_MSG_PUB.Add;
7138: l_return_status := FND_API.G_RET_STS_ERROR;

Line 7138: l_return_status := FND_API.G_RET_STS_ERROR;

7134: if (p_party_id is null AND (p_email IS NULL OR p_email = FND_API.G_MISS_CHAR)) then
7135: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No PARTY_ID or EMAIL',0);
7136: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_PARTY');
7137: FND_MSG_PUB.Add;
7138: l_return_status := FND_API.G_RET_STS_ERROR;
7139: GOTO end_call_ffm;
7140: end if;
7141:
7142: if (p_method is null) then

Line 7146: l_return_status := FND_API.G_RET_STS_ERROR;

7142: if (p_method is null) then
7143: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No METHOD',0);
7144: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_METHOD');
7145: FND_MSG_PUB.Add;
7146: l_return_status := FND_API.G_RET_STS_ERROR;
7147: GOTO end_call_ffm;
7148: end if;
7149:
7150: --clchang updated 07/18/2003 subject cannot be hardcoded

Line 7157: l_return_status := FND_API.G_RET_STS_ERROR;

7153: if (l_subject is null or l_subject = '') then
7154: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No XML Subject');
7155: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_SUBJECT');
7156: FND_MSG_PUB.Add;
7157: l_return_status := FND_API.G_RET_STS_ERROR;
7158: GOTO end_call_ffm;
7159: end if;
7160:
7161: if (p_user_id is null) then

Line 7181: l_return_status := FND_API.G_RET_STS_ERROR;

7177: if (l_resource_id is null) then
7178: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No Resource for user '||l_user_id);
7179: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_RESOURCE');
7180: FND_MSG_PUB.Add;
7181: l_return_status := FND_API.G_RET_STS_ERROR;
7182: GOTO end_call_ffm;
7183: end if;
7184: l_fulfillment_bind_tbl := p_fulfillment_bind_tbl;
7185:

Line 7210: ,p_init_msg_list => FND_API.G_FALSE

7206: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Call SEND_COPY');
7207:
7208: BEGIN
7209: IEX_SEND_XML_PVT.Send_COPY(p_api_version_number => l_api_version
7210: ,p_init_msg_list => FND_API.G_FALSE
7211: ,p_commit => FND_API.G_TRUE
7212: ,p_resend => l_resend
7213: ,p_request_id => p_request_id
7214: ,p_user_id => l_user_id

Line 7211: ,p_commit => FND_API.G_TRUE

7207:
7208: BEGIN
7209: IEX_SEND_XML_PVT.Send_COPY(p_api_version_number => l_api_version
7210: ,p_init_msg_list => FND_API.G_FALSE
7211: ,p_commit => FND_API.G_TRUE
7212: ,p_resend => l_resend
7213: ,p_request_id => p_request_id
7214: ,p_user_id => l_user_id
7215: ,p_party_id => p_party_id

Line 7234: IF l_return_status <> FND_API.G_RET_STS_SUCCESS or l_request_id is null THEN

7230: ,x_msg_data => l_msg_data);
7231:
7232: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - After SEND_COPY:'||l_return_status);
7233:
7234: IF l_return_status <> FND_API.G_RET_STS_SUCCESS or l_request_id is null THEN
7235: l_return_status := FND_API.G_RET_STS_ERROR;
7236: x_msg_count := l_msg_count;
7237: x_msg_data := l_msg_data;
7238: END IF;

Line 7235: l_return_status := FND_API.G_RET_STS_ERROR;

7231:
7232: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - After SEND_COPY:'||l_return_status);
7233:
7234: IF l_return_status <> FND_API.G_RET_STS_SUCCESS or l_request_id is null THEN
7235: l_return_status := FND_API.G_RET_STS_ERROR;
7236: x_msg_count := l_msg_count;
7237: x_msg_data := l_msg_data;
7238: END IF;
7239:

Line 7243: l_return_status := FND_API.G_RET_STS_ERROR;

7239:
7240: EXCEPTION
7241: WHEN OTHERS THEN
7242: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' throws exception');
7243: l_return_status := FND_API.G_RET_STS_ERROR;
7244: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_DELIVERY');
7245: FND_MSG_PUB.Add;
7246: END;
7247:

Line 7253: p_init_msg_list => FND_API.G_TRUE,

7249:
7250: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Calling GET_DEFAULT_DUN_DATA...');
7251:
7252: GET_DEFAULT_DUN_DATA(p_api_version => 1.0,
7253: p_init_msg_list => FND_API.G_TRUE,
7254: p_commit => FND_API.G_FALSE,
7255: p_level => l_level,
7256: p_source_id => p_source_id,
7257: p_send_method => p_method,

Line 7254: p_commit => FND_API.G_FALSE,

7250: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Calling GET_DEFAULT_DUN_DATA...');
7251:
7252: GET_DEFAULT_DUN_DATA(p_api_version => 1.0,
7253: p_init_msg_list => FND_API.G_TRUE,
7254: p_commit => FND_API.G_FALSE,
7255: p_level => l_level,
7256: p_source_id => p_source_id,
7257: p_send_method => p_method,
7258: p_resend => l_resend,

Line 7270: IF l_return_status <> FND_API.G_RET_STS_SUCCESS then

7266: WriteLog('---------- continue ' || l_api_name || '----------');
7267: WriteLog(G_PKG_NAME || ' ' || l_api_name || ': l_return_status: ' || l_return_status);
7268: WriteLog(G_PKG_NAME || ' ' || l_api_name || ': l_msg_count: ' || l_msg_count);
7269:
7270: IF l_return_status <> FND_API.G_RET_STS_SUCCESS then
7271: GOTO end_call_ffm;
7272: end if;
7273:
7274: --reviewing default dunning data

Line 7288: l_return_status := FND_API.G_RET_STS_ERROR;

7284: IF l_location_id is null then
7285: WriteLog(G_PKG_NAME || ' ' || l_api_name || ': No location found');
7286: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_ADDRESS');
7287: FND_MSG_PUB.Add;
7288: l_return_status := FND_API.G_RET_STS_ERROR;
7289: GOTO end_call_ffm;
7290: end if;
7291:
7292: -- setting destination

Line 7296: if(p_email IS NULL OR p_email = FND_API.G_MISS_CHAR) THEN

7292: -- setting destination
7293: IF (p_method = 'PRINTER' or p_method = 'PRINT') THEN
7294:
7295:
7296: if(p_email IS NULL OR p_email = FND_API.G_MISS_CHAR) THEN
7297: --Bug5233002. Fix by LKKUMAR on 31-May-2006. Start.
7298: OPEN C_GET_RES_USER_ID;
7299: FETCH C_GET_RES_USER_ID into l_resource_user_id;
7300: CLOSE C_GET_RES_USER_ID;

Line 7312: l_return_status := FND_API.G_RET_STS_ERROR;

7308: IF (l_printer = '' or l_printer is null) THEN
7309: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No Printer',0);
7310: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_PRINTER');
7311: FND_MSG_PUB.Add;
7312: l_return_status := FND_API.G_RET_STS_ERROR;
7313: GOTO end_call_ffm;
7314: END IF;
7315:
7316: else

Line 7328: if(p_email IS NULL OR p_email = FND_API.G_MISS_CHAR) THEN

7324: WriteLog(G_PKG_NAME || ' ' || l_api_name || ': Will use printer: ' || l_dest);
7325:
7326: ELSE -- method is not PRINTER
7327:
7328: if(p_email IS NULL OR p_email = FND_API.G_MISS_CHAR) THEN
7329:
7330: if l_contact_point_id is null then
7331: if p_method = 'EMAIL' then
7332: WriteLog(G_PKG_NAME || ' ' || l_api_name || ': No email found');

Line 7341: l_return_status := FND_API.G_RET_STS_ERROR;

7337: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_FAX');
7338: FND_MSG_PUB.Add;
7339: end if;
7340:
7341: l_return_status := FND_API.G_RET_STS_ERROR;
7342: GOTO end_call_ffm;
7343: end if;
7344:
7345: WriteLog(G_PKG_NAME || ' ' || l_api_name || ': Setting destination from defaulting data');

Line 7388: l_return_status := FND_API.G_RET_STS_ERROR;

7384: if (nIdx = 0) then
7385: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Query NotFound');
7386: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_QUERY');
7387: FND_MSG_PUB.Add;
7388: l_return_status := FND_API.G_RET_STS_ERROR;
7389: GOTO end_call_ffm;
7390: end if;
7391: exit;
7392: else

Line 7400: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

7396: END LOOP;
7397: --------------------------------------------
7398:
7399: l_server_id := NULL; -- Using Default Server
7400: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
7401: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Call SEND_COPY');
7402:
7403: BEGIN
7404: IEX_SEND_XML_PVT.Send_COPY(p_api_version_number => l_api_version

Line 7405: ,p_init_msg_list => FND_API.G_FALSE

7401: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Call SEND_COPY');
7402:
7403: BEGIN
7404: IEX_SEND_XML_PVT.Send_COPY(p_api_version_number => l_api_version
7405: ,p_init_msg_list => FND_API.G_FALSE
7406: ,p_commit => FND_API.G_TRUE
7407: ,p_resend => l_resend
7408: ,p_request_id => p_request_id
7409: ,p_user_id => l_user_id

Line 7406: ,p_commit => FND_API.G_TRUE

7402:
7403: BEGIN
7404: IEX_SEND_XML_PVT.Send_COPY(p_api_version_number => l_api_version
7405: ,p_init_msg_list => FND_API.G_FALSE
7406: ,p_commit => FND_API.G_TRUE
7407: ,p_resend => l_resend
7408: ,p_request_id => p_request_id
7409: ,p_user_id => l_user_id
7410: ,p_party_id => p_party_id

Line 7429: IF l_return_status <> FND_API.G_RET_STS_SUCCESS or l_request_id is null THEN

7425: ,x_msg_data => l_msg_data);
7426:
7427: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - After SEND_COPY:'||l_return_status);
7428:
7429: IF l_return_status <> FND_API.G_RET_STS_SUCCESS or l_request_id is null THEN
7430: l_return_status := FND_API.G_RET_STS_ERROR;
7431: x_msg_count := l_msg_count;
7432: x_msg_data := l_msg_data;
7433: END IF;

Line 7430: l_return_status := FND_API.G_RET_STS_ERROR;

7426:
7427: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - After SEND_COPY:'||l_return_status);
7428:
7429: IF l_return_status <> FND_API.G_RET_STS_SUCCESS or l_request_id is null THEN
7430: l_return_status := FND_API.G_RET_STS_ERROR;
7431: x_msg_count := l_msg_count;
7432: x_msg_data := l_msg_data;
7433: END IF;
7434:

Line 7438: l_return_status := FND_API.G_RET_STS_ERROR;

7434:
7435: EXCEPTION
7436: WHEN OTHERS THEN
7437: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' throws exception');
7438: l_return_status := FND_API.G_RET_STS_ERROR;
7439: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_DELIVERY');
7440: FND_MSG_PUB.Add;
7441: END;
7442:

Line 7451: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

7447: <>
7448:
7449: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - l_return_status='||l_return_status);
7450:
7451: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7452:
7453: l_msg := FND_MSG_PUB.Get(p_msg_index => 1, p_encoded => 'T');
7454: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - l_msg: ' || l_msg);
7455: FND_MESSAGE.PARSE_ENCODED(l_msg, l_app, l_msg_name);

Line 7486: , p_init_msg_list => FND_API.G_FALSE

7482: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UpdateRow');
7483:
7484: IEX_DUNNING_PVT.Update_DUNNING(
7485: p_api_version => 1.0
7486: , p_init_msg_list => FND_API.G_FALSE
7487: , p_commit => FND_API.G_TRUE
7488: , p_dunning_rec => l_dunning_rec
7489: , x_return_status => l_return_status1
7490: , x_msg_count => l_msg_count1

Line 7487: , p_commit => FND_API.G_TRUE

7483:
7484: IEX_DUNNING_PVT.Update_DUNNING(
7485: p_api_version => 1.0
7486: , p_init_msg_list => FND_API.G_FALSE
7487: , p_commit => FND_API.G_TRUE
7488: , p_dunning_rec => l_dunning_rec
7489: , x_return_status => l_return_status1
7490: , x_msg_count => l_msg_count1
7491: , x_msg_data => l_msg_data1);

Line 7515: ,p_init_msg_list => FND_API.G_FALSE

7511: l_dunning_rec.contact_party_id := l_contact_party_id; -- bug 3955222
7512:
7513: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - InsertRow');
7514: CREATE_DUNNING(p_api_version => 1.0
7515: ,p_init_msg_list => FND_API.G_FALSE
7516: ,p_commit => FND_API.G_TRUE
7517: ,p_dunning_rec => l_dunning_rec
7518: ,x_dunning_id => l_dunning_id
7519: ,x_return_status => l_return_status1

Line 7516: ,p_commit => FND_API.G_TRUE

7512:
7513: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - InsertRow');
7514: CREATE_DUNNING(p_api_version => 1.0
7515: ,p_init_msg_list => FND_API.G_FALSE
7516: ,p_commit => FND_API.G_TRUE
7517: ,p_dunning_rec => l_dunning_rec
7518: ,x_dunning_id => l_dunning_id
7519: ,x_return_status => l_return_status1
7520: ,x_msg_count => l_msg_count1

Line 7526: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

7522:
7523: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - CreateDunning status='|| l_return_status1);
7524: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - dunning_id='||l_dunning_id);
7525:
7526: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7527: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot Create Dunning');
7528: END IF;
7529:
7530: END IF; -- end of p_object

Line 7549: ,p_init_msg_list => FND_API.G_FALSE

7545: l_dunning_rec.contact_party_id := l_contact_party_id; -- bug 3955222
7546:
7547: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - InsertRow');
7548: CREATE_DUNNING(p_api_version => 1.0
7549: ,p_init_msg_list => FND_API.G_FALSE
7550: ,p_commit => FND_API.G_TRUE
7551: ,p_dunning_rec => l_dunning_rec
7552: ,x_dunning_id => l_dunning_id
7553: ,x_return_status => l_return_status1

Line 7550: ,p_commit => FND_API.G_TRUE

7546:
7547: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - InsertRow');
7548: CREATE_DUNNING(p_api_version => 1.0
7549: ,p_init_msg_list => FND_API.G_FALSE
7550: ,p_commit => FND_API.G_TRUE
7551: ,p_dunning_rec => l_dunning_rec
7552: ,x_dunning_id => l_dunning_id
7553: ,x_return_status => l_return_status1
7554: ,x_msg_count => l_msg_count1

Line 7560: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

7556:
7557: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - CreateDunning status='|| l_return_status1);
7558: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - dunning_id='||l_dunning_id);
7559:
7560: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7561: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot Create Dunning');
7562: END IF;
7563:
7564: end if;

Line 7583: WHEN FND_API.G_EXC_ERROR THEN

7579: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - x_msg_count: '||x_msg_count);
7580: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - x_msg_data: '||x_msg_data);
7581:
7582: EXCEPTION
7583: WHEN FND_API.G_EXC_ERROR THEN
7584: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception');
7585: errmsg := SQLERRM;
7586: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exception errmsg='||errmsg);
7587: -- ROLLBACK TO SEND_XML_PVT;

Line 7588: x_return_status := FND_API.G_RET_STS_ERROR;

7584: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception');
7585: errmsg := SQLERRM;
7586: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exception errmsg='||errmsg);
7587: -- ROLLBACK TO SEND_XML_PVT;
7588: x_return_status := FND_API.G_RET_STS_ERROR;
7589: FND_MSG_PUB.Count_And_Get
7590: ( p_count => x_msg_count,
7591: p_data => x_msg_data
7592: );

Line 7594: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

7590: ( p_count => x_msg_count,
7591: p_data => x_msg_data
7592: );
7593:
7594: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7595: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UnExc Exception');
7596: errmsg := SQLERRM;
7597: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exception errmsg='||errmsg);
7598: -- ROLLBACK TO SEND_XML_PVT;

Line 7599: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

7595: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UnExc Exception');
7596: errmsg := SQLERRM;
7597: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exception errmsg='||errmsg);
7598: -- ROLLBACK TO SEND_XML_PVT;
7599: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7600: FND_MSG_PUB.Count_And_Get
7601: ( p_count => x_msg_count,
7602: p_data => x_msg_data
7603: );

Line 7610: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

7606: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Other Exception');
7607: errmsg := SQLERRM;
7608: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exception errmsg='||errmsg);
7609: -- ROLLBACK TO SEND_XML_PVT;
7610: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7611: FND_MSG_PUB.Count_And_Get
7612: ( p_count => x_msg_count,
7613: p_data => x_msg_data
7614: );

Line 7717: IF FND_API.to_Boolean( p_init_msg_list )

7713: l_commit := p_commit;
7714: x_contact_party_id := p_party_id; -- default to origal party_id until updated #3955222
7715:
7716: -- Initialize message list IF p_init_msg_list is set to TRUE.
7717: IF FND_API.to_Boolean( p_init_msg_list )
7718: THEN
7719: FND_MSG_PUB.initialize;
7720: END IF;
7721:

Line 7723: l_return_status := FND_API.G_RET_STS_SUCCESS;

7719: FND_MSG_PUB.initialize;
7720: END IF;
7721:
7722: -- Initialize API return status to SUCCESS
7723: l_return_status := FND_API.G_RET_STS_SUCCESS;
7724: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Start');
7725:
7726: if (p_party_id is null) then
7727: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No PARTY_ID');

Line 7730: l_return_status := FND_API.G_RET_STS_ERROR;

7726: if (p_party_id is null) then
7727: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No PARTY_ID');
7728: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_PARTY');
7729: FND_MSG_PUB.Add;
7730: l_return_status := FND_API.G_RET_STS_ERROR;
7731: GOTO end_getcontact;
7732: end if;
7733: if (p_method is null) then
7734: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No METHOD');

Line 7737: l_return_status := FND_API.G_RET_STS_ERROR;

7733: if (p_method is null) then
7734: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No METHOD');
7735: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_METHOD');
7736: FND_MSG_PUB.Add;
7737: l_return_status := FND_API.G_RET_STS_ERROR;
7738: GOTO end_getcontact;
7739: end if;
7740:
7741: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Party_id='||p_party_id);

Line 7757: l_return_status := FND_API.G_RET_STS_ERROR;

7753: if (l_printer = '' or l_printer is null) then
7754: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No Printer');
7755: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_PRINTER');
7756: FND_MSG_PUB.Add;
7757: l_return_status := FND_API.G_RET_STS_ERROR;
7758: GOTO end_getcontact;
7759: end if;
7760: x_contact := l_printer;
7761:

Line 7770: l_return_status := FND_API.G_RET_STS_ERROR;

7766: If ( C_GET_PARTY_TYPE%NOTFOUND ) Then
7767: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - cannot find party type');
7768: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_PARTYTYPE');
7769: FND_MSG_PUB.Add;
7770: l_return_status := FND_API.G_RET_STS_ERROR;
7771: Close C_Get_PARTY_TYPE;
7772: GOTO end_getcontact;
7773: END IF;
7774: Close C_Get_PARTY_TYPE;

Line 7800: (x_contact is null or l_return_status <> FND_API.G_RET_STS_SUCCESS))

7796:
7797: -- person doesnt have dunning type
7798: -- so, we only check person contact point by GetContactPoint.
7799: IF (l_party_type = 'PERSON' and
7800: (x_contact is null or l_return_status <> FND_API.G_RET_STS_SUCCESS))
7801: then
7802: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - person contact NotFound');
7803: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_CONTACTINFO');
7804: FND_MSG_PUB.Add;

Line 7805: l_return_status := FND_API.G_RET_STS_ERROR;

7801: then
7802: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - person contact NotFound');
7803: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_CONTACTINFO');
7804: FND_MSG_PUB.Add;
7805: l_return_status := FND_API.G_RET_STS_ERROR;
7806: GOTO end_getcontact;
7807: end if;
7808: --
7809: -- if relationship or organization,

Line 7827: l_return_status := FND_API.G_RET_STS_ERROR;

7823: If ( C_GET_ORG_PARTY%NOTFOUND ) Then
7824: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - cannot find org party');
7825: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_ORG');
7826: FND_MSG_PUB.Add;
7827: l_return_status := FND_API.G_RET_STS_ERROR;
7828: Close C_Get_ORG_PARTY;
7829: GOTO end_getcontact;
7830: end if;
7831: x_contact_party_id := l_party_id; -- default to org party_id until updated #3955222

Line 7837: (x_contact is null or l_return_status <> FND_API.G_RET_STS_SUCCESS))

7833: end if;
7834: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - org_party_id='||l_party_id);
7835: --
7836: if (l_party_type <> 'PERSON' and
7837: (x_contact is null or l_return_status <> FND_API.G_RET_STS_SUCCESS))
7838: THEN
7839:
7840: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - get dunning party_id');
7841: Open C_Get_DUNNING_ORG(l_party_id);

Line 7848: l_return_status := FND_API.G_RET_STS_ERROR;

7844:
7845: If ( C_GET_DUNNING_ORG%NOTFOUND or l_dunning_party_id is null) Then
7846: if (nIdx = 0 ) then
7847: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No Dunning PartyId');
7848: l_return_status := FND_API.G_RET_STS_ERROR;
7849: end if;
7850:
7851: ELSE
7852: nIdx := nIdx + 1;

Line 7854: l_return_status := FND_API.G_RET_STS_SUCCESS;

7850:
7851: ELSE
7852: nIdx := nIdx + 1;
7853: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - rel party_id = '||l_dunning_party_id );
7854: l_return_status := FND_API.G_RET_STS_SUCCESS;
7855: GetContactPoint(
7856: p_api_version => p_api_version
7857: , p_init_msg_list => p_init_msg_list
7858: , p_commit => p_commit

Line 7872: l_return_status = FND_API.G_RET_STS_SUCCESS) THEN

7868: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - status='||l_return_status);
7869: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - contact='||x_contact);
7870:
7871: if (x_contact is not null and
7872: l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
7873: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Found ContactPint!');
7874: end if;
7875:
7876: end if;

Line 7887: l_return_status <> FND_API.G_RET_STS_SUCCESS)

7883: -- if cannot find the contact point for dunning party id,
7884: -- try to get the contact point by the org party id (no dunning type).
7885: --
7886: if (x_contact is null or
7887: l_return_status <> FND_API.G_RET_STS_SUCCESS)
7888: THEN
7889: --
7890: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No ContactPoint for Duning Party');
7891: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - get party_id contactpoint');

Line 7919: if (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

7915:
7916:
7917: <>
7918: x_return_status := l_return_status;
7919: if (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
7920: x_contact := '';
7921: END IF;
7922:
7923: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - return_status:'||x_return_status);

Line 7931: WHEN FND_API.G_EXC_ERROR THEN

7927: ( p_count => x_msg_count,
7928: p_data => x_msg_data );
7929:
7930: EXCEPTION
7931: WHEN FND_API.G_EXC_ERROR THEN
7932: ROLLBACK TO GetContactInfo_PVT;
7933: x_return_status := FND_API.G_RET_STS_ERROR;
7934: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exp Exception');
7935: errmsg := SQLERRM;

Line 7933: x_return_status := FND_API.G_RET_STS_ERROR;

7929:
7930: EXCEPTION
7931: WHEN FND_API.G_EXC_ERROR THEN
7932: ROLLBACK TO GetContactInfo_PVT;
7933: x_return_status := FND_API.G_RET_STS_ERROR;
7934: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exp Exception');
7935: errmsg := SQLERRM;
7936: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exception errmsg='||errmsg);
7937: FND_MSG_PUB.Count_And_Get

Line 7942: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

7938: ( p_count => x_msg_count,
7939: p_data => x_msg_data
7940: );
7941:
7942: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7943: ROLLBACK TO GetContactInfo_PVT;
7944: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7945: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UnExp Exception');
7946: errmsg := SQLERRM;

Line 7944: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

7940: );
7941:
7942: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7943: ROLLBACK TO GetContactInfo_PVT;
7944: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7945: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UnExp Exception');
7946: errmsg := SQLERRM;
7947: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exception errmsg='||errmsg);
7948: FND_MSG_PUB.Count_And_Get

Line 7956: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

7952:
7953: WHEN OTHERS THEN
7954: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Other Exception');
7955: ROLLBACK TO GetContactInfo_PVT;
7956: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7957: errmsg := SQLERRM;
7958: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exception errmsg='||errmsg);
7959: FND_MSG_PUB.Count_And_Get
7960: ( p_count => x_msg_count,

Line 8063: IF FND_API.to_Boolean( p_init_msg_list )

8059:
8060: l_commit := p_commit;
8061:
8062: -- Initialize message list IF p_init_msg_list is set to TRUE.
8063: IF FND_API.to_Boolean( p_init_msg_list )
8064: THEN
8065: FND_MSG_PUB.initialize;
8066: END IF;
8067:

Line 8069: l_return_status := FND_API.G_RET_STS_SUCCESS;

8065: FND_MSG_PUB.initialize;
8066: END IF;
8067:
8068: -- Initialize API return status to SUCCESS
8069: l_return_status := FND_API.G_RET_STS_SUCCESS;
8070:
8071: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Start');
8072:
8073: if (p_party_id is null) then

Line 8077: l_return_status := FND_API.G_RET_STS_ERROR;

8073: if (p_party_id is null) then
8074: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No PARTY_ID');
8075: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_PARTY');
8076: FND_MSG_PUB.Add;
8077: l_return_status := FND_API.G_RET_STS_ERROR;
8078: GOTO end_getcontact;
8079: end if;
8080: if (p_method is null) then
8081: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No METHOD');

Line 8084: l_return_status := FND_API.G_RET_STS_ERROR;

8080: if (p_method is null) then
8081: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No METHOD');
8082: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_METHOD');
8083: FND_MSG_PUB.Add;
8084: l_return_status := FND_API.G_RET_STS_ERROR;
8085: GOTO end_getcontact;
8086: end if;
8087:
8088: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Party_id='||p_party_id);

Line 8114: l_return_status := FND_API.G_RET_STS_ERROR;

8110: If ( C_GET_CONTACT_EMAIL2%NOTFOUND) Then
8111: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Customer NotFound');
8112: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_EMAIL');
8113: FND_MSG_PUB.Add;
8114: l_return_status := FND_API.G_RET_STS_ERROR;
8115: Close C_Get_CONTACT_EMAIL2;
8116: Close C_Get_CONTACT_EMAIL;
8117: GOTO end_getcontact;
8118: end if;

Line 8124: l_return_status := FND_API.G_RET_STS_ERROR;

8120: If ( l_email is null ) Then
8121: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - EmailAddress NotFound in C_GET_ORG_EMAIL');
8122: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_EMAIL');
8123: FND_MSG_PUB.Add;
8124: l_return_status := FND_API.G_RET_STS_ERROR;
8125: Close C_Get_CONTACT_EMAIL2;
8126: Close C_Get_CONTACT_EMAIL;
8127: GOTO end_getcontact;
8128: end if;

Line 8137: l_return_status := FND_API.G_RET_STS_ERROR;

8133: If ( l_email is null ) Then
8134: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - EmailAddress is null');
8135: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_EMAIL');
8136: FND_MSG_PUB.Add;
8137: l_return_status := FND_API.G_RET_STS_ERROR;
8138: Close C_Get_CONTACT_EMAIL;
8139: GOTO end_getcontact;
8140: end if;
8141:

Line 8165: l_return_status := FND_API.G_RET_STS_ERROR;

8161: If ( C_GET_CONTACT_FAX2%NOTFOUND) Then
8162: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Customer NotFound');
8163: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_FAX');
8164: FND_MSG_PUB.Add;
8165: l_return_status := FND_API.G_RET_STS_ERROR;
8166: Close C_Get_CONTACT_FAX2;
8167: Close C_Get_CONTACT_FAX;
8168: GOTO end_getcontact;
8169: end if;

Line 8175: l_return_status := FND_API.G_RET_STS_ERROR;

8171: If ( l_fax is null ) Then
8172: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Fax NotFound in C_GET_CONTACT_FAX');
8173: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_FAX');
8174: FND_MSG_PUB.Add;
8175: l_return_status := FND_API.G_RET_STS_ERROR;
8176: Close C_Get_CONTACT_FAX2;
8177: Close C_Get_CONTACT_FAX;
8178: GOTO end_getcontact;
8179: end if;

Line 8188: l_return_status := FND_API.G_RET_STS_ERROR;

8184: If ( l_fax is null ) Then
8185: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - FAX NotFound');
8186: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_FAX');
8187: FND_MSG_PUB.Add;
8188: l_return_status := FND_API.G_RET_STS_ERROR;
8189: Close C_Get_CONTACT_FAX;
8190: GOTO end_getcontact;
8191: end if;
8192:

Line 8207: if (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

8203: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - fax:'||l_fax);
8204:
8205: <>
8206: x_return_status := l_return_status;
8207: if (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
8208: x_contact := '';
8209: END IF;
8210:
8211: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - return_status:'||x_return_status);

Line 8219: WHEN FND_API.G_EXC_ERROR THEN

8215: ( p_count => x_msg_count,
8216: p_data => x_msg_data );
8217:
8218: EXCEPTION
8219: WHEN FND_API.G_EXC_ERROR THEN
8220: ROLLBACK TO GetContactPoint_PVT;
8221: x_return_status := FND_API.G_RET_STS_ERROR;
8222: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exp Exception');
8223: errmsg := SQLERRM;

Line 8221: x_return_status := FND_API.G_RET_STS_ERROR;

8217:
8218: EXCEPTION
8219: WHEN FND_API.G_EXC_ERROR THEN
8220: ROLLBACK TO GetContactPoint_PVT;
8221: x_return_status := FND_API.G_RET_STS_ERROR;
8222: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exp Exception');
8223: errmsg := SQLERRM;
8224: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exception errmsg='||errmsg);
8225: FND_MSG_PUB.Count_And_Get

Line 8230: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

8226: ( p_count => x_msg_count,
8227: p_data => x_msg_data
8228: );
8229:
8230: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8231: ROLLBACK TO GetContactPoint_PVT;
8232: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8233: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UnExp Exception');
8234: errmsg := SQLERRM;

Line 8232: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

8228: );
8229:
8230: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8231: ROLLBACK TO GetContactPoint_PVT;
8232: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8233: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UnExp Exception');
8234: errmsg := SQLERRM;
8235: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exception errmsg='||errmsg);
8236: FND_MSG_PUB.Count_And_Get

Line 8244: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

8240:
8241: WHEN OTHERS THEN
8242: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Other Exception');
8243: ROLLBACK TO GetContactPoint_PVT;
8244: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8245: errmsg := SQLERRM;
8246: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exception errmsg='||errmsg);
8247: FND_MSG_PUB.Count_And_Get
8248: ( p_count => x_msg_count,

Line 8372: WHEN FND_API.G_EXC_ERROR THEN

8368: WriteLog (G_PKG_NAME || ' ' || l_api_name || ' - x_keep_flag='||l_keep_flag);
8369: WriteLog (G_PKG_NAME || ' ' || l_api_name || ' - end');
8370:
8371: EXCEPTION
8372: WHEN FND_API.G_EXC_ERROR THEN
8373: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception');
8374: errmsg := SQLERRM;
8375: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exception errmsg='||errmsg);
8376: x_keep_flag := 1;

Line 8378: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

8374: errmsg := SQLERRM;
8375: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exception errmsg='||errmsg);
8376: x_keep_flag := 1;
8377:
8378: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8379: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UnExc Exception');
8380: errmsg := SQLERRM;
8381: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exception errmsg='||errmsg);
8382: x_keep_flag := 1;

Line 8433: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

8429: --
8430: BEGIN
8431: SAVEPOINT CLOSE_DUNNING_PVT;
8432:
8433: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
8434: p_api_version,
8435: l_api_name,
8436: G_PKG_NAME)
8437: THEN

Line 8438: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

8434: p_api_version,
8435: l_api_name,
8436: G_PKG_NAME)
8437: THEN
8438: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8439: END IF;
8440:
8441: IF FND_API.to_Boolean( p_init_msg_list )
8442: THEN

Line 8441: IF FND_API.to_Boolean( p_init_msg_list )

8437: THEN
8438: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8439: END IF;
8440:
8441: IF FND_API.to_Boolean( p_init_msg_list )
8442: THEN
8443: FND_MSG_PUB.initialize;
8444: END IF;
8445:

Line 8449: x_return_status := FND_API.G_RET_STS_SUCCESS;

8445:
8446: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - start');
8447: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - running_level='||p_running_level);
8448:
8449: x_return_status := FND_API.G_RET_STS_SUCCESS;
8450: l_dunning_level := p_running_level;
8451:
8452: if (p_running_level = 'CUSTOMER') then
8453: l_dunning_object_id := p_delinquencies_tbl(1).party_cust_id;

Line 8520: IF FND_API.to_Boolean( p_commit )

8516: -- End of API body
8517: --
8518:
8519: -- Standard check for p_commit
8520: IF FND_API.to_Boolean( p_commit )
8521: THEN
8522: COMMIT WORK;
8523: END IF;
8524:

Line 8530: WHEN FND_API.G_EXC_ERROR THEN

8526: ( p_count => x_msg_count,
8527: p_data => x_msg_data );
8528:
8529: EXCEPTION
8530: WHEN FND_API.G_EXC_ERROR THEN
8531: ROLLBACK TO CLOSE_DUNNING_PVT;
8532: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception');
8533: errmsg := SQLERRM;
8534: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exception errmsg='||errmsg);

Line 8535: x_return_status := FND_API.G_RET_STS_ERROR;

8531: ROLLBACK TO CLOSE_DUNNING_PVT;
8532: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception');
8533: errmsg := SQLERRM;
8534: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exception errmsg='||errmsg);
8535: x_return_status := FND_API.G_RET_STS_ERROR;
8536: FND_MSG_PUB.Count_And_Get
8537: ( p_count => x_msg_count,
8538: p_data => x_msg_data
8539: );

Line 8541: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

8537: ( p_count => x_msg_count,
8538: p_data => x_msg_data
8539: );
8540:
8541: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8542: ROLLBACK TO CLOSE_DUNNING_PVT;
8543: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception');
8544: errmsg := SQLERRM;
8545: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exception errmsg='||errmsg);

Line 8546: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

8542: ROLLBACK TO CLOSE_DUNNING_PVT;
8543: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception');
8544: errmsg := SQLERRM;
8545: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exception errmsg='||errmsg);
8546: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8547: FND_MSG_PUB.Count_And_Get
8548: ( p_count => x_msg_count,
8549: p_data => x_msg_data
8550: );

Line 8557: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

8553: ROLLBACK TO CLOSE_DUNNING_PVT;
8554: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception');
8555: errmsg := SQLERRM;
8556: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exception errmsg='||errmsg);
8557: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8558: FND_MSG_PUB.Count_And_Get
8559: ( p_count => x_msg_count,
8560: p_data => x_msg_data
8561: );

Line 8646: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

8642: -- Standard Start of API savepoint
8643: SAVEPOINT DAILY_DUNNING_PVT;
8644:
8645: -- Standard call to check for call compatibility.
8646: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
8647: p_api_version,
8648: l_api_name,
8649: G_PKG_NAME)
8650: THEN

Line 8651: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

8647: p_api_version,
8648: l_api_name,
8649: G_PKG_NAME)
8650: THEN
8651: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8652: END IF;
8653:
8654: -- Initialize message list if p_init_msg_list is set to TRUE.
8655: IF FND_API.to_Boolean( p_init_msg_list )

Line 8655: IF FND_API.to_Boolean( p_init_msg_list )

8651: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8652: END IF;
8653:
8654: -- Initialize message list if p_init_msg_list is set to TRUE.
8655: IF FND_API.to_Boolean( p_init_msg_list )
8656: THEN
8657: FND_MSG_PUB.initialize;
8658: END IF;
8659:

Line 8665: x_return_status := FND_API.G_RET_STS_SUCCESS;

8661: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Start') ;
8662: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - running_level='||p_running_level) ;
8663:
8664: -- Initialize API return status to SUCCESS
8665: x_return_status := FND_API.G_RET_STS_SUCCESS;
8666:
8667: l_curr_date := to_char(sysdate, 'YYYYMMDD');
8668: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - CurrDate='||l_curr_date) ;
8669: FND_FILE.PUT_LINE(FND_FILE.LOG, 'current date=' || l_curr_date);

Line 8697: x_return_status := FND_API.G_RET_STS_SUCCESS;

8693: exit;
8694: ELSE
8695:
8696: l_skip := 0;
8697: x_return_status := FND_API.G_RET_STS_SUCCESS;
8698: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - DunningID='||l_dunning_id) ;
8699: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - DunningObjectID='||l_dunning_object_id) ;
8700: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Callback_Date='||l_callback_date) ;
8701: FND_FILE.PUT_LINE(FND_FILE.LOG, '*****dunning_id='||l_dunning_id||'*****');

Line 8799: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

8795: , x_msg_data => x_msg_data
8796: );
8797:
8798:
8799: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8800: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot create new Task');
8801: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Cannot create new task');
8802: FND_MSG_PUB.Count_And_Get
8803: ( p_count => x_msg_count,

Line 8867: IF FND_API.to_Boolean( p_commit )

8863: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - DunnUpdatedNum='||dunning_tbl.count);
8864: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - ==========END SUMMARY=========');
8865:
8866: -- Standard check for p_commit
8867: IF FND_API.to_Boolean( p_commit )
8868: THEN
8869: COMMIT WORK;
8870: END IF;
8871:

Line 8934: IF FND_API.to_Boolean( p_commit )

8930:
8931: END LOOP;
8932: WriteLog(G_PKG_NAME || ' ' || l_api_name || 'Completed cancelling Dunning callback tasks correpsonding to current objects...');
8933:
8934: IF FND_API.to_Boolean( p_commit )
8935: THEN
8936: COMMIT WORK;
8937: END IF;
8938: --End bug 7317666 21-Nov-2008 barathsr

Line 8942: x_return_status := FND_API.G_RET_STS_SUCCESS;

8938: --End bug 7317666 21-Nov-2008 barathsr
8939:
8940: -- clchang added 08/15/2003
8941: -- make return_status = 'S';
8942: x_return_status := FND_API.G_RET_STS_SUCCESS;
8943: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - return status='||x_return_status);
8944: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - END');
8945:
8946: FND_MSG_PUB.Count_And_Get

Line 8951: WHEN FND_API.G_EXC_ERROR THEN

8947: ( p_count => x_msg_count,
8948: p_data => x_msg_data );
8949:
8950: EXCEPTION
8951: WHEN FND_API.G_EXC_ERROR THEN
8952: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception');
8953: errmsg := SQLERRM;
8954: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exception errmsg='||errmsg);
8955: ROLLBACK TO DAILY_DUNNING_PVT;

Line 8956: x_return_status := FND_API.G_RET_STS_ERROR;

8952: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exc Exception');
8953: errmsg := SQLERRM;
8954: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exception errmsg='||errmsg);
8955: ROLLBACK TO DAILY_DUNNING_PVT;
8956: x_return_status := FND_API.G_RET_STS_ERROR;
8957: FND_MSG_PUB.Count_And_Get
8958: ( p_count => x_msg_count,
8959: p_data => x_msg_data
8960: );

Line 8962: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

8958: ( p_count => x_msg_count,
8959: p_data => x_msg_data
8960: );
8961:
8962: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8963: ROLLBACK TO DAILY_DUNNING_PVT;
8964: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UnExc Exception');
8965: errmsg := SQLERRM;
8966: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exception errmsg='||errmsg);

Line 8967: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

8963: ROLLBACK TO DAILY_DUNNING_PVT;
8964: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - UnExc Exception');
8965: errmsg := SQLERRM;
8966: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exception errmsg='||errmsg);
8967: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8968: FND_MSG_PUB.Count_And_Get
8969: ( p_count => x_msg_count,
8970: p_data => x_msg_data
8971: );

Line 8978: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

8974: ROLLBACK TO DAILY_DUNNING_PVT;
8975: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Others Exception');
8976: errmsg := SQLERRM;
8977: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Exception errmsg='||errmsg);
8978: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8979: FND_MSG_PUB.Count_And_Get
8980: ( p_count => x_msg_count,
8981: p_data => x_msg_data
8982: );

Line 9104: l_validation_level := FND_API.G_VALID_LEVEL_FULL;

9100:
9101: BEGIN
9102:
9103: -- Initialize API return status to SUCCESS
9104: l_validation_level := FND_API.G_VALID_LEVEL_FULL;
9105: x_return_status := FND_API.G_RET_STS_SUCCESS;
9106: l_dunning_id := p_dunning_id;
9107:
9108: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - delid='||p_delinquency_id);

Line 9105: x_return_status := FND_API.G_RET_STS_SUCCESS;

9101: BEGIN
9102:
9103: -- Initialize API return status to SUCCESS
9104: l_validation_level := FND_API.G_VALID_LEVEL_FULL;
9105: x_return_status := FND_API.G_RET_STS_SUCCESS;
9106: l_dunning_id := p_dunning_id;
9107:
9108: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - delid='||p_delinquency_id);
9109: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - dunningobjectid='||p_dunning_object_id);

Line 9126: x_return_status := FND_API.G_RET_STS_ERROR;

9122: l_party_name;
9123:
9124: If ( C_GET_ACCOUNT%NOTFOUND) Then
9125: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - ACCOUNT NotFound');
9126: x_return_status := FND_API.G_RET_STS_ERROR;
9127: Close C_Get_ACCOUNT;
9128: GOTO end_new_task;
9129: end if;
9130: Close C_Get_ACCOUNT;

Line 9143: x_return_status := FND_API.G_RET_STS_ERROR;

9139: l_party_name;
9140:
9141: If ( C_GET_CUSTOMER%NOTFOUND) Then
9142: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - CUSTOMER NotFound');
9143: x_return_status := FND_API.G_RET_STS_ERROR;
9144: Close C_Get_CUSTOMER;
9145: GOTO end_new_task;
9146: end if;
9147: Close C_Get_CUSTOMER;

Line 9164: x_return_status := FND_API.G_RET_STS_ERROR;

9160: l_party_name;
9161:
9162: If ( C_GET_SITE%NOTFOUND) Then
9163: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - ACCOUNT NotFound');
9164: x_return_status := FND_API.G_RET_STS_ERROR;
9165: Close C_Get_SITE;
9166: GOTO end_new_task;
9167: end if;
9168: Close C_Get_SITE;

Line 9186: x_return_status := FND_API.G_RET_STS_ERROR;

9182: l_party_name;
9183:
9184: If ( C_GET_DEL%NOTFOUND) Then
9185: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Del NotFound');
9186: x_return_status := FND_API.G_RET_STS_ERROR;
9187: Close C_Get_DEL;
9188: GOTO end_new_task;
9189: end if;
9190: Close C_Get_DEL;

Line 9197: x_return_status := FND_API.G_RET_STS_ERROR;

9193:
9194:
9195: If ( l_party_cust_id is null ) Then
9196: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - PartyCustId NotFound');
9197: x_return_status := FND_API.G_RET_STS_ERROR;
9198: GOTO end_new_task;
9199: end if;
9200:
9201: -- clchang updated 09/20/2002 for bug 2242346

Line 9209: p_init_msg_list => FND_API.G_TRUE,

9205: --Called iex_utilities.get_assigned_collector to get the resource from hz_customer_profiles table
9206: --instead of as_accesses. Removed the call to "get_resource".
9207: if l_customer_site_use_id is not null then
9208: iex_utilities.get_assigned_collector(p_api_version => l_api_version,
9209: p_init_msg_list => FND_API.G_TRUE,
9210: p_commit => FND_API.G_FALSE,
9211: p_validation_level => l_validation_level,
9212: p_level => 'DUNNING_BILLTO',
9213: p_level_id => l_customer_site_use_id,

Line 9210: p_commit => FND_API.G_FALSE,

9206: --instead of as_accesses. Removed the call to "get_resource".
9207: if l_customer_site_use_id is not null then
9208: iex_utilities.get_assigned_collector(p_api_version => l_api_version,
9209: p_init_msg_list => FND_API.G_TRUE,
9210: p_commit => FND_API.G_FALSE,
9211: p_validation_level => l_validation_level,
9212: p_level => 'DUNNING_BILLTO',
9213: p_level_id => l_customer_site_use_id,
9214: x_msg_count => l_msg_count,

Line 9218: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

9214: x_msg_count => l_msg_count,
9215: x_msg_data => l_msg_data,
9216: x_return_status => l_return_status,
9217: x_resource_tab => l_resource_tab);
9218: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9219: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot get resource');
9220: x_return_status := FND_API.G_RET_STS_ERROR;
9221: GOTO end_new_task;
9222: END IF;

Line 9220: x_return_status := FND_API.G_RET_STS_ERROR;

9216: x_return_status => l_return_status,
9217: x_resource_tab => l_resource_tab);
9218: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9219: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot get resource');
9220: x_return_status := FND_API.G_RET_STS_ERROR;
9221: GOTO end_new_task;
9222: END IF;
9223: end if;
9224:

Line 9227: p_init_msg_list => FND_API.G_TRUE,

9223: end if;
9224:
9225: if l_resource_tab.count<1 and l_account_id is not null then
9226: iex_utilities.get_assigned_collector(p_api_version => l_api_version,
9227: p_init_msg_list => FND_API.G_TRUE,
9228: p_commit => FND_API.G_FALSE,
9229: p_validation_level => l_validation_level,
9230: p_level => 'DUNNING_ACCOUNT',
9231: p_level_id => l_account_id,

Line 9228: p_commit => FND_API.G_FALSE,

9224:
9225: if l_resource_tab.count<1 and l_account_id is not null then
9226: iex_utilities.get_assigned_collector(p_api_version => l_api_version,
9227: p_init_msg_list => FND_API.G_TRUE,
9228: p_commit => FND_API.G_FALSE,
9229: p_validation_level => l_validation_level,
9230: p_level => 'DUNNING_ACCOUNT',
9231: p_level_id => l_account_id,
9232: x_msg_count => l_msg_count,

Line 9236: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

9232: x_msg_count => l_msg_count,
9233: x_msg_data => l_msg_data,
9234: x_return_status => l_return_status,
9235: x_resource_tab => l_resource_tab);
9236: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9237: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot get resource');
9238: x_return_status := FND_API.G_RET_STS_ERROR;
9239: GOTO end_new_task;
9240: END IF;

Line 9238: x_return_status := FND_API.G_RET_STS_ERROR;

9234: x_return_status => l_return_status,
9235: x_resource_tab => l_resource_tab);
9236: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9237: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot get resource');
9238: x_return_status := FND_API.G_RET_STS_ERROR;
9239: GOTO end_new_task;
9240: END IF;
9241: end if;
9242:

Line 9245: p_init_msg_list => FND_API.G_TRUE,

9241: end if;
9242:
9243: if l_resource_tab.count<1 and l_party_cust_id is not null then
9244: iex_utilities.get_assigned_collector(p_api_version => l_api_version,
9245: p_init_msg_list => FND_API.G_TRUE,
9246: p_commit => FND_API.G_FALSE,
9247: p_validation_level => l_validation_level,
9248: p_level => 'DUNNING_PARTY',
9249: p_level_id => l_party_cust_id,

Line 9246: p_commit => FND_API.G_FALSE,

9242:
9243: if l_resource_tab.count<1 and l_party_cust_id is not null then
9244: iex_utilities.get_assigned_collector(p_api_version => l_api_version,
9245: p_init_msg_list => FND_API.G_TRUE,
9246: p_commit => FND_API.G_FALSE,
9247: p_validation_level => l_validation_level,
9248: p_level => 'DUNNING_PARTY',
9249: p_level_id => l_party_cust_id,
9250: x_msg_count => l_msg_count,

Line 9254: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

9250: x_msg_count => l_msg_count,
9251: x_msg_data => l_msg_data,
9252: x_return_status => l_return_status,
9253: x_resource_tab => l_resource_tab);
9254: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9255: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot get resource');
9256: x_return_status := FND_API.G_RET_STS_ERROR;
9257: GOTO end_new_task;
9258: END IF;

Line 9256: x_return_status := FND_API.G_RET_STS_ERROR;

9252: x_return_status => l_return_status,
9253: x_resource_tab => l_resource_tab);
9254: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9255: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot get resource');
9256: x_return_status := FND_API.G_RET_STS_ERROR;
9257: GOTO end_new_task;
9258: END IF;
9259:
9260: if l_resource_tab.count<1 and p_dunning_level = 'CUSTOMER' then

Line 9262: p_init_msg_list => FND_API.G_TRUE,

9258: END IF;
9259:
9260: if l_resource_tab.count<1 and p_dunning_level = 'CUSTOMER' then
9261: iex_utilities.get_assigned_collector(p_api_version => l_api_version,
9262: p_init_msg_list => FND_API.G_TRUE,
9263: p_commit => FND_API.G_FALSE,
9264: p_validation_level => l_validation_level,
9265: p_level => 'DUNNING_PARTY_ACCOUNT',
9266: p_level_id => l_party_cust_id,

Line 9263: p_commit => FND_API.G_FALSE,

9259:
9260: if l_resource_tab.count<1 and p_dunning_level = 'CUSTOMER' then
9261: iex_utilities.get_assigned_collector(p_api_version => l_api_version,
9262: p_init_msg_list => FND_API.G_TRUE,
9263: p_commit => FND_API.G_FALSE,
9264: p_validation_level => l_validation_level,
9265: p_level => 'DUNNING_PARTY_ACCOUNT',
9266: p_level_id => l_party_cust_id,
9267: x_msg_count => l_msg_count,

Line 9271: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

9267: x_msg_count => l_msg_count,
9268: x_msg_data => l_msg_data,
9269: x_return_status => l_return_status,
9270: x_resource_tab => l_resource_tab);
9271: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9272: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot get resource');
9273: x_return_status := FND_API.G_RET_STS_ERROR;
9274: GOTO end_new_task;
9275: END IF;

Line 9273: x_return_status := FND_API.G_RET_STS_ERROR;

9269: x_return_status => l_return_status,
9270: x_resource_tab => l_resource_tab);
9271: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9272: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot get resource');
9273: x_return_status := FND_API.G_RET_STS_ERROR;
9274: GOTO end_new_task;
9275: END IF;
9276: end if;
9277: end if;

Line 9285: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

9281: else
9282: if l_default_rs_id is not null then
9283: l_resource_id := l_default_rs_id;
9284: else
9285: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9286: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot get resource from customer profile and there is no default resource set');
9287: FND_FILE.PUT_LINE(FND_FILE.LOG, 'No collector has been assigned to this customer '||l_party_name);
9288: FND_FILE.PUT_LINE(FND_FILE.LOG, 'No default collector available to assign to callback. Please update default collector.');
9289: GOTO end_new_task;

Line 9446: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

9442: x_task_id => x_task_id );
9443:
9444:
9445: <>
9446: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9447: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot Create Task');
9448: FND_MSG_PUB.Count_And_Get
9449: ( p_count => x_msg_count,
9450: p_data => x_msg_data

Line 9693: IF NOT FND_API.Compatible_API_Call (l_api_version,

9689: -- Standard Start of API savepoint
9690: SAVEPOINT GET_RESOURCE_PVT;
9691:
9692: -- Standard call to check for call compatibility.
9693: IF NOT FND_API.Compatible_API_Call (l_api_version,
9694: p_api_version,
9695: l_api_name,
9696: G_PKG_NAME)
9697: THEN

Line 9698: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

9694: p_api_version,
9695: l_api_name,
9696: G_PKG_NAME)
9697: THEN
9698: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9699: END IF;
9700:
9701:
9702: -- Initialize API return status to SUCCESS

Line 9703: x_return_status := FND_API.G_RET_STS_SUCCESS;

9699: END IF;
9700:
9701:
9702: -- Initialize API return status to SUCCESS
9703: x_return_status := FND_API.G_RET_STS_SUCCESS;
9704:
9705: -- Api body
9706: --
9707:

Line 9778: IF FND_API.to_Boolean( p_commit )

9774: -- End of API body
9775: --
9776:
9777: -- Standard check for p_commit
9778: IF FND_API.to_Boolean( p_commit )
9779: THEN
9780: COMMIT WORK;
9781: END IF;
9782:

Line 9792: WHEN FND_API.G_EXC_ERROR THEN

9788: p_data => x_msg_data
9789: );
9790:
9791: EXCEPTION
9792: WHEN FND_API.G_EXC_ERROR THEN
9793: ROLLBACK TO GET_RESOURCE_PVT;
9794: x_return_status := FND_API.G_RET_STS_ERROR;
9795: l_errmsg := SQLERRM;
9796: WriteLog('iexvdunb:GetRs-G_EXC_EXCEPTION::' || l_errmsg);

Line 9794: x_return_status := FND_API.G_RET_STS_ERROR;

9790:
9791: EXCEPTION
9792: WHEN FND_API.G_EXC_ERROR THEN
9793: ROLLBACK TO GET_RESOURCE_PVT;
9794: x_return_status := FND_API.G_RET_STS_ERROR;
9795: l_errmsg := SQLERRM;
9796: WriteLog('iexvdunb:GetRs-G_EXC_EXCEPTION::' || l_errmsg);
9797: FND_MSG_PUB.Count_And_Get
9798: ( p_count => x_msg_count,

Line 9802: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

9798: ( p_count => x_msg_count,
9799: p_data => x_msg_data
9800: );
9801:
9802: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9803: ROLLBACK TO GET_RESOURCE_PVT;
9804: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9805: l_errmsg := SQLERRM;
9806: WriteLog('iexvdunb:GetRs-G_EXC_UNEXP_EXCEPTION:OTHERS:' || l_errmsg);

Line 9804: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

9800: );
9801:
9802: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9803: ROLLBACK TO GET_RESOURCE_PVT;
9804: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9805: l_errmsg := SQLERRM;
9806: WriteLog('iexvdunb:GetRs-G_EXC_UNEXP_EXCEPTION:OTHERS:' || l_errmsg);
9807: FND_MSG_PUB.Count_And_Get
9808: ( p_count => x_msg_count,

Line 9814: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

9810: );
9811:
9812: WHEN OTHERS THEN
9813: ROLLBACK TO GET_RESOURCE_PVT;
9814: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9815: l_errmsg := SQLERRM;
9816: WriteLog('iexvdunb:GetRs-EXCEPTION:OTHERS:' || l_errmsg);
9817: FND_MSG_PUB.Count_And_Get
9818: ( p_count => x_msg_count,