DBA Data[Home] [Help]

APPS.OE_ACKNOWLEDGMENT_PVT dependencies on FND_API

Line 171: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

167: END IF;
168: EXCEPTION
169:
170: WHEN OTHERS THEN
171: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
172:
173: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
174: THEN
175: OE_MSG_PUB.Add_Exc_Msg

Line 184: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

180:
181:
182: PROCEDURE Process_Acknowledgment
183: (p_api_version_number IN NUMBER
184: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
185:
186: ,p_header_rec IN OE_Order_Pub.Header_Rec_Type :=
187: OE_Order_Pub.G_MISS_HEADER_REC
188: ,p_header_val_rec IN OE_Order_Pub.Header_Val_Rec_Type

Line 252: l_return_status VARCHAR2(1) := FND_API.G_MISS_CHAR;

248: )
249: IS
250: l_api_version_number CONSTANT NUMBER := 1.0;
251: l_api_name CONSTANT VARCHAR2(30):= 'Process_Acknowledgment';
252: l_return_status VARCHAR2(1) := FND_API.G_MISS_CHAR;
253:
254: l_header_id NUMBER;
255:
256: l_header_rec OE_Order_Pub.Header_Rec_Type :=

Line 339: l_force_ack VARCHAR2(1) := FND_API.G_MISS_CHAR;

335: -- Variable to store return value for Trading Partner
336: l_trading_partner VARCHAR2(1) := 'Y';
337:
338: -- Remove below flag once it is passed as parameter
339: l_force_ack VARCHAR2(1) := FND_API.G_MISS_CHAR;
340:
341: l_ack_req_flag VARCHAR2(1) := 'N';
342: l_booked_shipped VARCHAR2(1) := 'Y';
343:

Line 345: l_rejected_lines VARCHAR2(1) := FND_API.G_MISS_CHAR;

341: l_ack_req_flag VARCHAR2(1) := 'N';
342: l_booked_shipped VARCHAR2(1) := 'Y';
343:
344: -- Remove below flag once it is passed as parameter
345: l_rejected_lines VARCHAR2(1) := FND_API.G_MISS_CHAR;
346:
347: -- Following Local Variables are for getting the data related to
348: -- Rejected Lines and Corresponding Lotserial for Acknowledgment
349: l_reject_line_tbl OE_Order_Pub.Line_Tbl_Type :=

Line 437: oe_debug_pub.add('Before Calling FND api to check the EC inst',1);

433: END IF;
434:
435: /***
436: -- Bug fix 1633094 start
437: oe_debug_pub.add('Before Calling FND api to check the EC inst',1);
438: IF fnd_installation.get_app_info('EC', l_status, l_industry, l_o_schema)
439: THEN
440: IF nvl(l_status,'N') = 'N' THEN
441: oe_debug_pub.add('EC not installed - No ACK required',1);

Line 443: x_return_status := FND_API.G_RET_STS_SUCCESS;

439: THEN
440: IF nvl(l_status,'N') = 'N' THEN
441: oe_debug_pub.add('EC not installed - No ACK required',1);
442: oe_debug_pub.add('Exiting OE_Acknowledgment_Pvt.Process_acknowledgment',1);
443: x_return_status := FND_API.G_RET_STS_SUCCESS;
444: RETURN;
445: END IF; -- l_status is N
446: ELSE
447: oe_debug_pub.add('Call to fnd_installation.get_app_info is FALSE',1);

Line 449: x_return_status := FND_API.G_RET_STS_SUCCESS;

445: END IF; -- l_status is N
446: ELSE
447: oe_debug_pub.add('Call to fnd_installation.get_app_info is FALSE',1);
448: oe_debug_pub.add('Exiting OE_Acknowledgment_Pvt.Process_acknowledgment',1);
449: x_return_status := FND_API.G_RET_STS_SUCCESS;
450: RETURN;
451: END IF; -- call to fnd_installation
452: -- Bug fix 1633094 end
453: ***/

