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 438: oe_debug_pub.add('Before Calling FND api to check the EC inst',1);

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

Line 444: x_return_status := FND_API.G_RET_STS_SUCCESS;

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

Line 450: x_return_status := FND_API.G_RET_STS_SUCCESS;

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

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

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

Line 511: x_return_status := FND_API.G_RET_STS_SUCCESS;

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

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

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

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

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

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

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

Line 558: x_return_status := FND_API.G_RET_STS_SUCCESS;

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

Line 565: x_return_status := FND_API.G_RET_STS_SUCCESS;

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

Line 589: x_return_status := FND_API.G_RET_STS_SUCCESS;

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

Line 653: x_return_status := FND_API.G_RET_STS_SUCCESS;

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

Line 663: x_return_status := FND_API.G_RET_STS_SUCCESS;

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

Line 719: x_return_status := FND_API.G_RET_STS_SUCCESS;

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

Line 774: x_return_status := FND_API.G_RET_STS_SUCCESS;

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

Line 1103: l_line_tbl(i).service_subs_template_id <> FND_API.G_MISS_NUM)

1099: ( p_payment_term_id => l_line_tbl(i).payment_term_id );
1100:
1101: --sol_ord_er #16014165 start
1102: IF (l_line_tbl(i).service_subs_template_id IS NOT NULL AND
1103: l_line_tbl(i).service_subs_template_id <> FND_API.G_MISS_NUM)
1104: THEN
1105: l_line_val_tbl(i).service_subs_template := OE_ID_TO_VALUE.Subscription_Template(p_service_subs_template_id => l_line_tbl(i).service_subs_template_id);
1106: END IF;
1107:

Line 1109: l_line_tbl(i).service_cov_template_id <> FND_API.G_MISS_NUM)

1105: l_line_val_tbl(i).service_subs_template := OE_ID_TO_VALUE.Subscription_Template(p_service_subs_template_id => l_line_tbl(i).service_subs_template_id);
1106: END IF;
1107:
1108: IF (l_line_tbl(i).service_cov_template_id IS NOT NULL AND
1109: l_line_tbl(i).service_cov_template_id <> FND_API.G_MISS_NUM)
1110: THEN
1111: l_line_val_tbl(i).service_cov_template := OE_ID_TO_VALUE.Coverage_Template(p_service_cov_template_id => l_line_tbl(i).service_cov_template_id);
1112: END IF;
1113:

Line 1115: l_line_tbl(i).service_bill_profile_id <> FND_API.G_MISS_NUM)

1111: l_line_val_tbl(i).service_cov_template := OE_ID_TO_VALUE.Coverage_Template(p_service_cov_template_id => l_line_tbl(i).service_cov_template_id);
1112: END IF;
1113:
1114: IF (l_line_tbl(i).service_bill_profile_id IS NOT NULL AND
1115: l_line_tbl(i).service_bill_profile_id <> FND_API.G_MISS_NUM)
1116: THEN
1117: l_line_val_tbl(i).service_bill_profile := OE_ID_TO_VALUE.Billing_Profile(p_service_bill_profile_id => l_line_tbl(i).service_bill_profile_id);
1118: END IF;
1119:

Line 1121: l_line_tbl(i).service_bill_option_code <> FND_API.G_MISS_CHAR)

1117: l_line_val_tbl(i).service_bill_profile := OE_ID_TO_VALUE.Billing_Profile(p_service_bill_profile_id => l_line_tbl(i).service_bill_profile_id);
1118: END IF;
1119:
1120: IF (l_line_tbl(i).service_bill_option_code IS NOT NULL AND
1121: l_line_tbl(i).service_bill_option_code <> FND_API.G_MISS_CHAR)
1122: THEN
1123: l_line_val_tbl(i).service_bill_option :=OE_ID_TO_VALUE.Billing_Option(p_service_bill_option_code => l_line_tbl(i).service_bill_option_code);
1124: END IF;
1125: --sol_ord_er #16014165 end

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

1209: oe_debug_pub.add( 'INSIDE WHILE LOOP I = '||I ) ;
1210: END IF;
1211:
1212: if (l_line_tbl(I).operation is NULL OR
1213: l_line_tbl(I).operation = FND_API.G_MISS_CHAR )
1214: THEN l_line_tbl(I).operation := NULL;
1215: end if;
1216: i:= l_line_tbl.next(i);
1217: END LOOP;

