[Home] [Help]
26:
27: -- This is the procedure called by LoadPick.
28: -- wf_wrapper in turn calls wf_start_workflow which kicks off the workflow
29: PROCEDURE wf_wrapper(p_api_version IN NUMBER
30: , p_init_msg_list IN VARCHAR2 := fnd_api.g_false
31: , p_commit IN VARCHAR2 := fnd_api.g_false
32: , x_return_status OUT NOCOPY VARCHAR2
33: , x_msg_count OUT NOCOPY NUMBER
34: , x_msg_data OUT NOCOPY VARCHAR2
27: -- This is the procedure called by LoadPick.
28: -- wf_wrapper in turn calls wf_start_workflow which kicks off the workflow
29: PROCEDURE wf_wrapper(p_api_version IN NUMBER
30: , p_init_msg_list IN VARCHAR2 := fnd_api.g_false
31: , p_commit IN VARCHAR2 := fnd_api.g_false
32: , x_return_status OUT NOCOPY VARCHAR2
33: , x_msg_count OUT NOCOPY NUMBER
34: , x_msg_data OUT NOCOPY VARCHAR2
35: , p_org_id IN NUMBER
71: END IF;
72: -- Standard Start of API savepoint
73: SAVEPOINT wf_wrapper_PVT;
74: -- Standard call to check for call compatibility.
75: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
76: p_api_version ,
77: l_api_name ,
78: G_PKG_NAME )
79: THEN
78: G_PKG_NAME )
79: THEN
80: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INCOMPATIBLE_API_CALL');
81: FND_MSG_PUB.ADD;
82: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
83: END IF;
84:
85: /* Comment this out because FND package not working in WMSTST
86: -- Initialize message list if p_init_msg_list is set to TRUE.
83: END IF;
84:
85: /* Comment this out because FND package not working in WMSTST
86: -- Initialize message list if p_init_msg_list is set to TRUE.
87: IF FND_API.to_Boolean( p_init_msg_list ) THEN
88: -- FND_MSG_PUB.initialize;
89: END IF;
90: */
91:
89: END IF;
90: */
91:
92: -- Initialize API return status to success
93: x_return_status := FND_API.G_RET_STS_SUCCESS;
94:
95: IF (l_debug = 1) THEN
96: mdebug('before calling wms_workflow_wrappers.wf_start_workflow');
97: END IF;
176: );
177:
178: x_return_status := lX_RETURN_STATUS; --Bug 6116046
179: --bug 6924639
180: IF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
181: IF (l_debug = 1) THEN
182: mdebug('call to startworkflow failed at 1');
183: END IF;
184:
183: END IF;
184:
185: fnd_message.set_name('WMS', 'WMS_START_WORKFLOW_FAILED');
186: fnd_msg_pub.ADD;
187: RAISE fnd_api.g_exc_unexpected_error;
188: ELSIF x_return_status = fnd_api.g_ret_sts_error THEN
189: IF (l_debug = 1) THEN
190: mdebug('call to startworkflow failed at 2 ');
191: END IF;
184:
185: fnd_message.set_name('WMS', 'WMS_START_WORKFLOW_FAILED');
186: fnd_msg_pub.ADD;
187: RAISE fnd_api.g_exc_unexpected_error;
188: ELSIF x_return_status = fnd_api.g_ret_sts_error THEN
189: IF (l_debug = 1) THEN
190: mdebug('call to startworkflow failed at 2 ');
191: END IF;
192:
191: END IF;
192:
193: fnd_message.set_name('WMS', 'WMS_START_WORKFLOW_FAILED');
194: fnd_msg_pub.ADD;
195: RAISE fnd_api.g_exc_error;
196: END IF;
197: --bug 6924639
198: /*
199: -- after API call, validate return status
196: END IF;
197: --bug 6924639
198: /*
199: -- after API call, validate return status
200: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS AND x_return_status <> 'Y') THEN --bug 6924639 added condition to check for x_return_status<>'Y'
201: IF (l_debug = 1) THEN
202: mdebug('call to startworkflow failed ');
203: END IF;
204: FND_MESSAGE.SET_NAME('WMS', 'WMS_START_WORKFLOW_FAILED');
202: mdebug('call to startworkflow failed ');
203: END IF;
204: FND_MESSAGE.SET_NAME('WMS', 'WMS_START_WORKFLOW_FAILED');
205: FND_MSG_PUB.ADD;
206: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
207: END IF;
208: */
209: EXCEPTION
210: WHEN FND_API.G_EXC_ERROR THEN
206: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
207: END IF;
208: */
209: EXCEPTION
210: WHEN FND_API.G_EXC_ERROR THEN
211: IF (l_debug = 1) THEN
212: mdebug('expected error in '||l_api_name);
213: END IF;
214: ROLLBACK TO wf_wrapper_pvt;
211: IF (l_debug = 1) THEN
212: mdebug('expected error in '||l_api_name);
213: END IF;
214: ROLLBACK TO wf_wrapper_pvt;
215: x_return_status := FND_API.G_RET_STS_ERROR;
216: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
217: ,p_data => x_msg_data);
218:
219: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
215: x_return_status := FND_API.G_RET_STS_ERROR;
216: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
217: ,p_data => x_msg_data);
218:
219: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
220: IF (l_debug = 1) THEN
221: mdebug('unexpected error in '||l_api_name);
222: END IF;
223: ROLLBACK TO wf_wrapper_pvt;
221: mdebug('unexpected error in '||l_api_name);
222: END IF;
223: ROLLBACK TO wf_wrapper_pvt;
224: mdebug('ROLLBACK to wf_wrapper_pvt succeeded');
225: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
226: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
227: ,p_data => x_msg_data);
228:
229: WHEN OTHERS THEN
230: IF (l_debug = 1) THEN
231: mdebug('others error in '||l_api_name);
232: END IF;
233: ROLLBACK TO wf_wrapper_pvt;
234: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
235: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
236: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
237: END IF;
238: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
411:
412: -- Standard Start of API savepoint
413: SAVEPOINT wf_start_workflow_PVT;
414:
415: x_return_status := FND_API.G_RET_STS_SUCCESS;
416:
417: -- given the reason id, get reason name
418: IF p_reason_name IS NULL THEN
419: SELECT reason_name
966: -- make sure that reason name is not null
967: if (p_reason_id is null ) then
968: fnd_message.set_name('INV','INV_FIELD_INVALID');
969: fnd_msg_pub.ADD;
970: RAISE fnd_api.g_exc_error;
971: end if;
972:
973: IF (l_debug = 1) THEN
974: mdebug('Before Select WORKFLOW_NAME, WORKFLOW_PROCESS ');
1417:
1418:
1419: EXCEPTION
1420:
1421: WHEN FND_API.G_EXC_ERROR THEN
1422: IF (l_debug = 1) THEN
1423: mdebug('exception:FND_API.G_EXC_ERROR at l_error: '||l_error);
1424: END IF;
1425: ROLLBACK TO wf_start_workflow_pvt;
1419: EXCEPTION
1420:
1421: WHEN FND_API.G_EXC_ERROR THEN
1422: IF (l_debug = 1) THEN
1423: mdebug('exception:FND_API.G_EXC_ERROR at l_error: '||l_error);
1424: END IF;
1425: ROLLBACK TO wf_start_workflow_pvt;
1426: x_return_status := FND_API.G_RET_STS_ERROR;
1427: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1422: IF (l_debug = 1) THEN
1423: mdebug('exception:FND_API.G_EXC_ERROR at l_error: '||l_error);
1424: END IF;
1425: ROLLBACK TO wf_start_workflow_pvt;
1426: x_return_status := FND_API.G_RET_STS_ERROR;
1427: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1428: ,p_data => x_msg_data);
1429:
1430: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1426: x_return_status := FND_API.G_RET_STS_ERROR;
1427: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1428: ,p_data => x_msg_data);
1429:
1430: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1431: IF (l_debug = 1) THEN
1432: mdebug('exception: FND_API.G_EXC_UNEXPECTED_ERROR at l_error: '||l_error);
1433: END IF;
1434: ROLLBACK TO wf_start_workflow_pvt;
1428: ,p_data => x_msg_data);
1429:
1430: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1431: IF (l_debug = 1) THEN
1432: mdebug('exception: FND_API.G_EXC_UNEXPECTED_ERROR at l_error: '||l_error);
1433: END IF;
1434: ROLLBACK TO wf_start_workflow_pvt;
1435: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1436: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1431: IF (l_debug = 1) THEN
1432: mdebug('exception: FND_API.G_EXC_UNEXPECTED_ERROR at l_error: '||l_error);
1433: END IF;
1434: ROLLBACK TO wf_start_workflow_pvt;
1435: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1436: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1437: ,p_data => x_msg_data);
1438:
1439: WHEN OTHERS THEN
1440: IF (l_debug = 1) THEN
1441: mdebug('exception: in when otheres at l_error: '||l_error);
1442: END IF;
1443: ROLLBACK TO wf_start_workflow_pvt;
1444: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1445: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1446: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1447: END IF;
1448: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
1460: -- local variables
1461: l_workflow_name VARCHAR2(250) ;
1462: l_item_key VARCHAR2(250) ;
1463: lp_api_version_number NUMBER := 1.0;
1464: lp_init_msg_lst VARCHAR2(250) := FND_API.G_FALSE;
1465: lp_commit VARCHAR2(250) := FND_API.G_FALSE;
1466: lx_return_status VARCHAR2(1) ;
1467: lx_msg_count NUMBER ;
1468: lx_msg_data VARCHAR2(250);
1461: l_workflow_name VARCHAR2(250) ;
1462: l_item_key VARCHAR2(250) ;
1463: lp_api_version_number NUMBER := 1.0;
1464: lp_init_msg_lst VARCHAR2(250) := FND_API.G_FALSE;
1465: lp_commit VARCHAR2(250) := FND_API.G_FALSE;
1466: lx_return_status VARCHAR2(1) ;
1467: lx_msg_count NUMBER ;
1468: lx_msg_data VARCHAR2(250);
1469: lp_organization_id NUMBER;
1535: IF (l_debug = 1) THEN
1536: mdebug('before calling wms_txnrsn_actions_pub.suggest_alternate_location ');
1537: END IF;
1538:
1539: g_return_status := FND_API.G_RET_STS_SUCCESS; --Bug 6116046
1540: mdebug('Setting g_return_status to success');
1541: wms_txnrsn_actions_pub.suggest_alternate_location
1542: (p_api_version_number =>lp_api_version_number
1543: , p_init_msg_lst =>lp_init_msg_lst
1602: END IF;
1603:
1604: EXCEPTION
1605:
1606: WHEN fnd_api.g_exc_error THEN
1607: lx_return_status := fnd_api.g_ret_sts_error;
1608: --Bug 6116046 Begin
1609: mdebug('Setting g_return_status to fnd_api.g_ret_sts_error');
1610: g_return_status := fnd_api.g_ret_sts_error; --Bug 6116046
1603:
1604: EXCEPTION
1605:
1606: WHEN fnd_api.g_exc_error THEN
1607: lx_return_status := fnd_api.g_ret_sts_error;
1608: --Bug 6116046 Begin
1609: mdebug('Setting g_return_status to fnd_api.g_ret_sts_error');
1610: g_return_status := fnd_api.g_ret_sts_error; --Bug 6116046
1611:
1605:
1606: WHEN fnd_api.g_exc_error THEN
1607: lx_return_status := fnd_api.g_ret_sts_error;
1608: --Bug 6116046 Begin
1609: mdebug('Setting g_return_status to fnd_api.g_ret_sts_error');
1610: g_return_status := fnd_api.g_ret_sts_error; --Bug 6116046
1611:
1612: mdebug('exception: fnd_api.g_exc_error');
1613: mdebug('wf_suggest_alt_loc lx_return_status to ' || lx_return_status);
1606: WHEN fnd_api.g_exc_error THEN
1607: lx_return_status := fnd_api.g_ret_sts_error;
1608: --Bug 6116046 Begin
1609: mdebug('Setting g_return_status to fnd_api.g_ret_sts_error');
1610: g_return_status := fnd_api.g_ret_sts_error; --Bug 6116046
1611:
1612: mdebug('exception: fnd_api.g_exc_error');
1613: mdebug('wf_suggest_alt_loc lx_return_status to ' || lx_return_status);
1614:
1608: --Bug 6116046 Begin
1609: mdebug('Setting g_return_status to fnd_api.g_ret_sts_error');
1610: g_return_status := fnd_api.g_ret_sts_error; --Bug 6116046
1611:
1612: mdebug('exception: fnd_api.g_exc_error');
1613: mdebug('wf_suggest_alt_loc lx_return_status to ' || lx_return_status);
1614:
1615: wf_engine.SetItemAttrText(itemtype => l_workflow_name,
1616: itemkey => l_item_key,
1658: );
1659: END IF;
1660:
1661:
1662: WHEN fnd_api.g_exc_unexpected_error THEN
1663: lx_return_status := fnd_api.g_ret_sts_unexp_error ;
1664:
1665: mdebug('Setting g_return_status to fnd_api.g_ret_sts_unexp_error');
1666:
1659: END IF;
1660:
1661:
1662: WHEN fnd_api.g_exc_unexpected_error THEN
1663: lx_return_status := fnd_api.g_ret_sts_unexp_error ;
1664:
1665: mdebug('Setting g_return_status to fnd_api.g_ret_sts_unexp_error');
1666:
1667: g_return_status := fnd_api.g_ret_sts_unexp_error; --Bug 6116046
1661:
1662: WHEN fnd_api.g_exc_unexpected_error THEN
1663: lx_return_status := fnd_api.g_ret_sts_unexp_error ;
1664:
1665: mdebug('Setting g_return_status to fnd_api.g_ret_sts_unexp_error');
1666:
1667: g_return_status := fnd_api.g_ret_sts_unexp_error; --Bug 6116046
1668:
1669: mdebug('exception: fnd_api.g_exc_unexpected_error');
1663: lx_return_status := fnd_api.g_ret_sts_unexp_error ;
1664:
1665: mdebug('Setting g_return_status to fnd_api.g_ret_sts_unexp_error');
1666:
1667: g_return_status := fnd_api.g_ret_sts_unexp_error; --Bug 6116046
1668:
1669: mdebug('exception: fnd_api.g_exc_unexpected_error');
1670: mdebug('wf_suggest_alt_loc lx_return_status to ' || lx_return_status);
1671:
1665: mdebug('Setting g_return_status to fnd_api.g_ret_sts_unexp_error');
1666:
1667: g_return_status := fnd_api.g_ret_sts_unexp_error; --Bug 6116046
1668:
1669: mdebug('exception: fnd_api.g_exc_unexpected_error');
1670: mdebug('wf_suggest_alt_loc lx_return_status to ' || lx_return_status);
1671:
1672: wf_engine.SetItemAttrText(itemtype => l_workflow_name,
1673: itemkey => l_item_key,
1726: );
1727: END IF;
1728:
1729:
1730: mdebug('exception: fnd_api.g_exc_unexpected_error');
1731: mdebug('wf_suggest_alt_loc lx_return_status to ' || lx_return_status);
1732: g_return_status := fnd_api.g_ret_sts_unexp_error; --Bug 6116046
1733: wf_engine.SetItemAttrText(itemtype => l_workflow_name,
1734: itemkey => l_item_key,
1728:
1729:
1730: mdebug('exception: fnd_api.g_exc_unexpected_error');
1731: mdebug('wf_suggest_alt_loc lx_return_status to ' || lx_return_status);
1732: g_return_status := fnd_api.g_ret_sts_unexp_error; --Bug 6116046
1733: wf_engine.SetItemAttrText(itemtype => l_workflow_name,
1734: itemkey => l_item_key,
1735: aname => 'XW_RETURN_STATUS',
1736: avalue => lx_return_status);
1853:
1854: --Bug 6116046 Begin
1855: mdebug('g_return_status value is' || g_return_status);
1856:
1857: IF (g_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1858: IF (l_debug = 1) THEN
1859: mdebug('Throwing exception as g_return_status is not success');
1860: END IF;
1861: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1857: IF (g_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1858: IF (l_debug = 1) THEN
1859: mdebug('Throwing exception as g_return_status is not success');
1860: END IF;
1861: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1862: END IF;
1863: --Bug 6116046 End
1864:
1865: IF (l_debug = 1) THEN
1876:
1877: -- call a cycle count request for this location.
1878: wms_cycle_pvt.create_unscheduled_counts
1879: ( p_api_version => 1.0,
1880: p_init_msg_list => fnd_api.g_false,
1881: p_commit => fnd_api.g_false,
1882: x_return_status => x_return_status,
1883: x_msg_count => x_msg_count,
1884: x_msg_data => x_msg_data,
1877: -- call a cycle count request for this location.
1878: wms_cycle_pvt.create_unscheduled_counts
1879: ( p_api_version => 1.0,
1880: p_init_msg_list => fnd_api.g_false,
1881: p_commit => fnd_api.g_false,
1882: x_return_status => x_return_status,
1883: x_msg_count => x_msg_count,
1884: x_msg_data => x_msg_data,
1885: p_organization_id => l_organization_id,
1888: p_inventory_item_id => l_inventory_item_id, --BUG #2867331
1889: p_lpn_id => l_allocated_lpn_id, --Bug 7504490 l_allocated_lpn_id
1890: p_revision => l_revision);
1891:
1892: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1893: IF (l_debug = 1) THEN
1894: mdebug('wms_cycle_pvt.create_unscheduled_counts failed');
1895: END IF;
1896: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1892: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1893: IF (l_debug = 1) THEN
1894: mdebug('wms_cycle_pvt.create_unscheduled_counts failed');
1895: END IF;
1896: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1897: END IF;
1898: IF (l_debug = 1) THEN
1899: mdebug('after calling wms_cycle_pvt.create_unscheduled_counts');
1900: END IF;
1924: avalue => x_msg_data);
1925:
1926: EXCEPTION
1927:
1928: WHEN fnd_api.g_exc_error THEN
1929: IF (l_debug = 1) THEN
1930: mdebug('exc error in wf_cycle_count');
1931: END IF;
1932: x_return_status := fnd_api.g_ret_sts_error;
1928: WHEN fnd_api.g_exc_error THEN
1929: IF (l_debug = 1) THEN
1930: mdebug('exc error in wf_cycle_count');
1931: END IF;
1932: x_return_status := fnd_api.g_ret_sts_error;
1933: fnd_msg_pub.count_and_get
1934: ( p_count => x_msg_count,
1935: p_data => x_msg_data
1936: );
1951: aname => 'XW_MSG_DATA',
1952: avalue => x_msg_data);
1953: --Bug 6116046 End
1954:
1955: WHEN fnd_api.g_exc_unexpected_error THEN
1956: IF (l_debug = 1) THEN
1957: mdebug('unexpected error in wf_cycle_count');
1958: END IF;
1959: x_return_status := fnd_api.g_ret_sts_unexp_error ;
1955: WHEN fnd_api.g_exc_unexpected_error THEN
1956: IF (l_debug = 1) THEN
1957: mdebug('unexpected error in wf_cycle_count');
1958: END IF;
1959: x_return_status := fnd_api.g_ret_sts_unexp_error ;
1960: fnd_msg_pub.count_and_get
1961: ( p_count => x_msg_count,
1962: p_data => x_msg_data
1963: );
1982: WHEN OTHERS THEN
1983: IF (l_debug = 1) THEN
1984: mdebug('others error in wf_cycle_count');
1985: END IF;
1986: x_return_status := fnd_api.g_ret_sts_unexp_error;
1987: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error)
1988: THEN
1989: fnd_msg_pub.add_exc_msg
1990: ( g_pkg_name
2048: -- set itemtype and itemkey to local variables
2049: l_workflow_name := itemtype;
2050: l_item_key := itemkey;
2051:
2052: lx_return_status := FND_API.G_RET_STS_SUCCESS;
2053:
2054: l_txn_header_id := wf_engine.GetItemAttrNumber(itemtype => l_workflow_name,
2055: itemkey => l_item_key,
2056: aname => 'PW_TRANSACTION_HEADER_ID');
2069: mdebug('x_processed: '||lx_processed);
2070: END IF;
2071:
2072: IF (Upper(lx_processed) NOT IN ('Y','N')) THEN
2073: lx_return_status:= FND_API.G_RET_STS_ERROR ;
2074: END IF;
2075:
2076: -- workflow will check whether x_processed is either 'Y','N' or 'E'
2077: wf_engine.SetItemAttrText(itemtype => l_workflow_name,
2086: result :=wf_engine.eng_completed||':IS_TASK_PROCESS_NO';
2087:
2088: ELSE
2089: result :=wf_engine.eng_completed||':IS_TASK_PROCESS_ERROR';
2090: RAISE fnd_api.g_exc_error;
2091: END IF;
2092:
2093: EXCEPTION
2094: WHEN fnd_api.g_exc_error THEN
2090: RAISE fnd_api.g_exc_error;
2091: END IF;
2092:
2093: EXCEPTION
2094: WHEN fnd_api.g_exc_error THEN
2095: IF (l_debug = 1) THEN
2096: mdebug('exc error in wf_is_task_processed');
2097: END IF;
2098: x_return_status := fnd_api.g_ret_sts_error;
2094: WHEN fnd_api.g_exc_error THEN
2095: IF (l_debug = 1) THEN
2096: mdebug('exc error in wf_is_task_processed');
2097: END IF;
2098: x_return_status := fnd_api.g_ret_sts_error;
2099: fnd_msg_pub.count_and_get
2100: ( p_count => x_msg_count,
2101: p_data => x_msg_data
2102: );
2100: ( p_count => x_msg_count,
2101: p_data => x_msg_data
2102: );
2103:
2104: WHEN fnd_api.g_exc_unexpected_error THEN
2105: IF (l_debug = 1) THEN
2106: mdebug('unexpected error in wf_is_task_processed');
2107: END IF;
2108: x_return_status := fnd_api.g_ret_sts_unexp_error ;
2104: WHEN fnd_api.g_exc_unexpected_error THEN
2105: IF (l_debug = 1) THEN
2106: mdebug('unexpected error in wf_is_task_processed');
2107: END IF;
2108: x_return_status := fnd_api.g_ret_sts_unexp_error ;
2109: fnd_msg_pub.count_and_get
2110: ( p_count => x_msg_count,
2111: p_data => x_msg_data
2112: );
2115: WHEN OTHERS THEN
2116: IF (l_debug = 1) THEN
2117: mdebug('others error in wf_is_task_processed at');
2118: END IF;
2119: x_return_status := fnd_api.g_ret_sts_unexp_error;
2120: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error)
2121: THEN
2122: fnd_msg_pub.add_exc_msg
2123: ( g_pkg_name
2207: mdebug('after wms_task_utils_pvt.generate_next_task');
2208: mdebug('x_ret_code: '||lx_ret_code);
2209: END IF;
2210:
2211: IF (lx_return_status = fnd_api.g_ret_sts_success) THEN
2212: result :=wf_engine.eng_completed||':GEN_NEXT_TASK_YES';
2213: IF (l_debug = 1) THEN
2214: mdebug('In Generate Next Task -> Success');
2215: END IF;
2227: END IF;
2228: END IF;
2229:
2230: EXCEPTION
2231: WHEN fnd_api.g_exc_error THEN
2232: IF (l_debug = 1) THEN
2233: mdebug('exc error in wf_generate_next_task');
2234: END IF;
2235: lx_return_status := fnd_api.g_ret_sts_error;
2231: WHEN fnd_api.g_exc_error THEN
2232: IF (l_debug = 1) THEN
2233: mdebug('exc error in wf_generate_next_task');
2234: END IF;
2235: lx_return_status := fnd_api.g_ret_sts_error;
2236: fnd_msg_pub.count_and_get
2237: ( p_count => lx_msg_count,
2238: p_data => lx_msg_data
2239: );
2237: ( p_count => lx_msg_count,
2238: p_data => lx_msg_data
2239: );
2240:
2241: WHEN fnd_api.g_exc_unexpected_error THEN
2242: IF (l_debug = 1) THEN
2243: mdebug('unexpected error in wf_generate_next_task');
2244: END IF;
2245: lx_return_status := fnd_api.g_ret_sts_unexp_error ;
2241: WHEN fnd_api.g_exc_unexpected_error THEN
2242: IF (l_debug = 1) THEN
2243: mdebug('unexpected error in wf_generate_next_task');
2244: END IF;
2245: lx_return_status := fnd_api.g_ret_sts_unexp_error ;
2246: fnd_msg_pub.count_and_get
2247: ( p_count => lx_msg_count,
2248: p_data => lx_msg_data
2249: );
2252: WHEN OTHERS THEN
2253: IF (l_debug = 1) THEN
2254: mdebug('others error in wf_generate_next_task');
2255: END IF;
2256: lx_return_status := fnd_api.g_ret_sts_unexp_error;
2257: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error)
2258: THEN
2259: fnd_msg_pub.add_exc_msg
2260: ( g_pkg_name
2349: -- Set savepoint for this API
2350: SAVEPOINT wms_insuff_qty_PUB;
2351:
2352: -- Initialize API return status to success
2353: x_return_status := fnd_api.g_ret_sts_success;
2354: IF p_tsk_id>0 THEN
2355: -- get necessary data to call workflow
2356: SELECT transaction_temp_id
2357: INTO l_transaction_temp_id
2456: );
2457: END IF;
2458: EXCEPTION
2459:
2460: WHEN FND_API.G_EXC_ERROR THEN
2461: --
2462: x_return_status := FND_API.G_RET_STS_ERROR;
2463: --
2464: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
2458: EXCEPTION
2459:
2460: WHEN FND_API.G_EXC_ERROR THEN
2461: --
2462: x_return_status := FND_API.G_RET_STS_ERROR;
2463: --
2464: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
2465: ,p_data => x_msg_data);
2466: --
2463: --
2464: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
2465: ,p_data => x_msg_data);
2466: --
2467: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2468: --
2469: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2470: --
2471: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
2465: ,p_data => x_msg_data);
2466: --
2467: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2468: --
2469: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2470: --
2471: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count
2472: ,p_data => x_msg_data);
2473: --
2473: --
2474: WHEN OTHERS THEN
2475: ROLLBACK TO wms_insuff_qty_PUB;
2476: --
2477: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2478: --
2479: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2480: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2481: END IF;
2523: -- local variables
2524: l_workflow_name VARCHAR2(250)
2525: ; l_item_key VARCHAR2(250)
2526: ; lp_api_version_number NUMBER := 1.0
2527: ; lp_init_msg_lst VARCHAR2(250) := FND_API.G_FALSE
2528: ; lp_commit VARCHAR2(250) := FND_API.G_FALSE
2529: ; lx_return_status VARCHAR2(1)
2530: ; lx_msg_count NUMBER
2531: ; lx_msg_data VARCHAR2(250)
2524: l_workflow_name VARCHAR2(250)
2525: ; l_item_key VARCHAR2(250)
2526: ; lp_api_version_number NUMBER := 1.0
2527: ; lp_init_msg_lst VARCHAR2(250) := FND_API.G_FALSE
2528: ; lp_commit VARCHAR2(250) := FND_API.G_FALSE
2529: ; lx_return_status VARCHAR2(1)
2530: ; lx_msg_count NUMBER
2531: ; lx_msg_data VARCHAR2(250)
2532: ; lp_organization_id NUMBER
2666:
2667:
2668: -- if successful, populate the workflow attribute XW_IS_RESERVATION_SUCCESSFUL
2669: -- with 'Y', otherwise populate with 'N'
2670: if (lx_return_status = fnd_api.g_ret_sts_success) then
2671: wf_engine.SetItemAttrText(itemtype => l_workflow_name,
2672: itemkey => l_item_key,
2673: aname => 'XW_IS_RESERVATION_SUCCESSFUL',
2674: avalue => 'YES');
2679: avalue => 'NO');
2680: end if;
2681: EXCEPTION
2682:
2683: WHEN fnd_api.g_exc_error THEN
2684: lx_return_status := fnd_api.g_ret_sts_error;
2685:
2686: WHEN fnd_api.g_exc_unexpected_error THEN
2687: lx_return_status := fnd_api.g_ret_sts_unexp_error ;
2680: end if;
2681: EXCEPTION
2682:
2683: WHEN fnd_api.g_exc_error THEN
2684: lx_return_status := fnd_api.g_ret_sts_error;
2685:
2686: WHEN fnd_api.g_exc_unexpected_error THEN
2687: lx_return_status := fnd_api.g_ret_sts_unexp_error ;
2688:
2682:
2683: WHEN fnd_api.g_exc_error THEN
2684: lx_return_status := fnd_api.g_ret_sts_error;
2685:
2686: WHEN fnd_api.g_exc_unexpected_error THEN
2687: lx_return_status := fnd_api.g_ret_sts_unexp_error ;
2688:
2689: WHEN OTHERS THEN
2690: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error)
2683: WHEN fnd_api.g_exc_error THEN
2684: lx_return_status := fnd_api.g_ret_sts_error;
2685:
2686: WHEN fnd_api.g_exc_unexpected_error THEN
2687: lx_return_status := fnd_api.g_ret_sts_unexp_error ;
2688:
2689: WHEN OTHERS THEN
2690: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error)
2691: THEN