Line 478: IF (l_header_rec.header_id <> FND_API.G_MISS_NUM AND

474: IF l_debug_level > 0 THEN
475: oe_debug_pub.add( 'HEADER_ID_ACK = '||L_HEADER_REC.HEADER_ID ) ;
476: END IF;
477:
478: IF (l_header_rec.header_id <> FND_API.G_MISS_NUM AND
479: nvl(l_header_rec.header_id,0) <> 0)
480: THEN
481: IF l_debug_level > 0 THEN
482: oe_debug_pub.add( 'BEFORE GETTING BOOKED_FLAG' , 3 ) ;

Line 510: x_return_status := FND_API.G_RET_STS_SUCCESS;

506: END IF;
507:
508: EXCEPTION
509: WHEN OTHERS THEN
510: x_return_status := FND_API.G_RET_STS_SUCCESS;
511: IF l_debug_level > 0 THEN
512: oe_debug_pub.add( 'EXCEPTION IN GETTING BOOKED_FLAG' , 3 ) ;
513: END IF;
514: RETURN;

Line 518: (l_header_rec.header_id = FND_API.G_MISS_NUM OR

514: RETURN;
515: END;
516:
517: ELSIF l_line_tbl.count > 0 AND
518: (l_header_rec.header_id = FND_API.G_MISS_NUM OR
519: nvl(l_header_rec.header_id,0) = 0) AND
520: (l_line_tbl(l_line_tbl.first).header_id <> FND_API.G_MISS_NUM AND
521: nvl(l_line_tbl(l_line_tbl.first).header_id,0) <> 0)
522: THEN

Line 520: (l_line_tbl(l_line_tbl.first).header_id <> FND_API.G_MISS_NUM AND

516:
517: ELSIF l_line_tbl.count > 0 AND
518: (l_header_rec.header_id = FND_API.G_MISS_NUM OR
519: nvl(l_header_rec.header_id,0) = 0) AND
520: (l_line_tbl(l_line_tbl.first).header_id <> FND_API.G_MISS_NUM AND
521: nvl(l_line_tbl(l_line_tbl.first).header_id,0) <> 0)
522: THEN
523: Begin
524: IF l_debug_level > 0 THEN

Line 540: IF OE_ORDER_CACHE.g_header_rec.header_id <> FND_API.G_MISS_NUM AND

536: -- so get it from the cache if possible
537: IF l_debug_level > 0 THEN
538: oe_debug_pub.add( 'Header Id in cache is : '||oe_order_cache.g_header_rec.header_id);
539: END IF;
540: IF OE_ORDER_CACHE.g_header_rec.header_id <> FND_API.G_MISS_NUM AND
541: nvl(OE_ORDER_CACHE.g_header_rec.header_id,0) = l_line_tbl(l_line_index).header_id THEN
542: l_header_rec := OE_ORDER_CACHE.g_header_rec;
543: IF l_debug_level > 0 THEN
544: oe_debug_pub.add('Assigned header record from cache with booked flag '|| l_header_rec.booked_flag);

Line 557: x_return_status := FND_API.G_RET_STS_SUCCESS;

553: --bug 3592147
554: l_header_rec_isnull := 'Y';
555: Exception
556: When Others Then
557: x_return_status := FND_API.G_RET_STS_SUCCESS;
558: IF l_debug_level > 0 THEN
559: oe_debug_pub.add( 'NOTHING TO ACKNOWLEDGE - ELSIF' , 3 ) ;
560: END IF;
561: RETURN;

Line 564: x_return_status := FND_API.G_RET_STS_SUCCESS;

560: END IF;
561: RETURN;
562: End;
563: ELSE
564: x_return_status := FND_API.G_RET_STS_SUCCESS;
565: IF l_debug_level > 0 THEN
566: oe_debug_pub.add( 'NOTHING TO ACKNOWLEDGE - ELSE' , 3 ) ;
567: END IF;
568: RETURN;

Line 588: x_return_status := FND_API.G_RET_STS_SUCCESS;

584: IF G_CURR_SOLD_TO_ORG_ID = l_header_rec.sold_to_org_id AND
585: (G_TP_RET = FALSE OR
586: G_PRIMARY_SETUP = FALSE)
587: THEN
588: x_return_status := FND_API.G_RET_STS_SUCCESS;
589: IF l_debug_level > 0 THEN
590: oe_debug_pub.add( 'CHECKED CACHED VALUE POAO NOT EDI ENABLED G_CURR' , 3 ) ;
591: END IF;
592: RETURN;

Line 652: x_return_status := FND_API.G_RET_STS_SUCCESS;

648: END IF;
649: EXCEPTION
650:
651: WHEN NO_DATA_FOUND THEN
652: x_return_status := FND_API.G_RET_STS_SUCCESS;
653: IF l_debug_level > 0 THEN
654: oe_debug_pub.add( 'NO PRIMARY SOLD_TO SET FOR CUSTOMER' , 2 ) ;
655: END IF;
656: G_CURR_SOLD_TO_ORG_ID := l_header_rec.sold_to_org_id;

Line 662: x_return_status := FND_API.G_RET_STS_SUCCESS;

658: G_PRIMARY_SETUP := FALSE;
659: RETURN;
660: WHEN OTHERS THEN
661:
662: x_return_status := FND_API.G_RET_STS_SUCCESS;
663: IF l_debug_level > 0 THEN
664: oe_debug_pub.add( 'NOT ABLE TO GET PRIMARY SOLD_TO FOR CUSTOMER' , 1 ) ;
665: END IF;
666: RETURN;

Line 718: x_return_status := FND_API.G_RET_STS_SUCCESS;

714: END IF;
715:
716: IF l_tp_ret = FALSE then
717: G_TP_RET := FALSE;
718: x_return_status := FND_API.G_RET_STS_SUCCESS;
719: IF l_debug_level > 0 THEN
720: oe_debug_pub.add( 'CUSTOMER/INVOICE-TO-ADDRESS/POAO NOT EDI ENABLED' , 3 ) ;
721: END IF;
722: RETURN;

Line 773: x_return_status := FND_API.G_RET_STS_SUCCESS;

769: END IF;
770: END IF;
771:
772: IF l_booked_shipped = 'N' THEN
773: x_return_status := FND_API.G_RET_STS_SUCCESS;
774: IF l_debug_level > 0 THEN
775: oe_debug_pub.add( 'ACKNOWLEDGMENT NOT REQUIRED' , 3 ) ;
776: END IF;
777: RETURN;

Line 1186: l_line_tbl(I).operation = FND_API.G_MISS_CHAR )

1182: oe_debug_pub.add( 'INSIDE WHILE LOOP I = '||I ) ;
1183: END IF;
1184:
1185: if (l_line_tbl(I).operation is NULL OR
1186: l_line_tbl(I).operation = FND_API.G_MISS_CHAR )
1187: THEN l_line_tbl(I).operation := NULL;
1188: end if;
1189: i:= l_line_tbl.next(i);
1190: END LOOP;

Line 1718: l_header_val_rec.customer_payment_term = FND_API.G_MISS_CHAR )

1714: ( p_ship_to_contact_id => l_header_rec.ship_to_contact_id
1715: );
1716:
1717: if (l_header_val_rec.customer_payment_term is NULL OR
1718: l_header_val_rec.customer_payment_term = FND_API.G_MISS_CHAR )
1719: THEN l_header_val_rec.customer_payment_term := NULL;
1720: end if;
1721:
1722: l_header_val_rec.ship_to_org :=l_header_val_rec.ship_to_location;

Line 1799: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1795: , p_reject_order => p_reject_order
1796: , x_return_status => l_return_status
1797: );
1798:
1799: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1800: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1801: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1802: RAISE FND_API.G_EXC_ERROR;
1803: END IF;

