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;
4307: x_errcode := 'FC_FAIL';
4308: RETURN;
4309: END IF;
4310:
4311: -- insert NEW/OLD records of release distributions into PO_ENCUMBRANCE_GT
4312:
4313: -- re-initialize distributions list table
4314: l_distribution_id_tbl.delete;
4315:
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;
4337: x_errcode := 'FC_FAIL';
4338: RETURN;
4339: END IF;
4340:
4341: -- Update NEW record in PO_ENCUMBRANCE_GT with the new
4342: -- values
4343:
4344:
4345: x_retmsg := 'SMRCH003';
4493: l_rec_tax, l_nonrec_tax);
4494: l_new_tax := l_nonrec_tax;
4495:
4496:
4497: -- update new values in PO_ENCUMBRANCE_GT
4498: UPDATE po_encumbrance_gt
4499: SET
4500: amount_ordered = l_new_amount,
4501: quantity_ordered = l_new_quantity,
4494: l_new_tax := l_nonrec_tax;
4495:
4496:
4497: -- update new values in PO_ENCUMBRANCE_GT
4498: UPDATE po_encumbrance_gt
4499: SET
4500: amount_ordered = l_new_amount,
4501: quantity_ordered = l_new_quantity,
4502: price = l_new_price,
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;
6450:
6451: -- re-initialize distributions list table
6452: l_distribution_id_tbl.delete;
6453:
6454: -- Update NEW record in PO_ENCUMBRANCE_GT with the new
6455: -- values
6456: x_retmsg := 'SMRCH003';
6457:
6458: /*
6493: po_debug.debug_var(l_log_head, x_retmsg, 'l_rec_tax=', l_rec_tax);
6494: po_debug.debug_var(l_log_head, x_retmsg, 'l_nonrec_tax=', l_nonrec_tax);
6495: END IF;
6496:
6497: -- update new values in PO_ENCUMBRANCE_GT
6498: UPDATE po_encumbrance_gt
6499: SET
6500: amount_ordered = l_new_amount,
6501: quantity_ordered = l_new_quantity,
6494: po_debug.debug_var(l_log_head, x_retmsg, 'l_nonrec_tax=', l_nonrec_tax);
6495: END IF;
6496:
6497: -- update new values in PO_ENCUMBRANCE_GT
6498: UPDATE po_encumbrance_gt
6499: SET
6500: amount_ordered = l_new_amount,
6501: quantity_ordered = l_new_quantity,
6502: price = l_new_price,