Line 1745: l_header_val_rec.customer_payment_term = FND_API.G_MISS_CHAR )

1741: ( p_ship_to_contact_id => l_header_rec.ship_to_contact_id
1742: );
1743:
1744: if (l_header_val_rec.customer_payment_term is NULL OR
1745: l_header_val_rec.customer_payment_term = FND_API.G_MISS_CHAR )
1746: THEN l_header_val_rec.customer_payment_term := NULL;
1747: end if;
1748:
1749: l_header_val_rec.ship_to_org :=l_header_val_rec.ship_to_location;

Line 1826: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1822: , p_reject_order => p_reject_order
1823: , x_return_status => l_return_status
1824: );
1825:
1826: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1827: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1828: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1829: RAISE FND_API.G_EXC_ERROR;
1830: END IF;

Line 1827: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1823: , x_return_status => l_return_status
1824: );
1825:
1826: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1827: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1828: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1829: RAISE FND_API.G_EXC_ERROR;
1830: END IF;
1831: END IF; -- End of IF l_ack_req_flag IN ('B', 'H')

Line 1828: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

1824: );
1825:
1826: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1827: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1828: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1829: RAISE FND_API.G_EXC_ERROR;
1830: END IF;
1831: END IF; -- End of IF l_ack_req_flag IN ('B', 'H')
1832:

Line 1829: RAISE FND_API.G_EXC_ERROR;

1825:
1826: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1827: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1828: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1829: RAISE FND_API.G_EXC_ERROR;
1830: END IF;
1831: END IF; -- End of IF l_ack_req_flag IN ('B', 'H')
1832:
1833:

Line 1860: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

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

Line 1861: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

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

Line 1862: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

1858: );
1859:
1860: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1861: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1862: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1863: RAISE FND_API.G_EXC_ERROR;
1864: END IF;
1865:
1866:

Line 1863: RAISE FND_API.G_EXC_ERROR;

1859:
1860: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1861: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1862: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1863: RAISE FND_API.G_EXC_ERROR;
1864: END IF;
1865:
1866:
1867: -- Insert Lots Information

Line 1884: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1880: , p_reject_order => p_reject_order
1881: , x_return_status => l_return_status
1882: );
1883:
1884: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1885: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1886: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1887: RAISE FND_API.G_EXC_ERROR;
1888: END IF;

Line 1885: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1881: , x_return_status => l_return_status
1882: );
1883:
1884: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1885: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1886: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1887: RAISE FND_API.G_EXC_ERROR;
1888: END IF;
1889:

Line 1886: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

1882: );
1883:
1884: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1885: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1886: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1887: RAISE FND_API.G_EXC_ERROR;
1888: END IF;
1889:
1890:

Line 1887: RAISE FND_API.G_EXC_ERROR;

1883:
1884: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1885: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1886: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1887: RAISE FND_API.G_EXC_ERROR;
1888: END IF;
1889:
1890:
1891: -- Call Get_Reject_Line to get rejected lines and Lotserials

Line 1916: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1912: , p_sold_to_org => l_header_val_rec.sold_to_org
1913: , p_sold_to_org_id => l_header_rec.sold_to_org_id
1914: );
1915:
1916: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1917: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1918: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1919: RAISE FND_API.G_EXC_ERROR;
1920: END IF;

Line 1917: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1913: , p_sold_to_org_id => l_header_rec.sold_to_org_id
1914: );
1915:
1916: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1917: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1918: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1919: RAISE FND_API.G_EXC_ERROR;
1920: END IF;
1921:

Line 1918: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

1914: );
1915:
1916: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1917: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1918: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1919: RAISE FND_API.G_EXC_ERROR;
1920: END IF;
1921:
1922:

Line 1919: RAISE FND_API.G_EXC_ERROR;

1915:
1916: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1917: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1918: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1919: RAISE FND_API.G_EXC_ERROR;
1920: END IF;
1921:
1922:
1923: -- Insert rejected lines and lotserials only if got any rejected records

Line 1940: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1936: ,p_reject_order => l_create_rejects
1937: ,x_return_status => l_return_status
1938: );
1939:
1940: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1941: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1942: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1943: RAISE FND_API.G_EXC_ERROR;
1944: END IF;

Line 1941: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1937: ,x_return_status => l_return_status
1938: );
1939:
1940: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1941: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1942: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1943: RAISE FND_API.G_EXC_ERROR;
1944: END IF;
1945:

Line 1942: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

1938: );
1939:
1940: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1941: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1942: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1943: RAISE FND_API.G_EXC_ERROR;
1944: END IF;
1945:
1946: IF l_reject_lot_serial_tbl.COUNT > 0 THEN

Line 1943: RAISE FND_API.G_EXC_ERROR;

1939:
1940: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1941: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1942: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1943: RAISE FND_API.G_EXC_ERROR;
1944: END IF;
1945:
1946: IF l_reject_lot_serial_tbl.COUNT > 0 THEN
1947: IF l_debug_level > 0 THEN

Line 1962: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1958: ,p_reject_order => l_create_rejects
1959: ,x_return_status => l_return_status
1960: );
1961:
1962: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1963: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1964: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1965: RAISE FND_API.G_EXC_ERROR;
1966: END IF;

Line 1963: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1959: ,x_return_status => l_return_status
1960: );
1961:
1962: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1963: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1964: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1965: RAISE FND_API.G_EXC_ERROR;
1966: END IF;
1967: END IF; -- IF l_reject_lot_serial_tbl.COUNT > 0

Line 1964: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

1960: );
1961:
1962: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1963: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1964: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1965: RAISE FND_API.G_EXC_ERROR;
1966: END IF;
1967: END IF; -- IF l_reject_lot_serial_tbl.COUNT > 0
1968: END IF; -- IF l_reject_line_tbl.COUNT > 0

Line 1965: RAISE FND_API.G_EXC_ERROR;

1961:
1962: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1963: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1964: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1965: RAISE FND_API.G_EXC_ERROR;
1966: END IF;
1967: END IF; -- IF l_reject_lot_serial_tbl.COUNT > 0
1968: END IF; -- IF l_reject_line_tbl.COUNT > 0
1969: END IF; -- IF l_ack_req_flag = 'B'

Line 1973: x_return_status := FND_API.G_RET_STS_SUCCESS;

1969: END IF; -- IF l_ack_req_flag = 'B'
1970:
1971: -- Set return status
1972:
1973: x_return_status := FND_API.G_RET_STS_SUCCESS;
1974:
1975: IF l_debug_level > 0 THEN -- debug level changed to 0.5 for bug 13435459
1976: oe_debug_pub.add( 'EXITING OE_ACKNOWLEDGMENT_PVT.PROCESS_ACKNOWLEDGMENT', 0.5);
1977: END IF;

Line 1981: WHEN FND_API.G_EXC_ERROR THEN

1977: END IF;
1978:
1979: EXCEPTION
1980:
1981: WHEN FND_API.G_EXC_ERROR THEN
1982: IF l_debug_level > 0 THEN
1983: oe_debug_pub.add( 'ENCOUNTERED ERROR EXCEPTION' , 2 ) ;
1984: END IF;
1985: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1985: x_return_status := FND_API.G_RET_STS_ERROR;

1981: WHEN FND_API.G_EXC_ERROR THEN
1982: IF l_debug_level > 0 THEN
1983: oe_debug_pub.add( 'ENCOUNTERED ERROR EXCEPTION' , 2 ) ;
1984: END IF;
1985: x_return_status := FND_API.G_RET_STS_ERROR;
1986:
1987: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1988: IF l_debug_level > 0 THEN
1989: oe_debug_pub.add( 'ENCOUNTERED UNEXPECTED ERROR EXCEPTION'||SQLERRM , 1 ) ;

Line 1987: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1983: oe_debug_pub.add( 'ENCOUNTERED ERROR EXCEPTION' , 2 ) ;
1984: END IF;
1985: x_return_status := FND_API.G_RET_STS_ERROR;
1986:
1987: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1988: IF l_debug_level > 0 THEN
1989: oe_debug_pub.add( 'ENCOUNTERED UNEXPECTED ERROR EXCEPTION'||SQLERRM , 1 ) ;
1990: END IF;
1991: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 1991: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1987: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1988: IF l_debug_level > 0 THEN
1989: oe_debug_pub.add( 'ENCOUNTERED UNEXPECTED ERROR EXCEPTION'||SQLERRM , 1 ) ;
1990: END IF;
1991: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1992:
1993: WHEN OTHERS THEN
1994: IF l_debug_level > 0 THEN
1995: oe_debug_pub.add( 'ENCOUNTERED OTHERS ERROR EXCEPTION IN OE_ACKNOWLEDGMENT_PVT.PROCESS_ACKNOWLEDGMENT: '||SQLERRM , 1 ) ;