Line 1800: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1796: , x_return_status => l_return_status
1797: );
1798:
1799: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1800: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1801: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1802: RAISE FND_API.G_EXC_ERROR;
1803: END IF;
1804: END IF; -- End of IF l_ack_req_flag IN ('B', 'H')

Line 1801: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

1797: );
1798:
1799: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1800: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1801: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1802: RAISE FND_API.G_EXC_ERROR;
1803: END IF;
1804: END IF; -- End of IF l_ack_req_flag IN ('B', 'H')
1805:

Line 1802: RAISE FND_API.G_EXC_ERROR;

1798:
1799: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1800: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1801: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1802: RAISE FND_API.G_EXC_ERROR;
1803: END IF;
1804: END IF; -- End of IF l_ack_req_flag IN ('B', 'H')
1805:
1806:

Line 1833: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1829: , p_reject_order => p_reject_order
1830: , x_return_status => l_return_status
1831: );
1832:
1833: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1834: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1835: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1836: RAISE FND_API.G_EXC_ERROR;
1837: END IF;

Line 1834: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1830: , x_return_status => l_return_status
1831: );
1832:
1833: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1834: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1835: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1836: RAISE FND_API.G_EXC_ERROR;
1837: END IF;
1838:

Line 1835: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

1831: );
1832:
1833: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1834: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1835: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1836: RAISE FND_API.G_EXC_ERROR;
1837: END IF;
1838:
1839:

Line 1836: RAISE FND_API.G_EXC_ERROR;

1832:
1833: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1834: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1835: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1836: RAISE FND_API.G_EXC_ERROR;
1837: END IF;
1838:
1839:
1840: -- Insert Lots Information

Line 1857: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1853: , p_reject_order => p_reject_order
1854: , x_return_status => l_return_status
1855: );
1856:
1857: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1858: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1859: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1860: RAISE FND_API.G_EXC_ERROR;
1861: END IF;

Line 1858: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1854: , x_return_status => l_return_status
1855: );
1856:
1857: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1858: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1859: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1860: RAISE FND_API.G_EXC_ERROR;
1861: END IF;
1862:

Line 1859: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

1855: );
1856:
1857: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1858: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1859: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1860: RAISE FND_API.G_EXC_ERROR;
1861: END IF;
1862:
1863:

Line 1860: RAISE FND_API.G_EXC_ERROR;

1856:
1857: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1858: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1859: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1860: RAISE FND_API.G_EXC_ERROR;
1861: END IF;
1862:
1863:
1864: -- Call Get_Reject_Line to get rejected lines and Lotserials

Line 1889: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1885: , p_sold_to_org => l_header_val_rec.sold_to_org
1886: , p_sold_to_org_id => l_header_rec.sold_to_org_id
1887: );
1888:
1889: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1890: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1891: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1892: RAISE FND_API.G_EXC_ERROR;
1893: END IF;

Line 1890: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1886: , p_sold_to_org_id => l_header_rec.sold_to_org_id
1887: );
1888:
1889: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1890: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1891: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1892: RAISE FND_API.G_EXC_ERROR;
1893: END IF;
1894:

Line 1891: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

1887: );
1888:
1889: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1890: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1891: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1892: RAISE FND_API.G_EXC_ERROR;
1893: END IF;
1894:
1895:

Line 1892: RAISE FND_API.G_EXC_ERROR;

1888:
1889: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1890: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1891: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1892: RAISE FND_API.G_EXC_ERROR;
1893: END IF;
1894:
1895:
1896: -- Insert rejected lines and lotserials only if got any rejected records

Line 1913: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1909: ,p_reject_order => l_create_rejects
1910: ,x_return_status => l_return_status
1911: );
1912:
1913: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1914: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1915: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1916: RAISE FND_API.G_EXC_ERROR;
1917: END IF;

Line 1914: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1910: ,x_return_status => l_return_status
1911: );
1912:
1913: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1914: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1915: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1916: RAISE FND_API.G_EXC_ERROR;
1917: END IF;
1918:

Line 1915: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

1911: );
1912:
1913: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1914: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1915: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1916: RAISE FND_API.G_EXC_ERROR;
1917: END IF;
1918:
1919: IF l_reject_lot_serial_tbl.COUNT > 0 THEN

Line 1916: RAISE FND_API.G_EXC_ERROR;

1912:
1913: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1914: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1915: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1916: RAISE FND_API.G_EXC_ERROR;
1917: END IF;
1918:
1919: IF l_reject_lot_serial_tbl.COUNT > 0 THEN
1920: IF l_debug_level > 0 THEN

Line 1935: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1931: ,p_reject_order => l_create_rejects
1932: ,x_return_status => l_return_status
1933: );
1934:
1935: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1936: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1937: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1938: RAISE FND_API.G_EXC_ERROR;
1939: END IF;

