1297: /*Added for CBC Upgrade - End*/
1298: ELSIF l_doc_type = 'REQ' THEN
1299: IF (p_org_id IS NULL) THEN
1300: SELECT org_id INTO p_org_id
1301: FROM po_requisition_headers_all
1302: WHERE requisition_header_id = g_cc_header_id;
1303: IF (g_debug_mode = 'Y') THEN
1304: Put_Debug_Msg (l_full_path, 'Org ID: '|| p_org_id || ' obtained from po_requisition_headers_all' );
1305: END IF;
1300: SELECT org_id INTO p_org_id
1301: FROM po_requisition_headers_all
1302: WHERE requisition_header_id = g_cc_header_id;
1303: IF (g_debug_mode = 'Y') THEN
1304: Put_Debug_Msg (l_full_path, 'Org ID: '|| p_org_id || ' obtained from po_requisition_headers_all' );
1305: END IF;
1306: END IF;
1307: x_entity_type := 'CC_REQUISITIONS';
1308: x_event_type_code := 'CC_REQUISITION_EVENT';