31: and lng.language_id = x_lang_id;
32: BEGIN
33: FOR l_count in 1..p_message_count LOOP
34:
35: l_temp_msg := fnd_msg_pub.get(fnd_msg_pub.g_next, fnd_api.g_true);
36: fnd_message.parse_encoded(l_temp_msg, l_appl_short_name, l_message_name);
37: OPEN Get_Appl_Id (l_appl_short_name);
38: FETCH Get_Appl_Id into l_id;
39: CLOSE Get_Appl_Id;
46: FETCH Get_Message_Num into l_message_num;
47: CLOSE Get_Message_Num;
48: END IF;
49:
50: l_temp_msg := fnd_msg_pub.get(fnd_msg_pub.g_previous, fnd_api.g_true);
51:
52: IF NVL(l_message_num, 0) <> 0
53: THEN
54: l_temp_msg := 'APP-' || to_char(l_message_num) || ': ';
58:
59: IF l_count = 1
60: THEN
61: l_msg_list := l_msg_list || l_temp_msg ||
62: fnd_msg_pub.get(fnd_msg_pub.g_first, fnd_api.g_false);
63: ELSE
64: l_msg_list := l_msg_list || l_temp_msg ||
65: fnd_msg_pub.get(fnd_msg_pub.g_next, fnd_api.g_false);
66: END IF;
61: l_msg_list := l_msg_list || l_temp_msg ||
62: fnd_msg_pub.get(fnd_msg_pub.g_first, fnd_api.g_false);
63: ELSE
64: l_msg_list := l_msg_list || l_temp_msg ||
65: fnd_msg_pub.get(fnd_msg_pub.g_next, fnd_api.g_false);
66: END IF;
67:
68: l_msg_list := l_msg_list || '';
69:
108: EXCEPTION
109: WHEN OTHERS THEN
110: FND_MESSAGE.SET_NAME('OKL', 'OKL_API_OTHERS_EXCEP');
111: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
112: FND_MSG_PUB.ADD;
113: ROLLBACK TO raise_equipment_exchange_event;
114: END raise_equipment_exchange_event;
115:
116:
514: EXCEPTION
515: WHEN OTHERS THEN
516: FND_MESSAGE.SET_NAME('OKL', 'OKL_API_OTHERS_EXCEP');
517: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
518: FND_MSG_PUB.ADD;
519: ROLLBACK TO raise_transferasu_event;
520: END raise_transferAsu_event;
521:
522:
843: x_msg_count => l_msg_count,
844: x_msg_data => l_msg_data);
845:
846: IF l_return_status <> 'S' THEN
847: FND_MSG_PUB.Count_And_Get
848: ( p_count => l_msg_count,
849: p_data => l_msg_data);
850: Get_Messages(l_msg_count,l_error);
851:
915: x_return_status => l_return_status,
916: x_msg_count => l_msg_count,
917: x_msg_data => l_msg_data);
918: IF l_return_status <> 'S' THEN
919: FND_MSG_PUB.Count_And_Get
920: ( p_count => l_msg_count,
921: p_data => l_msg_data);
922: Get_Messages(l_msg_count,l_error);
923:
1130: x_msg_count => lx_msg_count,
1131: x_msg_data => lx_msg_data);
1132:
1133: IF lx_return_status <> 'S' THEN
1134: FND_MSG_PUB.Count_And_Get
1135: ( p_count => lx_msg_count,
1136: p_data => lx_msg_data);
1137: Get_Messages(lx_msg_count,l_error);
1138:
1252: x_msg_count => lx_msg_count,
1253: x_msg_data => lx_msg_data);
1254:
1255: IF lx_return_status <> 'S' THEN
1256: FND_MSG_PUB.Count_And_Get
1257: ( p_count => lx_msg_count,
1258: p_data => lx_msg_data);
1259: Get_Messages(lx_msg_count,l_error);
1260:
1344: x_tcnv_rec => lx_tcnv_rec,
1345: x_tclv_tbl => lx_tclv_tbl);
1346:
1347: IF l_return_status <> 'S' THEN
1348: FND_MSG_PUB.Count_And_Get
1349: ( p_count => l_msg_count,
1350: p_data => l_msg_data);
1351: Get_Messages(l_msg_count,l_error);
1352:
1443: x_tcnv_rec => lx_tcnv_rec,
1444: x_tclv_tbl => lx_tclv_tbl);
1445:
1446: IF l_return_status <> 'S' THEN
1447: FND_MSG_PUB.Count_And_Get
1448: ( p_count => l_msg_count,
1449: p_data => l_msg_data);
1450: Get_Messages(l_msg_count,l_error);
1451:
1555: x_tclv_tbl => lx_tclv_tbl);
1556:
1557:
1558: IF l_return_status <> 'S' THEN
1559: FND_MSG_PUB.Count_And_Get
1560: ( p_count => l_msg_count,
1561: p_data => l_msg_data);
1562: Get_Messages(l_msg_count,l_error);
1563:
1692: x_tclv_tbl => lx_tclv_tbl);
1693:
1694:
1695: IF l_return_status <> 'S' THEN
1696: FND_MSG_PUB.Count_And_Get
1697: ( p_count => l_msg_count,
1698: p_data => l_msg_data);
1699: Get_Messages(l_msg_count,l_error);
1700:
1885: avalue => l_batch_id );
1886: resultout := 'COMPLETE:YES';
1887:
1888: ELSE
1889: FND_MSG_PUB.Count_And_Get
1890: ( p_count => l_msg_count,
1891: p_data => l_msg_data);
1892: Get_Messages(l_msg_count,l_error);
1893:
2061: x_msg_data => lx_msg_data);
2062:
2063:
2064: IF lx_return_status <> 'S' THEN
2065: FND_MSG_PUB.Count_And_Get
2066: ( p_count => lx_msg_count,
2067: p_data => lx_msg_data);
2068: Get_Messages(lx_msg_count,l_error);
2069:
2163: x_tclv_tbl => lx_tclv_tbl);
2164:
2165:
2166: IF l_return_status <> 'S' THEN
2167: FND_MSG_PUB.Count_And_Get
2168: ( p_count => l_msg_count,
2169: p_data => l_msg_data);
2170: Get_Messages(l_msg_count,l_error);
2171:
2206: aname => 'BATCH_ID',
2207: avalue => l_batch_id );
2208:
2209: ELSE
2210: FND_MSG_PUB.Count_And_Get
2211: ( p_count => l_msg_count,
2212: p_data => l_msg_data);
2213: Get_Messages(l_msg_count,l_error);
2214:
2336: x_tclv_tbl => lx_tclv_tbl);
2337:
2338:
2339: IF l_return_status <> 'S' THEN
2340: FND_MSG_PUB.Count_And_Get
2341: ( p_count => l_msg_count,
2342: p_data => l_msg_data);
2343: Get_Messages(l_msg_count,l_error);
2344:
3038: EXCEPTION
3039: WHEN OTHERS THEN
3040: FND_MESSAGE.SET_NAME('OKL', 'OKL_API_OTHERS_EXCEP');
3041: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3042: FND_MSG_PUB.ADD;
3043: ROLLBACK TO raise_lease_renewal_event;
3044: END raise_lease_renewal_event;
3045:
3046:
3356: EXCEPTION
3357: WHEN OTHERS THEN
3358: FND_MESSAGE.SET_NAME('OKL', 'OKL_API_OTHERS_EXCEP');
3359: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3360: FND_MSG_PUB.ADD;
3361: ROLLBACK TO raise_principal_paydown_event;
3362: END raise_principal_paydown_event;
3363:
3364:
3609: p_khr_id => l_khr_id,
3610: p_req_id => l_request_id);
3611:
3612: IF l_return_status <> 'S' THEN
3613: FND_MSG_PUB.Count_And_Get
3614: ( p_count => l_msg_count,
3615: p_data => l_msg_data
3616: );
3617: Get_Messages(l_msg_count,l_error);
3716:
3717:
3718:
3719: IF l_return_status <> 'S' THEN
3720: FND_MSG_PUB.Count_And_Get
3721: ( p_count => l_msg_count,
3722: p_data => l_msg_data
3723: );
3724: Get_Messages(l_msg_count,l_error);
3811: EXCEPTION
3812: WHEN OTHERS THEN
3813: FND_MESSAGE.SET_NAME('OKL', 'OKL_API_OTHERS_EXCEP');
3814: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3815: FND_MSG_PUB.ADD;
3816: ROLLBACK TO raise_credit_memo_event;
3817: END raise_credit_memo_event;
3818:
3819:
3979: --I think if the api is not a success we should log the error in a
3980: --table.
3981:
3982: IF l_return_status <> 'S' THEN
3983: FND_MSG_PUB.Count_And_Get
3984: ( p_count => l_msg_count,
3985: p_data => l_msg_data
3986: );
3987: Get_Messages(l_msg_count,l_error);
4083:
4084:
4085:
4086: IF l_return_status <> 'S' THEN
4087: FND_MSG_PUB.Count_And_Get
4088: ( p_count => l_msg_count,
4089: p_data => l_msg_data
4090: );
4091: Get_Messages(l_msg_count,l_error);
4183:
4184:
4185:
4186: IF l_return_status <> 'S' THEN
4187: FND_MSG_PUB.Count_And_Get
4188: ( p_count => l_msg_count,
4189: p_data => l_msg_data
4190: );
4191: Get_Messages(l_msg_count,l_error);
4291:
4292:
4293:
4294: IF l_return_status <> 'S' THEN
4295: FND_MSG_PUB.Count_And_Get
4296: ( p_count => l_msg_count,
4297: p_data => l_msg_data
4298: );
4299: Get_Messages(l_msg_count,l_error);
4390:
4391:
4392:
4393: IF l_return_status <> 'S' THEN
4394: FND_MSG_PUB.Count_And_Get
4395: ( p_count => l_msg_count,
4396: p_data => l_msg_data
4397: );
4398: Get_Messages(l_msg_count,l_error);