Line 1936: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1932: ,x_return_status => l_return_status
1933: );
1934:
1935: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1936: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1937: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1938: RAISE FND_API.G_EXC_ERROR;
1939: END IF;
1940: END IF; -- IF l_reject_lot_serial_tbl.COUNT > 0

Line 1937: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

1933: );
1934:
1935: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1936: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1937: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1938: RAISE FND_API.G_EXC_ERROR;
1939: END IF;
1940: END IF; -- IF l_reject_lot_serial_tbl.COUNT > 0
1941: END IF; -- IF l_reject_line_tbl.COUNT > 0

Line 1938: RAISE FND_API.G_EXC_ERROR;

1934:
1935: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1936: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1937: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1938: RAISE FND_API.G_EXC_ERROR;
1939: END IF;
1940: END IF; -- IF l_reject_lot_serial_tbl.COUNT > 0
1941: END IF; -- IF l_reject_line_tbl.COUNT > 0
1942: END IF; -- IF l_ack_req_flag = 'B'

Line 1946: x_return_status := FND_API.G_RET_STS_SUCCESS;

1942: END IF; -- IF l_ack_req_flag = 'B'
1943:
1944: -- Set return status
1945:
1946: x_return_status := FND_API.G_RET_STS_SUCCESS;
1947:
1948:
1949: EXCEPTION
1950:

Line 1951: WHEN FND_API.G_EXC_ERROR THEN

1947:
1948:
1949: EXCEPTION
1950:
1951: WHEN FND_API.G_EXC_ERROR THEN
1952: IF l_debug_level > 0 THEN
1953: oe_debug_pub.add( 'ENCOUNTERED ERROR EXCEPTION' , 2 ) ;
1954: END IF;
1955: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1955: x_return_status := FND_API.G_RET_STS_ERROR;

1951: WHEN FND_API.G_EXC_ERROR THEN
1952: IF l_debug_level > 0 THEN
1953: oe_debug_pub.add( 'ENCOUNTERED ERROR EXCEPTION' , 2 ) ;
1954: END IF;
1955: x_return_status := FND_API.G_RET_STS_ERROR;
1956:
1957: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1958: IF l_debug_level > 0 THEN
1959: oe_debug_pub.add( 'ENCOUNTERED UNEXPECTED ERROR EXCEPTION'||SQLERRM , 1 ) ;

Line 1957: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1953: oe_debug_pub.add( 'ENCOUNTERED ERROR EXCEPTION' , 2 ) ;
1954: END IF;
1955: x_return_status := FND_API.G_RET_STS_ERROR;
1956:
1957: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1958: IF l_debug_level > 0 THEN
1959: oe_debug_pub.add( 'ENCOUNTERED UNEXPECTED ERROR EXCEPTION'||SQLERRM , 1 ) ;
1960: END IF;
1961: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 1961: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1957: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1958: IF l_debug_level > 0 THEN
1959: oe_debug_pub.add( 'ENCOUNTERED UNEXPECTED ERROR EXCEPTION'||SQLERRM , 1 ) ;
1960: END IF;
1961: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1962:
1963: WHEN OTHERS THEN
1964: IF l_debug_level > 0 THEN
1965: oe_debug_pub.add( 'ENCOUNTERED OTHERS ERROR EXCEPTION IN OE_ACKNOWLEDGMENT_PVT.PROCESS_ACKNOWLEDGMENT: '||SQLERRM , 1 ) ;

Line 1967: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1963: WHEN OTHERS THEN
1964: IF l_debug_level > 0 THEN
1965: oe_debug_pub.add( 'ENCOUNTERED OTHERS ERROR EXCEPTION IN OE_ACKNOWLEDGMENT_PVT.PROCESS_ACKNOWLEDGMENT: '||SQLERRM , 1 ) ;
1966: END IF;
1967: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1968:
1969: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1970: THEN
1971: OE_MSG_PUB.Add_Exc_Msg

Line 2037: x_return_status := FND_API.G_RET_STS_SUCCESS;

