[Home] [Help]
580: BEGIN
581: IF g_group_id = 0 THEN
582: SELECT RCV_INTERFACE_GROUPS_S.NEXTVAL
583: INTO g_group_id
584: FROM dual;
585: END IF;
586:
587: RETURN g_group_id;
588: END get_group_id;
1222:
1223: BEGIN
1224: SELECT 'Y'
1225: INTO po_update_flag
1226: FROM dual
1227: WHERE EXISTS (SELECT segment1
1228: FROM po_headers_all
1229: WHERE segment1=p_attributes.po_number
1230: AND org_id=hxc_timecard_properties.setup_mo_global_params(fnd_global.employee_id)
1905: BEGIN
1906: -- interface_transaction_id
1907: SELECT RCV_TRANSACTIONS_INTERFACE_S.NEXTVAL
1908: INTO p_rti_row.interface_transaction_id
1909: FROM dual;
1910:
1911: -- job_id
1912: BEGIN
1913: p_rti_row.job_id := get_po_line(p_attributes.po_line_id).job_id;
1988:
1989: -- header_id
1990: SELECT RCV_HEADERS_INTERFACE_S.NEXTVAL
1991: INTO l_rhi_row.header_interface_id
1992: FROM dual;
1993:
1994: -- group_id
1995: l_rhi_row.group_id := get_group_id( p_rti_rows );
1996:
2319:
2320: -- get the next rti id for the receive transaction
2321: SELECT RCV_TRANSACTIONS_INTERFACE_S.NEXTVAL
2322: INTO l_rcv_rti_row.interface_transaction_id
2323: FROM dual;
2324:
2325: -- insert into rti table
2326: p_rti_rows(p_rti_rows.COUNT + 1) := l_del_rti_row;
2327: p_rti_rows(p_rti_rows.COUNT + 1) := l_rcv_rti_row;
2330:
2331: -- get the next rti id for the deliver transaction
2332: SELECT RCV_TRANSACTIONS_INTERFACE_S.NEXTVAL
2333: INTO l_del_rti_row.interface_transaction_id
2334: FROM dual;
2335:
2336: -- insert into rti table
2337: p_rti_rows(p_rti_rows.COUNT + 1) := l_rcv_rti_row;
2338: p_rti_rows(p_rti_rows.COUNT + 1) := l_del_rti_row;
2465: -- use lpn_group_id to make sure that the receiving transactions are atomic for this block
2466: BEGIN
2467: SELECT rcv_interface_groups_s.NEXTVAL
2468: INTO p_attributes.lpn_group_id
2469: FROM dual;
2470:
2471: p_old_attributes.lpn_group_id := p_attributes.lpn_group_id;
2472: EXCEPTION
2473: WHEN OTHERS THEN