[Home] [Help]
869: IS
870: l_workorder_txn_id NUMBER;
871: BEGIN
872:
873: SELECT AHL_WORKORDER_TXNS_S.NEXTVAL
874: INTO l_workorder_txn_id
875: FROM DUAL;
876:
877: INSERT INTO AHL_WORKORDER_TXNS
873: SELECT AHL_WORKORDER_TXNS_S.NEXTVAL
874: INTO l_workorder_txn_id
875: FROM DUAL;
876:
877: INSERT INTO AHL_WORKORDER_TXNS
878: (
879: WORKORDER_TXN_ID,
880: OBJECT_VERSION_NUMBER,
881: LAST_UPDATE_DATE,
954: l_transaction_type_code := 2;
955: END IF;
956: */
957:
958: -- Insert a record in AHL_WORKORDER_TXNS for the Completion / Deferral Transaction.
959: l_return_status :=
960: record_ahl_workorder_txn
961: (
962: p_workorder_rec => p_workorder_rec,
10748:
10749: FORALL l_txn_count IN l_workorder_id_tbl.FIRST .. l_workorder_id_tbl.LAST
10750: SAVE EXCEPTIONS
10751:
10752: INSERT INTO AHL_WORKORDER_TXNS
10753: (
10754: WORKORDER_TXN_ID,
10755: OBJECT_VERSION_NUMBER,
10756: LAST_UPDATE_DATE,
10786: ATTRIBUTE14,
10787: ATTRIBUTE15
10788: ) VALUES
10789: (
10790: AHL_WORKORDER_TXNS_S.NEXTVAL,
10791: l_object_version_number_tbl(l_txn_count) + 1,
10792: sysdate,
10793: fnd_global.user_id,
10794: sysdate,
10828: FORALL l_txn_del_count IN l_workorder_id_tbl.FIRST .. l_workorder_id_tbl.LAST
10829: SAVE EXCEPTIONS
10830:
10831: DELETE
10832: ahl_workorder_txns WOTXNO
10833: WHERE
10834: wotxno.workorder_txn_id = (
10835: select
10836: MAX(wotxn.workorder_txn_id)
10834: wotxno.workorder_txn_id = (
10835: select
10836: MAX(wotxn.workorder_txn_id)
10837: from
10838: AHL_WORKORDER_TXNS WOTXN
10839: WHERE
10840: wotxn.workorder_id = l_workorder_id_tbl(l_txn_del_count)
10841: AND l_valid_for_close_tbl(l_txn_del_count) = 'N'
10842: );