2033: If Oe_Globals.G_EC_INSTALLED Is Null Then
2034: Oe_Globals.G_EC_INSTALLED := Oe_Globals.Check_Product_Installed(175);
2035: End If;
2036: If Oe_Globals.G_EC_INSTALLED <> 'Y' Then
2037: x_return_status := FND_API.G_RET_STS_SUCCESS;
2038: If l_debug_level > 0 Then
2039: oe_debug_pub.add('EC not installed');
2040: End If;
2041: -- Raise event to log message

Line 2045: If (l_header_rec.header_id <> FND_API.G_MISS_NUM And

2041: -- Raise event to log message
2042: Return;
2043: End If;
2044:
2045: If (l_header_rec.header_id <> FND_API.G_MISS_NUM And
2046: nvl(l_header_rec.header_id,0) <> 0) Then
2047: Begin
2048: Select booked_flag,xml_message_id
2049: Into l_booked_flag,l_xml_message_id

Line 2064: x_return_status := FND_API.G_RET_STS_SUCCESS;

2060: l_header_rec.xml_message_id := l_xml_message_id;
2061: End IF;
2062: Exception
2063: When Others Then
2064: x_return_status := FND_API.G_RET_STS_SUCCESS;
2065: If l_debug_level > 0 Then
2066: oe_debug_pub.add('Exception in getting booked flag');
2067: End If;
2068: Return;

Line 2071: (l_header_rec.header_id = FND_API.G_MISS_NUM OR

2067: End If;
2068: Return;
2069: End;
2070: Elsif l_line_tbl.count > 0 And
2071: (l_header_rec.header_id = FND_API.G_MISS_NUM OR
2072: nvl(l_header_rec.header_id,0) = 0) AND
2073: (l_line_tbl(l_line_tbl.first).header_id <> FND_API.G_MISS_NUM AND
2074: nvl(l_line_tbl(l_line_tbl.first).header_id,0) <> 0) Then
2075: Begin

Line 2073: (l_line_tbl(l_line_tbl.first).header_id <> FND_API.G_MISS_NUM AND

2069: End;
2070: Elsif l_line_tbl.count > 0 And
2071: (l_header_rec.header_id = FND_API.G_MISS_NUM OR
2072: nvl(l_header_rec.header_id,0) = 0) AND
2073: (l_line_tbl(l_line_tbl.first).header_id <> FND_API.G_MISS_NUM AND
2074: nvl(l_line_tbl(l_line_tbl.first).header_id,0) <> 0) Then
2075: Begin
2076: l_line_index := l_line_tbl.First;
2077: -- start bug 4048709, if the global picture header record is not present

Line 2084: IF OE_ORDER_CACHE.g_header_rec.header_id <> FND_API.G_MISS_NUM AND

2080: -- so get it from the cache if possible
2081: IF l_debug_level > 0 THEN
2082: oe_debug_pub.add( 'Header Id in cache is : '||oe_order_cache.g_header_rec.header_id);
2083: END IF;
2084: IF OE_ORDER_CACHE.g_header_rec.header_id <> FND_API.G_MISS_NUM AND
2085: nvl(OE_ORDER_CACHE.g_header_rec.header_id,0) = l_line_tbl(l_line_index).header_id THEN
2086: l_header_rec := OE_ORDER_CACHE.g_header_rec;
2087: IF l_debug_level > 0 THEN
2088: oe_debug_pub.add('Assigned header record from cache with booked flag '|| l_header_rec.booked_flag);

Line 2100: x_return_status := FND_API.G_RET_STS_SUCCESS;

2096: END IF;
2097: l_header_rec_isnull := 'Y';
2098: Exception
2099: When Others Then
2100: x_return_status := FND_API.G_RET_STS_SUCCESS;
2101: If l_debug_level > 0 Then
2102: oe_debug_pub.add('Exception in l_line_tbl.count > 0');
2103: End If;
2104: Return;

Line 2108: x_return_status := FND_API.G_RET_STS_SUCCESS;

2104: Return;
2105: End;
2106: Else
2107: -- Nothing to Acknowledge
2108: x_return_status := FND_API.G_RET_STS_SUCCESS;
2109: If l_debug_level > 0 Then
2110: oe_debug_pub.add('Exception else, Nothing to Acknowledge');
2111: End If;
2112: Return;

Line 2117: x_return_status := FND_API.G_RET_STS_SUCCESS;

2113: End If;
2114:
2115: If G_CURR_SOLD_TO_ORG_ID = l_header_rec.sold_to_org_id and
2116: (G_TP_RET = FALSE Or G_PRIMARY_SETUP = FALSE) Then
2117: x_return_status := FND_API.G_RET_STS_SUCCESS;
2118: If l_debug_level > 0 Then
2119: oe_debug_pub.add('Transaction Not Enabled for Trading Partner');
2120: End If;
2121: -- Raise event to log message

Line 2173: x_return_status := FND_API.G_RET_STS_SUCCESS;

2169: G_CURR_ADDRESS_ID := l_address_id;
2170: G_PRIMARY_SETUP := TRUE;
2171: Exception
2172: When NO_DATA_FOUND Then
2173: x_return_status := FND_API.G_RET_STS_SUCCESS;
2174: G_CURR_SOLD_TO_ORG_ID := l_header_rec.sold_to_org_id;
2175: G_CURR_ADDRESS_ID := NULL;
2176: G_PRIMARY_SETUP := FALSE;
2177:

Line 2207: x_return_status := FND_API.G_RET_STS_SUCCESS;

2203: */
2204: Return;
2205:
2206: When Others Then
2207: x_return_status := FND_API.G_RET_STS_SUCCESS;
2208: If l_debug_level > 0 Then
2209: oe_debug_pub.add('Not able to get primary sold to exception');
2210: End If;
2211: Return;

Line 2230: x_return_status := FND_API.G_RET_STS_SUCCESS;

2226: ,p_msg_data => l_msg_data);
2227:
2228: IF l_tp_ret = FALSE Then
2229: G_TP_RET := FALSE;
2230: x_return_status := FND_API.G_RET_STS_SUCCESS;
2231: If l_debug_level > 0 Then
2232: oe_debug_pub.add('Transaction not enabled');
2233: End If;
2234: -- Raise event to log message

Line 2313: l_line_tbl(I).operation = FND_API.G_MISS_CHAR ) THEN

2309: End If;
2310: End If;
2311:
2312: if (l_line_tbl(I).operation is NULL OR
2313: l_line_tbl(I).operation = FND_API.G_MISS_CHAR ) THEN
2314: l_line_tbl(I).operation := NULL; -- for bug 4764583/5178052
2315: oe_debug_pub.add(' Setting Operation G_MISS_CHAR to NULL');
2316: end if;
2317:

Line 2346: If l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then

2342: (p_header_rec => l_header_rec,
2343: x_ack_type => l_ack_type,
2344: x_return_status => l_return_status);
2345:
2346: If l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then
2347: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2348: Elsif l_return_status = FND_API.G_RET_STS_ERROR Then
2349: RAISE FND_API.G_EXC_ERROR;
2350: Else

Line 2347: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2343: x_ack_type => l_ack_type,
2344: x_return_status => l_return_status);
2345:
2346: If l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then
2347: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2348: Elsif l_return_status = FND_API.G_RET_STS_ERROR Then
2349: RAISE FND_API.G_EXC_ERROR;
2350: Else
2351: l_raise_event := 'Y';

