[Home] [Help]
2741: ,p_source_document_type_id => l_line_rec.source_document_type_id
2742: ,p_source_document_id => l_line_rec.source_document_id
2743: ,p_source_document_line_id => l_line_rec.source_document_line_id );
2744:
2745: IF OE_Code_Control.code_release_level >= '110510'
2746: AND NVL(FND_PROFILE.VALUE('ONT_3A7_RESPONSE_REQUIRED'), 'N') = 'Y'
2747: -- Added this check because, holds will be applied only when this profile is set to 'YES'.
2748: AND l_line_rec.order_source_id = OE_Acknowledgment_Pub.G_XML_ORDER_SOURCE_ID
2749: AND nvl(l_line_rec.xml_transaction_type_code, FND_API.G_MISS_CHAR)
5733:
5734: OE_ORDER_WF_UTIL.START_ALL_FLOWS;
5735: END IF;
5736:
5737: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL < '110508'
5738: AND oe_order_cache.g_header_rec.booked_flag = 'Y' THEN
5739: -- If notify, then call service and acknowledgments notify APIs
5740:
5741: IF p_notify THEN
5802: oe_debug_pub.add( 'CALLING ACKS API' , 1 ) ;
5803: END IF;
5804:
5805: -- ediack changes
5806: If Oe_Code_Control.Code_Release_level >= '110510' And
5807: p_header_rec.order_source_id In (0,2,6) And
5808: l_edi_ack_pfile = 'YES' Then
5809:
5810: OE_Acknowledgment_Pvt.Process_Acknowledgment
6141: ,x_return_status => l_return_status
6142: );
6143:
6144: -- The below condition to leave the existing flow to work as it is
6145: Elsif Oe_Code_Control.Code_Release_Level >= '110510' And
6146: OE_ORDER_CACHE.g_header_rec.order_source_id in (0,2,6) And
6147: l_edi_ack_pfile = 'YES' Then
6148: OE_Acknowledgment_Pvt.Process_Acknowledgment
6149: (p_header_rec => OE_ORDER_UTIL.g_header_rec,
6220: /* Now clear the global pl/sql tables */
6221: /* Also clear for >= 11i10 for versioning */
6222: IF (OE_ORDER_UTIL.G_Recursion_Without_Exception = 'N' AND
6223: (OE_ORDER_CACHE.g_header_rec.booked_flag = 'Y' OR
6224: OE_CODE_CONTROL.Code_Release_Level >= '110510' )) THEN
6225: OE_ORDER_UTIL.Clear_Global_Picture(l_return_status);
6226: END IF;
6227:
6228: END IF; /*check for record in key entities*/
6262: p_In_out => 0);
6263: x_return_status := FND_API.G_RET_STS_ERROR;
6264: IF NOT (OE_GLOBALS.G_UI_FLAG) THEN
6265: OE_DELAYED_REQUESTS_PVT.Clear_Request(l_return_status);
6266: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110508' THEN
6267: OE_ORDER_UTIL.Clear_Global_Picture(l_return_status);
6268: END IF;
6269: END IF;
6270:
6274: p_In_out => 0);
6275: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6276: IF NOT (OE_GLOBALS.G_UI_FLAG) THEN
6277: OE_DELAYED_REQUESTS_PVT.Clear_Request(l_return_status);
6278: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110508' THEN
6279: OE_ORDER_UTIL.Clear_Global_Picture(l_return_status);
6280: END IF;
6281: END IF;
6282:
6289: END IF;
6290: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6291: IF NOT (OE_GLOBALS.G_UI_FLAG) THEN
6292: OE_DELAYED_REQUESTS_PVT.Clear_Request(l_return_status);
6293: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110508' THEN
6294: OE_ORDER_UTIL.Clear_Global_Picture(l_return_status);
6295: END IF;
6296: END IF;
6297: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6907: -------------------------------------------------------
6908: -- Process Header Payments
6909: -------------------------------------------------------
6910:
6911: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110510' THEN
6912: -- Set Header Id on Payments
6913:
6914: I := p_x_header_payment_tbl.FIRST;
6915: WHILE I IS NOT NULL LOOP
7182: I := p_x_line_scredit_tbl.NEXT(I);
7183: END LOOP;
7184:
7185:
7186: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110510' THEN
7187: I := p_x_line_payment_tbl.FIRST;
7188: WHILE I IS NOT NULL LOOP
7189:
7190: IF l_debug_level > 0 THEN
7407: -------------------------------------------------------
7408: -- Process Line Payments
7409: -------------------------------------------------------
7410:
7411: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110510' THEN
7412: -- Line_Payments
7413:
7414: IF p_x_line_payment_tbl.COUNT > 0 THEN
7415:
8058:
8059: /* Notification Project changes */
8060: /* Call Process_Requests_and_Notify to inform all subscribers */
8061:
8062: IF (OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110508') then
8063: /* Call Process Requests and notify */
8064: IF l_debug_level > 0 THEN
8065: oe_debug_pub.add( 'CALLING PROCESS_REQUESTS_AND_NOTIFY FOR PACK H IN PROCESS_ORDER_AG' );
8066: END IF;
8175: IF l_debug_level > 0 THEN
8176: oe_debug_pub.add( 'CALLING ACKS API' , 1 ) ;
8177: END IF;
8178:
8179: If Oe_Code_Control.Code_Release_Level >= '110510' And
8180: p_x_header_rec.order_source_id in (0,2,6) And
8181: l_edi_ack_pfile = 'YES' Then
8182: OE_Acknowledgment_Pvt.Process_Acknowledgment
8183: (p_header_rec => p_x_header_rec,
8552:
8553: -- With OM Family Pack I or 11.5.9 onwards, new performance code
8554: -- will be activated.
8555:
8556: IF OE_CODE_CONTROL.Code_Release_Level >= '110509' THEN
8557: Process_Order_AG
8558: ( p_api_version_number => p_api_version_number
8559: , p_init_msg_list => p_init_msg_list
8560: , p_validation_level => p_validation_level
10309:
10310: /* Notification Project changes */
10311: /* Call Process_Requests_and_Notify to inform all subscribers */
10312:
10313: IF (OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110508') then
10314: /* Call Process Requests and notify */
10315: IF l_debug_level > 0 THEN
10316: oe_debug_pub.add( 'CALLING PROCESS_REQUESTS_AND_NOTIFY FOR PACK H' ) ;
10317: END IF;
10418: IF l_debug_level > 0 THEN
10419: oe_debug_pub.add( 'CALLING ACKS API' , 1 ) ;
10420: END IF;
10421:
10422: If Oe_Code_Control.Code_Release_Level >= '110510' And
10423: l_header_rec.order_source_id in (0,2,6) And
10424: l_edi_ack_pfile = 'YES' Then
10425: OE_Acknowledgment_Pvt.Process_Acknowledgment
10426: (p_header_rec => l_header_rec,
10519: oe_debug_pub.add( 'DELETE REQUEST11' , 2 ) ;
10520: END IF;
10521:
10522: OE_DELAYED_REQUESTS_PVT.Clear_Request(l_return_status);
10523: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110508' THEN
10524: OE_ORDER_UTIL.Clear_Global_Picture(l_return_status);
10525: END IF;
10526: OE_ORDER_WF_UTIL.CLEAR_FLOWSTART_GLOBALS;
10527: ROLLBACK TO SAVEPOINT Process_Order;
10551: oe_debug_pub.add( 'DELETE REQUEST12' , 2 ) ;
10552: END IF;
10553:
10554: OE_DELAYED_REQUESTS_PVT.Clear_Request(l_return_status);
10555: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110508' THEN
10556: OE_ORDER_UTIL.Clear_Global_Picture(l_return_status);
10557: END IF;
10558: OE_ORDER_WF_UTIL.CLEAR_FLOWSTART_GLOBALS;
10559: ROLLBACK TO SAVEPOINT Process_Order;
10584: oe_debug_pub.add( 'DELETE REQUEST13' , 2 ) ;
10585: END IF;
10586:
10587: OE_DELAYED_REQUESTS_PVT.Clear_Request(l_return_status);
10588: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110508' THEN
10589: OE_ORDER_UTIL.Clear_Global_Picture(l_return_status);
10590: END IF;
10591: OE_ORDER_WF_UTIL.CLEAR_FLOWSTART_GLOBALS;
10592: ROLLBACK TO SAVEPOINT Process_Order;
10879: END LOOP;
10880:
10881: -- Lock Header_Payment
10882:
10883: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110510' THEN
10884: I := p_x_Header_Payment_tbl.FIRST;
10885: WHILE I IS NOT NULL LOOP
10886:
10887: IF p_x_Header_Payment_tbl(I).operation = OE_GLOBALS.G_OPR_LOCK THEN
11054: END LOOP;
11055:
11056: -- Lock Line_Payment
11057:
11058: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110510' THEN
11059: I := p_x_Line_Payment_tbl.FIRST;
11060:
11061: WHILE I IS NOT NULL LOOP
11062:
11391: ( p_header_id => p_header_id
11392: , x_Header_Scredit_tbl => x_Header_Scredit_tbl
11393: );
11394:
11395: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110510' THEN
11396: -- Get Header_Payment ( parent = header )
11397:
11398: OE_Header_Payment_Util.Query_Rows
11399: ( p_header_id => p_header_id
11515: I3 := l_Line_Scredit_tbl.NEXT(I3);
11516:
11517: END LOOP;
11518:
11519: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110510' THEN
11520: -- Get Line_Payment ( parent = line )
11521:
11522: l_Line_Payment_tbl.delete; --6052770
11523: OE_Line_Payment_Util.Query_Rows
11863: IF p_x_line_rec.config_header_id is not NULL AND
11864: p_x_line_rec.configuration_id is not NULL AND
11865: p_x_line_rec.config_header_id <> FND_API.G_MISS_NUM AND
11866: p_x_line_rec.configuration_id <> FND_API.G_MISS_NUM AND
11867: OE_CODE_CONTROL.Get_Code_Release_Level >= '110508' THEN
11868:
11869: IF l_debug_level > 0 THEN
11870: oe_debug_pub.add( 'COMP_CONFIG VORDB: PACK H NEW LOGIC MI' , 1 ) ;
11871: oe_debug_pub.add( 'CFG_HDR '||P_X_LINE_REC.CONFIG_HEADER_ID , 3 ) ;
12175: p_x_line_tbl(l_option_index).config_header_id <>
12176: FND_API.G_MISS_NUM AND
12177: p_x_line_tbl(l_option_index).configuration_id <>
12178: FND_API.G_MISS_NUM AND
12179: OE_CODE_CONTROL.Get_Code_Release_Level >= '110508' THEN
12180:
12181: IF l_debug_level > 0 THEN
12182: oe_debug_pub.add( 'VORDB: PACK H NEW LOGIC MI' , 1 ) ;
12183: END IF;
12323:
12324: WHEN TOO_MANY_ROWS THEN
12325: IF p_x_line_tbl(l_option_index).config_header_id is not NULL AND
12326: p_x_line_tbl(l_option_index).configuration_id is not NULL AND
12327: OE_CODE_CONTROL.Get_Code_Release_Level >= '110508' THEN
12328: IF l_debug_level > 0 THEN
12329: oe_debug_pub.add
12330: ('TOO MANY ROWS IN MISSING_CLASSES: PACK H NEW MI',1);
12331: END IF;