[Home] [Help]
101: oe_debug_pub.add( 'ENTERING OEXPACKB GET_HEADER_ID' ) ;
102: END IF;
103:
104: If OE_CODE_CONTROL.GET_CODE_RELEASE_LEVEL >= '110510' Then
105: fnd_profile.get('ONT_INCLUDE_CUST_IN_OI_KEY', l_customer_key_profile);
106: l_customer_key_profile := nvl(l_customer_key_profile, 'N');
107: IF l_debug_level > 0 THEN
108: oe_debug_pub.add( 'CUSTOMER KEY PROFILE SETTING = '||l_customer_key_profile ) ;
109: END IF;
955:
956:
957:
958: If OE_CODE_CONTROL.GET_CODE_RELEASE_LEVEL >= '110510' Then
959: fnd_profile.get('ONT_INCLUDE_CUST_IN_OI_KEY', l_customer_key_profile);
960: l_customer_key_profile := nvl(l_customer_key_profile, 'N');
961: IF l_debug_level > 0 THEN
962: oe_debug_pub.add( 'CUSTOMER KEY PROFILE SETTING = '||l_customer_key_profile ) ;
963: END IF;
1171: END IF;
1172: l_acknowledgment_type := p_transaction_type;
1173:
1174: If OE_CODE_CONTROL.GET_CODE_RELEASE_LEVEL >= '110510' Then
1175: fnd_profile.get('ONT_INCLUDE_CUST_IN_OI_KEY', l_customer_key_profile);
1176: l_customer_key_profile := nvl(l_customer_key_profile, 'N');
1177: IF l_debug_level > 0 THEN
1178: oe_debug_pub.add( 'CUSTOMER KEY PROFILE SETTING = '||l_customer_key_profile ) ;
1179: END IF;
1852: );
1853: IF l_is_delivery_required_cso = 'Y' THEN
1854: -- populate profile only if 3a7 is set up, this will need to change if we start
1855: -- supporting holds via 3a6 also
1856: l_cso_response_profile := nvl(FND_PROFILE.VALUE ('ONT_3A7_RESPONSE_REQUIRED'), 'N');
1857: END IF;
1858: IF l_debug_level > 0 THEN
1859: oe_debug_pub.add( 'OEXPACKB: is delivery required for 3a7 = ' || l_is_delivery_required_cso ) ;
1860: oe_debug_pub.add( 'OEXPACKB: fetched CSO Response Required profile ' || l_cso_response_profile) ;
1945: -- (barring any notification issues). Thus, if the XML orders accept state profile
1946: -- is set to 'BOOKED' then we have a change from 'Pending' to 'Accept' and thus
1947: -- need to send a 3A7, otherwise we turn off 3a7
1948: IF l_is_delivery_required_cso = 'Y' THEN
1949: IF nvl(FND_PROFILE.VALUE('ONT_XML_ACCEPT_STATE'), 'ENTERED') = 'ENTERED' THEN
1950: l_header_req_cso := 'N'; -- i.e. 3a7 not sent on Booking if accept state is Entered,
1951: -- unless of course there are line_changes (handled later)
1952: ELSIF nvl(OE_GLOBALS.G_XML_TXN_CODE, G_TRANSACTION_CSO) = G_TRANSACTION_POI THEN
1953: l_header_req_cso := 'N'; -- i.e. don't send 3a7 if order is booked by buyer
2882: l_msg_count NUMBER := 0 ;
2883: l_msg_data VARCHAR2(2000):= NULL ;
2884: l_message_text VARCHAR2(2000);
2885:
2886: --l_debug_level NUMBER := to_number(nvl(fnd_profile.value('ONT_DEBUG_LEVEL'),'0'));
2887: l_filename VARCHAR2(200);
2888: l_request_id NUMBER;
2889: l_org_id NUMBER;
2890: l_order_rec Order_Rec_Type;
2972:
2973: IF l_debug_level > 0 THEN
2974: oe_debug_pub.add( 'BEFORE GETTING REQUEST ID' ) ;
2975: END IF;
2976: fnd_profile.get('CONC_REQUEST_ID', l_request_id);
2977: IF l_debug_level > 0 THEN
2978: oe_debug_pub.add( 'REQUEST ID: '|| TO_CHAR ( L_REQUEST_ID ) ) ;
2979: END IF;
2980: fnd_file.put_line(FND_FILE.OUTPUT, 'Request Id: '|| to_char(l_request_id));
3127: i NUMBER;
3128: l_org_id NUMBER := p_org_id;
3129: l_conc_request_id NUMBER := p_conc_request_id;
3130: l_response_flag VARCHAR2(1) := p_response_flag;
3131: l_integ_profile VARCHAR2(10) := nvl (FND_PROFILE.VALUE ('ONT_EM_INTEG_SOURCES'), 'XML');
3132: l_customer_key_profile VARCHAR2(1) := 'N';
3133: l_failure_ack_flag VARCHAR2(1) := nvl(p_failure_ack_flag, 'N');
3134: l_order_processed_flag VARCHAR2(1) := 'Y';
3135:
3243: -----------------------------------------------------------
3244: IF OE_Code_Control.Code_Release_Level >= '110510' THEN
3245: IF l_processing_stage = 'IMPORT_FAILURE' THEN
3246: IF p_order_source_id = 20 AND l_transaction_subtype IN (G_TRANSACTION_CHO, G_TRANSACTION_CPO) THEN
3247: fnd_profile.get('ONT_INCLUDE_CUST_IN_OI_KEY', l_customer_key_profile);
3248: l_customer_key_profile := nvl(l_customer_key_profile, 'N');
3249:
3250: Begin
3251: Select order_number, order_type_id, header_id