Line 1997: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1993: WHEN OTHERS THEN
1994: IF l_debug_level > 0 THEN
1995: oe_debug_pub.add( 'ENCOUNTERED OTHERS ERROR EXCEPTION IN OE_ACKNOWLEDGMENT_PVT.PROCESS_ACKNOWLEDGMENT: '||SQLERRM , 1 ) ;
1996: END IF;
1997: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1998:
1999: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2000: THEN
2001: OE_MSG_PUB.Add_Exc_Msg

Line 2067: x_return_status := FND_API.G_RET_STS_SUCCESS;

2063: If Oe_Globals.G_EC_INSTALLED Is Null Then
2064: Oe_Globals.G_EC_INSTALLED := Oe_Globals.Check_Product_Installed(175);
2065: End If;
2066: If Oe_Globals.G_EC_INSTALLED <> 'Y' Then
2067: x_return_status := FND_API.G_RET_STS_SUCCESS;
2068: If l_debug_level > 0 Then
2069: oe_debug_pub.add('EC not installed');
2070: End If;
2071: -- Raise event to log message

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

2071: -- Raise event to log message
2072: Return;
2073: End If;
2074:
2075: If (l_header_rec.header_id <> FND_API.G_MISS_NUM And
2076: nvl(l_header_rec.header_id,0) <> 0) Then
2077: Begin
2078: Select booked_flag,xml_message_id
2079: Into l_booked_flag,l_xml_message_id

Line 2094: x_return_status := FND_API.G_RET_STS_SUCCESS;

2090: l_header_rec.xml_message_id := l_xml_message_id;
2091: End IF;
2092: Exception
2093: When Others Then
2094: x_return_status := FND_API.G_RET_STS_SUCCESS;
2095: If l_debug_level > 0 Then
2096: oe_debug_pub.add('Exception in getting booked flag');
2097: End If;
2098: Return;

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

2097: End If;
2098: Return;
2099: End;
2100: Elsif l_line_tbl.count > 0 And
2101: (l_header_rec.header_id = FND_API.G_MISS_NUM OR
2102: nvl(l_header_rec.header_id,0) = 0) AND
2103: (l_line_tbl(l_line_tbl.first).header_id <> FND_API.G_MISS_NUM AND
2104: nvl(l_line_tbl(l_line_tbl.first).header_id,0) <> 0) Then
2105: Begin

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

2099: End;
2100: Elsif l_line_tbl.count > 0 And
2101: (l_header_rec.header_id = FND_API.G_MISS_NUM OR
2102: nvl(l_header_rec.header_id,0) = 0) AND
2103: (l_line_tbl(l_line_tbl.first).header_id <> FND_API.G_MISS_NUM AND
2104: nvl(l_line_tbl(l_line_tbl.first).header_id,0) <> 0) Then
2105: Begin
2106: l_line_index := l_line_tbl.First;
2107: -- start bug 4048709, if the global picture header record is not present

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

2110: -- so get it from the cache if possible
2111: IF l_debug_level > 0 THEN
2112: oe_debug_pub.add( 'Header Id in cache is : '||oe_order_cache.g_header_rec.header_id);
2113: END IF;
2114: IF OE_ORDER_CACHE.g_header_rec.header_id <> FND_API.G_MISS_NUM AND
2115: nvl(OE_ORDER_CACHE.g_header_rec.header_id,0) = l_line_tbl(l_line_index).header_id THEN
2116: l_header_rec := OE_ORDER_CACHE.g_header_rec;
2117: IF l_debug_level > 0 THEN
2118: oe_debug_pub.add('Assigned header record from cache with booked flag '|| l_header_rec.booked_flag);

Line 2130: x_return_status := FND_API.G_RET_STS_SUCCESS;

2126: END IF;
2127: l_header_rec_isnull := 'Y';
2128: Exception
2129: When Others Then
2130: x_return_status := FND_API.G_RET_STS_SUCCESS;
2131: If l_debug_level > 0 Then
2132: oe_debug_pub.add('Exception in l_line_tbl.count > 0');
2133: End If;
2134: Return;

Line 2138: x_return_status := FND_API.G_RET_STS_SUCCESS;