Line 2348: Elsif l_return_status = FND_API.G_RET_STS_ERROR Then

2344: x_return_status => l_return_status);
2345:
2346: If l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then
2347: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2348: Elsif l_return_status = FND_API.G_RET_STS_ERROR Then
2349: RAISE FND_API.G_EXC_ERROR;
2350: Else
2351: l_raise_event := 'Y';
2352: End If;

Line 2349: RAISE FND_API.G_EXC_ERROR;

2345:
2346: If l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then
2347: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2348: Elsif l_return_status = FND_API.G_RET_STS_ERROR Then
2349: RAISE FND_API.G_EXC_ERROR;
2350: Else
2351: l_raise_event := 'Y';
2352: End If;
2353: End If;

Line 2361: If l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then

2357: OE_Line_Ack_Util.Insert_Row
2358: (p_line_tbl => l_line_tbl,
2359: p_old_line_tbl => l_old_line_tbl,
2360: x_return_status => l_return_status);
2361: If l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then
2362: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2363: Elsif l_return_status = FND_API.G_RET_STS_ERROR Then
2364: RAISE FND_API.G_EXC_ERROR;
2365: Else

Line 2362: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2358: (p_line_tbl => l_line_tbl,
2359: p_old_line_tbl => l_old_line_tbl,
2360: x_return_status => l_return_status);
2361: If l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then
2362: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2363: Elsif l_return_status = FND_API.G_RET_STS_ERROR Then
2364: RAISE FND_API.G_EXC_ERROR;
2365: Else
2366: l_raise_event := 'Y';

