446:
447:
448: IF (l_is_clin = 'Y') THEN
449:
450: l_line_num_disp := pon_clo_renumber_pkg.NEXT_CLIN_NUM_WRAPPER(p_auction_header_id,'PON');
451:
452: UPDATE pon_auction_item_prices_all
453: SET line_num_display = l_line_num_disp
454: WHERE auction_header_id = p_auction_header_id
454: WHERE auction_header_id = p_auction_header_id
455: AND line_Number = l_new_line_number;
456:
457: ELSE
458: pon_clo_renumber_pkg.RenumberSlinStructure('PON',p_auction_header_id,l_clin_num,x_result);
459: END IF;
460:
461: IF(Nvl(l_info_flag,'N') = 'N') THEN
462: /*
571: WHERE auction_header_id = p_auction_header_id
572: AND line_number = p_src_line_number;
573:
574: IF l_clin_flag = 'Y' THEN
575: SELECT pon_clo_renumber_pkg.NEXT_CLIN_NUM_WRAPPER(p_auction_header_id,'PON') INTO l_clin_num FROM dual;
576:
577: ELSIF l_clin_flag = 'N' THEN
578: SELECT SubStr(line_num_display,1,4) INTO l_clin_num FROM pon_auction_item_prices_all
579: WHERE auctioN_header_id = p_auction_header_id
784: --l_max_clin := '0000';
785: clin_num_tbl := po_tbl_varchar100();
786: END;
787:
788: next_clin_num := pon_clo_renumber_pkg.next_clin_num(clin_num_tbl);
789:
790: -- this query selects new copied clin and its optional clins if any
791: SELECT line_number BULK COLLECT INTO l_new_clins
792: FROM pon_auction_item_prices_all
801: SET line_num_display = next_clin_num
802: WHERE auction_header_id = p_auction_header_id
803: AND line_number = l_new_clins(i);
804:
805: pon_clo_renumber_pkg.RenumberSlinStructure('PON',p_auction_header_id,next_clin_num,x_result);
806:
807: -- get subsequent clin numbers
808: clin_num_tbl.extend();
809: len := clin_num_tbl.Count ;
807: -- get subsequent clin numbers
808: clin_num_tbl.extend();
809: len := clin_num_tbl.Count ;
810: clin_num_tbl(len) := next_clin_num;
811: next_clin_num := pon_clo_renumber_pkg.next_clin_num(clin_num_tbl);
812:
813: END LOOP;
814:
815: /* UPDATE pon_auction_item_prices_all
816: SET line_num_display = next_clin_num
817: WHERE auction_header_id = p_auction_header_id
818: AND line_number = l_max_line_Number + 1; -- this value would have been assigned to the new copied clin
819: */
820: --pon_clo_renumber_pkg.RenumberSlinStructure('PON',p_auction_header_id,next_clin_num,x_result);
821:
822: ELSE
823: -- line being copied is a slin
824: pon_clo_renumber_pkg.RenumberSlinStructure('PON',p_auction_header_id,l_clin_num,x_result);
820: --pon_clo_renumber_pkg.RenumberSlinStructure('PON',p_auction_header_id,next_clin_num,x_result);
821:
822: ELSE
823: -- line being copied is a slin
824: pon_clo_renumber_pkg.RenumberSlinStructure('PON',p_auction_header_id,l_clin_num,x_result);
825:
826:
827: END IF;
828:
1984: WHERE auction_header_id = p_auction_header_id
1985: AND line_number = l_src_line_number;
1986:
1987: IF l_clin_flag = 'Y' THEN
1988: SELECT pon_clo_renumber_pkg.NEXT_CLIN_NUM_WRAPPER(p_auction_header_id,
1989: 'PON')
1990: INTO l_clin_num
1991: FROM dual;
1992:
2240: WHEN No_Data_Found THEN
2241: --l_max_clin := '0000';
2242: clin_num_tbl := po_tbl_varchar100();
2243: END;
2244: next_clin_num := pon_clo_renumber_pkg.next_clin_num(clin_num_tbl);
2245: -- this query selects new copied clin and its optional clins if any
2246: SELECT line_number,exhibit_number BULK COLLECT
2247: INTO l_new_clins,l_new_exhibits
2248: FROM pon_auction_item_prices_all
2254:
2255:
2256: IF(l_new_exhibits(i) IS NOT NULL) THEN
2257: exhibit := l_new_exhibits(i);
2258: next_clin_num := pon_clo_renumber_pkg.NEXT_ELIN_NUM_WRAPPER2(p_auction_header_id,'PON',exhibit);
2259: END IF;
2260:
2261:
2262: UPDATE pon_auction_item_prices_all
2264: WHERE auction_header_id = p_auction_header_id
2265: AND line_number = l_new_clins(i);
2266:
2267: IF(l_new_exhibits(i) IS NULL) THEN
2268: pon_clo_renumber_pkg.RenumberSlinStructure('PON',
2269: p_auction_header_id,
2270: next_clin_num,
2271: x_result);
2272: -- get subsequent clin numbers
2272: -- get subsequent clin numbers
2273: clin_num_tbl.extend();
2274: LEN := clin_num_tbl.Count;
2275: clin_num_tbl(LEN) := next_clin_num;
2276: next_clin_num := pon_clo_renumber_pkg.next_clin_num(clin_num_tbl);
2277: END IF;
2278: END LOOP;
2279: /* UPDATE pon_auction_item_prices_all
2280: SET line_num_display = next_clin_num
2280: SET line_num_display = next_clin_num
2281: WHERE auction_header_id = p_auction_header_id
2282: AND line_number = l_max_line_Number + 1; -- this value would have been assigned to the new copied clin
2283: */
2284: --pon_clo_renumber_pkg.RenumberSlinStructure('PON',p_auction_header_id,next_clin_num,x_result);
2285: ELSE
2286: -- line being copied is a slin
2287: pon_clo_renumber_pkg.RenumberSlinStructure('PON',
2288: p_auction_header_id,
2283: */
2284: --pon_clo_renumber_pkg.RenumberSlinStructure('PON',p_auction_header_id,next_clin_num,x_result);
2285: ELSE
2286: -- line being copied is a slin
2287: pon_clo_renumber_pkg.RenumberSlinStructure('PON',
2288: p_auction_header_id,
2289: l_clin_num,
2290: x_result);
2291: END IF;