[Home] [Help]
836: -- if more then 1 regular bill-to then set error
837: if l_bill_to_count > 1 then
838: X_LOCATION_ID := null;
839: WriteLog(l_api_name || ': ERROR: Multiple Bill-To locations found');
840: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_MULT_LOC');
841: FND_MESSAGE.Set_Token('USAGE', 'bill-to', FALSE);
842: FND_MSG_PUB.Add;
843: x_return_status := FND_API.G_RET_STS_ERROR;
844: else
837: if l_bill_to_count > 1 then
838: X_LOCATION_ID := null;
839: WriteLog(l_api_name || ': ERROR: Multiple Bill-To locations found');
840: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_MULT_LOC');
841: FND_MESSAGE.Set_Token('USAGE', 'bill-to', FALSE);
842: FND_MSG_PUB.Add;
843: x_return_status := FND_API.G_RET_STS_ERROR;
844: else
845: X_LOCATION_ID := l_location_id;
1187: l_primary_flag;
1188: CLOSE get_data_crs;
1189:
1190: if l_cust_account_id is null then
1191: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_ACCOUNT');
1192: FND_MSG_PUB.ADD;
1193: RAISE FND_API.G_EXC_ERROR;
1194: end if;
1195:
1208:
1209: -- if more then 1 regular bill-to then set error
1210: if l_count > 1 then
1211: WriteLog(l_api_name || ': ERROR: Multiple locations found');
1212: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_MULT_LOC');
1213: FND_MESSAGE.Set_Token('USAGE', l_site_use_code, FALSE);
1214: FND_MSG_PUB.Add;
1215: x_return_status := FND_API.G_RET_STS_ERROR;
1216: end if;
1209: -- if more then 1 regular bill-to then set error
1210: if l_count > 1 then
1211: WriteLog(l_api_name || ': ERROR: Multiple locations found');
1212: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_MULT_LOC');
1213: FND_MESSAGE.Set_Token('USAGE', l_site_use_code, FALSE);
1214: FND_MSG_PUB.Add;
1215: x_return_status := FND_API.G_RET_STS_ERROR;
1216: end if;
1217:
2008:
2009: IF P_delinquency_ID is NULL
2010: or P_delinquency_ID = FND_API.G_MISS_NUM
2011: THEN
2012: FND_MESSAGE.Set_Name('IEX', 'API_INVALID_ID');
2013: FND_MESSAGE.Set_Token('COLUMN', 'delinquency_ID', FALSE);
2014: FND_MESSAGE.Set_Token('VALUE', p_delinquency_id, FALSE);
2015: FND_MSG_PUB.Add;
2016: x_return_status := FND_API.G_RET_STS_ERROR;
2009: IF P_delinquency_ID is NULL
2010: or P_delinquency_ID = FND_API.G_MISS_NUM
2011: THEN
2012: FND_MESSAGE.Set_Name('IEX', 'API_INVALID_ID');
2013: FND_MESSAGE.Set_Token('COLUMN', 'delinquency_ID', FALSE);
2014: FND_MESSAGE.Set_Token('VALUE', p_delinquency_id, FALSE);
2015: FND_MSG_PUB.Add;
2016: x_return_status := FND_API.G_RET_STS_ERROR;
2017:
2010: or P_delinquency_ID = FND_API.G_MISS_NUM
2011: THEN
2012: FND_MESSAGE.Set_Name('IEX', 'API_INVALID_ID');
2013: FND_MESSAGE.Set_Token('COLUMN', 'delinquency_ID', FALSE);
2014: FND_MESSAGE.Set_Token('VALUE', p_delinquency_id, FALSE);
2015: FND_MSG_PUB.Add;
2016: x_return_status := FND_API.G_RET_STS_ERROR;
2017:
2018: ELSE
2023: IF (C_Get_Del%NOTFOUND)
2024: THEN
2025: IF FND_MSG_PUB.CHECK_MSG_LEVEL (FND_MSG_PUB.G_MSG_LVL_ERROR)
2026: THEN
2027: FND_MESSAGE.Set_Name('IEX', 'API_INVALID_ID');
2028: FND_MESSAGE.Set_Token('COLUMN', 'delinquency_ID', FALSE);
2029: FND_MESSAGE.Set_Token('VALUE', p_delinquency_id, FALSE);
2030: FND_MSG_PUB.Add;
2031: END IF;
2024: THEN
2025: IF FND_MSG_PUB.CHECK_MSG_LEVEL (FND_MSG_PUB.G_MSG_LVL_ERROR)
2026: THEN
2027: FND_MESSAGE.Set_Name('IEX', 'API_INVALID_ID');
2028: FND_MESSAGE.Set_Token('COLUMN', 'delinquency_ID', FALSE);
2029: FND_MESSAGE.Set_Token('VALUE', p_delinquency_id, FALSE);
2030: FND_MSG_PUB.Add;
2031: END IF;
2032: x_return_status := FND_API.G_RET_STS_ERROR;
2025: IF FND_MSG_PUB.CHECK_MSG_LEVEL (FND_MSG_PUB.G_MSG_LVL_ERROR)
2026: THEN
2027: FND_MESSAGE.Set_Name('IEX', 'API_INVALID_ID');
2028: FND_MESSAGE.Set_Token('COLUMN', 'delinquency_ID', FALSE);
2029: FND_MESSAGE.Set_Token('VALUE', p_delinquency_id, FALSE);
2030: FND_MSG_PUB.Add;
2031: END IF;
2032: x_return_status := FND_API.G_RET_STS_ERROR;
2033: END IF;
2262:
2263: If ( C_Get_AG_DN_XREF_REC%NOTFOUND) Then
2264: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2265: THEN
2266: FND_MESSAGE.Set_Name('AS', 'API_MISSING_UPDATE_TARGET');
2267: FND_MESSAGE.Set_Token ('INFO', 'IEX_AG_DN_XREF', FALSE);
2268: FND_MSG_PUB.Add;
2269: END IF;
2270: raise FND_API.G_EXC_ERROR;
2263: If ( C_Get_AG_DN_XREF_REC%NOTFOUND) Then
2264: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2265: THEN
2266: FND_MESSAGE.Set_Name('AS', 'API_MISSING_UPDATE_TARGET');
2267: FND_MESSAGE.Set_Token ('INFO', 'IEX_AG_DN_XREF', FALSE);
2268: FND_MSG_PUB.Add;
2269: END IF;
2270: raise FND_API.G_EXC_ERROR;
2271: END IF;
2277: l_ag_Dn_xref_rec.last_update_date = FND_API.G_MISS_Date )
2278: Then
2279: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2280: THEN
2281: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_ID');
2282: FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
2283: FND_MSG_PUB.ADD;
2284: END IF;
2285: raise FND_API.G_EXC_ERROR;
2278: Then
2279: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2280: THEN
2281: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_ID');
2282: FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
2283: FND_MSG_PUB.ADD;
2284: END IF;
2285: raise FND_API.G_EXC_ERROR;
2286: End if;
2451: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - NotFound');
2452:
2453: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2454: THEN
2455: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
2456: FND_MESSAGE.Set_Token ('INFO', 'IEX_AG_DN_XREF', FALSE);
2457: FND_MSG_PUB.Add;
2458: END IF;
2459: raise FND_API.G_EXC_ERROR;
2452:
2453: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2454: THEN
2455: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
2456: FND_MESSAGE.Set_Token ('INFO', 'IEX_AG_DN_XREF', FALSE);
2457: FND_MSG_PUB.Add;
2458: END IF;
2459: raise FND_API.G_EXC_ERROR;
2460: END IF;
3714:
3715: If ( C_GET_DUNNING_REC%NOTFOUND) Then
3716: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3717: THEN
3718: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
3719: FND_MESSAGE.Set_Token ('INFO', 'iex_DUNNINGs', FALSE);
3720: FND_MSG_PUB.Add;
3721: END IF;
3722: raise FND_API.G_EXC_ERROR;
3715: If ( C_GET_DUNNING_REC%NOTFOUND) Then
3716: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3717: THEN
3718: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
3719: FND_MESSAGE.Set_Token ('INFO', 'iex_DUNNINGs', FALSE);
3720: FND_MSG_PUB.Add;
3721: END IF;
3722: raise FND_API.G_EXC_ERROR;
3723: END IF;
3730: l_dunning_rec.last_update_date = FND_API.G_MISS_Date )
3731: Then
3732: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3733: THEN
3734: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_ID');
3735: FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
3736: FND_MSG_PUB.ADD;
3737: END IF;
3738: raise FND_API.G_EXC_ERROR;
3731: Then
3732: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
3733: THEN
3734: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_ID');
3735: FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
3736: FND_MSG_PUB.ADD;
3737: END IF;
3738: raise FND_API.G_EXC_ERROR;
3739: End if;
4427: Open C_Get_SCORE(l_object_id, l_object_Code, p_dunning_plan_id);
4428: Fetch C_Get_SCORE into l_score;
4429:
4430: If ( C_GET_SCORE%NOTFOUND) Then
4431: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_SCORE');
4432: FND_MSG_PUB.Add;
4433: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Missing Score');
4434: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Missing Score');
4435: Close C_Get_SCORE;
4461: , x_aging_bucket_line_id => l_bucket_line_id);
4462:
4463: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - AgingDel status='||x_return_status);
4464: If ( x_return_status <> FND_API.G_RET_STS_SUCCESS) Then
4465: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_AGINGBUCKETLINE');
4466: FND_MSG_PUB.Add;
4467: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - AgingBucketLineId notfound');
4468: FND_FILE.PUT_LINE(FND_FILE.LOG, 'AgingBucketLineId NotFound');
4469: RAISE FND_API.G_EXC_ERROR;
4487: l_callback_flag,
4488: l_callback_days;
4489:
4490: If ( C_GET_TEMPLATE%NOTFOUND) Then
4491: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
4492: --FND_MESSAGE.Set_Token ('INFO', 'Template_ID', FALSE);
4493: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_TEMPLATE');
4494: FND_MSG_PUB.Add;
4495: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Missing corresponding template');
4488: l_callback_days;
4489:
4490: If ( C_GET_TEMPLATE%NOTFOUND) Then
4491: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
4492: --FND_MESSAGE.Set_Token ('INFO', 'Template_ID', FALSE);
4493: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_TEMPLATE');
4494: FND_MSG_PUB.Add;
4495: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Missing corresponding template');
4496: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Missing corresponding template : SEND_LEVEL_DUNNING');
4489:
4490: If ( C_GET_TEMPLATE%NOTFOUND) Then
4491: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
4492: --FND_MESSAGE.Set_Token ('INFO', 'Template_ID', FALSE);
4493: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_TEMPLATE');
4494: FND_MSG_PUB.Add;
4495: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Missing corresponding template');
4496: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Missing corresponding template : SEND_LEVEL_DUNNING');
4497: RAISE FND_API.G_EXC_ERROR;
4516: open C_TEMPLATE_NAME (l_xdo_template_id);
4517: Fetch C_TEMPLATE_NAME into l_template_name;
4518: close C_TEMPLATE_NAME;
4519:
4520: FND_MESSAGE.Set_Name('IEX', 'IEX_TEMPLATE_INACTIVE');
4521: FND_MSG_PUB.Add;
4522: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Template: ''' || l_template_name || ''' is inactive');
4523: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Template: ''' || l_template_name || ''' is inactive');
4524: RAISE FND_API.G_EXC_ERROR;
4538: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - curr d_method='||l_curr_dmethod);
4539: if ( (l_curr_dmethod is null or l_curr_dmethod = '') or
4540: (l_curr_dmethod = 'FFM' and l_template_id is null) or
4541: (l_curr_dmethod = 'XML' and l_xdo_template_id is null ) ) then
4542: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_TEMPLATE');
4543: FND_MSG_PUB.Add;
4544: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Missing corresponding template');
4545: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Missing corresponding template');
4546: RAISE FND_API.G_EXC_ERROR;
4609: , p_cust_account_id => l_account_id_check
4610: , p_site_use_id => l_customer_site_use_id_check
4611: , p_delinquency_id => l_delinquency_id_check ) = 'N'
4612: ) then
4613: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_DUNNING_PROFILE_NO');
4614: FND_MSG_PUB.Add;
4615: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Send dunning in customer profile set to no ');
4616: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Send dunning in customer profile set to no ');
4617: x_return_status := FND_API.G_RET_STS_ERROR;
4639: , p_running_level=> p_running_level
4640: ) ;
4641: if l_dun_yn = 'N' then
4642: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Required min Dunning amount in customer profile ');
4643: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_DUNNING_AMOUNT_MIN');
4644: FND_MSG_PUB.Add;
4645: x_return_status := FND_API.G_RET_STS_ERROR;
4646: GOTO end_api;
4647: elsif l_dun_yn = 'E' then
4645: x_return_status := FND_API.G_RET_STS_ERROR;
4646: GOTO end_api;
4647: elsif l_dun_yn = 'E' then
4648: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - When Dunning level is Account, value of profile "IEX: Minimum Dunning Amount Profile Check" can''t be "Bill To" or "Bill To and Account". ');
4649: FND_MESSAGE.Set_Name('IEX', 'IEX_DUN_CUST_PRF_INVALID');
4650: FND_MSG_PUB.Add;
4651: x_return_status := FND_API.G_RET_STS_ERROR;
4652: GOTO end_api;
4653: end if;
4667: l_total_amount_due_remaining := l_amt_due_remaining + l_cust_acct_cm_tot_amt_rem; --(l_cust_acct_cm_tot_amt_rem is -ve value so using + sign)
4668: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - final Amount due remaining at customer level ' || l_total_amount_due_remaining);
4669:
4670: if l_total_amount_due_remaining <= 0 then
4671: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_DUNNING_AMOUNT_MIN');
4672: FND_MSG_PUB.Add;
4673: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Amount due remaining is less than 0 ');
4674: FND_FILE.PUT_LINE(FND_FILE.LOG, ' Amount due remaining is less than 0 ');
4675: x_return_status := FND_API.G_RET_STS_ERROR;
4864:
4865: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - GetCallbackDate status='|| x_return_status);
4866:
4867: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4868: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_CALLBACKDATE');
4869: FND_MSG_PUB.Add;
4870: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot find callback date');
4871: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Cannot find callback date');
4872: x_return_status := FND_API.G_RET_STS_ERROR;
5610: Open C_Get_SCORE(l_object_id, l_object_Code, p_dunning_plan_id);
5611: Fetch C_Get_SCORE into l_score;
5612:
5613: If ( C_GET_SCORE%NOTFOUND) Then
5614: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_SCORE');
5615: FND_MSG_PUB.Add;
5616: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Missing Score');
5617: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Missing Score');
5618: Close C_Get_SCORE;
5846:
5847: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - l_dunn_letters: ' || l_dunn_letters);
5848:
5849: if l_dunn_letters = 'N' then
5850: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_DUNNING_AMOUNT_MIN');
5851: FND_MSG_PUB.Add;
5852: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Required min Dunning amount in customer profile ');
5853: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Required min Dunning amount in customer profile ');
5854: x_return_status := FND_API.G_RET_STS_ERROR;
5918: open C_TEMPLATE_NAME (l_dunningplan_lines.xdo_template_id);
5919: Fetch C_TEMPLATE_NAME into l_template_name;
5920: close C_TEMPLATE_NAME;
5921:
5922: FND_MESSAGE.Set_Name('IEX', 'IEX_TEMPLATE_INACTIVE');
5923: FND_MSG_PUB.Add;
5924: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Template: ''' || l_template_name || ''' is inactive');
5925: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Template: ''' || l_template_name || ''' is inactive');
5926: RAISE FND_API.G_EXC_ERROR;
5940: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - curr d_method='||l_curr_dmethod);
5941: if ( (l_curr_dmethod is null or l_curr_dmethod = '') or
5942: (l_curr_dmethod = 'FFM' and l_template_id is null) or
5943: (l_curr_dmethod = 'XML' and l_xdo_template_id is null ) ) then
5944: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_TEMPLATE');
5945: FND_MSG_PUB.Add;
5946: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Missing corresponding template');
5947: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Missing corresponding template');
5948: RAISE FND_API.G_EXC_ERROR;
5979: , p_cust_account_id => l_account_id_check
5980: , p_site_use_id => l_customer_site_use_id_check
5981: , p_delinquency_id => l_delinquency_id_check ) = 'N'
5982: ) then
5983: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_DUNNING_PROFILE_NO');
5984: FND_MSG_PUB.Add;
5985: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Send dunning in customer profile set to no ');
5986: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Send dunning in customer profile set to no ');
5987: x_return_status := FND_API.G_RET_STS_ERROR;
6317:
6318: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - GetCallbackDate status='|| x_return_status);
6319:
6320: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6321: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_CALLBACKDATE');
6322: FND_MSG_PUB.Add;
6323: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot find callback date');
6324: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Cannot find callback date');
6325: x_return_status := FND_API.G_RET_STS_ERROR;
6349: open C_TEMPLATE_NAME (l_inv_xdo_template_id);
6350: Fetch C_TEMPLATE_NAME into l_template_name;
6351: close C_TEMPLATE_NAME;
6352:
6353: FND_MESSAGE.Set_Name('IEX', 'IEX_TEMPLATE_INACTIVE');
6354: FND_MSG_PUB.Add;
6355: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Template: ''' || l_template_name || ''' is inactive');
6356: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Template: ''' || l_template_name || ''' is inactive');
6357: RAISE FND_API.G_EXC_ERROR;
7162: open c_get_score_del (l_del_object_id, l_del_object_type);
7163: fetch c_get_score_del into l_score;
7164:
7165: If ( c_get_score_del%NOTFOUND) Then
7166: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_SCORE');
7167: FND_MSG_PUB.Add;
7168: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Score NotFound');
7169: Close c_get_score_del;
7170: x_return_status := FND_API.G_RET_STS_ERROR;
7285:
7286: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - AgingDel status='||x_return_status);
7287:
7288: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7289: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
7290: --FND_MESSAGE.Set_Token ('INFO', 'iex:AginBucketLineId', FALSE);
7291: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_AGINGBUCKETLINE');
7292: FND_MSG_PUB.Add;
7293: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot Get AgingBucketLineId');
7286: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - AgingDel status='||x_return_status);
7287:
7288: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7289: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
7290: --FND_MESSAGE.Set_Token ('INFO', 'iex:AginBucketLineId', FALSE);
7291: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_AGINGBUCKETLINE');
7292: FND_MSG_PUB.Add;
7293: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot Get AgingBucketLineId');
7294: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Cannot AgingBucketLineId' );
7287:
7288: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7289: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
7290: --FND_MESSAGE.Set_Token ('INFO', 'iex:AginBucketLineId', FALSE);
7291: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_AGINGBUCKETLINE');
7292: FND_MSG_PUB.Add;
7293: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot Get AgingBucketLineId');
7294: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Cannot AgingBucketLineId' );
7295: --msg
7325: l_callback_days,
7326: l_bucket;
7327:
7328: If ( C_GET_TEMPLATE%NOTFOUND) Then
7329: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_TEMPLATE');
7330: FND_MSG_PUB.Add;
7331: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Missing corresponding template');
7332: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Missing corresponding template' );
7333: Close C_Get_TEMPLATE;
7354: open C_TEMPLATE_NAME (l_xdo_template_id);
7355: Fetch C_TEMPLATE_NAME into l_template_name;
7356: close C_TEMPLATE_NAME;
7357:
7358: FND_MESSAGE.Set_Name('IEX', 'IEX_TEMPLATE_INACTIVE');
7359: FND_MSG_PUB.Add;
7360: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Template: ''' || l_template_name || ''' is inactive');
7361: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Template: ''' || l_template_name || ''' is inactive');
7362: RAISE FND_API.G_EXC_ERROR;
7376: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - curr d_method='||l_curr_dmethod);
7377: if ( (l_curr_dmethod is null or l_curr_dmethod = '') or
7378: (l_curr_dmethod = 'FFM' and l_template_id is null) or
7379: (l_curr_dmethod = 'XML' and l_xdo_template_id is null ) ) then
7380: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
7381: --FND_MESSAGE.Set_Token ('INFO', 'Template_ID', FALSE);
7382: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_TEMPLATE');
7383: FND_MSG_PUB.Add;
7384: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Missing corresponding template');
7377: if ( (l_curr_dmethod is null or l_curr_dmethod = '') or
7378: (l_curr_dmethod = 'FFM' and l_template_id is null) or
7379: (l_curr_dmethod = 'XML' and l_xdo_template_id is null ) ) then
7380: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
7381: --FND_MESSAGE.Set_Token ('INFO', 'Template_ID', FALSE);
7382: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_TEMPLATE');
7383: FND_MSG_PUB.Add;
7384: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Missing corresponding template');
7385: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Missing corresponding template' );
7378: (l_curr_dmethod = 'FFM' and l_template_id is null) or
7379: (l_curr_dmethod = 'XML' and l_xdo_template_id is null ) ) then
7380: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
7381: --FND_MESSAGE.Set_Token ('INFO', 'Template_ID', FALSE);
7382: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_TEMPLATE');
7383: FND_MSG_PUB.Add;
7384: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Missing corresponding template');
7385: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Missing corresponding template' );
7386: x_return_status := FND_API.G_RET_STS_ERROR;
7418: , p_cust_account_id => l_account_id
7419: , p_site_use_id => l_customer_site_use_id
7420: , p_delinquency_id => l_delinquency_id ) = 'N'
7421: ) then
7422: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_DUNNING_PROFILE_NO');
7423: FND_MSG_PUB.Add;
7424: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Send dunning in customer profile set to no ');
7425: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Send dunning in customer profile set to no ');
7426: GOTO end_loop;
7430: p_cust_account_id => l_account_id
7431: , p_site_use_id => l_customer_site_use_id
7432: , p_org_id => l_org_id) = 'N' --Added for Bug 10401991 20-Jan-2011 barathsr
7433: ) then
7434: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_DUNNING_AMOUNT_MIN');*/
7435:
7436:
7437: -- Open c_billto (l_customer_site_use_id ,l_org_id); -- bug 14797201
7438: -- fetch c_billto into l_min_currency_code, l_min_dunning_invoice_amount; -- bug 14797201
7443: Open C_AMOUNT(l_delinquency_id);
7444: Fetch C_AMOUNT into l_amount, l_curr_code;
7445:
7446: If ( C_AMOUNT%NOTFOUND) Then
7447: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
7448: FND_MESSAGE.Set_Token ('INFO', 'iex:amount', FALSE);
7449: FND_MSG_PUB.Add;
7450: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - amount notfound');
7451: END IF;
7444: Fetch C_AMOUNT into l_amount, l_curr_code;
7445:
7446: If ( C_AMOUNT%NOTFOUND) Then
7447: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
7448: FND_MESSAGE.Set_Token ('INFO', 'iex:amount', FALSE);
7449: FND_MSG_PUB.Add;
7450: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - amount notfound');
7451: END IF;
7452: close C_AMOUNT;
7522: , p_running_level => l_running_level
7523: );
7524: IF l_dun_yn = 'N' then
7525: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Required min Dunning amount in customer profile ');
7526: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_DUNNING_AMOUNT_MIN');
7527: FND_MSG_PUB.Add;
7528: GOTO end_loop;
7529: ELSIF l_dun_yn = 'E' then
7530: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - When Dunning level is Account, value of profile "IEX: Minimum Dunning Amount Profile Check" can''t be "Bill To" or "Bill To and Account". ');
7527: FND_MSG_PUB.Add;
7528: GOTO end_loop;
7529: ELSIF l_dun_yn = 'E' then
7530: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - When Dunning level is Account, value of profile "IEX: Minimum Dunning Amount Profile Check" can''t be "Bill To" or "Bill To and Account". ');
7531: FND_MESSAGE.Set_Name('IEX', 'IEX_DUN_CUST_PRF_INVALID');
7532: FND_MSG_PUB.Add;
7533: GOTO end_loop;
7534: END IF;
7535: -- end code for bug 15933013
7620: l_amount,
7621: l_curr_code;
7622:
7623: If ( C_AMOUNT%NOTFOUND) Then
7624: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
7625: FND_MESSAGE.Set_Token ('INFO', 'iex:amount', FALSE);
7626: FND_MSG_PUB.Add;
7627: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - amount notfound');
7628: END IF;
7621: l_curr_code;
7622:
7623: If ( C_AMOUNT%NOTFOUND) Then
7624: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
7625: FND_MESSAGE.Set_Token ('INFO', 'iex:amount', FALSE);
7626: FND_MSG_PUB.Add;
7627: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - amount notfound');
7628: END IF;
7629:
8372: open c_get_score_del (l_del_object_id, l_del_object_type);
8373: fetch c_get_score_del into l_score;
8374:
8375: If ( c_get_score_del%NOTFOUND) Then
8376: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_SCORE');
8377: FND_MSG_PUB.Add;
8378: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Score NotFound');
8379: Close c_get_score_del;
8380: x_return_status := FND_API.G_RET_STS_ERROR;
8489:
8490: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - l_dunn_letters: ' || l_dunn_letters);
8491:
8492: if l_dunn_letters = 'N' then
8493: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_DUNNING_AMOUNT_MIN');
8494: FND_MSG_PUB.Add;
8495: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Required min Dunning amount in customer profile ');
8496: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Required min Dunning amount in customer profile ');
8497: x_return_status := FND_API.G_RET_STS_ERROR;
8539: open C_TEMPLATE_NAME (l_dunningplan_lines.xdo_template_id);
8540: Fetch C_TEMPLATE_NAME into l_template_name;
8541: close C_TEMPLATE_NAME;
8542:
8543: FND_MESSAGE.Set_Name('IEX', 'IEX_TEMPLATE_INACTIVE');
8544: FND_MSG_PUB.Add;
8545: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Template: ''' || l_template_name || ''' is inactive');
8546: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Template: ''' || l_template_name || ''' is inactive');
8547: RAISE FND_API.G_EXC_ERROR;
8614: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - curr d_method='||l_curr_dmethod);
8615: if ( (l_curr_dmethod is null or l_curr_dmethod = '') or
8616: (l_curr_dmethod = 'FFM' and l_template_id is null) or
8617: (l_curr_dmethod = 'XML' and l_xdo_template_id is null ) ) then
8618: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
8619: --FND_MESSAGE.Set_Token ('INFO', 'Template_ID', FALSE);
8620: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_TEMPLATE');
8621: FND_MSG_PUB.Add;
8622: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Missing corresponding template');
8615: if ( (l_curr_dmethod is null or l_curr_dmethod = '') or
8616: (l_curr_dmethod = 'FFM' and l_template_id is null) or
8617: (l_curr_dmethod = 'XML' and l_xdo_template_id is null ) ) then
8618: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
8619: --FND_MESSAGE.Set_Token ('INFO', 'Template_ID', FALSE);
8620: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_TEMPLATE');
8621: FND_MSG_PUB.Add;
8622: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Missing corresponding template');
8623: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Missing corresponding template' );
8616: (l_curr_dmethod = 'FFM' and l_template_id is null) or
8617: (l_curr_dmethod = 'XML' and l_xdo_template_id is null ) ) then
8618: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
8619: --FND_MESSAGE.Set_Token ('INFO', 'Template_ID', FALSE);
8620: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_TEMPLATE');
8621: FND_MSG_PUB.Add;
8622: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Missing corresponding template');
8623: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Missing corresponding template' );
8624: x_return_status := FND_API.G_RET_STS_ERROR;
8636: , p_cust_account_id => l_account_id
8637: , p_site_use_id => l_customer_site_use_id
8638: , p_delinquency_id => l_delinquency_id ) = 'N'
8639: ) then
8640: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_DUNNING_PROFILE_NO');
8641: FND_MSG_PUB.Add;
8642: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Send dunning in customer profile set to no ');
8643: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Send dunning in customer profile set to no ');
8644: goto c_dunning_plan_lines; -- GOTO end_loop; -- bug 14797201
8720: l_amount,
8721: l_curr_code;
8722:
8723: If ( C_AMOUNT%NOTFOUND) Then
8724: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
8725: FND_MESSAGE.Set_Token ('INFO', 'iex:amount', FALSE);
8726: FND_MSG_PUB.Add;
8727: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - amount notfound');
8728: END IF;
8721: l_curr_code;
8722:
8723: If ( C_AMOUNT%NOTFOUND) Then
8724: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
8725: FND_MESSAGE.Set_Token ('INFO', 'iex:amount', FALSE);
8726: FND_MSG_PUB.Add;
8727: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - amount notfound');
8728: END IF;
8729:
8753: open C_TEMPLATE_NAME (l_inv_xdo_template_id);
8754: Fetch C_TEMPLATE_NAME into l_template_name;
8755: close C_TEMPLATE_NAME;
8756:
8757: FND_MESSAGE.Set_Name('IEX', 'IEX_TEMPLATE_INACTIVE');
8758: FND_MSG_PUB.Add;
8759: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Template: ''' || l_template_name || ''' is inactive');
8760: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Template: ''' || l_template_name || ''' is inactive');
8761: RAISE FND_API.G_EXC_ERROR;
9448: Open C_Get_SCORE(l_object_id, l_object_Code, p_dunning_plan_id);
9449: Fetch C_Get_SCORE into l_score;
9450:
9451: If ( C_GET_SCORE%NOTFOUND) Then
9452: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
9453: --FND_MESSAGE.Set_Token ('INFO', 'Score', FALSE);
9454: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_SCORE');
9455: FND_MSG_PUB.Add;
9456: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Score NotFound');
9449: Fetch C_Get_SCORE into l_score;
9450:
9451: If ( C_GET_SCORE%NOTFOUND) Then
9452: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
9453: --FND_MESSAGE.Set_Token ('INFO', 'Score', FALSE);
9454: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_SCORE');
9455: FND_MSG_PUB.Add;
9456: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Score NotFound');
9457: Close C_Get_SCORE;
9450:
9451: If ( C_GET_SCORE%NOTFOUND) Then
9452: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
9453: --FND_MESSAGE.Set_Token ('INFO', 'Score', FALSE);
9454: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_SCORE');
9455: FND_MSG_PUB.Add;
9456: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Score NotFound');
9457: Close C_Get_SCORE;
9458: x_return_status := FND_API.G_RET_STS_ERROR;
9487:
9488: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - AgingDel status='||x_return_status);
9489:
9490: If ( x_return_status <> FND_API.G_RET_STS_SUCCESS) Then
9491: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
9492: --FND_MESSAGE.Set_Token ('INFO', 'AgingBucketLineId', FALSE);
9493: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_AGINGBUCKETLINE');
9494: FND_MSG_PUB.Add;
9495: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - AgingBucketLineId notfound');
9488: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - AgingDel status='||x_return_status);
9489:
9490: If ( x_return_status <> FND_API.G_RET_STS_SUCCESS) Then
9491: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
9492: --FND_MESSAGE.Set_Token ('INFO', 'AgingBucketLineId', FALSE);
9493: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_AGINGBUCKETLINE');
9494: FND_MSG_PUB.Add;
9495: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - AgingBucketLineId notfound');
9496: x_return_status := FND_API.G_RET_STS_ERROR;
9489:
9490: If ( x_return_status <> FND_API.G_RET_STS_SUCCESS) Then
9491: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
9492: --FND_MESSAGE.Set_Token ('INFO', 'AgingBucketLineId', FALSE);
9493: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_AGINGBUCKETLINE');
9494: FND_MSG_PUB.Add;
9495: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - AgingBucketLineId notfound');
9496: x_return_status := FND_API.G_RET_STS_ERROR;
9497: GOTO end_api;
9514: l_callback_flag,
9515: l_callback_days;
9516:
9517: If ( C_GET_TEMPLATE%NOTFOUND) Then
9518: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_TEMPLATE');
9519: FND_MSG_PUB.Add;
9520: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - template notfound');
9521: x_return_status := FND_API.G_RET_STS_ERROR;
9522: GOTO end_api;
9540: open C_TEMPLATE_NAME (l_xdo_template_id);
9541: Fetch C_TEMPLATE_NAME into l_template_name;
9542: close C_TEMPLATE_NAME;
9543:
9544: FND_MESSAGE.Set_Name('IEX', 'IEX_TEMPLATE_INACTIVE');
9545: FND_MSG_PUB.Add;
9546: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Template: ''' || l_template_name || ''' is inactive');
9547: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Template: ''' || l_template_name || ''' is inactive');
9548: RAISE FND_API.G_EXC_ERROR;
9562: WriteLog('iexvdunb:ResendLevelDunn:curr d_method='||l_curr_dmethod);
9563: if ( (l_curr_dmethod is null or l_curr_dmethod = '') or
9564: (l_curr_dmethod = 'FFM' and l_template_id is null) or
9565: (l_curr_dmethod = 'XML' and l_xdo_template_id is null ) ) then
9566: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
9567: --FND_MESSAGE.Set_Token ('INFO', 'Template_ID', FALSE);
9568: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_TEMPLATE');
9569: FND_MSG_PUB.Add;
9570: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Template notfound');
9563: if ( (l_curr_dmethod is null or l_curr_dmethod = '') or
9564: (l_curr_dmethod = 'FFM' and l_template_id is null) or
9565: (l_curr_dmethod = 'XML' and l_xdo_template_id is null ) ) then
9566: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
9567: --FND_MESSAGE.Set_Token ('INFO', 'Template_ID', FALSE);
9568: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_TEMPLATE');
9569: FND_MSG_PUB.Add;
9570: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Template notfound');
9571: x_return_status := FND_API.G_RET_STS_ERROR;
9564: (l_curr_dmethod = 'FFM' and l_template_id is null) or
9565: (l_curr_dmethod = 'XML' and l_xdo_template_id is null ) ) then
9566: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
9567: --FND_MESSAGE.Set_Token ('INFO', 'Template_ID', FALSE);
9568: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_TEMPLATE');
9569: FND_MSG_PUB.Add;
9570: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Template notfound');
9571: x_return_status := FND_API.G_RET_STS_ERROR;
9572: GOTO end_api;
9633: , p_cust_account_id => l_account_id_check
9634: , p_site_use_id => l_customer_site_use_id_check
9635: , p_delinquency_id => l_delinquency_id_check ) = 'N'
9636: ) then
9637: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_DUNNING_PROFILE_NO');
9638: FND_MSG_PUB.Add;
9639: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Send dunning in customer profile set to no ');
9640: x_return_status := FND_API.G_RET_STS_ERROR;
9641: GOTO end_api;
9661: , p_correspondence_date => l_as_of_date
9662: , p_running_level=> p_running_level
9663: ) <> 'Y'
9664: ) then -- end bug 15933013
9665: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_DUNNING_AMOUNT_MIN');
9666: FND_MSG_PUB.Add;
9667: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Required min Dunning amount in customer profile ');
9668: x_return_status := FND_API.G_RET_STS_ERROR;
9669: GOTO end_api;
9684: l_total_amount_due_remaining := l_amt_due_remaining + l_cust_acct_cm_tot_amt_rem; --(l_cust_acct_cm_tot_amt_rem is -ve value so using + sign)
9685: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - final Amount due remaining at customer level ' || l_total_amount_due_remaining);
9686:
9687: if l_total_amount_due_remaining <= 0 then
9688: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_DUNNING_AMOUNT_MIN');
9689: FND_MSG_PUB.Add;
9690: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Amount due remaining is less than 0 ');
9691: FND_FILE.PUT_LINE(FND_FILE.LOG, ' Amount due remaining is less than 0 ');
9692: x_return_status := FND_API.G_RET_STS_ERROR;
10027:
10028: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - GetCallbackDate status='|| x_return_status, l_write);
10029:
10030: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10031: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_CALLBACKDATE');
10032: FND_MSG_PUB.Add;
10033: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Not Get CallbackDate', l_write);
10034: x_return_status := FND_API.G_RET_STS_ERROR;
10035: GOTO end_api;
10468: open C_TEMPLATE_NAME (l_xdo_template_id);
10469: Fetch C_TEMPLATE_NAME into l_template_name;
10470: close C_TEMPLATE_NAME;
10471:
10472: FND_MESSAGE.Set_Name('IEX', 'IEX_TEMPLATE_INACTIVE');
10473: FND_MSG_PUB.Add;
10474: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Template: ''' || l_template_name || ''' is inactive');
10475: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Template: ''' || l_template_name || ''' is inactive');
10476: RAISE FND_API.G_EXC_ERROR;
10488: open C_TEMPLATE_NAME (l_inv_xdo_template_id);
10489: Fetch C_TEMPLATE_NAME into l_template_name;
10490: close C_TEMPLATE_NAME;
10491:
10492: FND_MESSAGE.Set_Name('IEX', 'IEX_TEMPLATE_INACTIVE');
10493: FND_MSG_PUB.Add;
10494: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Addt Template: ''' || l_template_name || ''' is inactive');
10495: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Addt Template: ''' || l_template_name || ''' is inactive');
10496: RAISE FND_API.G_EXC_ERROR;
10584: Open C_Get_SCORE(l_object_id, l_object_Code, p_dunning_plan_id);
10585: Fetch C_Get_SCORE into l_score;
10586:
10587: If ( C_GET_SCORE%NOTFOUND) Then
10588: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
10589: --FND_MESSAGE.Set_Token ('INFO', 'Score', FALSE);
10590: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_SCORE');
10591: FND_MSG_PUB.Add;
10592: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Score NotFound');
10585: Fetch C_Get_SCORE into l_score;
10586:
10587: If ( C_GET_SCORE%NOTFOUND) Then
10588: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
10589: --FND_MESSAGE.Set_Token ('INFO', 'Score', FALSE);
10590: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_SCORE');
10591: FND_MSG_PUB.Add;
10592: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Score NotFound');
10593: Close C_Get_SCORE;
10586:
10587: If ( C_GET_SCORE%NOTFOUND) Then
10588: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
10589: --FND_MESSAGE.Set_Token ('INFO', 'Score', FALSE);
10590: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_SCORE');
10591: FND_MSG_PUB.Add;
10592: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Score NotFound');
10593: Close C_Get_SCORE;
10594: x_return_status := FND_API.G_RET_STS_ERROR;
10624:
10625: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - AgingDel status='||x_return_status);
10626:
10627: If ( x_return_status <> FND_API.G_RET_STS_SUCCESS) Then
10628: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
10629: --FND_MESSAGE.Set_Token ('INFO', 'AgingBucketLineId', FALSE);
10630: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_AGINGBUCKETLINE');
10631: FND_MSG_PUB.Add;
10632: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - AgingBucketLineId notfound');
10625: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - AgingDel status='||x_return_status);
10626:
10627: If ( x_return_status <> FND_API.G_RET_STS_SUCCESS) Then
10628: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
10629: --FND_MESSAGE.Set_Token ('INFO', 'AgingBucketLineId', FALSE);
10630: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_AGINGBUCKETLINE');
10631: FND_MSG_PUB.Add;
10632: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - AgingBucketLineId notfound');
10633: x_return_status := FND_API.G_RET_STS_ERROR;
10626:
10627: If ( x_return_status <> FND_API.G_RET_STS_SUCCESS) Then
10628: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
10629: --FND_MESSAGE.Set_Token ('INFO', 'AgingBucketLineId', FALSE);
10630: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_AGINGBUCKETLINE');
10631: FND_MSG_PUB.Add;
10632: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - AgingBucketLineId notfound');
10633: x_return_status := FND_API.G_RET_STS_ERROR;
10634: GOTO end_api;
10650: l_callback_flag,
10651: l_callback_days;
10652:
10653: If ( C_GET_TEMPLATE%NOTFOUND) Then
10654: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_TEMPLATE');
10655: FND_MSG_PUB.Add;
10656: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - template notfound');
10657: x_return_status := FND_API.G_RET_STS_ERROR;
10658: GOTO end_api;
10675: WriteLog('iexvdunb:ResendLevelDunn:curr d_method='||l_curr_dmethod);
10676: if ( (l_curr_dmethod is null or l_curr_dmethod = '') or
10677: (l_curr_dmethod = 'FFM' and l_template_id is null) or
10678: (l_curr_dmethod = 'XML' and l_xdo_template_id is null ) ) then
10679: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
10680: --FND_MESSAGE.Set_Token ('INFO', 'Template_ID', FALSE);
10681: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_TEMPLATE');
10682: FND_MSG_PUB.Add;
10683: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Template notfound');
10676: if ( (l_curr_dmethod is null or l_curr_dmethod = '') or
10677: (l_curr_dmethod = 'FFM' and l_template_id is null) or
10678: (l_curr_dmethod = 'XML' and l_xdo_template_id is null ) ) then
10679: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
10680: --FND_MESSAGE.Set_Token ('INFO', 'Template_ID', FALSE);
10681: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_TEMPLATE');
10682: FND_MSG_PUB.Add;
10683: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Template notfound');
10684: x_return_status := FND_API.G_RET_STS_ERROR;
10677: (l_curr_dmethod = 'FFM' and l_template_id is null) or
10678: (l_curr_dmethod = 'XML' and l_xdo_template_id is null ) ) then
10679: --FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
10680: --FND_MESSAGE.Set_Token ('INFO', 'Template_ID', FALSE);
10681: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_TEMPLATE');
10682: FND_MSG_PUB.Add;
10683: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Template notfound');
10684: x_return_status := FND_API.G_RET_STS_ERROR;
10685: GOTO end_api;
10720: , p_cust_account_id => l_account_id_check
10721: , p_site_use_id => l_customer_site_use_id_check
10722: , p_delinquency_id => l_delinquency_id_check ) = 'N'
10723: ) then
10724: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_DUNNING_PROFILE_NO');
10725: FND_MSG_PUB.Add;
10726: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Send dunning in customer profile set to no ');
10727: x_return_status := FND_API.G_RET_STS_ERROR;
10728: GOTO end_api;
10733: if ( iex_utilities.DunningMinAmountCheck (
10734: p_cust_account_id => l_account_id_check
10735: , p_site_use_id => l_customer_site_use_id_check) = 'N'
10736: ) then
10737: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_DUNNING_AMOUNT_MIN');
10738: FND_MSG_PUB.Add;
10739: WriteLog('iexvdunb:ResendLevelDunn: Required min Dunning amount in customer profile ');
10740: x_return_status := FND_API.G_RET_STS_ERROR;
10741: GOTO end_api;
10988:
10989: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - GetCallbackDate status='|| x_return_status, l_write);
10990:
10991: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10992: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_CALLBACKDATE');
10993: FND_MSG_PUB.Add;
10994: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Not Get CallbackDate', l_write);
10995: x_return_status := FND_API.G_RET_STS_ERROR;
10996: GOTO end_api;
11418:
11419: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - AgingDel status='||x_return_status);
11420:
11421: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11422: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_AGINGBUCKETLINE');
11423: FND_MSG_PUB.Add;
11424: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot Get AgingBucketLineId');
11425: GOTO end_loop;
11426: END IF;
11444: l_callback_days,
11445: l_bucket;
11446:
11447: If ( C_GET_TEMPLATE%NOTFOUND) Then
11448: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_TEMPLATE');
11449: FND_MSG_PUB.Add;
11450: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - template notfound');
11451: Close C_Get_TEMPLATE;
11452: GOTO end_loop;
11472: open C_TEMPLATE_NAME (l_xdo_template_id);
11473: Fetch C_TEMPLATE_NAME into l_template_name;
11474: close C_TEMPLATE_NAME;
11475:
11476: FND_MESSAGE.Set_Name('IEX', 'IEX_TEMPLATE_INACTIVE');
11477: FND_MSG_PUB.Add;
11478: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Template: ''' || l_template_name || ''' is inactive');
11479: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Template: ''' || l_template_name || ''' is inactive');
11480: RAISE FND_API.G_EXC_ERROR;
11494: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - curr d_method='||l_curr_dmethod);
11495: if ( (l_curr_dmethod is null or l_curr_dmethod = '') or
11496: (l_curr_dmethod = 'FFM' and l_template_id is null) or
11497: (l_curr_dmethod = 'XML' and l_xdo_template_id is null ) ) then
11498: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_TEMPLATE');
11499: FND_MSG_PUB.Add;
11500: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Template notfound');
11501: x_return_status := FND_API.G_RET_STS_ERROR;
11502: GOTO end_loop;
11543: , p_cust_account_id => l_account_id
11544: , p_site_use_id => l_customer_site_use_id
11545: , p_delinquency_id => l_delinquency_id ) = 'N'
11546: ) then
11547: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_DUNNING_PROFILE_NO');
11548: FND_MSG_PUB.Add;
11549: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Send dunning in customer profile set to no ');
11550: GOTO end_loop;
11551: end if;
11567: , p_grace_days => l_grace_days
11568: , p_dun_disputed_items => l_dun_disputed_items
11569: , p_running_level => l_running_level) <> 'Y'
11570: ) then --end bug 15933013
11571: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_DUNNING_AMOUNT_MIN');
11572: FND_MSG_PUB.Add;
11573: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Required min Dunning amount in customer profile ');
11574: GOTO end_loop;
11575: end if;
11775: l_amount,
11776: l_curr_code;
11777:
11778: If ( C_AMOUNT%NOTFOUND) Then
11779: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
11780: FND_MESSAGE.Set_Token ('INFO', 'amount', FALSE);
11781: FND_MSG_PUB.Add;
11782: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - amount notfound');
11783: END IF;
11776: l_curr_code;
11777:
11778: If ( C_AMOUNT%NOTFOUND) Then
11779: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
11780: FND_MESSAGE.Set_Token ('INFO', 'amount', FALSE);
11781: FND_MSG_PUB.Add;
11782: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - amount notfound');
11783: END IF;
11784:
12237:
12238: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - AgingDel status='||x_return_status);
12239:
12240: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
12241: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_AGINGBUCKETLINE');
12242: FND_MSG_PUB.Add;
12243: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Cannot Get AgingBucketLineId');
12244: GOTO end_loop;
12245: END IF;
12262: l_callback_days,
12263: l_bucket;
12264:
12265: If ( C_GET_TEMPLATE%NOTFOUND) Then
12266: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_TEMPLATE');
12267: FND_MSG_PUB.Add;
12268: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - template notfound');
12269: Close C_Get_TEMPLATE;
12270: GOTO end_loop;
12290: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - curr d_method='||l_curr_dmethod);
12291: if ( (l_curr_dmethod is null or l_curr_dmethod = '') or
12292: (l_curr_dmethod = 'FFM' and l_template_id is null) or
12293: (l_curr_dmethod = 'XML' and l_xdo_template_id is null ) ) then
12294: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_TEMPLATE');
12295: FND_MSG_PUB.Add;
12296: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Template notfound');
12297: x_return_status := FND_API.G_RET_STS_ERROR;
12298: GOTO end_loop;
12311: open C_TEMPLATE_NAME (l_xdo_template_id);
12312: Fetch C_TEMPLATE_NAME into l_template_name;
12313: close C_TEMPLATE_NAME;
12314:
12315: FND_MESSAGE.Set_Name('IEX', 'IEX_TEMPLATE_INACTIVE');
12316: FND_MSG_PUB.Add;
12317: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Template: ''' || l_template_name || ''' is inactive');
12318: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Template: ''' || l_template_name || ''' is inactive');
12319: RAISE FND_API.G_EXC_ERROR;
12331: open C_TEMPLATE_NAME (l_inv_xdo_template_id);
12332: Fetch C_TEMPLATE_NAME into l_template_name;
12333: close C_TEMPLATE_NAME;
12334:
12335: FND_MESSAGE.Set_Name('IEX', 'IEX_TEMPLATE_INACTIVE');
12336: FND_MSG_PUB.Add;
12337: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Template: ''' || l_template_name || ''' is inactive');
12338: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Template: ''' || l_template_name || ''' is inactive');
12339: RAISE FND_API.G_EXC_ERROR;
12359: , p_cust_account_id => l_account_id
12360: , p_site_use_id => l_customer_site_use_id
12361: , p_delinquency_id => l_delinquency_id ) = 'N'
12362: ) then
12363: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_DUNNING_PROFILE_NO');
12364: FND_MSG_PUB.Add;
12365: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Send dunning in customer profile set to no ');
12366: GOTO end_loop;
12367: end if;
12371: if ( iex_utilities.DunningMinAmountCheck (
12372: p_cust_account_id => l_account_id
12373: , p_site_use_id => l_customer_site_use_id) = 'N'
12374: ) then
12375: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_DUNNING_AMOUNT_MIN');
12376: FND_MSG_PUB.Add;
12377: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Required min Dunning amount in customer profile ');
12378: GOTO end_loop;
12379: end if;
12586: l_amount,
12587: l_curr_code;
12588:
12589: If ( C_AMOUNT%NOTFOUND) Then
12590: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
12591: FND_MESSAGE.Set_Token ('INFO', 'amount', FALSE);
12592: FND_MSG_PUB.Add;
12593: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - amount notfound');
12594: END IF;
12587: l_curr_code;
12588:
12589: If ( C_AMOUNT%NOTFOUND) Then
12590: FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
12591: FND_MESSAGE.Set_Token ('INFO', 'amount', FALSE);
12592: FND_MSG_PUB.Add;
12593: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - amount notfound');
12594: END IF;
12595:
12871: Open C_Get_PARTY_DAYS(p_object_id);
12872: Fetch C_Get_PARTY_DAYS into l_days;
12873: If ( C_GET_PARTY_DAYS%NOTFOUND) Then
12874: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - PaymentSchedId NotFound');
12875: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_PAYMENTSCHEDULE');
12876: FND_MSG_PUB.Add;
12877: l_return_status := FND_API.G_RET_STS_ERROR;
12878: Close C_Get_PARTY_DAYS;
12879: GOTO end_get_line;
12884: Open C_Get_ACCT_DAYS(p_object_id);
12885: Fetch C_Get_ACCT_DAYS into l_days;
12886: If ( C_GET_ACCT_DAYS%NOTFOUND) Then
12887: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - PaymentSchedId NotFound');
12888: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_PAYMENTSCHEDULE');
12889: FND_MSG_PUB.Add;
12890: l_return_status := FND_API.G_RET_STS_ERROR;
12891: Close C_Get_ACCT_DAYS;
12892: GOTO end_get_line;
12897: Open C_Get_SITE_DAYS(p_object_id);
12898: Fetch C_Get_SITE_DAYS into l_days;
12899: If ( C_GET_SITE_DAYS%NOTFOUND) Then
12900: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - PaymentSchedId NotFound');
12901: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_PAYMENTSCHEDULE');
12902: FND_MSG_PUB.Add;
12903: l_return_status := FND_API.G_RET_STS_ERROR;
12904: Close C_Get_SITE_DAYS;
12905: GOTO end_get_line;
12914: Open C_Get_DAYS(p_delinquency_id);
12915: Fetch C_Get_DAYS into l_days;
12916: If ( C_GET_DAYS%NOTFOUND) Then
12917: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - PaymentSchedId NotFound');
12918: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_PAYMENTSCHEDULE');
12919: FND_MSG_PUB.Add;
12920: l_return_status := FND_API.G_RET_STS_ERROR;
12921: Close C_Get_DAYS;
12922: GOTO end_get_line;
12930: Open C_Get_BUCKET_LINE(l_days, p_dunning_plan_id);
12931: Fetch C_Get_BUCKET_LINE into l_bucket_line_id;
12932: If ( C_GET_BUCKET_LINE%NOTFOUND) Then
12933: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - BucketLine NotFound');
12934: FND_MESSAGE.Set_Name('IEX', 'IEX_NO_BUCKET_LINE');
12935: FND_MSG_PUB.Add;
12936: l_return_status := FND_API.G_RET_STS_ERROR;
12937: Close C_Get_BUCKET_LINE;
12938: GOTO end_get_line;
13090:
13091: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - start');
13092: if (p_template_id is null) then
13093: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No TEMPLATE_ID');
13094: FND_MESSAGE.Set_Name('IEX', 'API_FAIL_SEND_FFM');
13095: FND_MESSAGE.Set_Token ('INFO', 'No Template_ID');
13096: FND_MSG_PUB.Add;
13097: l_return_status := FND_API.G_RET_STS_ERROR;
13098: GOTO end_call_ffm;
13091: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - start');
13092: if (p_template_id is null) then
13093: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No TEMPLATE_ID');
13094: FND_MESSAGE.Set_Name('IEX', 'API_FAIL_SEND_FFM');
13095: FND_MESSAGE.Set_Token ('INFO', 'No Template_ID');
13096: FND_MSG_PUB.Add;
13097: l_return_status := FND_API.G_RET_STS_ERROR;
13098: GOTO end_call_ffm;
13099: end if;
13098: GOTO end_call_ffm;
13099: end if;
13100: if (p_party_id is null) then
13101: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No PARTY_ID');
13102: FND_MESSAGE.Set_Name('IEX', 'API_FAIL_SEND_FFM');
13103: FND_MESSAGE.Set_Token ('INFO', 'No Party_Id');
13104: FND_MSG_PUB.Add;
13105: l_return_status := FND_API.G_RET_STS_ERROR;
13106: GOTO end_call_ffm;
13099: end if;
13100: if (p_party_id is null) then
13101: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No PARTY_ID');
13102: FND_MESSAGE.Set_Name('IEX', 'API_FAIL_SEND_FFM');
13103: FND_MESSAGE.Set_Token ('INFO', 'No Party_Id');
13104: FND_MSG_PUB.Add;
13105: l_return_status := FND_API.G_RET_STS_ERROR;
13106: GOTO end_call_ffm;
13107: end if;
13106: GOTO end_call_ffm;
13107: end if;
13108: if (p_method is null) then
13109: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No METHOD');
13110: FND_MESSAGE.Set_Name('IEX', 'API_FAIL_SEND_FFM');
13111: FND_MESSAGE.Set_Token ('INFO', 'No Method');
13112: FND_MSG_PUB.Add;
13113: l_return_status := FND_API.G_RET_STS_ERROR;
13114: GOTO end_call_ffm;
13107: end if;
13108: if (p_method is null) then
13109: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No METHOD');
13110: FND_MESSAGE.Set_Name('IEX', 'API_FAIL_SEND_FFM');
13111: FND_MESSAGE.Set_Token ('INFO', 'No Method');
13112: FND_MSG_PUB.Add;
13113: l_return_status := FND_API.G_RET_STS_ERROR;
13114: GOTO end_call_ffm;
13115: end if;
13133: Open C_Get_ORG_EMAIL(p_party_id);
13134: Fetch C_Get_ORG_EMAIL into l_email;
13135: If ( C_GET_ORG_EMAIL%NOTFOUND) Then
13136: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Customer NotFound');
13137: FND_MESSAGE.Set_Name('IEX', 'API_FAIL_SEND_FFM');
13138: FND_MESSAGE.Set_Token ('INFO', 'Customer NotFound');
13139: FND_MSG_PUB.Add;
13140: l_return_status := FND_API.G_RET_STS_ERROR;
13141: Close C_Get_ORG_EMAIL;
13134: Fetch C_Get_ORG_EMAIL into l_email;
13135: If ( C_GET_ORG_EMAIL%NOTFOUND) Then
13136: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Customer NotFound');
13137: FND_MESSAGE.Set_Name('IEX', 'API_FAIL_SEND_FFM');
13138: FND_MESSAGE.Set_Token ('INFO', 'Customer NotFound');
13139: FND_MSG_PUB.Add;
13140: l_return_status := FND_API.G_RET_STS_ERROR;
13141: Close C_Get_ORG_EMAIL;
13142: Close C_Get_CONTACT_EMAIL;
13144: end if;
13145: --
13146: If ( l_email is null ) Then
13147: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No Email');
13148: FND_MESSAGE.Set_Name('IEX', 'API_FAIL_SEND_FFM');
13149: FND_MESSAGE.Set_Token ('INFO', 'No Email_Address');
13150: FND_MSG_PUB.Add;
13151: l_return_status := FND_API.G_RET_STS_ERROR;
13152: Close C_Get_ORG_EMAIL;
13145: --
13146: If ( l_email is null ) Then
13147: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No Email');
13148: FND_MESSAGE.Set_Name('IEX', 'API_FAIL_SEND_FFM');
13149: FND_MESSAGE.Set_Token ('INFO', 'No Email_Address');
13150: FND_MSG_PUB.Add;
13151: l_return_status := FND_API.G_RET_STS_ERROR;
13152: Close C_Get_ORG_EMAIL;
13153: Close C_Get_CONTACT_EMAIL;
13158: end if;
13159:
13160: If ( l_email is null ) Then
13161: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No Email');
13162: FND_MESSAGE.Set_Name('IEX', 'API_FAIL_SEND_FFM');
13163: FND_MESSAGE.Set_Token ('INFO', 'No Email_Address');
13164: FND_MSG_PUB.Add;
13165: l_return_status := FND_API.G_RET_STS_ERROR;
13166: Close C_Get_CONTACT_EMAIL;
13159:
13160: If ( l_email is null ) Then
13161: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No Email');
13162: FND_MESSAGE.Set_Name('IEX', 'API_FAIL_SEND_FFM');
13163: FND_MESSAGE.Set_Token ('INFO', 'No Email_Address');
13164: FND_MSG_PUB.Add;
13165: l_return_status := FND_API.G_RET_STS_ERROR;
13166: Close C_Get_CONTACT_EMAIL;
13167: GOTO end_call_ffm;
13176: if (l_printer = '' or l_printer is null) then
13177: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
13178: IEX_DEBUG_PUB.LogMessage(G_PKG_NAME || ' ' || l_api_name || ' - No Printer');
13179: END IF;
13180: FND_MESSAGE.Set_Name('IEX', 'API_FAIL_SEND_FFM');
13181: FND_MESSAGE.Set_Token ('INFO', 'No Printer');
13182: FND_MSG_PUB.Add;
13183: l_return_status := FND_API.G_RET_STS_ERROR;
13184: GOTO end_call_ffm;
13177: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
13178: IEX_DEBUG_PUB.LogMessage(G_PKG_NAME || ' ' || l_api_name || ' - No Printer');
13179: END IF;
13180: FND_MESSAGE.Set_Name('IEX', 'API_FAIL_SEND_FFM');
13181: FND_MESSAGE.Set_Token ('INFO', 'No Printer');
13182: FND_MSG_PUB.Add;
13183: l_return_status := FND_API.G_RET_STS_ERROR;
13184: GOTO end_call_ffm;
13185: end if;
13195:
13196: If ( C_GET_CONTENTS%NOTFOUND ) Then
13197: if (nIdx = 0) then
13198: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No Contents');
13199: FND_MESSAGE.Set_Name('IEX', 'API_FAIL_SEND_FFM');
13200: FND_MESSAGE.Set_Token ('INFO', 'No Contents for selected template ');
13201: FND_MSG_PUB.Add;
13202: l_return_status := FND_API.G_RET_STS_ERROR;
13203: end if;
13196: If ( C_GET_CONTENTS%NOTFOUND ) Then
13197: if (nIdx = 0) then
13198: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No Contents');
13199: FND_MESSAGE.Set_Name('IEX', 'API_FAIL_SEND_FFM');
13200: FND_MESSAGE.Set_Token ('INFO', 'No Contents for selected template ');
13201: FND_MSG_PUB.Add;
13202: l_return_status := FND_API.G_RET_STS_ERROR;
13203: end if;
13204: exit;
13602:
13603: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - SEND_FFM:');
13604: if (p_template_id is null) then
13605: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No TEMPLATE_ID');
13606: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_TEMPLATE');
13607: FND_MSG_PUB.Add;
13608: l_return_status := FND_API.G_RET_STS_ERROR;
13609: GOTO end_call_ffm;
13610: end if;
13609: GOTO end_call_ffm;
13610: end if;
13611: if (p_party_id is null AND (p_email IS NULL OR p_email = FND_API.G_MISS_CHAR)) then
13612: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No PARTY_ID or EMAIL');
13613: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_PARTY');
13614: FND_MSG_PUB.Add;
13615: l_return_status := FND_API.G_RET_STS_ERROR;
13616: GOTO end_call_ffm;
13617: end if;
13616: GOTO end_call_ffm;
13617: end if;
13618: if (p_method is null) then
13619: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No METHOD');
13620: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_METHOD');
13621: FND_MSG_PUB.Add;
13622: l_return_status := FND_API.G_RET_STS_ERROR;
13623: GOTO end_call_ffm;
13624: end if;
13627: -- bug 3058620
13628: l_subject := NVL(FND_PROFILE.value('IEX_FULFILL_SUBJECT'), '');
13629: if (l_subject is null or l_subject = '') then
13630: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No FFM Subject',0);
13631: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_SUBJECT');
13632: FND_MSG_PUB.Add;
13633: l_return_status := FND_API.G_RET_STS_ERROR;
13634: GOTO end_call_ffm;
13635: end if;
13724:
13725: If ( C_GET_CONTENTS%NOTFOUND ) Then
13726: if (nIdx = 0) then
13727: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Contents NotFound');
13728: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_FFMCONTENT');
13729: FND_MSG_PUB.Add;
13730: l_return_status := FND_API.G_RET_STS_ERROR;
13731: end if;
13732: GOTO end_call_ffm;
14214: l_return_status := FND_API.G_RET_STS_SUCCESS;
14215:
14216: if (p_object_code is null) then
14217: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No OBJECT_ID',0);
14218: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_OBJECT');
14219: FND_MSG_PUB.Add;
14220: l_return_status := FND_API.G_RET_STS_ERROR;
14221: GOTO end_call_ffm;
14222: end if;
14222: end if;
14223:
14224: if (p_template_id is null) then
14225: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No TEMPLATE_ID',0);
14226: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_TEMPLATE');
14227: FND_MSG_PUB.Add;
14228: l_return_status := FND_API.G_RET_STS_ERROR;
14229: GOTO end_call_ffm;
14230: end if;
14242: open C_TEMPLATE_NAME (p_template_id);
14243: Fetch C_TEMPLATE_NAME into l_template_name;
14244: close C_TEMPLATE_NAME;
14245:
14246: FND_MESSAGE.Set_Name('IEX', 'IEX_TEMPLATE_INACTIVE');
14247: FND_MSG_PUB.Add;
14248: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Template: ''' || l_template_name || ''' is inactive');
14249: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Template: ''' || l_template_name || ''' is inactive');
14250: l_return_status := FND_API.G_RET_STS_ERROR;
14254: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - template status= '||l_template_status);
14255:
14256: if (p_party_id is null AND (p_email IS NULL OR p_email = FND_API.G_MISS_CHAR)) then
14257: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No PARTY_ID or EMAIL',0);
14258: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_PARTY');
14259: FND_MSG_PUB.Add;
14260: l_return_status := FND_API.G_RET_STS_ERROR;
14261: GOTO end_call_ffm;
14262: end if;
14262: end if;
14263:
14264: if (p_method is null) then
14265: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No METHOD',0);
14266: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_METHOD');
14267: FND_MSG_PUB.Add;
14268: l_return_status := FND_API.G_RET_STS_ERROR;
14269: GOTO end_call_ffm;
14270: end if;
14295: -- end for bug 8916424
14296:
14297: if (l_subject is null or l_subject = '') then
14298: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No XML Subject');
14299: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_SUBJECT');
14300: FND_MSG_PUB.Add;
14301: l_return_status := FND_API.G_RET_STS_ERROR;
14302: GOTO end_call_ffm;
14303: end if;
14319: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - resource_id = ' || l_resource_id);
14320:
14321: if (l_resource_id is null) then
14322: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No Resource for user '||l_user_id);
14323: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_RESOURCE');
14324: FND_MSG_PUB.Add;
14325: l_return_status := FND_API.G_RET_STS_ERROR;
14326: GOTO end_call_ffm;
14327: end if;
14534: EXCEPTION
14535: WHEN OTHERS THEN
14536: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' throws exception');
14537: l_return_status := FND_API.G_RET_STS_ERROR;
14538: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_DELIVERY');
14539: FND_MSG_PUB.Add;
14540: END;
14541:
14542: else -- either resending after error or sending for the first time
14576:
14577: -- checking for location
14578: IF l_location_id is null then
14579: WriteLog(G_PKG_NAME || ' ' || l_api_name || ': No location found');
14580: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_ADDRESS');
14581: FND_MSG_PUB.Add;
14582: l_return_status := FND_API.G_RET_STS_ERROR;
14583: GOTO end_call_ffm;
14584: end if;
14599: END IF;
14600:
14601: IF (l_printer = '' or l_printer is null) THEN
14602: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No Printer',0);
14603: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_PRINTER');
14604: FND_MSG_PUB.Add;
14605: l_return_status := FND_API.G_RET_STS_ERROR;
14606: GOTO end_call_ffm;
14607: END IF;
14622:
14623: if l_contact_point_id is null then
14624: if p_method = 'EMAIL' then
14625: WriteLog(G_PKG_NAME || ' ' || l_api_name || ': No email found');
14626: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_EMAIL');
14627: FND_MSG_PUB.Add;
14628: ELSIF p_method = 'FAX' THEN
14629: WriteLog(G_PKG_NAME || ' ' || l_api_name || ': No fax found');
14630: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_FAX');
14626: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_EMAIL');
14627: FND_MSG_PUB.Add;
14628: ELSIF p_method = 'FAX' THEN
14629: WriteLog(G_PKG_NAME || ' ' || l_api_name || ': No fax found');
14630: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_FAX');
14631: FND_MSG_PUB.Add;
14632: end if;
14633:
14634: l_return_status := FND_API.G_RET_STS_ERROR;
14675: Fetch C_Get_QUERY into l_query_id;
14676: If ( C_GET_QUERY%NOTFOUND ) Then
14677: if (nIdx = 0) then
14678: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Query NotFound');
14679: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_QUERY');
14680: FND_MSG_PUB.Add;
14681: l_return_status := FND_API.G_RET_STS_ERROR;
14682: GOTO end_call_ffm;
14683: end if;
14696: Fetch C_Get_QUERY into l_addt_query_id;
14697: If ( C_GET_QUERY%NOTFOUND ) Then
14698: if (nIdx = 0) then
14699: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Query NotFound for invoice copy');
14700: --FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_QUERY');
14701: --FND_MSG_PUB.Add;
14702: --l_return_status := FND_API.G_RET_STS_ERROR;
14703: --GOTO end_call_ffm;
14704: end if;
14893: EXCEPTION
14894: WHEN OTHERS THEN
14895: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' throws exception');
14896: l_return_status := FND_API.G_RET_STS_ERROR;
14897: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_DELIVERY');
14898: FND_MSG_PUB.Add;
14899: END;
14900:
14901: END IF; -- IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
14909: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
14910:
14911: l_msg := FND_MSG_PUB.Get(p_msg_index => 1, p_encoded => 'T');
14912: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - l_msg: ' || l_msg);
14913: FND_MESSAGE.PARSE_ENCODED(l_msg, l_app, l_msg_name);
14914: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Error name: ' || l_msg_name);
14915:
14916: l_dunning_rec.DELIVERY_STATUS := l_msg_name;
14917:
15235: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Start');
15236:
15237: if (p_party_id is null) then
15238: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No PARTY_ID');
15239: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_PARTY');
15240: FND_MSG_PUB.Add;
15241: l_return_status := FND_API.G_RET_STS_ERROR;
15242: GOTO end_getcontact;
15243: end if;
15242: GOTO end_getcontact;
15243: end if;
15244: if (p_method is null) then
15245: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No METHOD');
15246: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_METHOD');
15247: FND_MSG_PUB.Add;
15248: l_return_status := FND_API.G_RET_STS_ERROR;
15249: GOTO end_getcontact;
15250: end if;
15262: l_printer := NVL(fnd_profile.value('IEX_FFM_PRINTER'), '');
15263: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Printer:'||l_printer);
15264: if (l_printer = '' or l_printer is null) then
15265: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No Printer');
15266: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_PRINTER');
15267: FND_MSG_PUB.Add;
15268: l_return_status := FND_API.G_RET_STS_ERROR;
15269: GOTO end_getcontact;
15270: end if;
15275: Open C_Get_PARTY_TYPE(p_party_id);
15276: Fetch C_Get_PARTY_TYPE into l_party_type;
15277: If ( C_GET_PARTY_TYPE%NOTFOUND ) Then
15278: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - cannot find party type');
15279: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_PARTYTYPE');
15280: FND_MSG_PUB.Add;
15281: l_return_status := FND_API.G_RET_STS_ERROR;
15282: Close C_Get_PARTY_TYPE;
15283: GOTO end_getcontact;
15310: IF (l_party_type = 'PERSON' and
15311: (x_contact is null or l_return_status <> FND_API.G_RET_STS_SUCCESS))
15312: then
15313: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - person contact NotFound');
15314: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_CONTACTINFO');
15315: FND_MSG_PUB.Add;
15316: l_return_status := FND_API.G_RET_STS_ERROR;
15317: GOTO end_getcontact;
15318: end if;
15332: Open C_Get_ORG_PARTY(p_party_id);
15333: Fetch C_Get_ORG_PARTY into l_party_id;
15334: If ( C_GET_ORG_PARTY%NOTFOUND ) Then
15335: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - cannot find org party');
15336: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_ORG');
15337: FND_MSG_PUB.Add;
15338: l_return_status := FND_API.G_RET_STS_ERROR;
15339: Close C_Get_ORG_PARTY;
15340: GOTO end_getcontact;
15578: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Start');
15579:
15580: if (p_party_id is null) then
15581: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No PARTY_ID');
15582: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_PARTY');
15583: FND_MSG_PUB.Add;
15584: l_return_status := FND_API.G_RET_STS_ERROR;
15585: GOTO end_getcontact;
15586: end if;
15585: GOTO end_getcontact;
15586: end if;
15587: if (p_method is null) then
15588: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - No METHOD');
15589: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_METHOD');
15590: FND_MSG_PUB.Add;
15591: l_return_status := FND_API.G_RET_STS_ERROR;
15592: GOTO end_getcontact;
15593: end if;
15615: Fetch C_Get_CONTACT_EMAIL2 into l_email, l_primary;
15616:
15617: If ( C_GET_CONTACT_EMAIL2%NOTFOUND) Then
15618: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Customer NotFound');
15619: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_EMAIL');
15620: FND_MSG_PUB.Add;
15621: l_return_status := FND_API.G_RET_STS_ERROR;
15622: Close C_Get_CONTACT_EMAIL2;
15623: Close C_Get_CONTACT_EMAIL;
15625: end if;
15626: --
15627: If ( l_email is null ) Then
15628: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - EmailAddress NotFound in C_GET_ORG_EMAIL');
15629: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_EMAIL');
15630: FND_MSG_PUB.Add;
15631: l_return_status := FND_API.G_RET_STS_ERROR;
15632: Close C_Get_CONTACT_EMAIL2;
15633: Close C_Get_CONTACT_EMAIL;
15638: end if;
15639:
15640: If ( l_email is null ) Then
15641: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - EmailAddress is null');
15642: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_EMAIL');
15643: FND_MSG_PUB.Add;
15644: l_return_status := FND_API.G_RET_STS_ERROR;
15645: Close C_Get_CONTACT_EMAIL;
15646: GOTO end_getcontact;
15666: Fetch C_Get_CONTACT_FAX2 into l_fax, l_primary;
15667:
15668: If ( C_GET_CONTACT_FAX2%NOTFOUND) Then
15669: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Customer NotFound');
15670: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_FAX');
15671: FND_MSG_PUB.Add;
15672: l_return_status := FND_API.G_RET_STS_ERROR;
15673: Close C_Get_CONTACT_FAX2;
15674: Close C_Get_CONTACT_FAX;
15676: end if;
15677: --
15678: If ( l_fax is null ) Then
15679: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - Fax NotFound in C_GET_CONTACT_FAX');
15680: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_FAX');
15681: FND_MSG_PUB.Add;
15682: l_return_status := FND_API.G_RET_STS_ERROR;
15683: Close C_Get_CONTACT_FAX2;
15684: Close C_Get_CONTACT_FAX;
15689: end if;
15690:
15691: If ( l_fax is null ) Then
15692: WriteLog(G_PKG_NAME || ' ' || l_api_name || ' - FAX NotFound');
15693: FND_MESSAGE.Set_Name('IEX', 'IEX_SEND_FAILED_NO_FAX');
15694: FND_MSG_PUB.Add;
15695: l_return_status := FND_API.G_RET_STS_ERROR;
15696: Close C_Get_CONTACT_FAX;
15697: GOTO end_getcontact;
17863: 'id.dunning_object_id DUNNING_OBJECT_ID, ' ||
17864: 'id.xml_template_id TEMPLATE_ID, ' ||
17865: 'xtvl.template_name TEMPLATE_NAME, ' ||
17866: 'id.delivery_status ERROR, ' ||
17867: 'fnd_message.get_string(''IEX'',id.delivery_status) ERROR_DESC, ' ||
17868: 'iex_utilities.get_lookup_meaning(''IEX_FULFILLMENT_SEND_METHOD'',id.dunning_method) DUNNING_METHOD, '||
17869: 'ixr.destination DESTINATION, ' ||
17870: 'decode(id.DUNNING_MODE, ''DRAFT'', iex_utilities.get_lookup_meaning(''IEX_CONFIRMATION_MODE'', nvl(id.CONFIRMATION_MODE,''DRAFT'')),iex_utilities.get_lookup_meaning(''IEX_CONFIRMATION_MODE'',''CONFIRMED'')) CONFIRMATION_STATUS '||
17871: --'ixr.xml_request_id REQUEST_ID ' ||
17895: 'id.dunning_object_id DUNNING_OBJECT_ID, ' ||
17896: 'id.xml_template_id TEMPLATE_ID, ' ||
17897: 'xtvl.template_name TEMPLATE_NAME, ' ||
17898: 'id.delivery_status ERROR, ' ||
17899: 'fnd_message.get_string(''IEX'',id.delivery_status) ERROR_DESC, ' ||
17900: 'iex_utilities.get_lookup_meaning(''IEX_FULFILLMENT_SEND_METHOD'',id.dunning_method) DUNNING_METHOD, '||
17901: 'ixr.destination DESTINATION, ' ||
17902: 'decode(id.DUNNING_MODE, ''DRAFT'', iex_utilities.get_lookup_meaning(''IEX_CONFIRMATION_MODE'', nvl(id.CONFIRMATION_MODE,''DRAFT'')),iex_utilities.get_lookup_meaning(''IEX_CONFIRMATION_MODE'',''CONFIRMED'')) CONFIRMATION_STATUS '||
17903: --'ixr.xml_request_id REQUEST_ID ' ||
17930: 'id.dunning_object_id DUNNING_OBJECT_ID, ' ||
17931: 'id.xml_template_id TEMPLATE_ID, ' ||
17932: 'xtvl.template_name TEMPLATE_NAME, ' ||
17933: 'id.delivery_status ERROR, ' ||
17934: 'fnd_message.get_string(''IEX'',id.delivery_status) ERROR_DESC, ' ||
17935: 'iex_utilities.get_lookup_meaning(''IEX_FULFILLMENT_SEND_METHOD'',id.dunning_method) DUNNING_METHOD, '||
17936: 'ixr.destination DESTINATION, ' ||
17937: 'decode(id.DUNNING_MODE, ''DRAFT'', iex_utilities.get_lookup_meaning(''IEX_CONFIRMATION_MODE'', nvl(id.CONFIRMATION_MODE,''DRAFT'')),iex_utilities.get_lookup_meaning(''IEX_CONFIRMATION_MODE'',''CONFIRMED'')) CONFIRMATION_STATUS '||
17938: --'ixr.xml_request_id REQUEST_ID ' ||
17969: 'id.dunning_object_id DUNNING_OBJECT_ID, ' ||
17970: 'id.xml_template_id TEMPLATE_ID, ' ||
17971: 'xtvl.template_name TEMPLATE_NAME, ' ||
17972: 'id.delivery_status ERROR, ' ||
17973: 'fnd_message.get_string(''IEX'',id.delivery_status) ERROR_DESC, ' ||
17974: 'iex_utilities.get_lookup_meaning(''IEX_FULFILLMENT_SEND_METHOD'',id.dunning_method) DUNNING_METHOD, '||
17975: 'ixr.destination DESTINATION, ' ||
17976: 'decode(id.DUNNING_MODE, ''DRAFT'', iex_utilities.get_lookup_meaning(''IEX_CONFIRMATION_MODE'', nvl(id.CONFIRMATION_MODE,''DRAFT'')),iex_utilities.get_lookup_meaning(''IEX_CONFIRMATION_MODE'',''CONFIRMED'')) CONFIRMATION_STATUS '||
17977: --'ixr.xml_request_id REQUEST_ID ' ||