2134: Return;
2135: End;
2136: Else
2137: -- Nothing to Acknowledge
2138: x_return_status := FND_API.G_RET_STS_SUCCESS;
2139: If l_debug_level > 0 Then
2140: oe_debug_pub.add('Exception else, Nothing to Acknowledge');
2141: End If;
2142: Return;

Line 2147: x_return_status := FND_API.G_RET_STS_SUCCESS;

2143: End If;
2144:
2145: If G_CURR_SOLD_TO_ORG_ID = l_header_rec.sold_to_org_id and
2146: (G_TP_RET = FALSE Or G_PRIMARY_SETUP = FALSE) Then
2147: x_return_status := FND_API.G_RET_STS_SUCCESS;
2148: If l_debug_level > 0 Then
2149: oe_debug_pub.add('Transaction Not Enabled for Trading Partner');
2150: End If;
2151: -- Raise event to log message

Line 2203: x_return_status := FND_API.G_RET_STS_SUCCESS;

2199: G_CURR_ADDRESS_ID := l_address_id;
2200: G_PRIMARY_SETUP := TRUE;
2201: Exception
2202: When NO_DATA_FOUND Then
2203: x_return_status := FND_API.G_RET_STS_SUCCESS;
2204: G_CURR_SOLD_TO_ORG_ID := l_header_rec.sold_to_org_id;
2205: G_CURR_ADDRESS_ID := NULL;
2206: G_PRIMARY_SETUP := FALSE;
2207:

Line 2237: x_return_status := FND_API.G_RET_STS_SUCCESS;

2233: */
2234: Return;
2235:
2236: When Others Then
2237: x_return_status := FND_API.G_RET_STS_SUCCESS;
2238: If l_debug_level > 0 Then
2239: oe_debug_pub.add('Not able to get primary sold to exception');
2240: End If;
2241: Return;

Line 2260: x_return_status := FND_API.G_RET_STS_SUCCESS;

2256: ,p_msg_data => l_msg_data);
2257:
2258: IF l_tp_ret = FALSE Then
2259: G_TP_RET := FALSE;
2260: x_return_status := FND_API.G_RET_STS_SUCCESS;
2261: If l_debug_level > 0 Then
2262: oe_debug_pub.add('Transaction not enabled');
2263: End If;
2264: -- Raise event to log message

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

2339: End If;
2340: End If;
2341:
2342: if (l_line_tbl(I).operation is NULL OR
2343: l_line_tbl(I).operation = FND_API.G_MISS_CHAR ) THEN
2344: l_line_tbl(I).operation := NULL; -- for bug 4764583/5178052
2345: oe_debug_pub.add(' Setting Operation G_MISS_CHAR to NULL');
2346: end if;
2347:

Line 2376: If l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then

2372: (p_header_rec => l_header_rec,
2373: x_ack_type => l_ack_type,
2374: x_return_status => l_return_status);
2375:
2376: If l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then
2377: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2378: Elsif l_return_status = FND_API.G_RET_STS_ERROR Then
2379: RAISE FND_API.G_EXC_ERROR;
2380: Else

Line 2377: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2373: x_ack_type => l_ack_type,
2374: x_return_status => l_return_status);
2375:
2376: If l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then
2377: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2378: Elsif l_return_status = FND_API.G_RET_STS_ERROR Then
2379: RAISE FND_API.G_EXC_ERROR;
2380: Else
2381: l_raise_event := 'Y';

Line 2378: Elsif l_return_status = FND_API.G_RET_STS_ERROR Then

2374: x_return_status => l_return_status);
2375:
2376: If l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then
2377: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2378: Elsif l_return_status = FND_API.G_RET_STS_ERROR Then
2379: RAISE FND_API.G_EXC_ERROR;
2380: Else
2381: l_raise_event := 'Y';
2382: End If;

Line 2379: RAISE FND_API.G_EXC_ERROR;

2375:
2376: If l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then
2377: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2378: Elsif l_return_status = FND_API.G_RET_STS_ERROR Then
2379: RAISE FND_API.G_EXC_ERROR;
2380: Else
2381: l_raise_event := 'Y';
2382: End If;
2383: End If;

Line 2391: If l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then

