[Home] [Help]
895: IS
896: l_workorder_txn_id NUMBER;
897: BEGIN
898:
899: SELECT AHL_WORKORDER_TXNS_S.NEXTVAL
900: INTO l_workorder_txn_id
901: FROM DUAL;
902:
903: INSERT INTO AHL_WORKORDER_TXNS
899: SELECT AHL_WORKORDER_TXNS_S.NEXTVAL
900: INTO l_workorder_txn_id
901: FROM DUAL;
902:
903: INSERT INTO AHL_WORKORDER_TXNS
904: (
905: WORKORDER_TXN_ID,
906: OBJECT_VERSION_NUMBER,
907: LAST_UPDATE_DATE,
993: l_transaction_type_code := 2;
994: END IF;
995: */
996:
997: -- Insert a record in AHL_WORKORDER_TXNS for the Completion / Deferral Transaction.
998: l_return_status :=
999: record_ahl_workorder_txn
1000: (
1001: p_workorder_rec => p_workorder_rec,
11603:
11604: FORALL l_txn_count IN l_workorder_id_tbl.FIRST .. l_workorder_id_tbl.LAST
11605: SAVE EXCEPTIONS
11606:
11607: INSERT INTO AHL_WORKORDER_TXNS
11608: (
11609: WORKORDER_TXN_ID,
11610: OBJECT_VERSION_NUMBER,
11611: LAST_UPDATE_DATE,
11641: ATTRIBUTE14,
11642: ATTRIBUTE15
11643: ) VALUES
11644: (
11645: AHL_WORKORDER_TXNS_S.NEXTVAL,
11646: l_object_version_number_tbl(l_txn_count) + 1,
11647: sysdate,
11648: fnd_global.user_id,
11649: sysdate,
11683: FORALL l_txn_del_count IN l_workorder_id_tbl.FIRST .. l_workorder_id_tbl.LAST
11684: SAVE EXCEPTIONS
11685:
11686: DELETE
11687: ahl_workorder_txns WOTXNO
11688: WHERE
11689: wotxno.workorder_txn_id = (
11690: select
11691: MAX(wotxn.workorder_txn_id)
11689: wotxno.workorder_txn_id = (
11690: select
11691: MAX(wotxn.workorder_txn_id)
11692: from
11693: AHL_WORKORDER_TXNS WOTXN
11694: WHERE
11695: wotxn.workorder_id = l_workorder_id_tbl(l_txn_del_count)
11696: AND l_valid_for_close_tbl(l_txn_del_count) = 'N'
11697: );