DBA Data[Home] [Help]

APPS.PO_DOCUMENT_CONTROL_PVT dependencies on PO_CORE_S

Line 3582: PO_CORE_S.is_fully_reserved(

3578: END IF;
3579: END IF;
3580:
3581: --
3582: PO_CORE_S.is_fully_reserved(
3583: p_doc_type => p_doc_type
3584: , p_doc_level => PO_CORE_S.g_doc_level_header
3585: , p_doc_level_id => p_doc_id
3586: , x_fully_reserved_flag => l_fully_reserved_flag

Line 3584: , p_doc_level => PO_CORE_S.g_doc_level_header

3580:
3581: --
3582: PO_CORE_S.is_fully_reserved(
3583: p_doc_type => p_doc_type
3584: , p_doc_level => PO_CORE_S.g_doc_level_header
3585: , p_doc_level_id => p_doc_id
3586: , x_fully_reserved_flag => l_fully_reserved_flag
3587: );
3588:

Line 3888: IF p_doc_level = PO_CORE_S.g_doc_level_HEADER THEN

3884: -- if there are any submitted/approved timecards associated with the
3885: -- PO header/line. If so, return an error.
3886: IF (p_doc_subtype = PO_CONSTANTS_SV.STANDARD) THEN
3887: d_pos := 50;
3888: IF p_doc_level = PO_CORE_S.g_doc_level_HEADER THEN
3889: l_otl_field_name := PO_HXC_INTERFACE_PVT.field_PO_HEADER_ID;
3890: l_otl_field_value := p_doc_header_id;
3891: ELSE
3892: -- line or shipment level

Line 4137: IF (p_doc_level = PO_CORE_S.g_doc_level_HEADER) THEN

4133: END IF; --IGC_CBC_PO_GRP.cbc_po_enabled_flag = 'Y'
4134:
4135: -- call to Contracts API to cancel deliverables only on the header level
4136: -- for finally close
4137: IF (p_doc_level = PO_CORE_S.g_doc_level_HEADER) THEN
4138: d_pos := 60;
4139: select conterms_exist_flag, start_date,
4140: end_date, decode(cancel_flag,'I',null,cancel_flag)
4141: into l_conterms_exist_flag, l_document_start_date,

Line 4278: IF (p_doc_level = PO_CORE_S.g_doc_level_SHIPMENT)

4274: ,x_exception_msg => l_exc_msg);
4275:
4276: ELSE -- closed-state related action
4277: d_pos := 180;
4278: IF (p_doc_level = PO_CORE_S.g_doc_level_SHIPMENT)
4279: THEN
4280: select shipment_type
4281: into l_doc_subtype
4282: from po_line_locations_all

Line 4733: IF(p_doc_level = PO_CORE_S.g_doc_level_LINE) THEN

4729: PO_LOG.proc_begin(d_module,'p_doc_level_id',p_doc_level_id);
4730: PO_LOG.proc_begin(d_module,'p_doc_level',p_doc_level);
4731: END IF;
4732:
4733: IF(p_doc_level = PO_CORE_S.g_doc_level_LINE) THEN
4734: l_po_line_id := p_doc_level_id;
4735: ELSIF(p_doc_level = PO_CORE_S.g_doc_level_SHIPMENT) THEN
4736: l_line_location_id := p_doc_level_id;
4737: END IF;

Line 4735: ELSIF(p_doc_level = PO_CORE_S.g_doc_level_SHIPMENT) THEN

4731: END IF;
4732:
4733: IF(p_doc_level = PO_CORE_S.g_doc_level_LINE) THEN
4734: l_po_line_id := p_doc_level_id;
4735: ELSIF(p_doc_level = PO_CORE_S.g_doc_level_SHIPMENT) THEN
4736: l_line_location_id := p_doc_level_id;
4737: END IF;
4738:
4739: d_pos := 10;

Line 4845: RAISE PO_CORE_S.g_early_return_exc;

4841: x_return_status := FND_API.g_ret_sts_success;
4842: --Check for dropship PO
4843: IF(PO_COPYDOC_S1.po_is_dropship(p_doc_header_id)) THEN
4844: x_drop_ship_flag := 'Y';
4845: RAISE PO_CORE_S.g_early_return_exc;
4846: END IF;
4847:
4848: d_pos := 20;
4849:

Line 4857: RAISE PO_CORE_S.g_early_return_exc;

4853: IF(is_backing_req_labor_expense(p_doc_level_id => p_doc_level_id,
4854: p_doc_level => p_doc_level)) THEN
4855: d_pos := 30;
4856: x_labor_expense_req_flag := 'Y';
4857: RAISE PO_CORE_S.g_early_return_exc;
4858: END IF;
4859:
4860: d_pos := 40;
4861: -- Check if a given PO contains at least one Services line, i.e. if the

Line 4863: IF(p_doc_level = PO_CORE_S.g_doc_level_HEADER

4859:
4860: d_pos := 40;
4861: -- Check if a given PO contains at least one Services line, i.e. if the
4862: -- value basis of any line is FIXED PRICE or RATE
4863: IF(p_doc_level = PO_CORE_S.g_doc_level_HEADER
4864: AND p_doc_subtype = PO_CONSTANTS_SV.STANDARD) THEN
4865:
4866: IF (PO_SERVICES_PVT.check_po_has_svc_line_with_req(p_doc_header_id)) THEN
4867: d_pos := 50;

Line 4869: RAISE PO_CORE_S.g_early_return_exc;

4865:
4866: IF (PO_SERVICES_PVT.check_po_has_svc_line_with_req(p_doc_header_id)) THEN
4867: d_pos := 50;
4868: x_svc_line_with_req_flag := 'Y';
4869: RAISE PO_CORE_S.g_early_return_exc;
4870: END IF;
4871: END IF; --p_doc_level = 'HEADER' AND docSubType = 'STANDARD'
4872:
4873: d_pos := 60;

Line 4877: IF p_doc_level = PO_CORE_S.g_doc_level_LINE THEN

4873: d_pos := 60;
4874: -- Checks if the line type is Fixed Price Service AND a backing
4875: -- requisition exists for the given line or shipment
4876: IF(p_doc_subtype = PO_CONSTANTS_SV.STANDARD) THEN
4877: IF p_doc_level = PO_CORE_S.g_doc_level_LINE THEN
4878: IF PO_SERVICES_PVT.is_FPS_po_line_with_req(p_doc_level_id) THEN
4879: x_fps_line_ship_with_req_flag := 'Y';
4880: END IF;
4881: ELSIF p_doc_level = PO_CORE_S.g_doc_level_SHIPMENT THEN

Line 4881: ELSIF p_doc_level = PO_CORE_S.g_doc_level_SHIPMENT THEN

4877: IF p_doc_level = PO_CORE_S.g_doc_level_LINE THEN
4878: IF PO_SERVICES_PVT.is_FPS_po_line_with_req(p_doc_level_id) THEN
4879: x_fps_line_ship_with_req_flag := 'Y';
4880: END IF;
4881: ELSIF p_doc_level = PO_CORE_S.g_doc_level_SHIPMENT THEN
4882: IF PO_SERVICES_PVT.is_FPS_po_shipment_with_req(p_doc_level_id) THEN
4883: x_fps_line_ship_with_req_flag := 'Y';
4884: END IF;
4885: END IF; --p_doc_level = 'LINE'

Line 4899: WHEN PO_CORE_S.g_early_return_exc THEN

4895: PO_LOG.proc_end(d_module);
4896: END IF;
4897:
4898: EXCEPTION
4899: WHEN PO_CORE_S.g_early_return_exc THEN
4900: IF PO_LOG.d_stmt THEN
4901: PO_LOG.stmt(d_module,d_pos,'Early exit from ' || d_module);
4902: END IF;
4903: WHEN OTHERS THEN

Line 4990: IF(p_doc_type IN (PO_CORE_S.g_doc_type_PO, PO_CORE_S.g_doc_type_PA)) THEN

4986: d_pos := 10;
4987: --Get the Employee Id of the Current User
4988: l_agent_id := fnd_global.employee_id;
4989: --Get Document Sub type
4990: IF(p_doc_type IN (PO_CORE_S.g_doc_type_PO, PO_CORE_S.g_doc_type_PA)) THEN
4991: SELECT type_lookup_code
4992: INTO l_doc_subtype
4993: FROM po_headers_all
4994: WHERE po_header_id = p_doc_header_id;

Line 5001: IF (p_doc_level = PO_CORE_S.g_doc_level_HEADER) THEN --header level

4997: IF (PO_LOG.d_stmt) THEN
4998: PO_LOG.stmt(d_module,d_pos,'l_agent_id',l_agent_id);
4999: PO_LOG.stmt(d_module,d_pos,'l_doc_subtype',l_doc_subtype);
5000: END IF;
5001: IF (p_doc_level = PO_CORE_S.g_doc_level_HEADER) THEN --header level
5002: d_pos := 30;
5003: PO_DOCUMENT_CONTROL_PVT.get_header_actions
5004: ( p_doc_subtype => l_doc_subtype
5005: , p_doc_id => p_doc_level_id

Line 5012: ELSIF (p_doc_level = PO_CORE_S.g_doc_level_LINE) THEN --line level

5008: , x_displayed_field_tbl => l_displayed_field_tbl
5009: , x_return_status => x_return_status
5010: , p_mode => l_mode);
5011:
5012: ELSIF (p_doc_level = PO_CORE_S.g_doc_level_LINE) THEN --line level
5013: d_pos := 40;
5014: --get the itme_id for the consumption transaction existence check
5015: SELECT item_id
5016: INTO l_item_id

Line 5034: ELSIF (p_doc_level = PO_CORE_S.g_doc_level_SHIPMENT) THEN

5030: , x_displayed_field_tbl => l_displayed_field_tbl
5031: , x_return_status => x_return_status
5032: , p_mode => l_mode);
5033:
5034: ELSIF (p_doc_level = PO_CORE_S.g_doc_level_SHIPMENT) THEN
5035: d_pos := 50;
5036: --shipment levl
5037: PO_DOCUMENT_CONTROL_PVT.get_shipment_actions
5038: ( p_doc_type => p_doc_type

Line 5055: IF p_doc_level IN (PO_CORE_S.g_doc_level_HEADER, PO_CORE_S.g_doc_level_LINE) THEN

5051: d_pos := 60;
5052:
5053: IF (x_return_status = FND_API.g_ret_sts_success)then
5054:
5055: IF p_doc_level IN (PO_CORE_S.g_doc_level_HEADER, PO_CORE_S.g_doc_level_LINE) THEN
5056: -- Checks if there exists a consumption transaction that is in process for
5057: -- the passed in transaction source document ID and and item ID.
5058: l_cons_trans_exist := PO_INV_THIRD_PARTY_STOCK_MDTR.consumption_trans_exist(
5059: p_doc_header_id,

Line 5069: IF(p_doc_level = PO_CORE_S.g_doc_level_SHIPMENT) THEN

5065: END IF;
5066: --
5067: --Prevent cancel option for shipment if it is the only shipment on the
5068: --line that is not cancelled or finally closed.
5069: IF(p_doc_level = PO_CORE_S.g_doc_level_SHIPMENT) THEN
5070:
5071: BEGIN
5072: d_pos := 75;
5073: SELECT 'N'

Line 5097: END IF; --p_doc_level = PO_CORE_S.g_doc_level_SHIPMENT

5093: END IF;
5094: l_ship_invalid_for_ctrl_actn := 'Y';
5095: END;
5096:
5097: END IF; --p_doc_level = PO_CORE_S.g_doc_level_SHIPMENT
5098: --
5099:
5100: FOR i IN l_valid_actions_tbl.first..l_valid_actions_tbl.last
5101: LOOP

Line 5134: IF(p_doc_type = PO_CORE_S.g_doc_type_PO) THEN

5130: END IF;
5131: x_valid_ctrl_ctn_tbl(l_index) := PO_DOCUMENT_ACTION_PVT.g_doc_action_CANCEL;
5132: ELSIF(l_mode = 'UPDATE' AND l_current_action = 'CANCEL PO') THEN
5133:
5134: IF(p_doc_type = PO_CORE_S.g_doc_type_PO) THEN
5135: -- For Update mode we Show Cancel Action at Header as Cancel Order
5136: d_pos := 100;
5137: IF (PO_LOG.d_stmt) THEN
5138: PO_LOG.stmt(d_module,d_pos,l_current_action || 'is replaced by CANCEL ORDER for update mode');

Line 5141: ELSIF(p_doc_type = PO_CORE_S.g_doc_type_PA) THEN

5137: IF (PO_LOG.d_stmt) THEN
5138: PO_LOG.stmt(d_module,d_pos,l_current_action || 'is replaced by CANCEL ORDER for update mode');
5139: END IF;
5140: x_valid_ctrl_ctn_tbl(l_index) := 'CANCEL ORDER';
5141: ELSIF(p_doc_type = PO_CORE_S.g_doc_type_PA) THEN
5142: -- For Update mode we Show Cancel Action at Header as Cancel Agreement.
5143: d_pos := 110;
5144: IF (PO_LOG.d_stmt) THEN
5145: PO_LOG.stmt(d_module,d_pos,l_current_action || 'is replaced by CANCEL AGREEMENT for update mode');