Line 2363: Elsif l_return_status = FND_API.G_RET_STS_ERROR Then

2359: p_old_line_tbl => l_old_line_tbl,
2360: x_return_status => l_return_status);
2361: If l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then
2362: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2363: Elsif l_return_status = FND_API.G_RET_STS_ERROR Then
2364: RAISE FND_API.G_EXC_ERROR;
2365: Else
2366: l_raise_event := 'Y';
2367: End If;

Line 2364: RAISE FND_API.G_EXC_ERROR;

2360: x_return_status => l_return_status);
2361: If l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then
2362: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2363: Elsif l_return_status = FND_API.G_RET_STS_ERROR Then
2364: RAISE FND_API.G_EXC_ERROR;
2365: Else
2366: l_raise_event := 'Y';
2367: End If;
2368:

Line 2399: If l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then

2395: , p_sold_to_org => l_sold_to_org
2396: , p_sold_to_org_id => l_header_rec.sold_to_org_id
2397: );
2398:
2399: If l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then
2400: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2401: Elsif l_return_status = FND_API.G_RET_STS_ERROR Then
2402: RAISE FND_API.G_EXC_ERROR;
2403: End If;

Line 2400: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2396: , p_sold_to_org_id => l_header_rec.sold_to_org_id
2397: );
2398:
2399: If l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then
2400: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2401: Elsif l_return_status = FND_API.G_RET_STS_ERROR Then
2402: RAISE FND_API.G_EXC_ERROR;
2403: End If;
2404:

Line 2401: Elsif l_return_status = FND_API.G_RET_STS_ERROR Then

2397: );
2398:
2399: If l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then
2400: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2401: Elsif l_return_status = FND_API.G_RET_STS_ERROR Then
2402: RAISE FND_API.G_EXC_ERROR;
2403: End If;
2404:
2405: If l_reject_line_tbl.COUNT > 0 Then

Line 2402: RAISE FND_API.G_EXC_ERROR;

2398:
2399: If l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then
2400: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2401: Elsif l_return_status = FND_API.G_RET_STS_ERROR Then
2402: RAISE FND_API.G_EXC_ERROR;
2403: End If;
2404:
2405: If l_reject_line_tbl.COUNT > 0 Then
2406: OE_Line_Ack_Util.Insert_Row

Line 2416: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

2412: ,p_reject_order => 'Y'
2413: ,x_return_status => l_return_status
2414: );
2415:
2416: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2417: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2418: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2419: RAISE FND_API.G_EXC_ERROR;
2420: Else

Line 2417: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2413: ,x_return_status => l_return_status
2414: );
2415:
2416: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2417: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2418: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2419: RAISE FND_API.G_EXC_ERROR;
2420: Else
2421: l_raise_event := 'Y';

Line 2418: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

2414: );
2415:
2416: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2417: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2418: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2419: RAISE FND_API.G_EXC_ERROR;
2420: Else
2421: l_raise_event := 'Y';
2422: END IF;

Line 2419: RAISE FND_API.G_EXC_ERROR;

2415:
2416: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2417: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2418: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2419: RAISE FND_API.G_EXC_ERROR;
2420: Else
2421: l_raise_event := 'Y';
2422: END IF;
2423:

Line 2445: x_return_status := FND_API.G_RET_STS_SUCCESS;

2441: p_xml_msg_id => l_header_rec.xml_message_id, --l_xml_message_id,
2442: x_return_status => l_return_status);
2443: End If;
2444:
2445: x_return_status := FND_API.G_RET_STS_SUCCESS;
2446:
2447: Exception
2448: When Others Then
2449: If l_debug_level >0 Then