[Home] [Help]
900: l_buyer_id
901: FROM po_headers_all
902: WHERE po_header_id = p_header_id;
903:
904: IF(l_type_lookup_code = 'STANDARD') THEN
905: l_doc_type := fnd_message.get_string('PO', 'PO_WF_NOTIF_STD_PO');
906: ELSIF(l_type_lookup_code = 'PLANNED') THEN
907: l_doc_type := fnd_message.get_string('PO', 'PO_WF_NOTIF_PLAN_PO');
908: ELSIF(l_type_lookup_code = 'BLANKET') THEN
2176:
2177: IF(p_release_id IS NULL) THEN
2178: IF(req_change_record_tbl(req_index).document_distribution_id IS NOT NULL) THEN
2179:
2180: --Standard PO Distribution Change
2181: l_po_request_level := 'DISTRIBUTION';
2182: l_req_request_level := 'DISTRIBUTION';
2183: l_progress := '001';
2184: SELECT
2346: END IF;
2347: ELSE
2348: IF(req_change_record_tbl(req_index).document_distribution_id IS NOT NULL) THEN
2349:
2350: --Standard PO Distribution Change
2351: l_po_request_level := 'DISTRIBUTION';
2352: l_req_request_level := 'DISTRIBUTION';
2353: l_progress := '003';
2354: SELECT
3160: l_progress := '010';
3161:
3162: IF (l_po_release_id IS NULL) THEN
3163: l_po_doc_type := 'PO';
3164: l_po_doc_subtype := 'STANDARD';
3165:
3166: -- get org id of the PO
3167: SELECT org_id
3168: INTO l_po_org_id
3639: p_amount_changeable_flag := 'N';
3640: END IF;
3641:
3642: /*
3643: * Extending Validation #6, if a req line correspond to the line of a Standard PO, its price can only be changed if
3644: * the req line is associated with a PO Shipment, which is the only shipment of its parent Line.
3645: */
3646: IF(l_release_id IS NULL AND p_price_changeable_flag = 'Y') THEN
3647: l_progress := '005';
4236: pcr.change_request_group_id = grp_id AND
4237: pcr.action_type = 'MODIFICATION' AND (pcr.new_price IS NOT NULL OR
4238: pcr.new_need_by_date IS NOT NULL);
4239:
4240: -- list of standard po distributions effected with the req changes
4241: CURSOR l_changed_po_dists_csr(grp_id NUMBER) IS
4242: SELECT -- any quantity or amount change
4243: pda.po_distribution_id
4244: FROM
4252: pcr.action_type = 'MODIFICATION' AND
4253: pcr.document_distribution_id = prda.distribution_id AND
4254: prda.distribution_id = pda.req_distribution_id AND
4255: pda.po_header_id = pha.po_header_id AND
4256: pha.type_lookup_code = 'STANDARD'
4257: UNION
4258: SELECT -- select distributions that are effected with any line change
4259: pda.po_distribution_id
4260: FROM
4270: pcr.document_line_id = prla.requisition_line_id AND
4271: prla.requisition_line_id = prda.requisition_line_id AND
4272: prda.distribution_id = pda.req_distribution_id AND
4273: pda.po_header_id = pha.po_header_id AND
4274: pha.type_lookup_code = 'STANDARD';
4275:
4276: -- list of release distributions effected with the req changes
4277: CURSOR l_changed_rel_dists_csr(grp_id NUMBER) IS
4278: SELECT -- any quantity or amount change
4365:
4366: -- initialize distributions list table
4367: l_distribution_id_tbl := po_tbl_number();
4368:
4369: -- insert NEW/OLD records of standard po distributions into PO_ENCUMBRANCE_GT
4370: OPEN l_changed_po_dists_csr(p_group_id);
4371:
4372: FETCH l_changed_po_dists_csr BULK COLLECT
4373: INTO l_distribution_id_tbl;
4395:
4396: -- re-initialize distributions list table
4397: l_distribution_id_tbl.delete;
4398:
4399: -- insert standard po distributions into PO_ENCUMBRANCE_GT
4400: OPEN l_changed_rel_dists_csr(p_group_id);
4401:
4402: FETCH l_changed_rel_dists_csr BULK COLLECT
4403: INTO l_distribution_id_tbl;
6469:
6470: -- initialize distributions list table
6471: l_distribution_id_tbl := po_tbl_number();
6472:
6473: -- insert NEW/OLD records of standard po distributions into PO_ENCUMBRANCE_GT
6474: OPEN l_changed_req_dists_csr(p_group_id);
6475:
6476: FETCH l_changed_req_dists_csr BULK COLLECT
6477: INTO l_distribution_id_tbl;