2387: OE_Line_Ack_Util.Insert_Row
2388: (p_line_tbl => l_line_tbl,
2389: p_old_line_tbl => l_old_line_tbl,
2390: x_return_status => l_return_status);
2391: If l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then
2392: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2393: Elsif l_return_status = FND_API.G_RET_STS_ERROR Then
2394: RAISE FND_API.G_EXC_ERROR;
2395: Else

Line 2392: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2388: (p_line_tbl => l_line_tbl,
2389: p_old_line_tbl => l_old_line_tbl,
2390: x_return_status => l_return_status);
2391: If l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then
2392: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2393: Elsif l_return_status = FND_API.G_RET_STS_ERROR Then
2394: RAISE FND_API.G_EXC_ERROR;
2395: Else
2396: l_raise_event := 'Y';

Line 2393: Elsif l_return_status = FND_API.G_RET_STS_ERROR Then

2389: p_old_line_tbl => l_old_line_tbl,
2390: x_return_status => l_return_status);
2391: If l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then
2392: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2393: Elsif l_return_status = FND_API.G_RET_STS_ERROR Then
2394: RAISE FND_API.G_EXC_ERROR;
2395: Else
2396: l_raise_event := 'Y';
2397: End If;

Line 2394: RAISE FND_API.G_EXC_ERROR;

2390: x_return_status => l_return_status);
2391: If l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then
2392: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2393: Elsif l_return_status = FND_API.G_RET_STS_ERROR Then
2394: RAISE FND_API.G_EXC_ERROR;
2395: Else
2396: l_raise_event := 'Y';
2397: End If;
2398:

Line 2429: If l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then

2425: , p_sold_to_org => l_sold_to_org
2426: , p_sold_to_org_id => l_header_rec.sold_to_org_id
2427: );
2428:
2429: If l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then
2430: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2431: Elsif l_return_status = FND_API.G_RET_STS_ERROR Then
2432: RAISE FND_API.G_EXC_ERROR;
2433: End If;

Line 2430: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2426: , p_sold_to_org_id => l_header_rec.sold_to_org_id
2427: );
2428:
2429: If l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then
2430: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2431: Elsif l_return_status = FND_API.G_RET_STS_ERROR Then
2432: RAISE FND_API.G_EXC_ERROR;
2433: End If;
2434:

Line 2431: Elsif l_return_status = FND_API.G_RET_STS_ERROR Then

2427: );
2428:
2429: If l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then
2430: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2431: Elsif l_return_status = FND_API.G_RET_STS_ERROR Then
2432: RAISE FND_API.G_EXC_ERROR;
2433: End If;
2434:
2435: If l_reject_line_tbl.COUNT > 0 Then

Line 2432: RAISE FND_API.G_EXC_ERROR;

2428:
2429: If l_return_status = FND_API.G_RET_STS_UNEXP_ERROR Then
2430: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2431: Elsif l_return_status = FND_API.G_RET_STS_ERROR Then
2432: RAISE FND_API.G_EXC_ERROR;
2433: End If;
2434:
2435: If l_reject_line_tbl.COUNT > 0 Then
2436: OE_Line_Ack_Util.Insert_Row

Line 2446: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

2442: ,p_reject_order => 'Y'
2443: ,x_return_status => l_return_status
2444: );
2445:
2446: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2447: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2448: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2449: RAISE FND_API.G_EXC_ERROR;
2450: Else

Line 2447: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2443: ,x_return_status => l_return_status
2444: );
2445:
2446: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2447: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2448: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2449: RAISE FND_API.G_EXC_ERROR;
2450: Else
2451: l_raise_event := 'Y';

Line 2448: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

2444: );
2445:
2446: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2447: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2448: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2449: RAISE FND_API.G_EXC_ERROR;
2450: Else
2451: l_raise_event := 'Y';
2452: END IF;

Line 2449: RAISE FND_API.G_EXC_ERROR;

2445:
2446: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2447: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2448: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2449: RAISE FND_API.G_EXC_ERROR;
2450: Else
2451: l_raise_event := 'Y';
2452: END IF;
2453:

Line 2475: x_return_status := FND_API.G_RET_STS_SUCCESS;

2471: p_xml_msg_id => l_header_rec.xml_message_id, --l_xml_message_id,
2472: x_return_status => l_return_status);
2473: End If;
2474:
2475: x_return_status := FND_API.G_RET_STS_SUCCESS;
2476:
2477: Exception
2478: When Others Then
2479: If l_debug_level >0 Then