[Home] [Help]
1259: -- outside of the effective dates of the blanket being expired
1260: IF (p_ga_flag = 'Y') THEN
1261: SELECT MAX('Y')
1262: INTO l_rel_exists
1263: FROM DUAL
1264: WHERE EXISTS (SELECT 'Exists std PO ref the orig GA'
1265: FROM po_lines_all POL,
1266: po_headers_all POH
1267: WHERE POL.from_header_id = p_po_header_id
1286: d_position := 20;
1287:
1288: SELECT MAX('Y')
1289: INTO l_rel_exists
1290: FROM DUAL
1291: WHERE EXISTS (SELECT 'release exist after expiration date'
1292: FROM po_releases POR
1293: WHERE POR.po_header_id = p_po_header_id
1294: AND POR.release_date >= l_exp_date);
2674:
2675: IF (SQL%ROWCOUNT > 0) THEN
2676: SELECT po_line_locations_interface_s.CURRVAL
2677: INTO l_interface_line_location_id
2678: FROM DUAL;
2679:
2680: populate_advance_payitem_dist
2681: (p_interface_line_location_id => l_interface_line_location_id);
2682: END IF;
2987:
2988: IF (SQL%ROWCOUNT > 0) THEN
2989: SELECT po_line_locations_interface_s.CURRVAL
2990: INTO l_interface_line_location_id
2991: FROM DUAL;
2992:
2993: populate_progress_payitem_dist
2994: (p_interface_line_location_id => l_interface_line_location_id);
2995: END IF;
3309: p_intf_line_id_tbl(i), --num3
3310: null, --num4
3311: p_line_num_disp_tbl(i), --char1
3312: p_is_line_num_disp_valid(i)--char2
3313: FROM dual;
3314:
3315: FORALL i IN 1..l_num_list.COUNT
3316: UPDATE po_session_gt psg1
3317: SET psg1.num4 = ( SELECT psg2.num3 FROM po_session_gt psg2
3408: p_line_num_disp_tbl(i), --char1
3409: 'Y', --char2
3410: p_clm_info_flag_tbl(i), --char3
3411: p_po_line_id_tbl(i)
3412: FROM dual;
3413:
3414: --check for duplicacy of line_num_display within the same header_id
3415: FORALL i IN 1..l_num_list.COUNT
3416: UPDATE po_session_gt psg1