[Home] [Help]
891: l_type_lookup_code
892: FROM po_headers_all
893: WHERE po_header_id = p_header_id;
894:
895: IF(l_type_lookup_code = 'STANDARD') THEN
896: l_doc_type := fnd_message.get_string('PO', 'PO_WF_NOTIF_STD_PO');
897: ELSIF(l_type_lookup_code = 'PLANNED') THEN
898: l_doc_type := fnd_message.get_string('PO', 'PO_WF_NOTIF_PLAN_PO');
899: ELSIF(l_type_lookup_code = 'BLANKET') THEN
2139:
2140: IF(p_release_id IS NULL) THEN
2141: IF(req_change_record_tbl(req_index).document_distribution_id IS NOT NULL) THEN
2142:
2143: --Standard PO Distribution Change
2144: l_po_request_level := 'DISTRIBUTION';
2145: l_req_request_level := 'DISTRIBUTION';
2146: l_progress := '001';
2147: SELECT
2309: END IF;
2310: ELSE
2311: IF(req_change_record_tbl(req_index).document_distribution_id IS NOT NULL) THEN
2312:
2313: --Standard PO Distribution Change
2314: l_po_request_level := 'DISTRIBUTION';
2315: l_req_request_level := 'DISTRIBUTION';
2316: l_progress := '003';
2317: SELECT
3096: l_progress := '010';
3097:
3098: IF (l_po_release_id IS NULL) THEN
3099: l_po_doc_type := 'PO';
3100: l_po_doc_subtype := 'STANDARD';
3101:
3102: -- get org id of the PO
3103: SELECT org_id
3104: INTO l_po_org_id
3558: p_amount_changeable_flag := 'N';
3559: END IF;
3560:
3561: /*
3562: * Extending Validation #6, if a req line correspond to the line of a Standard PO, its price can only be changed if
3563: * the req line is associated with a PO Shipment, which is the only shipment of its parent Line.
3564: */
3565: IF(l_release_id IS NULL AND p_price_changeable_flag = 'Y') THEN
3566: l_progress := '005';
4153: pcr.change_request_group_id = grp_id AND
4154: pcr.action_type = 'MODIFICATION' AND (pcr.new_price IS NOT NULL OR
4155: pcr.new_need_by_date IS NOT NULL);
4156:
4157: -- list of standard po distributions effected with the req changes
4158: CURSOR l_changed_po_dists_csr(grp_id NUMBER) IS
4159: SELECT -- any quantity or amount change
4160: pda.po_distribution_id
4161: FROM
4169: pcr.action_type = 'MODIFICATION' AND
4170: pcr.document_distribution_id = prda.distribution_id AND
4171: prda.distribution_id = pda.req_distribution_id AND
4172: pda.po_header_id = pha.po_header_id AND
4173: pha.type_lookup_code = 'STANDARD'
4174: UNION
4175: SELECT -- select distributions that are effected with any line change
4176: pda.po_distribution_id
4177: FROM
4187: pcr.document_line_id = prla.requisition_line_id AND
4188: prla.requisition_line_id = prda.requisition_line_id AND
4189: prda.distribution_id = pda.req_distribution_id AND
4190: pda.po_header_id = pha.po_header_id AND
4191: pha.type_lookup_code = 'STANDARD';
4192:
4193: -- list of release distributions effected with the req changes
4194: CURSOR l_changed_rel_dists_csr(grp_id NUMBER) IS
4195: SELECT -- any quantity or amount change
4282:
4283: -- initialize distributions list table
4284: l_distribution_id_tbl := po_tbl_number();
4285:
4286: -- insert NEW/OLD records of standard po distributions into PO_ENCUMBRANCE_GT
4287: OPEN l_changed_po_dists_csr(p_group_id);
4288:
4289: FETCH l_changed_po_dists_csr BULK COLLECT
4290: INTO l_distribution_id_tbl;
4312:
4313: -- re-initialize distributions list table
4314: l_distribution_id_tbl.delete;
4315:
4316: -- insert standard po distributions into PO_ENCUMBRANCE_GT
4317: OPEN l_changed_rel_dists_csr(p_group_id);
4318:
4319: FETCH l_changed_rel_dists_csr BULK COLLECT
4320: INTO l_distribution_id_tbl;
6418:
6419: -- initialize distributions list table
6420: l_distribution_id_tbl := po_tbl_number();
6421:
6422: -- insert NEW/OLD records of standard po distributions into PO_ENCUMBRANCE_GT
6423: OPEN l_changed_req_dists_csr(p_group_id);
6424:
6425: FETCH l_changed_req_dists_csr BULK COLLECT
6426: INTO l_distribution_id_tbl;