649: ELSIF (p_table = 'FTE_LANES') THEN
650: UPDATE fte_lanes
651: SET editable_flag = 'D',
652: lane_number = p_id || '-DELETED by USER', -- might just leave the lane number as it
653: LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
654: LAST_UPDATE_DATE = sysdate,
655: LAST_UPDATE_LOGIN = FND_GLOBAL.USER_ID
656: WHERE lane_id = p_id;
657: ELSIF (p_table = 'FTE_PRC_PARAMETERS') THEN
651: SET editable_flag = 'D',
652: lane_number = p_id || '-DELETED by USER', -- might just leave the lane number as it
653: LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
654: LAST_UPDATE_DATE = sysdate,
655: LAST_UPDATE_LOGIN = FND_GLOBAL.USER_ID
656: WHERE lane_id = p_id;
657: ELSIF (p_table = 'FTE_PRC_PARAMETERS') THEN
658: IF (p_code IS NULL) THEN
659: DELETE from fte_prc_parameters
666: ELSIF (p_table = 'FTE_SCHEDULES') THEN
667:
668: UPDATE FTE_SCHEDULES
669: SET EDITABLE_FLAG = 'D',
670: LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
671: LAST_UPDATE_DATE = sysdate,
672: LAST_UPDATE_LOGIN = FND_GLOBAL.USER_ID
673: WHERE SCHEDULES_ID = p_id
674: AND NVL(EDITABLE_FLAG,'Y') = 'Y';
668: UPDATE FTE_SCHEDULES
669: SET EDITABLE_FLAG = 'D',
670: LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
671: LAST_UPDATE_DATE = sysdate,
672: LAST_UPDATE_LOGIN = FND_GLOBAL.USER_ID
673: WHERE SCHEDULES_ID = p_id
674: AND NVL(EDITABLE_FLAG,'Y') = 'Y';
675: ELSE
676: x_error_msg := FTE_UTIL_PKG.GET_MSG('FTE_INVALID_TABLE');
778: IF (p_type = 'SERVICE_LEVEL') THEN
779: UPDATE fte_lanes
780: SET service_type_code = l_code,
781: service_detail_flag = l_flag,
782: LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
783: LAST_UPDATE_DATE = sysdate,
784: LAST_UPDATE_LOGIN = FND_GLOBAL.USER_ID
785: WHERE lane_id = p_lane_id;
786: ELSIF (p_type = 'COMMODITY_TYPE') THEN
780: SET service_type_code = l_code,
781: service_detail_flag = l_flag,
782: LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
783: LAST_UPDATE_DATE = sysdate,
784: LAST_UPDATE_LOGIN = FND_GLOBAL.USER_ID
785: WHERE lane_id = p_lane_id;
786: ELSIF (p_type = 'COMMODITY_TYPE') THEN
787: UPDATE fte_lanes
788: SET commodity_catg_id = TO_NUMBER(l_code),
786: ELSIF (p_type = 'COMMODITY_TYPE') THEN
787: UPDATE fte_lanes
788: SET commodity_catg_id = TO_NUMBER(l_code),
789: commodity_detail_flag = l_flag,
790: LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
791: LAST_UPDATE_DATE = sysdate,
792: LAST_UPDATE_LOGIN = FND_GLOBAL.USER_ID
793: WHERE lane_id = p_lane_id;
794: ELSE -- schedule
788: SET commodity_catg_id = TO_NUMBER(l_code),
789: commodity_detail_flag = l_flag,
790: LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
791: LAST_UPDATE_DATE = sysdate,
792: LAST_UPDATE_LOGIN = FND_GLOBAL.USER_ID
793: WHERE lane_id = p_lane_id;
794: ELSE -- schedule
795: UPDATE fte_lanes
796: SET schedules_flag = p_value,
793: WHERE lane_id = p_lane_id;
794: ELSE -- schedule
795: UPDATE fte_lanes
796: SET schedules_flag = p_value,
797: LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
798: LAST_UPDATE_DATE = sysdate,
799: LAST_UPDATE_LOGIN = FND_GLOBAL.USER_ID
800: WHERE lane_id = p_lane_id;
801: END IF;
795: UPDATE fte_lanes
796: SET schedules_flag = p_value,
797: LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
798: LAST_UPDATE_DATE = sysdate,
799: LAST_UPDATE_LOGIN = FND_GLOBAL.USER_ID
800: WHERE lane_id = p_lane_id;
801: END IF;
802:
803: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
937: l_effective_date(i),
938: l_expiry_date(i),
939: l_transit_time_uom(i),
940: l_lane_number(i),
941: FND_GLOBAL.USER_ID,
942: SYSDATE,
943: FND_GLOBAL.USER_ID,
944: SYSDATE,
945: FND_GLOBAL.USER_ID);
939: l_transit_time_uom(i),
940: l_lane_number(i),
941: FND_GLOBAL.USER_ID,
942: SYSDATE,
943: FND_GLOBAL.USER_ID,
944: SYSDATE,
945: FND_GLOBAL.USER_ID);
946:
947: --+
941: FND_GLOBAL.USER_ID,
942: SYSDATE,
943: FND_GLOBAL.USER_ID,
944: SYSDATE,
945: FND_GLOBAL.USER_ID);
946:
947: --+
948: -- For Generating Output file
949: --+
1061: PRICELIST_VIEW_FLAG = p_lane_tbl(i).pricelist_view_flag,
1062: BASIS = p_lane_tbl(i).basis,
1063: EFFECTIVE_DATE = p_lane_tbl(i).effective_date,
1064: EXPIRY_DATE = p_lane_tbl(i).expiry_date,
1065: LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
1066: LAST_UPDATE_DATE = sysdate,
1067: LAST_UPDATE_LOGIN = FND_GLOBAL.USER_ID
1068: WHERE lane_id = p_lane_tbl(i).lane_id;
1069: p_lane_tbl.DELETE(i);
1063: EFFECTIVE_DATE = p_lane_tbl(i).effective_date,
1064: EXPIRY_DATE = p_lane_tbl(i).expiry_date,
1065: LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
1066: LAST_UPDATE_DATE = sysdate,
1067: LAST_UPDATE_LOGIN = FND_GLOBAL.USER_ID
1068: WHERE lane_id = p_lane_tbl(i).lane_id;
1069: p_lane_tbl.DELETE(i);
1070: ELSIF (p_lane_tbl(i).action = 'DELETE') THEN
1071: p_lane_tbl.DELETE(i);
1158: l_basis(i),
1159: l_effective_date(i),
1160: l_expiry_date(i),
1161: l_editable_flag(i),
1162: FND_GLOBAL.USER_ID,
1163: SYSDATE,
1164: FND_GLOBAL.USER_ID,
1165: SYSDATE,
1166: FND_GLOBAL.USER_ID,
1160: l_expiry_date(i),
1161: l_editable_flag(i),
1162: FND_GLOBAL.USER_ID,
1163: SYSDATE,
1164: FND_GLOBAL.USER_ID,
1165: SYSDATE,
1166: FND_GLOBAL.USER_ID,
1167: l_lane_type(i),
1168: l_tariff_name(i));
1162: FND_GLOBAL.USER_ID,
1163: SYSDATE,
1164: FND_GLOBAL.USER_ID,
1165: SYSDATE,
1166: FND_GLOBAL.USER_ID,
1167: l_lane_type(i),
1168: l_tariff_name(i));
1169: EXCEPTION
1170: WHEN OTHERS THEN
1222: VALUES (l_lrc_lane_id(i),
1223: l_list_header_id(i),
1224: l_end_date_active(i),
1225: l_start_date_active(i),
1226: FND_GLOBAL.USER_ID,
1227: SYSDATE,
1228: FND_GLOBAL.USER_ID,
1229: SYSDATE,
1230: FND_GLOBAL.USER_ID);
1224: l_end_date_active(i),
1225: l_start_date_active(i),
1226: FND_GLOBAL.USER_ID,
1227: SYSDATE,
1228: FND_GLOBAL.USER_ID,
1229: SYSDATE,
1230: FND_GLOBAL.USER_ID);
1231: --+
1232: -- Remove the hold from fte_lanes
1226: FND_GLOBAL.USER_ID,
1227: SYSDATE,
1228: FND_GLOBAL.USER_ID,
1229: SYSDATE,
1230: FND_GLOBAL.USER_ID);
1231: --+
1232: -- Remove the hold from fte_lanes
1233: -- for these rate charts.
1234: --+
1237: END IF;
1238: FORALL i in l_lrc_lane_id.FIRST..l_lrc_lane_id.LAST
1239: UPDATE fte_lanes
1240: SET lane_type = NULL,
1241: LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
1242: LAST_UPDATE_DATE = SYSDATE,
1243: LAST_UPDATE_LOGIN = FND_GLOBAL.USER_ID
1244: WHERE lane_id = l_lrc_lane_id(i);
1245:
1239: UPDATE fte_lanes
1240: SET lane_type = NULL,
1241: LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
1242: LAST_UPDATE_DATE = SYSDATE,
1243: LAST_UPDATE_LOGIN = FND_GLOBAL.USER_ID
1244: WHERE lane_id = l_lrc_lane_id(i);
1245:
1246: EXCEPTION
1247: WHEN DUP_VAL_ON_INDEX THEN
1284: VALUES (l_lc_lane_id(i),
1285: l_lane_commodity_id(i),
1286: l_lc_basis(i),
1287: l_lc_comm_catg_id(i),
1288: FND_GLOBAL.USER_ID,
1289: SYSDATE,
1290: FND_GLOBAL.USER_ID,
1291: SYSDATE,
1292: FND_GLOBAL.USER_ID);
1286: l_lc_basis(i),
1287: l_lc_comm_catg_id(i),
1288: FND_GLOBAL.USER_ID,
1289: SYSDATE,
1290: FND_GLOBAL.USER_ID,
1291: SYSDATE,
1292: FND_GLOBAL.USER_ID);
1293: EXCEPTION
1294: WHEN DUP_VAL_ON_INDEX THEN
1288: FND_GLOBAL.USER_ID,
1289: SYSDATE,
1290: FND_GLOBAL.USER_ID,
1291: SYSDATE,
1292: FND_GLOBAL.USER_ID);
1293: EXCEPTION
1294: WHEN DUP_VAL_ON_INDEX THEN
1295: x_status := -1;
1296: WHEN OTHERS THEN
1328: LAST_UPDATE_LOGIN)
1329: VALUES (l_ls_lane_id(i),
1330: l_lane_service_id(i),
1331: l_service_code(i),
1332: FND_GLOBAL.USER_ID,
1333: SYSDATE,
1334: FND_GLOBAL.USER_ID,
1335: SYSDATE,
1336: FND_GLOBAL.USER_ID);
1330: l_lane_service_id(i),
1331: l_service_code(i),
1332: FND_GLOBAL.USER_ID,
1333: SYSDATE,
1334: FND_GLOBAL.USER_ID,
1335: SYSDATE,
1336: FND_GLOBAL.USER_ID);
1337: EXCEPTION
1338: WHEN DUP_VAL_ON_INDEX THEN
1332: FND_GLOBAL.USER_ID,
1333: SYSDATE,
1334: FND_GLOBAL.USER_ID,
1335: SYSDATE,
1336: FND_GLOBAL.USER_ID);
1337: EXCEPTION
1338: WHEN DUP_VAL_ON_INDEX THEN
1339: x_status := -1;
1340: WHEN OTHERS THEN
1458: l_value_from(i),
1459: l_value_to(i),
1460: l_uom_code(i),
1461: l_currency_code(i),
1462: FND_GLOBAL.USER_ID,
1463: SYSDATE,
1464: FND_GLOBAL.USER_ID,
1465: SYSDATE,
1466: FND_GLOBAL.USER_ID);
1460: l_uom_code(i),
1461: l_currency_code(i),
1462: FND_GLOBAL.USER_ID,
1463: SYSDATE,
1464: FND_GLOBAL.USER_ID,
1465: SYSDATE,
1466: FND_GLOBAL.USER_ID);
1467:
1468: END;
1462: FND_GLOBAL.USER_ID,
1463: SYSDATE,
1464: FND_GLOBAL.USER_ID,
1465: SYSDATE,
1466: FND_GLOBAL.USER_ID);
1467:
1468: END;
1469: END IF;
1470: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1513:
1514: UPDATE fte_lane_rate_charts
1515: SET START_DATE_ACTIVE = p_start_date,
1516: END_DATE_ACTIVE = p_end_date,
1517: LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
1518: LAST_UPDATE_DATE = sysdate,
1519: LAST_UPDATE_LOGIN = FND_GLOBAL.USER_ID
1520: WHERE LIST_HEADER_ID = p_list_header_id;
1521:
1515: SET START_DATE_ACTIVE = p_start_date,
1516: END_DATE_ACTIVE = p_end_date,
1517: LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
1518: LAST_UPDATE_DATE = sysdate,
1519: LAST_UPDATE_LOGIN = FND_GLOBAL.USER_ID
1520: WHERE LIST_HEADER_ID = p_list_header_id;
1521:
1522: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1523: EXCEPTION
1579: SET value_from = l_value_from,
1580: value_to = l_value_to,
1581: uom_code = l_uom_code,
1582: currency_code = l_currency_code,
1583: LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
1584: LAST_UPDATE_DATE = sysdate,
1585: LAST_UPDATE_LOGIN = FND_GLOBAL.USER_ID
1586: WHERE parameter_instance_id = l_parameter_instance_id;
1587:
1581: uom_code = l_uom_code,
1582: currency_code = l_currency_code,
1583: LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
1584: LAST_UPDATE_DATE = sysdate,
1585: LAST_UPDATE_LOGIN = FND_GLOBAL.USER_ID
1586: WHERE parameter_instance_id = l_parameter_instance_id;
1587:
1588: FTE_UTIL_PKG.EXIT_DEBUG(l_module_name);
1589: