From 0c3470c61e49ae76001f66be7411f6f6c93e5326 Mon Sep 17 00:00:00 2001 From: DarthArgus Date: Mon, 9 Jan 2017 03:08:27 +0000 Subject: [PATCH] add our db template because oracle's been a stubborn child over importing some changes --- .../database/build/linux/swg_blankdb.sql | 14746 ++++++++++++++++ 1 file changed, 14746 insertions(+) create mode 100644 game/server/database/build/linux/swg_blankdb.sql diff --git a/game/server/database/build/linux/swg_blankdb.sql b/game/server/database/build/linux/swg_blankdb.sql new file mode 100644 index 00000000..e8168a48 --- /dev/null +++ b/game/server/database/build/linux/swg_blankdb.sql @@ -0,0 +1,14746 @@ +-------------------------------------------------------- +-- File created - Sunday-January-08-2017 +-------------------------------------------------------- +DROP TABLE "SWG"."ACCOUNTS" cascade constraints; +DROP TABLE "SWG"."ACCOUNT_EXTRACT" cascade constraints; +DROP TABLE "SWG"."ACCOUNT_INFO" cascade constraints; +DROP TABLE "SWG"."ACCOUNT_MAP" cascade constraints; +DROP TABLE "SWG"."ACCOUNT_REWARD_EVENTS" cascade constraints; +DROP TABLE "SWG"."ACCOUNT_REWARD_ITEMS" cascade constraints; +DROP TABLE "SWG"."ARMOR" cascade constraints; +DROP TABLE "SWG"."AUCTION_LOCATIONS" cascade constraints; +DROP TABLE "SWG"."AUTOMATED_QUERIES" cascade constraints; +DROP TABLE "SWG"."BATTLEFIELD_MARKER_OBJECTS" cascade constraints; +DROP TABLE "SWG"."BATTLEFIELD_PARTICIPANTS" cascade constraints; +DROP TABLE "SWG"."BIOGRAPHIES" cascade constraints; +DROP TABLE "SWG"."BOUNTY_HUNTER_TARGETS" cascade constraints; +DROP TABLE "SWG"."BUILDING_OBJECTS" cascade constraints; +DROP TABLE "SWG"."CELL_OBJECTS" cascade constraints; +DROP TABLE "SWG"."CHARACTER_PROFILE" cascade constraints; +DROP TABLE "SWG"."CHARACTER_TYPES" cascade constraints; +DROP TABLE "SWG"."CITY_OBJECTS" cascade constraints; +DROP TABLE "SWG"."CLOCK" cascade constraints; +DROP TABLE "SWG"."CLUSTER_LIST" cascade constraints; +DROP TABLE "SWG"."CREATURE_OBJECTS" cascade constraints; +DROP TABLE "SWG"."DEFAULT_CHARACTER_SLOTS" cascade constraints; +DROP TABLE "SWG"."DEFAULT_CHAR_LIMITS" cascade constraints; +DROP TABLE "SWG"."DELETE_REASONS" cascade constraints; +DROP TABLE "SWG"."ERRORLOG" cascade constraints; +DROP TABLE "SWG"."ERRORLOG_LEVEL" cascade constraints; +DROP TABLE "SWG"."ERRORLOG_LEVEL_DESC" cascade constraints; +DROP TABLE "SWG"."ERRORLOG_RERAISE_LIMITS" cascade constraints; +DROP TABLE "SWG"."ERRORLOG_VALUES" cascade constraints; +DROP TABLE "SWG"."EXPERIENCE_POINTS" cascade constraints; +DROP TABLE "SWG"."EXTRA_CHARACTER_SLOTS" cascade constraints; +DROP TABLE "SWG"."FACTORY_OBJECTS" cascade constraints; +DROP TABLE "SWG"."FEATURE_ID_TRANSACTIONS" cascade constraints; +DROP TABLE "SWG"."FREE_OBJECT_IDS" cascade constraints; +DROP TABLE "SWG"."GUILD_OBJECTS" cascade constraints; +DROP TABLE "SWG"."HARVESTER_INSTALLATION_OBJECTS" cascade constraints; +DROP TABLE "SWG"."INSTALLATION_OBJECTS" cascade constraints; +DROP TABLE "SWG"."INTANGIBLE_OBJECTS" cascade constraints; +DROP TABLE "SWG"."LOADBEACON_SERVER_MAP" cascade constraints; +DROP TABLE "SWG"."LOCATION_LISTS" cascade constraints; +DROP TABLE "SWG"."MANF_SCHEMATIC_ATTRIBUTES" cascade constraints; +DROP TABLE "SWG"."MANF_SCHEMATIC_OBJECTS" cascade constraints; +DROP TABLE "SWG"."MANUFACTURE_INST_OBJECTS" cascade constraints; +DROP TABLE "SWG"."MARKET_AUCTIONS" cascade constraints; +DROP TABLE "SWG"."MARKET_AUCTION_ATTRIBUTES" cascade constraints; +DROP TABLE "SWG"."MARKET_AUCTION_BIDS" cascade constraints; +DROP TABLE "SWG"."MESSAGES" cascade constraints; +DROP TABLE "SWG"."MISSION_OBJECTS" cascade constraints; +DROP TABLE "SWG"."OBJECTS" cascade constraints; +DROP TABLE "SWG"."OBJECT_LIST" cascade constraints; +DROP TABLE "SWG"."OBJECT_TEMPLATES" cascade constraints; +DROP TABLE "SWG"."OBJECT_VARIABLES" cascade constraints; +DROP TABLE "SWG"."OBJECT_VARIABLE_NAMES" cascade constraints; +DROP TABLE "SWG"."PLANET_OBJECTS" cascade constraints; +DROP TABLE "SWG"."PLAYERS" cascade constraints; +DROP TABLE "SWG"."PLAYER_OBJECTS" cascade constraints; +DROP TABLE "SWG"."PLAYER_QUEST_OBJECTS" cascade constraints; +DROP TABLE "SWG"."PROPERTY_LISTS" cascade constraints; +DROP TABLE "SWG"."PUBLISH_PLAYER_FIXUP" cascade constraints; +DROP TABLE "SWG"."PURGE_ACCOUNTS" cascade constraints; +DROP TABLE "SWG"."PURGE_PHASES" cascade constraints; +DROP TABLE "SWG"."RESOURCE_CONTAINER_OBJECTS" cascade constraints; +DROP TABLE "SWG"."RESOURCE_TYPES" cascade constraints; +DROP TABLE "SWG"."SCRIPTS" cascade constraints; +DROP TABLE "SWG"."SCRUNCHER" cascade constraints; +DROP TABLE "SWG"."SHIP_OBJECTS" cascade constraints; +DROP TABLE "SWG"."STATIC_OBJECTS" cascade constraints; +DROP TABLE "SWG"."STATUSES" cascade constraints; +DROP TABLE "SWG"."SWG_CHARACTERS" cascade constraints; +DROP TABLE "SWG"."TANGIBLE_OBJECTS" cascade constraints; +DROP TABLE "SWG"."TEMP_CHARACTERS" cascade constraints; +DROP TABLE "SWG"."TEMP_FREE_OBJECT_IDS" cascade constraints; +DROP TABLE "SWG"."TOKEN_OBJECTS" cascade constraints; +DROP TABLE "SWG"."UNIVERSE_OBJECTS" cascade constraints; +DROP TABLE "SWG"."VEHICLE_OBJECTS" cascade constraints; +DROP TABLE "SWG"."VERSION_NUMBER" cascade constraints; +DROP TABLE "SWG"."WAYPOINTS" cascade constraints; +DROP TABLE "SWG"."WEAPON_OBJECTS" cascade constraints; +DROP SEQUENCE "SWG"."NEXT_OBJECT_VARIABLE_NAME"; +DROP SEQUENCE "SWG"."SEQ_ERRORLOG"; +DROP SEQUENCE "SWG"."SEQ_QUERIES"; +DROP VIEW "SWG"."CHARACTER_VIEW"; +DROP VIEW "SWG"."OBJECTS_VIEW"; +DROP VIEW "SWG"."OBJECT_VARIABLES_VIEW"; +DROP PACKAGE "SWG"."ADMIN"; +DROP PACKAGE "SWG"."BIOGRAPHY"; +DROP PACKAGE "SWG"."BLOB_DATA_CONVERSION"; +DROP PACKAGE "SWG"."CM_LOADER"; +DROP PACKAGE "SWG"."CM_PERSISTER"; +DROP PACKAGE "SWG"."CUSTSERV_PROCS"; +DROP PACKAGE "SWG"."DATALOOKUP"; +DROP PACKAGE "SWG"."DATA_CLEANUP"; +DROP PACKAGE "SWG"."DB_ERROR_LOGGER"; +DROP PACKAGE "SWG"."GOLD_OVERRIDE"; +DROP PACKAGE "SWG"."LAZY_DELETER"; +DROP PACKAGE "SWG"."LOADER"; +DROP PACKAGE "SWG"."LOGIN"; +DROP PACKAGE "SWG"."OBJECTIDMANAGER"; +DROP PACKAGE "SWG"."OBJVAR_NAMES"; +DROP PACKAGE "SWG"."PERSISTER"; +DROP PACKAGE "SWG"."PURGE_METHODS"; +DROP PACKAGE "SWG"."PURGE_METHODS2"; +DROP PACKAGE "SWG"."PURGE_PROCESS"; +DROP PACKAGE "SWG"."SERVERCLOCK"; +DROP PACKAGE "SWG"."STATION_PLAYERS"; +DROP PACKAGE "SWG"."UNDELETE_METHODS"; +DROP PACKAGE "SWG"."UTIL"; +DROP PACKAGE BODY "SWG"."ADMIN"; +DROP PACKAGE BODY "SWG"."BIOGRAPHY"; +DROP PACKAGE BODY "SWG"."BLOB_DATA_CONVERSION"; +DROP PACKAGE BODY "SWG"."CM_LOADER"; +DROP PACKAGE BODY "SWG"."CM_PERSISTER"; +DROP PACKAGE BODY "SWG"."CUSTSERV_PROCS"; +DROP PACKAGE BODY "SWG"."DATALOOKUP"; +DROP PACKAGE BODY "SWG"."DATA_CLEANUP"; +DROP PACKAGE BODY "SWG"."DB_ERROR_LOGGER"; +DROP PACKAGE BODY "SWG"."GOLD_OVERRIDE"; +DROP PACKAGE BODY "SWG"."LAZY_DELETER"; +DROP PACKAGE BODY "SWG"."LOADER"; +DROP PACKAGE BODY "SWG"."LOGIN"; +DROP PACKAGE BODY "SWG"."OBJECTIDMANAGER"; +DROP PACKAGE BODY "SWG"."OBJVAR_NAMES"; +DROP PACKAGE BODY "SWG"."PERSISTER"; +DROP PACKAGE BODY "SWG"."PURGE_METHODS"; +DROP PACKAGE BODY "SWG"."PURGE_METHODS2"; +DROP PACKAGE BODY "SWG"."PURGE_PROCESS"; +DROP PACKAGE BODY "SWG"."SERVERCLOCK"; +DROP PACKAGE BODY "SWG"."STATION_PLAYERS"; +DROP PACKAGE BODY "SWG"."UNDELETE_METHODS"; +DROP PACKAGE BODY "SWG"."UTIL"; +DROP TYPE "SWG"."VAOFLONGSTRING"; +DROP TYPE "SWG"."VAOFNUMBER"; +DROP TYPE "SWG"."VAOFSTRING"; +-------------------------------------------------------- +-- DDL for Type VAOFLONGSTRING +-------------------------------------------------------- + + CREATE OR REPLACE TYPE "SWG"."VAOFLONGSTRING" is varray(10000) of varchar2(4000); + +/ + + GRANT EXECUTE ON "SWG"."VAOFLONGSTRING" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Type VAOFNUMBER +-------------------------------------------------------- + + CREATE OR REPLACE TYPE "SWG"."VAOFNUMBER" is varray(10000) of number; + +/ + + GRANT EXECUTE ON "SWG"."VAOFNUMBER" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Type VAOFSTRING +-------------------------------------------------------- + + CREATE OR REPLACE TYPE "SWG"."VAOFSTRING" is varray(10000) of varchar2(1000); + +/ + + GRANT EXECUTE ON "SWG"."VAOFSTRING" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Sequence NEXT_OBJECT_VARIABLE_NAME +-------------------------------------------------------- + + CREATE SEQUENCE "SWG"."NEXT_OBJECT_VARIABLE_NAME" MINVALUE 1 MAXVALUE 9999999999999999999999999999 INCREMENT BY 1 START WITH 1 CACHE 20 NOORDER NOCYCLE ; +-------------------------------------------------------- +-- DDL for Sequence SEQ_ERRORLOG +-------------------------------------------------------- + + CREATE SEQUENCE "SWG"."SEQ_ERRORLOG" MINVALUE 1 MAXVALUE 9999999999999999999999999999 INCREMENT BY 1 START WITH 1 CACHE 20 NOORDER NOCYCLE ; +-------------------------------------------------------- +-- DDL for Sequence SEQ_QUERIES +-------------------------------------------------------- + + CREATE SEQUENCE "SWG"."SEQ_QUERIES" MINVALUE 1 MAXVALUE 9999999999999999999999999999 INCREMENT BY 1 START WITH 1 NOCACHE NOORDER NOCYCLE ; +-------------------------------------------------------- +-- DDL for Table ACCOUNTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."ACCOUNTS" + ( "STATION_ID" NUMBER(*,0), + "NUM_LOTS" NUMBER(*,0), + "IS_OUTCAST" CHAR(1 BYTE), + "CHEATER_LEVEL" NUMBER(*,0), + "MAX_LOTS_ADJUSTMENT" NUMBER(*,0), + "HOUSE_ID" NUMBER(20,0) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."ACCOUNTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table ACCOUNT_EXTRACT +-------------------------------------------------------- + + CREATE TABLE "SWG"."ACCOUNT_EXTRACT" + ( "USER_ID" NUMBER, + "SUBSCRIPTION_ID" NUMBER, + "PLAN_ID" NUMBER, + "PLAN_DESC" VARCHAR2(255 BYTE), + "STATUS" NUMBER, + "STATUS_DESC" VARCHAR2(60 BYTE), + "CLOSE_DATE" DATE, + "TOTAL_ENTITLED_TIME" NUMBER + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."ACCOUNT_EXTRACT" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table ACCOUNT_INFO +-------------------------------------------------------- + + CREATE TABLE "SWG"."ACCOUNT_INFO" + ( "STATION_ID" NUMBER, + "COMPLETED_TUTORIAL" CHAR(1 BYTE) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."ACCOUNT_INFO" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table ACCOUNT_MAP +-------------------------------------------------------- + + CREATE TABLE "SWG"."ACCOUNT_MAP" + ( "PARENT_ID" NUMBER(38,0), + "CHILD_ID" NUMBER(38,0) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."ACCOUNT_MAP" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table ACCOUNT_REWARD_EVENTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."ACCOUNT_REWARD_EVENTS" + ( "STATION_ID" NUMBER, + "EVENT_ID" VARCHAR2(255 BYTE), + "DATE_CONSUMED" DATE, + "CLUSTER_ID" NUMBER, + "CHARACTER_ID" NUMBER + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."ACCOUNT_REWARD_EVENTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table ACCOUNT_REWARD_ITEMS +-------------------------------------------------------- + + CREATE TABLE "SWG"."ACCOUNT_REWARD_ITEMS" + ( "STATION_ID" NUMBER, + "ITEM_ID" VARCHAR2(255 BYTE), + "DATE_CLAIMED" DATE, + "CLUSTER_ID" NUMBER, + "CHARACTER_ID" NUMBER + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."ACCOUNT_REWARD_ITEMS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table ARMOR +-------------------------------------------------------- + + CREATE TABLE "SWG"."ARMOR" + ( "OBJECT_ID" NUMBER(20,0), + "LAYER" NUMBER(*,0), + "EFFECTIVENESS" NUMBER(*,0), + "INTEGRITY" NUMBER(*,0), + "SPECIAL_PROTECTIONS" VARCHAR2(1000 BYTE), + "ENCUMBERANCE_0" NUMBER(*,0), + "ENCUMBERANCE_1" NUMBER(*,0), + "ENCUMBERANCE_2" NUMBER(*,0), + "ENCUMBERANCE_3" NUMBER(*,0), + "ENCUMBERANCE_4" NUMBER(*,0), + "ENCUMBERANCE_5" NUMBER(*,0), + "ENCUMBERANCE_6" NUMBER(*,0), + "ENCUMBERANCE_7" NUMBER(*,0), + "ENCUMBERANCE_8" NUMBER(*,0), + "OBJECT_TEMPLATE" VARCHAR2(255 BYTE) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."ARMOR" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table AUCTION_LOCATIONS +-------------------------------------------------------- + + CREATE TABLE "SWG"."AUCTION_LOCATIONS" + ( "LOCATION_ID" NUMBER(20,0), + "OWNER_ID" NUMBER(20,0), + "LOCATION_NAME" VARCHAR2(256 BYTE), + "SALES_TAX" NUMBER(20,0) DEFAULT 0, + "SALES_TAX_BANK_ID" NUMBER(20,0) DEFAULT 0, + "EMPTY_DATE" NUMBER(20,0), + "LAST_ACCESS_DATE" NUMBER(20,0), + "INACTIVE_DATE" NUMBER(20,0), + "STATUS" NUMBER(20,0) DEFAULT 0, + "SEARCH_ENABLED" CHAR(1 BYTE) DEFAULT 'Y', + "ENTRANCE_CHARGE" NUMBER DEFAULT 0 + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."AUCTION_LOCATIONS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table AUTOMATED_QUERIES +-------------------------------------------------------- + + CREATE TABLE "SWG"."AUTOMATED_QUERIES" + ( "ID" NUMBER(10,0), + "STARTTIME" DATE, + "ENDTIME" DATE, + "CREATETIME" DATE DEFAULT sysdate, + "STATUS" VARCHAR2(30 BYTE) DEFAULT 'ready', + "TYPE" VARCHAR2(30 BYTE), + "RUN_SERIAL" NUMBER(10,0) DEFAULT 0, + "EXEC_ORDER" NUMBER(10,0) DEFAULT 0, + "QUERY_TEXT" VARCHAR2(4000 BYTE) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."AUTOMATED_QUERIES" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table BATTLEFIELD_MARKER_OBJECTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."BATTLEFIELD_MARKER_OBJECTS" + ( "OBJECT_ID" NUMBER(20,0), + "REGION_NAME" VARCHAR2(500 BYTE) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."BATTLEFIELD_MARKER_OBJECTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table BATTLEFIELD_PARTICIPANTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."BATTLEFIELD_PARTICIPANTS" + ( "REGION_OBJECT_ID" NUMBER, + "CHARACTER_OBJECT_ID" NUMBER, + "FACTION_ID" NUMBER + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."BATTLEFIELD_PARTICIPANTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table BIOGRAPHIES +-------------------------------------------------------- + + CREATE TABLE "SWG"."BIOGRAPHIES" + ( "OBJECT_ID" NUMBER(20,0), + "BIOGRAPHY" VARCHAR2(1024 BYTE) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."BIOGRAPHIES" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table BOUNTY_HUNTER_TARGETS +-------------------------------------------------------- + + CREATE TABLE "SWG"."BOUNTY_HUNTER_TARGETS" + ( "OBJECT_ID" NUMBER(20,0), + "TARGET_ID" NUMBER(20,0) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."BOUNTY_HUNTER_TARGETS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table BUILDING_OBJECTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."BUILDING_OBJECTS" + ( "OBJECT_ID" NUMBER(20,0), + "MAINTENANCE_COST" NUMBER(*,0), + "TIME_LAST_CHECKED" FLOAT(126), + "IS_PUBLIC" CHAR(1 BYTE), + "CITY_ID" NUMBER(*,0) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."BUILDING_OBJECTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table CELL_OBJECTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."CELL_OBJECTS" + ( "OBJECT_ID" NUMBER(20,0), + "CELL_NUMBER" NUMBER(*,0), + "IS_PUBLIC" CHAR(1 BYTE) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."CELL_OBJECTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table CHARACTER_PROFILE +-------------------------------------------------------- + + CREATE TABLE "SWG"."CHARACTER_PROFILE" + ( "CLUSTER_NAME" VARCHAR2(50 BYTE), + "CHARACTER_ID" NUMBER(20,0), + "CHARACTER_NAME" VARCHAR2(127 BYTE), + "OBJECT_NAME" VARCHAR2(127 BYTE), + "X" FLOAT(126), + "Y" FLOAT(126), + "Z" FLOAT(126), + "SCENE_ID" VARCHAR2(50 BYTE), + "CASH_BALANCE" NUMBER(*,0), + "BANK_BALANCE" NUMBER(*,0), + "OBJECT_TEMPLATE_NAME" VARCHAR2(500 BYTE), + "STATION_ID" NUMBER(20,0), + "CONTAINED_BY" NUMBER(20,0), + "CREATE_TIME" DATE, + "PLAYED_TIME" DATE, + "NUM_LOTS" NUMBER(20,0) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."CHARACTER_PROFILE" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table CHARACTER_TYPES +-------------------------------------------------------- + + CREATE TABLE "SWG"."CHARACTER_TYPES" + ( "ID" NUMBER, + "DESCRIPTION" VARCHAR2(1000 BYTE) + ) SEGMENT CREATION IMMEDIATE + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645 + PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT) + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."CHARACTER_TYPES" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table CITY_OBJECTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."CITY_OBJECTS" + ( "OBJECT_ID" NUMBER(20,0) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."CITY_OBJECTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table CLOCK +-------------------------------------------------------- + + CREATE TABLE "SWG"."CLOCK" + ( "LAST_SAVE_TIME" NUMBER(*,0), + "LAST_SAVE_TIMESTAMP" DATE + ) SEGMENT CREATION IMMEDIATE + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645 + PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT) + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."CLOCK" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table CLUSTER_LIST +-------------------------------------------------------- + + CREATE TABLE "SWG"."CLUSTER_LIST" + ( "ID" NUMBER, + "NAME" VARCHAR2(255 BYTE), + "NUM_CHARACTERS" NUMBER, + "ADDRESS" VARCHAR2(255 BYTE), + "PORT" NUMBER DEFAULT 44463, + "SECRET" CHAR(1 BYTE), + "LOCKED" CHAR(1 BYTE), + "NOT_RECOMMENDED" CHAR(1 BYTE), + "GROUP_ID" NUMBER(*,0) DEFAULT 1, + "ONLINE_PLAYER_LIMIT" NUMBER DEFAULT 100, + "ONLINE_FREE_TRIAL_LIMIT" NUMBER, + "FREE_TRIAL_CAN_CREATE_CHAR" CHAR(1 BYTE), + "ONLINE_TUTORIAL_LIMIT" NUMBER DEFAULT 350 + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."CLUSTER_LIST" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table CREATURE_OBJECTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."CREATURE_OBJECTS" + ( "OBJECT_ID" NUMBER(20,0), + "SCALE_FACTOR" FLOAT(126), + "STATES" NUMBER(*,0), + "POSTURE" NUMBER(*,0), + "SHOCK_WOUNDS" NUMBER(*,0), + "MASTER_ID" NUMBER(20,0), + "RANK" NUMBER(*,0), + "BASE_WALK_SPEED" FLOAT(126), + "BASE_RUN_SPEED" FLOAT(126), + "ATTRIBUTE_0" NUMBER(*,0), + "ATTRIBUTE_1" NUMBER(*,0), + "ATTRIBUTE_2" NUMBER(*,0), + "ATTRIBUTE_3" NUMBER(*,0), + "ATTRIBUTE_4" NUMBER(*,0), + "ATTRIBUTE_5" NUMBER(*,0), + "ATTRIBUTE_6" NUMBER(*,0), + "ATTRIBUTE_7" NUMBER(*,0), + "ATTRIBUTE_8" NUMBER(*,0), + "ATTRIBUTE_9" NUMBER(*,0), + "ATTRIBUTE_10" NUMBER(*,0), + "ATTRIBUTE_11" NUMBER(*,0), + "ATTRIBUTE_12" NUMBER(*,0), + "ATTRIBUTE_13" NUMBER(*,0), + "ATTRIBUTE_14" NUMBER(*,0), + "ATTRIBUTE_15" NUMBER(*,0), + "ATTRIBUTE_16" NUMBER(*,0), + "ATTRIBUTE_17" NUMBER(*,0), + "ATTRIBUTE_18" NUMBER(*,0), + "ATTRIBUTE_19" NUMBER(*,0), + "ATTRIBUTE_20" NUMBER(*,0), + "ATTRIBUTE_21" NUMBER(*,0), + "ATTRIBUTE_22" NUMBER(*,0), + "ATTRIBUTE_23" NUMBER(*,0), + "ATTRIBUTE_24" NUMBER(*,0), + "ATTRIBUTE_25" NUMBER(*,0), + "ATTRIBUTE_26" NUMBER(*,0), + "PERSISTED_BUFFS" VARCHAR2(1000 BYTE), + "WS_X" FLOAT(126), + "WS_Y" FLOAT(126), + "WS_Z" FLOAT(126) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."CREATURE_OBJECTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table DEFAULT_CHARACTER_SLOTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."DEFAULT_CHARACTER_SLOTS" + ( "CHARACTER_TYPE_ID" NUMBER, + "NUM_SLOTS" NUMBER + ) SEGMENT CREATION IMMEDIATE + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645 + PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT) + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."DEFAULT_CHARACTER_SLOTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table DEFAULT_CHAR_LIMITS +-------------------------------------------------------- + + CREATE TABLE "SWG"."DEFAULT_CHAR_LIMITS" + ( "ACCOUNT_LIMIT" NUMBER, + "CLUSTER_LIMIT" NUMBER + ) SEGMENT CREATION IMMEDIATE + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645 + PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT) + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."DEFAULT_CHAR_LIMITS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table DELETE_REASONS +-------------------------------------------------------- + + CREATE TABLE "SWG"."DELETE_REASONS" + ( "REASON_CODE" NUMBER, + "TAG" VARCHAR2(100 BYTE), + "DESCRIPTION" VARCHAR2(1000 BYTE) + ) SEGMENT CREATION IMMEDIATE + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645 + PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT) + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."DELETE_REASONS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table ERRORLOG +-------------------------------------------------------- + + CREATE TABLE "SWG"."ERRORLOG" + ( "ERROR_ID" NUMBER(20,0), + "TIMESTAMP" DATE DEFAULT SYSDATE, + "ORA_ERRNO" NUMBER(10,0), + "ORA_ERRMSG" VARCHAR2(255 BYTE), + "SCHEMA_NAME" VARCHAR2(30 BYTE), + "MODULE_NAME" VARCHAR2(80 BYTE), + "NOTES" VARCHAR2(4000 BYTE) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."ERRORLOG" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table ERRORLOG_LEVEL +-------------------------------------------------------- + + CREATE TABLE "SWG"."ERRORLOG_LEVEL" + ( "LEVELID" NUMBER(10,0) DEFAULT 0 + ) SEGMENT CREATION IMMEDIATE + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645 + PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT) + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."ERRORLOG_LEVEL" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table ERRORLOG_LEVEL_DESC +-------------------------------------------------------- + + CREATE TABLE "SWG"."ERRORLOG_LEVEL_DESC" + ( "LEVELID" NUMBER(10,0) DEFAULT 0, + "DESCRIP" VARCHAR2(50 BYTE) + ) SEGMENT CREATION IMMEDIATE + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645 + PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT) + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."ERRORLOG_LEVEL_DESC" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table ERRORLOG_RERAISE_LIMITS +-------------------------------------------------------- + + CREATE TABLE "SWG"."ERRORLOG_RERAISE_LIMITS" + ( "PACKAGE" VARCHAR2(30 BYTE), + "PROCEDURE" VARCHAR2(30 BYTE), + "ERRORLIMIT" NUMBER(10,0) DEFAULT 0, + "ERRORCOUNT" NUMBER(10,0) DEFAULT 0, + "UNLIMITED_FLAG" NUMBER(10,0) DEFAULT 0 + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."ERRORLOG_RERAISE_LIMITS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table ERRORLOG_VALUES +-------------------------------------------------------- + + CREATE TABLE "SWG"."ERRORLOG_VALUES" + ( "ERROR_ID" NUMBER(20,0), + "ELEMENT_OWNER" VARCHAR2(30 BYTE), + "ELEMENT_NAME" VARCHAR2(30 BYTE), + "ELEMENT_TYPE" VARCHAR2(30 BYTE), + "ELEMENT_VALUE" VARCHAR2(4000 BYTE) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."ERRORLOG_VALUES" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table EXPERIENCE_POINTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."EXPERIENCE_POINTS" + ( "OBJECT_ID" NUMBER, + "EXPERIENCE_TYPE" VARCHAR2(500 BYTE), + "POINTS" NUMBER + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."EXPERIENCE_POINTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table EXTRA_CHARACTER_SLOTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."EXTRA_CHARACTER_SLOTS" + ( "STATION_ID" NUMBER, + "CLUSTER_ID" NUMBER, + "CHARACTER_TYPE_ID" NUMBER, + "NUM_EXTRA_SLOTS" NUMBER + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."EXTRA_CHARACTER_SLOTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table FACTORY_OBJECTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."FACTORY_OBJECTS" + ( "OBJECT_ID" NUMBER(20,0) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."FACTORY_OBJECTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table FEATURE_ID_TRANSACTIONS +-------------------------------------------------------- + + CREATE TABLE "SWG"."FEATURE_ID_TRANSACTIONS" + ( "STATION_ID" NUMBER, + "CLUSTER_ID" NUMBER, + "CHARACTER_ID" NUMBER, + "ITEM_ID" VARCHAR2(255 BYTE), + "DATE_UPDATED" DATE, + "COUNT" NUMBER + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."FEATURE_ID_TRANSACTIONS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table FREE_OBJECT_IDS +-------------------------------------------------------- + + CREATE TABLE "SWG"."FREE_OBJECT_IDS" + ( "START_ID" NUMBER(*,0), + "END_ID" NUMBER(*,0) + ) SEGMENT CREATION IMMEDIATE + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645 + PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT) + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."FREE_OBJECT_IDS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table GUILD_OBJECTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."GUILD_OBJECTS" + ( "OBJECT_ID" NUMBER(20,0) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."GUILD_OBJECTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table HARVESTER_INSTALLATION_OBJECTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."HARVESTER_INSTALLATION_OBJECTS" + ( "OBJECT_ID" NUMBER(20,0), + "INSTALLED_EFFICIENCY" FLOAT(126), + "MAX_EXTRACTION_RATE" NUMBER(*,0), + "CURRENT_EXTRACTION_RATE" FLOAT(126), + "MAX_HOPPER_AMOUNT" NUMBER(*,0), + "HOPPER_RESOURCE" NUMBER(20,0), + "HOPPER_AMOUNT" FLOAT(126), + "RESOURCE_TYPE" NUMBER(20,0) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."HARVESTER_INSTALLATION_OBJECTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table INSTALLATION_OBJECTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."INSTALLATION_OBJECTS" + ( "OBJECT_ID" NUMBER(20,0), + "INSTALLATION_TYPE" NUMBER(*,0), + "ACTIVATED" CHAR(1 BYTE), + "TICK_COUNT" FLOAT(126), + "ACTIVATE_START_TIME" FLOAT(126), + "POWER" FLOAT(126), + "POWER_RATE" FLOAT(126) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."INSTALLATION_OBJECTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table INTANGIBLE_OBJECTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."INTANGIBLE_OBJECTS" + ( "OBJECT_ID" NUMBER(20,0), + "COUNT" NUMBER(*,0) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."INTANGIBLE_OBJECTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table LOADBEACON_SERVER_MAP +-------------------------------------------------------- + + CREATE TABLE "SWG"."LOADBEACON_SERVER_MAP" + ( "OBJECT_TEMPLATE" VARCHAR2(255 BYTE), + "SERVER_ID" NUMBER(*,0), + "SECONDARY_SERVER_ID" NUMBER(*,0) + ) SEGMENT CREATION IMMEDIATE + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645 + PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT) + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."LOADBEACON_SERVER_MAP" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table LOCATION_LISTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."LOCATION_LISTS" + ( "OBJECT_ID" NUMBER, + "LIST_ID" NUMBER, + "SEQUENCE_NUMBER" NUMBER, + "NAME" VARCHAR2(255 BYTE), + "SCENE" VARCHAR2(50 BYTE), + "X" NUMBER, + "Y" NUMBER, + "Z" NUMBER, + "RADIUS" NUMBER + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."LOCATION_LISTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table MANF_SCHEMATIC_ATTRIBUTES +-------------------------------------------------------- + + CREATE TABLE "SWG"."MANF_SCHEMATIC_ATTRIBUTES" + ( "OBJECT_ID" NUMBER(20,0), + "ATTRIBUTE_TYPE" VARCHAR2(500 BYTE), + "VALUE" FLOAT(126) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."MANF_SCHEMATIC_ATTRIBUTES" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table MANF_SCHEMATIC_OBJECTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."MANF_SCHEMATIC_OBJECTS" + ( "OBJECT_ID" NUMBER(20,0), + "CREATOR_ID" NUMBER, + "CREATOR_NAME" VARCHAR2(127 BYTE), + "ITEMS_PER_CONTAINER" NUMBER(*,0), + "MANUFACTURE_TIME" FLOAT(126), + "DRAFT_SCHEMATIC" NUMBER(*,0) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."MANF_SCHEMATIC_OBJECTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table MANUFACTURE_INST_OBJECTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."MANUFACTURE_INST_OBJECTS" + ( "OBJECT_ID" NUMBER(20,0) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."MANUFACTURE_INST_OBJECTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table MARKET_AUCTIONS +-------------------------------------------------------- + + CREATE TABLE "SWG"."MARKET_AUCTIONS" + ( "ITEM_ID" NUMBER(20,0), + "LOCATION_ID" NUMBER(20,0), + "CREATOR_ID" NUMBER(20,0), + "OWNER_ID" NUMBER(20,0), + "MIN_BID" NUMBER(20,0), + "BUY_NOW_PRICE" NUMBER(20,0), + "AUCTION_TIMER" NUMBER(20,0), + "USER_DESCRIPTION" VARCHAR2(4000 BYTE), + "ITEM_NAME" VARCHAR2(4000 BYTE), + "OOB" VARCHAR2(4000 BYTE), + "CATEGORY" NUMBER(20,0), + "ITEM_TIMER" NUMBER(20,0), + "ACTIVE" NUMBER(20,0), + "ITEM_SIZE" NUMBER(20,0) DEFAULT 1, + "OBJECT_TEMPLATE_ID" NUMBER(*,0) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."MARKET_AUCTIONS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table MARKET_AUCTION_ATTRIBUTES +-------------------------------------------------------- + + CREATE TABLE "SWG"."MARKET_AUCTION_ATTRIBUTES" + ( "ITEM_ID" NUMBER(20,0), + "ATTRIBUTE_NAME" VARCHAR2(1000 BYTE), + "ATTRIBUTE_VALUE" VARCHAR2(1000 BYTE) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."MARKET_AUCTION_ATTRIBUTES" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table MARKET_AUCTION_BIDS +-------------------------------------------------------- + + CREATE TABLE "SWG"."MARKET_AUCTION_BIDS" + ( "ITEM_ID" NUMBER(20,0), + "BIDDER_ID" NUMBER(20,0), + "BID" NUMBER(20,0), + "MAX_PROXY_BID" NUMBER(20,0) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."MARKET_AUCTION_BIDS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table MESSAGES +-------------------------------------------------------- + + CREATE TABLE "SWG"."MESSAGES" + ( "MESSAGE_ID" NUMBER(*,0), + "TARGET" NUMBER(*,0), + "METHOD" VARCHAR2(50 BYTE), + "DATA" VARCHAR2(4000 BYTE), + "CALL_TIME" NUMBER(*,0), + "GUARANTEED" CHAR(1 BYTE), + "DELIVERY_TYPE" NUMBER(*,0) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."MESSAGES" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table MISSION_OBJECTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."MISSION_OBJECTS" + ( "OBJECT_ID" NUMBER(20,0), + "DIFFICULTY" NUMBER(*,0), + "END_X" FLOAT(126), + "END_Y" FLOAT(126), + "END_Z" FLOAT(126), + "END_CELL" NUMBER(20,0), + "END_SCENE" NUMBER(*,0), + "MISSION_CREATOR" VARCHAR2(127 BYTE), + "REWARD" NUMBER(*,0), + "ROOT_SCRIPT_NAME" VARCHAR2(100 BYTE), + "START_X" FLOAT(126), + "START_Y" FLOAT(126), + "START_Z" FLOAT(126), + "START_CELL" NUMBER(20,0), + "START_SCENE" NUMBER(*,0), + "DESCRIPTION_TABLE" VARCHAR2(100 BYTE), + "DESCRIPTION_TEXT" VARCHAR2(100 BYTE), + "TITLE_TABLE" VARCHAR2(100 BYTE), + "TITLE_TEXT" VARCHAR2(100 BYTE), + "MISSION_HOLDER_ID" NUMBER(20,0), + "STATUS" NUMBER(*,0), + "MISSION_TYPE" NUMBER(*,0), + "TARGET_APPEARANCE" NUMBER(*,0), + "TARGET_NAME" VARCHAR2(127 BYTE) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."MISSION_OBJECTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table OBJECTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."OBJECTS" + ( "OBJECT_ID" NUMBER(20,0), + "X" FLOAT(126), + "Y" FLOAT(126), + "Z" FLOAT(126), + "QUATERNION_W" FLOAT(126), + "QUATERNION_X" FLOAT(126), + "QUATERNION_Y" FLOAT(126), + "QUATERNION_Z" FLOAT(126), + "NODE_X" NUMBER(*,0), + "NODE_Y" NUMBER(*,0), + "NODE_Z" NUMBER(*,0), + "TYPE_ID" NUMBER(*,0), + "SCENE_ID" VARCHAR2(50 BYTE), + "CONTROLLER_TYPE" NUMBER(*,0), + "DELETED" NUMBER(*,0), + "OBJECT_NAME" VARCHAR2(127 BYTE), + "VOLUME" NUMBER(*,0), + "CONTAINED_BY" NUMBER(20,0), + "SLOT_ARRANGEMENT" NUMBER(*,0), + "PLAYER_CONTROLLED" CHAR(1 BYTE), + "CACHE_VERSION" NUMBER(*,0), + "LOAD_CONTENTS" CHAR(1 BYTE), + "CASH_BALANCE" NUMBER(*,0), + "BANK_BALANCE" NUMBER(*,0), + "COMPLEXITY" FLOAT(126), + "NAME_STRING_TABLE" VARCHAR2(500 BYTE), + "NAME_STRING_TEXT" VARCHAR2(500 BYTE), + "OBJECT_TEMPLATE_ID" NUMBER(*,0), + "STATIC_ITEM_NAME" VARCHAR2(128 BYTE), + "STATIC_ITEM_VERSION" NUMBER(*,0), + "CONVERSION_ID" NUMBER(*,0), + "DELETED_DATE" DATE, + "LOAD_WITH" NUMBER(20,0), + "OBJVAR_0_NAME" VARCHAR2(50 BYTE), + "OBJVAR_0_TYPE" NUMBER(*,0), + "OBJVAR_0_VALUE" VARCHAR2(50 BYTE), + "OBJVAR_1_NAME" VARCHAR2(50 BYTE), + "OBJVAR_1_TYPE" NUMBER(*,0), + "OBJVAR_1_VALUE" VARCHAR2(50 BYTE), + "OBJVAR_2_NAME" VARCHAR2(50 BYTE), + "OBJVAR_2_TYPE" NUMBER(*,0), + "OBJVAR_2_VALUE" VARCHAR2(50 BYTE), + "OBJVAR_3_NAME" VARCHAR2(50 BYTE), + "OBJVAR_3_TYPE" NUMBER(*,0), + "OBJVAR_3_VALUE" VARCHAR2(50 BYTE), + "OBJVAR_4_NAME" VARCHAR2(50 BYTE), + "OBJVAR_4_TYPE" NUMBER(*,0), + "OBJVAR_4_VALUE" VARCHAR2(50 BYTE), + "OBJVAR_5_NAME" VARCHAR2(50 BYTE), + "OBJVAR_5_TYPE" NUMBER(*,0), + "OBJVAR_5_VALUE" VARCHAR2(50 BYTE), + "OBJVAR_6_NAME" VARCHAR2(50 BYTE), + "OBJVAR_6_TYPE" NUMBER(*,0), + "OBJVAR_6_VALUE" VARCHAR2(50 BYTE), + "OBJVAR_7_NAME" VARCHAR2(50 BYTE), + "OBJVAR_7_TYPE" NUMBER(*,0), + "OBJVAR_7_VALUE" VARCHAR2(50 BYTE), + "OBJVAR_8_NAME" VARCHAR2(50 BYTE), + "OBJVAR_8_TYPE" NUMBER(*,0), + "OBJVAR_8_VALUE" VARCHAR2(50 BYTE), + "OBJVAR_9_NAME" VARCHAR2(50 BYTE), + "OBJVAR_9_TYPE" NUMBER(*,0), + "OBJVAR_9_VALUE" VARCHAR2(50 BYTE), + "OBJVAR_10_NAME" VARCHAR2(50 BYTE), + "OBJVAR_10_TYPE" NUMBER(*,0), + "OBJVAR_10_VALUE" VARCHAR2(50 BYTE), + "OBJVAR_11_NAME" VARCHAR2(50 BYTE), + "OBJVAR_11_TYPE" NUMBER(*,0), + "OBJVAR_11_VALUE" VARCHAR2(50 BYTE), + "OBJVAR_12_NAME" VARCHAR2(50 BYTE), + "OBJVAR_12_TYPE" NUMBER(*,0), + "OBJVAR_12_VALUE" VARCHAR2(50 BYTE), + "OBJVAR_13_NAME" VARCHAR2(50 BYTE), + "OBJVAR_13_TYPE" NUMBER(*,0), + "OBJVAR_13_VALUE" VARCHAR2(50 BYTE), + "OBJVAR_14_NAME" VARCHAR2(50 BYTE), + "OBJVAR_14_TYPE" NUMBER(*,0), + "OBJVAR_14_VALUE" VARCHAR2(50 BYTE), + "OBJVAR_15_NAME" VARCHAR2(50 BYTE), + "OBJVAR_15_TYPE" NUMBER(*,0), + "OBJVAR_15_VALUE" VARCHAR2(50 BYTE), + "OBJVAR_16_NAME" VARCHAR2(50 BYTE), + "OBJVAR_16_TYPE" NUMBER(*,0), + "OBJVAR_16_VALUE" VARCHAR2(50 BYTE), + "OBJVAR_17_NAME" VARCHAR2(50 BYTE), + "OBJVAR_17_TYPE" NUMBER(*,0), + "OBJVAR_17_VALUE" VARCHAR2(50 BYTE), + "OBJVAR_18_NAME" VARCHAR2(50 BYTE), + "OBJVAR_18_TYPE" NUMBER(*,0), + "OBJVAR_18_VALUE" VARCHAR2(50 BYTE), + "OBJVAR_19_NAME" VARCHAR2(50 BYTE), + "OBJVAR_19_TYPE" NUMBER(*,0), + "OBJVAR_19_VALUE" VARCHAR2(50 BYTE), + "SCRIPT_LIST" VARCHAR2(2000 BYTE) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."OBJECTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table OBJECT_LIST +-------------------------------------------------------- + + CREATE GLOBAL TEMPORARY TABLE "SWG"."OBJECT_LIST" + ( "OBJECT_ID" NUMBER(20,0), + "CONTAINER_LEVEL" NUMBER + ) ON COMMIT DELETE ROWS ; + GRANT ALTER, DELETE, INDEX, INSERT, SELECT, UPDATE, REFERENCES, ON COMMIT REFRESH, QUERY REWRITE, DEBUG, FLASHBACK ON "SWG"."OBJECT_LIST" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table OBJECT_TEMPLATES +-------------------------------------------------------- + + CREATE TABLE "SWG"."OBJECT_TEMPLATES" + ( "ID" NUMBER, + "NAME" VARCHAR2(255 BYTE) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."OBJECT_TEMPLATES" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table OBJECT_VARIABLES +-------------------------------------------------------- + + CREATE TABLE "SWG"."OBJECT_VARIABLES" + ( "OBJECT_ID" NUMBER(20,0), + "NAME_ID" NUMBER, + "TYPE" NUMBER(*,0), + "VALUE" VARCHAR2(1000 BYTE), + "DETACHED" NUMBER(*,0) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."OBJECT_VARIABLES" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table OBJECT_VARIABLE_NAMES +-------------------------------------------------------- + + CREATE TABLE "SWG"."OBJECT_VARIABLE_NAMES" + ( "ID" NUMBER(20,0), + "NAME" VARCHAR2(500 BYTE) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."OBJECT_VARIABLE_NAMES" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table PLANET_OBJECTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."PLANET_OBJECTS" + ( "OBJECT_ID" NUMBER(20,0), + "PLANET_NAME" VARCHAR2(100 BYTE) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."PLANET_OBJECTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table PLAYERS +-------------------------------------------------------- + + CREATE TABLE "SWG"."PLAYERS" + ( "CHARACTER_OBJECT" NUMBER(*,0), + "STATION_ID" NUMBER(*,0), + "UC_CHARACTER_NAME" VARCHAR2(127 BYTE), + "CHARACTER_FULL_NAME" VARCHAR2(127 BYTE), + "CREATE_TIME" DATE, + "LAST_LOGIN_TIME" DATE DEFAULT sysdate + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."PLAYERS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table PLAYER_OBJECTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."PLAYER_OBJECTS" + ( "OBJECT_ID" NUMBER(20,0), + "STATION_ID" NUMBER(*,0), + "PERSONAL_PROFILE_ID" VARCHAR2(200 BYTE), + "CHARACTER_PROFILE_ID" VARCHAR2(200 BYTE), + "SKILL_TITLE" VARCHAR2(200 BYTE), + "BORN_DATE" NUMBER(*,0), + "PLAYED_TIME" NUMBER(*,0), + "FORCE_REGEN_RATE" FLOAT(126), + "FORCE_POWER" NUMBER(*,0), + "MAX_FORCE_POWER" NUMBER(*,0), + "NUM_LOTS" NUMBER(*,0), + "ACTIVE_QUESTS" VARCHAR2(512 BYTE), + "COMPLETED_QUESTS" VARCHAR2(512 BYTE), + "CURRENT_QUEST" NUMBER(*,0), + "QUESTS" VARCHAR2(4000 BYTE), + "ROLE_ICON_CHOICE" NUMBER(*,0), + "QUESTS2" VARCHAR2(4000 BYTE), + "QUESTS3" VARCHAR2(4000 BYTE), + "QUESTS4" VARCHAR2(4000 BYTE), + "SKILL_TEMPLATE" VARCHAR2(200 BYTE), + "WORKING_SKILL" VARCHAR2(200 BYTE), + "CURRENT_GCW_POINTS" NUMBER(*,0), + "CURRENT_GCW_RATING" NUMBER(*,0), + "CURRENT_PVP_KILLS" NUMBER(*,0), + "LIFETIME_GCW_POINTS" NUMBER(*,0), + "MAX_GCW_IMPERIAL_RATING" NUMBER(*,0), + "MAX_GCW_REBEL_RATING" NUMBER(*,0), + "LIFETIME_PVP_KILLS" NUMBER(*,0), + "NEXT_GCW_RATING_CALC_TIME" NUMBER(*,0), + "COLLECTIONS" VARCHAR2(4000 BYTE), + "SHOW_BACKPACK" CHAR(1 BYTE), + "SHOW_HELMET" CHAR(1 BYTE), + "COLLECTIONS2" VARCHAR2(4000 BYTE) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."PLAYER_OBJECTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table PLAYER_QUEST_OBJECTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."PLAYER_QUEST_OBJECTS" + ( "OBJECT_ID" NUMBER(20,0), + "TITLE" VARCHAR2(256 BYTE), + "DESCRIPTION" VARCHAR2(4000 BYTE), + "CREATOR" NUMBER(20,0), + "TOTAL_TASKS" NUMBER(*,0), + "DIFFICULTY" NUMBER(*,0), + "TASK_TITLE1" VARCHAR2(128 BYTE), + "TASK_DESCRIPTION1" VARCHAR2(4000 BYTE), + "TASK_TITLE2" VARCHAR2(128 BYTE), + "TASK_DESCRIPTION2" VARCHAR2(4000 BYTE), + "TASK_TITLE3" VARCHAR2(128 BYTE), + "TASK_DESCRIPTION3" VARCHAR2(4000 BYTE), + "TASK_TITLE4" VARCHAR2(128 BYTE), + "TASK_DESCRIPTION4" VARCHAR2(4000 BYTE), + "TASK_TITLE5" VARCHAR2(128 BYTE), + "TASK_DESCRIPTION5" VARCHAR2(4000 BYTE), + "TASK_TITLE6" VARCHAR2(128 BYTE), + "TASK_DESCRIPTION6" VARCHAR2(4000 BYTE), + "TASK_TITLE7" VARCHAR2(128 BYTE), + "TASK_DESCRIPTION7" VARCHAR2(4000 BYTE), + "TASK_TITLE8" VARCHAR2(128 BYTE), + "TASK_DESCRIPTION8" VARCHAR2(4000 BYTE), + "TASK_TITLE9" VARCHAR2(128 BYTE), + "TASK_DESCRIPTION9" VARCHAR2(4000 BYTE), + "TASK_TITLE10" VARCHAR2(128 BYTE), + "TASK_DESCRIPTION10" VARCHAR2(4000 BYTE), + "TASK_TITLE11" VARCHAR2(128 BYTE), + "TASK_DESCRIPTION11" VARCHAR2(4000 BYTE), + "TASK_TITLE12" VARCHAR2(128 BYTE), + "TASK_DESCRIPTION12" VARCHAR2(4000 BYTE) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."PLAYER_QUEST_OBJECTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table PROPERTY_LISTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."PROPERTY_LISTS" + ( "OBJECT_ID" NUMBER(20,0), + "LIST_ID" NUMBER(*,0), + "VALUE" VARCHAR2(500 BYTE) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."PROPERTY_LISTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table PUBLISH_PLAYER_FIXUP +-------------------------------------------------------- + + CREATE TABLE "SWG"."PUBLISH_PLAYER_FIXUP" + ( "PLAYER_OBJECT_ID" NUMBER(20,0), + "X" NUMBER, + "Y" NUMBER, + "Z" NUMBER + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."PUBLISH_PLAYER_FIXUP" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table PURGE_ACCOUNTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."PURGE_ACCOUNTS" + ( "STATION_ID" NUMBER, + "PURGE_PHASE" NUMBER, + "PURGE_START_DATE" DATE, + "PURGE_PHASE_DATE" DATE, + "PURGE_LOCK" DATE + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."PURGE_ACCOUNTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table PURGE_PHASES +-------------------------------------------------------- + + CREATE TABLE "SWG"."PURGE_PHASES" + ( "ID" NUMBER, + "DESCRIPTION" VARCHAR2(200 BYTE) + ) SEGMENT CREATION IMMEDIATE + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645 + PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT) + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."PURGE_PHASES" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table RESOURCE_CONTAINER_OBJECTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."RESOURCE_CONTAINER_OBJECTS" + ( "OBJECT_ID" NUMBER(20,0), + "RESOURCE_TYPE" NUMBER(20,0), + "QUANTITY" NUMBER(*,0), + "SOURCE" NUMBER(20,0) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."RESOURCE_CONTAINER_OBJECTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table RESOURCE_TYPES +-------------------------------------------------------- + + CREATE TABLE "SWG"."RESOURCE_TYPES" + ( "RESOURCE_ID" NUMBER(20,0), + "RESOURCE_NAME" VARCHAR2(100 BYTE), + "RESOURCE_CLASS" VARCHAR2(100 BYTE), + "ATTRIBUTES" VARCHAR2(1024 BYTE), + "FRACTAL_SEEDS" VARCHAR2(1024 BYTE), + "DEPLETED_TIMESTAMP" NUMBER(*,0) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."RESOURCE_TYPES" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table SCRIPTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."SCRIPTS" + ( "OBJECT_ID" NUMBER(20,0), + "SEQUENCE_NO" NUMBER(*,0), + "SCRIPT" VARCHAR2(100 BYTE), + "DETACHED" NUMBER(*,0) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."SCRIPTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table SCRUNCHER +-------------------------------------------------------- + + CREATE TABLE "SWG"."SCRUNCHER" + ( "NEW_OBJECT_ID" NUMBER(20,0), + "OLD_OBJECT_ID" NUMBER(20,0) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."SCRUNCHER" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table SHIP_OBJECTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."SHIP_OBJECTS" + ( "OBJECT_ID" NUMBER(20,0), + "SLIDE_DAMPENER" FLOAT(126), + "CURRENT_CHASSIS_HIT_POINTS" FLOAT(126), + "MAXIMUM_CHASSIS_HIT_POINTS" FLOAT(126), + "CHASSIS_TYPE" NUMBER(*,0), + "CMP_ARMOR_HP_MAXIMUM" VARCHAR2(400 BYTE), + "CMP_ARMOR_HP_CURRENT" VARCHAR2(400 BYTE), + "CMP_EFFICIENCY_GENERAL" VARCHAR2(400 BYTE), + "CMP_EFFICIENCY_ENG" VARCHAR2(400 BYTE), + "CMP_ENG_MAINTENANCE" VARCHAR2(400 BYTE), + "CMP_MASS" VARCHAR2(400 BYTE), + "CMP_CRC" VARCHAR2(500 BYTE), + "CMP_HP_CURRENT" VARCHAR2(400 BYTE), + "CMP_HP_MAXIMUM" VARCHAR2(400 BYTE), + "CMP_FLAGS" VARCHAR2(400 BYTE), + "CMP_NAMES" VARCHAR2(4000 BYTE), + "WEAPON_DAMAGE_MAXIMUM" VARCHAR2(400 BYTE), + "WEAPON_DAMAGE_MINIMUM" VARCHAR2(400 BYTE), + "WEAPON_EFFECTIVENESS_SHIELDS" VARCHAR2(400 BYTE), + "WEAPON_EFFECTIVENESS_ARMOR" VARCHAR2(400 BYTE), + "WEAPON_ENG_PER_SHOT" VARCHAR2(400 BYTE), + "WEAPON_REFIRE_RATE" VARCHAR2(400 BYTE), + "WEAPON_AMMO_CURRENT" VARCHAR2(400 BYTE), + "WEAPON_AMMO_MAXIMUM" VARCHAR2(400 BYTE), + "WEAPON_AMMO_TYPE" VARCHAR2(400 BYTE), + "SHIELD_HP_FRONT_MAXIMUM" FLOAT(126), + "SHIELD_HP_BACK_MAXIMUM" FLOAT(126), + "SHIELD_RECHARGE_RATE" FLOAT(126), + "CAPACITOR_ENG_MAXIMUM" FLOAT(126), + "CAPACITOR_ENG_RECHARGE_RATE" FLOAT(126), + "ENGINE_ACC_RATE" FLOAT(126), + "ENGINE_DECELERATION_RATE" FLOAT(126), + "ENGINE_PITCH_ACC_RATE" FLOAT(126), + "ENGINE_YAW_ACC_RATE" FLOAT(126), + "ENGINE_ROLL_ACC_RATE" FLOAT(126), + "ENGINE_PITCH_RATE_MAXIMUM" FLOAT(126), + "ENGINE_YAW_RATE_MAXIMUM" FLOAT(126), + "ENGINE_ROLL_RATE_MAXIMUM" FLOAT(126), + "ENGINE_SPEED_MAXIMUM" FLOAT(126), + "REACTOR_ENG_GENERATION_RATE" FLOAT(126), + "BOOSTER_ENG_MAXIMUM" FLOAT(126), + "BOOSTER_ENG_RECHARGE_RATE" FLOAT(126), + "BOOSTER_ENG_CONSUMPTION_RATE" FLOAT(126), + "BOOSTER_ACC" FLOAT(126), + "BOOSTER_SPEED_MAXIMUM" FLOAT(126), + "DROID_IF_CMD_SPEED" FLOAT(126), + "INSTALLED_DCD" NUMBER(20,0), + "CHASSIS_CMP_MASS_MAXIMUM" FLOAT(126), + "CMP_CREATORS" VARCHAR2(400 BYTE), + "CARGO_HOLD_CONTENTS_MAXIMUM" NUMBER, + "CARGO_HOLD_CONTENTS_CURRENT" NUMBER, + "CARGO_HOLD_CONTENTS" VARCHAR2(500 BYTE) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."SHIP_OBJECTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table STATIC_OBJECTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."STATIC_OBJECTS" + ( "OBJECT_ID" NUMBER(20,0) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."STATIC_OBJECTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table STATUSES +-------------------------------------------------------- + + CREATE TABLE "SWG"."STATUSES" + ( "ID" NUMBER, + "DESCRIPTION" VARCHAR2(200 BYTE), + "DO_PURGE" CHAR(1 BYTE), + "REVIEWED" CHAR(1 BYTE) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."STATUSES" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table SWG_CHARACTERS +-------------------------------------------------------- + + CREATE TABLE "SWG"."SWG_CHARACTERS" + ( "STATION_ID" NUMBER, + "CLUSTER_ID" NUMBER, + "CHARACTER_NAME" VARCHAR2(127 BYTE), + "OBJECT_ID" NUMBER, + "CHARACTER_TYPE" NUMBER, + "TEMPLATE_ID" NUMBER, + "ENABLED" CHAR(1 BYTE) DEFAULT 'Y' + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."SWG_CHARACTERS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table TANGIBLE_OBJECTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."TANGIBLE_OBJECTS" + ( "OBJECT_ID" NUMBER(20,0), + "MAX_HIT_POINTS" NUMBER(*,0), + "OWNER_ID" NUMBER(*,0), + "VISIBLE" CHAR(1 BYTE), + "APPEARANCE_DATA" VARCHAR2(2000 BYTE), + "INTEREST_RADIUS" NUMBER(*,0), + "PVP_TYPE" NUMBER(*,0), + "PVP_FACTION" NUMBER(*,0), + "DAMAGE_TAKEN" NUMBER(*,0), + "CUSTOM_APPEARANCE" VARCHAR2(2000 BYTE), + "COUNT" NUMBER(*,0), + "CONDITION" NUMBER(*,0), + "CREATOR_ID" NUMBER(20,0), + "SOURCE_DRAFT_SCHEMATIC" NUMBER(*,0) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."TANGIBLE_OBJECTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table TEMP_CHARACTERS +-------------------------------------------------------- + + CREATE TABLE "SWG"."TEMP_CHARACTERS" + ( "TRANSACTION_TYPE" NUMBER, + "STATION_ID" NUMBER, + "CLUSTER_NAME" VARCHAR2(120 BYTE), + "CHARACTER_NAME" VARCHAR2(30 BYTE), + "OBJECT_ID" NUMBER, + "TEMPLATE_NAME" VARCHAR2(120 BYTE) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."TEMP_CHARACTERS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table TEMP_FREE_OBJECT_IDS +-------------------------------------------------------- + + CREATE GLOBAL TEMPORARY TABLE "SWG"."TEMP_FREE_OBJECT_IDS" + ( "START_ID" NUMBER(*,0), + "END_ID" NUMBER(*,0) + ) ON COMMIT DELETE ROWS ; + GRANT SELECT ON "SWG"."TEMP_FREE_OBJECT_IDS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table TOKEN_OBJECTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."TOKEN_OBJECTS" + ( "OBJECT_ID" NUMBER(20,0), + "REFERENCE" NUMBER(20,0), + "TARGET_SERVER_TEMPLATE_NAME" VARCHAR2(500 BYTE), + "TARGET_SHARED_TEMPLATE_NAME" VARCHAR2(500 BYTE), + "WAYPOINT" NUMBER(20,0) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."TOKEN_OBJECTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table UNIVERSE_OBJECTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."UNIVERSE_OBJECTS" + ( "OBJECT_ID" NUMBER(20,0) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."UNIVERSE_OBJECTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table VEHICLE_OBJECTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."VEHICLE_OBJECTS" + ( "OBJECT_ID" NUMBER(20,0), + "BOGUS" NUMBER(*,0) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."VEHICLE_OBJECTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table VERSION_NUMBER +-------------------------------------------------------- + + CREATE TABLE "SWG"."VERSION_NUMBER" + ( "VERSION_NUMBER" NUMBER(*,0), + "MIN_VERSION_NUMBER" NUMBER(*,0), + "GOLDDATA" VARCHAR2(100 BYTE), + "BRANCH_NAME" VARCHAR2(30 BYTE) + ) SEGMENT CREATION IMMEDIATE + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645 + PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT) + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."VERSION_NUMBER" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table WAYPOINTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."WAYPOINTS" + ( "OBJECT_ID" NUMBER(20,0), + "WAYPOINT_ID" NUMBER(20,0), + "APPEARANCE_NAME_CRC" NUMBER(*,0), + "LOCATION_X" FLOAT(126), + "LOCATION_Y" FLOAT(126), + "LOCATION_Z" FLOAT(126), + "LOCATION_CELL" NUMBER(20,0), + "LOCATION_SCENE" NUMBER(*,0), + "NAME" VARCHAR2(512 BYTE), + "COLOR" NUMBER(*,0), + "ACTIVE" CHAR(1 BYTE) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."WAYPOINTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Table WEAPON_OBJECTS +-------------------------------------------------------- + + CREATE TABLE "SWG"."WEAPON_OBJECTS" + ( "OBJECT_ID" NUMBER(20,0), + "MIN_DAMAGE" NUMBER(*,0), + "MAX_DAMAGE" NUMBER(*,0), + "DAMAGE_TYPE" NUMBER(*,0), + "ELEMENTAL_TYPE" NUMBER(*,0), + "ELEMENTAL_VALUE" NUMBER(*,0), + "ATTACK_SPEED" FLOAT(126), + "WOUND_CHANCE" FLOAT(126), + "ACCURACY" NUMBER(*,0), + "ATTACK_COST" NUMBER(*,0), + "DAMAGE_RADIUS" FLOAT(126), + "MIN_RANGE" FLOAT(126), + "MAX_RANGE" FLOAT(126) + ) SEGMENT CREATION DEFERRED + PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; + GRANT SELECT ON "SWG"."WEAPON_OBJECTS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for View CHARACTER_VIEW +-------------------------------------------------------- + + CREATE OR REPLACE FORCE VIEW "SWG"."CHARACTER_VIEW" ("STATION_ID", "CHARACTER_OBJECT", "OBJECT_TEMPLATE_ID", "SCENE_ID", "OBJECT_NAME", "CONTAINER", "X", "Y", "Z") AS + select p.station_id, p.character_object, o.object_template_id, o.scene_id, o.object_name, +(select object_id from objects where contained_by=0 start with object_id=character_object connect by prior contained_by=object_id) container, +(select x from objects where contained_by=0 start with object_id=character_object connect by prior contained_by=object_id) x, +(select y from objects where contained_by=0 start with object_id=character_object connect by prior contained_by=object_id) y, +(select z from objects where contained_by=0 start with object_id=character_object connect by prior contained_by=object_id) z +from players p, objects o +where p.character_object = o.object_id + and o.deleted = 0; +-------------------------------------------------------- +-- DDL for View OBJECTS_VIEW +-------------------------------------------------------- + + CREATE OR REPLACE FORCE VIEW "SWG"."OBJECTS_VIEW" ("OBJECT_ID", "X", "Y", "Z", "QUATERNION_W", "QUATERNION_X", "QUATERNION_Y", "QUATERNION_Z", "NODE_X", "NODE_Y", "NODE_Z", "TYPE_ID", "SCENE_ID", "CONTROLLER_TYPE", "DELETED", "OBJECT_NAME", "VOLUME", "CONTAINED_BY", "SLOT_ARRANGEMENT", "PLAYER_CONTROLLED", "CACHE_VERSION", "LOAD_CONTENTS", "CASH_BALANCE", "BANK_BALANCE", "COMPLEXITY", "NAME_STRING_TABLE", "NAME_STRING_TEXT", "OBJECT_TEMPLATE_ID", "STATIC_ITEM_NAME", "STATIC_ITEM_VERSION", "CONVERSION_ID", "DELETED_DATE", "LOAD_WITH", "OBJVAR_0_NAME", "OBJVAR_0_TYPE", "OBJVAR_0_VALUE", "OBJVAR_1_NAME", "OBJVAR_1_TYPE", "OBJVAR_1_VALUE", "OBJVAR_2_NAME", "OBJVAR_2_TYPE", "OBJVAR_2_VALUE", "OBJVAR_3_NAME", "OBJVAR_3_TYPE", "OBJVAR_3_VALUE", "OBJVAR_4_NAME", "OBJVAR_4_TYPE", "OBJVAR_4_VALUE", "OBJVAR_5_NAME", "OBJVAR_5_TYPE", "OBJVAR_5_VALUE", "OBJVAR_6_NAME", "OBJVAR_6_TYPE", "OBJVAR_6_VALUE", "OBJVAR_7_NAME", "OBJVAR_7_TYPE", "OBJVAR_7_VALUE", "OBJVAR_8_NAME", "OBJVAR_8_TYPE", "OBJVAR_8_VALUE", "OBJVAR_9_NAME", "OBJVAR_9_TYPE", "OBJVAR_9_VALUE", "OBJVAR_10_NAME", "OBJVAR_10_TYPE", "OBJVAR_10_VALUE", "OBJVAR_11_NAME", "OBJVAR_11_TYPE", "OBJVAR_11_VALUE", "OBJVAR_12_NAME", "OBJVAR_12_TYPE", "OBJVAR_12_VALUE", "OBJVAR_13_NAME", "OBJVAR_13_TYPE", "OBJVAR_13_VALUE", "OBJVAR_14_NAME", "OBJVAR_14_TYPE", "OBJVAR_14_VALUE", "OBJVAR_15_NAME", "OBJVAR_15_TYPE", "OBJVAR_15_VALUE", "OBJVAR_16_NAME", "OBJVAR_16_TYPE", "OBJVAR_16_VALUE", "OBJVAR_17_NAME", "OBJVAR_17_TYPE", "OBJVAR_17_VALUE", "OBJVAR_18_NAME", "OBJVAR_18_TYPE", "OBJVAR_18_VALUE", "OBJVAR_19_NAME", "OBJVAR_19_TYPE", "OBJVAR_19_VALUE", "SCRIPT_LIST", "OBJECT_TEMPLATE") AS + select o."OBJECT_ID",o."X",o."Y",o."Z",o."QUATERNION_W",o."QUATERNION_X",o."QUATERNION_Y",o."QUATERNION_Z",o."NODE_X",o."NODE_Y",o."NODE_Z",o."TYPE_ID",o."SCENE_ID",o."CONTROLLER_TYPE",o."DELETED",o."OBJECT_NAME",o."VOLUME",o."CONTAINED_BY",o."SLOT_ARRANGEMENT",o."PLAYER_CONTROLLED",o."CACHE_VERSION",o."LOAD_CONTENTS",o."CASH_BALANCE",o."BANK_BALANCE",o."COMPLEXITY",o."NAME_STRING_TABLE",o."NAME_STRING_TEXT",o."OBJECT_TEMPLATE_ID",o."STATIC_ITEM_NAME",o."STATIC_ITEM_VERSION",o."CONVERSION_ID",o."DELETED_DATE",o."LOAD_WITH",o."OBJVAR_0_NAME",o."OBJVAR_0_TYPE",o."OBJVAR_0_VALUE",o."OBJVAR_1_NAME",o."OBJVAR_1_TYPE",o."OBJVAR_1_VALUE",o."OBJVAR_2_NAME",o."OBJVAR_2_TYPE",o."OBJVAR_2_VALUE",o."OBJVAR_3_NAME",o."OBJVAR_3_TYPE",o."OBJVAR_3_VALUE",o."OBJVAR_4_NAME",o."OBJVAR_4_TYPE",o."OBJVAR_4_VALUE",o."OBJVAR_5_NAME",o."OBJVAR_5_TYPE",o."OBJVAR_5_VALUE",o."OBJVAR_6_NAME",o."OBJVAR_6_TYPE",o."OBJVAR_6_VALUE",o."OBJVAR_7_NAME",o."OBJVAR_7_TYPE",o."OBJVAR_7_VALUE",o."OBJVAR_8_NAME",o."OBJVAR_8_TYPE",o."OBJVAR_8_VALUE",o."OBJVAR_9_NAME",o."OBJVAR_9_TYPE",o."OBJVAR_9_VALUE",o."OBJVAR_10_NAME",o."OBJVAR_10_TYPE",o."OBJVAR_10_VALUE",o."OBJVAR_11_NAME",o."OBJVAR_11_TYPE",o."OBJVAR_11_VALUE",o."OBJVAR_12_NAME",o."OBJVAR_12_TYPE",o."OBJVAR_12_VALUE",o."OBJVAR_13_NAME",o."OBJVAR_13_TYPE",o."OBJVAR_13_VALUE",o."OBJVAR_14_NAME",o."OBJVAR_14_TYPE",o."OBJVAR_14_VALUE",o."OBJVAR_15_NAME",o."OBJVAR_15_TYPE",o."OBJVAR_15_VALUE",o."OBJVAR_16_NAME",o."OBJVAR_16_TYPE",o."OBJVAR_16_VALUE",o."OBJVAR_17_NAME",o."OBJVAR_17_TYPE",o."OBJVAR_17_VALUE",o."OBJVAR_18_NAME",o."OBJVAR_18_TYPE",o."OBJVAR_18_VALUE",o."OBJVAR_19_NAME",o."OBJVAR_19_TYPE",o."OBJVAR_19_VALUE",o."SCRIPT_LIST", t.name object_template +from objects o, object_templates t +where o.object_template_id = t.id; +-------------------------------------------------------- +-- DDL for View OBJECT_VARIABLES_VIEW +-------------------------------------------------------- + + CREATE OR REPLACE FORCE VIEW "SWG"."OBJECT_VARIABLES_VIEW" ("OBJECT_ID", "NAME", "TYPE", "VALUE", "PACKED") AS + select v.object_id, n.name, v.type, v.value, -1 packed +from object_variables v, object_variable_names n +where v.name_id = n.id +and v.detached = 0 +union all +select o.object_id, o.objvar_0_name, o.objvar_0_type, o.objvar_0_value, 0 +from objects o +where o.objvar_0_type >= 0 +union all +select o.object_id, o.objvar_1_name, o.objvar_1_type, o.objvar_1_value, 1 +from objects o +where o.objvar_1_type >= 0 +union all +select o.object_id, o.objvar_2_name, o.objvar_2_type, o.objvar_2_value, 2 +from objects o +where o.objvar_2_type >= 0 +union all +select o.object_id, o.objvar_3_name, o.objvar_3_type, o.objvar_3_value, 3 +from objects o +where o.objvar_3_type >= 0 +union all +select o.object_id, o.objvar_4_name, o.objvar_4_type, o.objvar_4_value, 4 +from objects o +where o.objvar_4_type >= 0 +union all +select o.object_id, o.objvar_5_name, o.objvar_5_type, o.objvar_5_value, 5 +from objects o +where o.objvar_5_type >= 0 +union all +select o.object_id, o.objvar_6_name, o.objvar_6_type, o.objvar_6_value, 6 +from objects o +where o.objvar_6_type >= 0 +union all +select o.object_id, o.objvar_7_name, o.objvar_7_type, o.objvar_7_value, 7 +from objects o +where o.objvar_7_type >= 0 +union all +select o.object_id, o.objvar_8_name, o.objvar_8_type, o.objvar_8_value, 8 +from objects o +where o.objvar_8_type >= 0 +union all +select o.object_id, o.objvar_9_name, o.objvar_9_type, o.objvar_9_value, 9 +from objects o +where o.objvar_9_type >= 0 +union all +select o.object_id, o.objvar_10_name, o.objvar_10_type, o.objvar_10_value, 10 +from objects o +where o.objvar_10_type >= 0 +union all +select o.object_id, o.objvar_11_name, o.objvar_11_type, o.objvar_11_value, 11 +from objects o +where o.objvar_11_type >= 0 +union all +select o.object_id, o.objvar_12_name, o.objvar_12_type, o.objvar_12_value, 12 +from objects o +where o.objvar_12_type >= 0 +union all +select o.object_id, o.objvar_13_name, o.objvar_13_type, o.objvar_13_value, 13 +from objects o +where o.objvar_13_type >= 0 +union all +select o.object_id, o.objvar_14_name, o.objvar_14_type, o.objvar_14_value, 14 +from objects o +where o.objvar_14_type >= 0 +union all +select o.object_id, o.objvar_15_name, o.objvar_15_type, o.objvar_15_value, 15 +from objects o +where o.objvar_15_type >= 0 +union all +select o.object_id, o.objvar_16_name, o.objvar_16_type, o.objvar_16_value, 16 +from objects o +where o.objvar_16_type >= 0 +union all +select o.object_id, o.objvar_17_name, o.objvar_17_type, o.objvar_17_value, 17 +from objects o +where o.objvar_17_type >= 0 +union all +select o.object_id, o.objvar_18_name, o.objvar_18_type, o.objvar_18_value, 18 +from objects o +where o.objvar_18_type >= 0 +union all +select o.object_id, o.objvar_19_name, o.objvar_19_type, o.objvar_19_value, 19 +from objects o +where o.objvar_19_type >= 0; +-------------------------------------------------------- +-- DDL for Index PK_WAYPOINTS +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_WAYPOINTS" ON "SWG"."WAYPOINTS" ("WAYPOINT_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_DELETE_REASONS +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_DELETE_REASONS" ON "SWG"."DELETE_REASONS" ("REASON_CODE") + PCTFREE 10 INITRANS 2 MAXTRANS 255 + STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645 + PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT) + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_BIOGRAPHIES +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_BIOGRAPHIES" ON "SWG"."BIOGRAPHIES" ("OBJECT_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_PLAYER_QUEST_OBJECTS +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_PLAYER_QUEST_OBJECTS" ON "SWG"."PLAYER_QUEST_OBJECTS" ("OBJECT_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_WEAPON_OBJECTS +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_WEAPON_OBJECTS" ON "SWG"."WEAPON_OBJECTS" ("OBJECT_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_TANGIBLE_OBJECTS +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_TANGIBLE_OBJECTS" ON "SWG"."TANGIBLE_OBJECTS" ("OBJECT_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_MARKET_AUCTION_ATTRIBUTES +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_MARKET_AUCTION_ATTRIBUTES" ON "SWG"."MARKET_AUCTION_ATTRIBUTES" ("ITEM_ID", "ATTRIBUTE_NAME") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_ACCOUNT_REWARD_EVENTS +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_ACCOUNT_REWARD_EVENTS" ON "SWG"."ACCOUNT_REWARD_EVENTS" ("STATION_ID", "EVENT_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_PROPERTY_LISTS +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_PROPERTY_LISTS" ON "SWG"."PROPERTY_LISTS" ("OBJECT_ID", "LIST_ID", "VALUE") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index OBJECT_IDX +-------------------------------------------------------- + + CREATE INDEX "SWG"."OBJECT_IDX" ON "SWG"."MESSAGES" ("TARGET") + PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_MANF_SCHEMATIC_OBJECTS +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_MANF_SCHEMATIC_OBJECTS" ON "SWG"."MANF_SCHEMATIC_OBJECTS" ("OBJECT_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_CLOCK +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_CLOCK" ON "SWG"."CLOCK" ("LAST_SAVE_TIME") + PCTFREE 10 INITRANS 2 MAXTRANS 255 + STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645 + PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT) + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_OBJECT_VARIABLES +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_OBJECT_VARIABLES" ON "SWG"."OBJECT_VARIABLES" ("OBJECT_ID", "NAME_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_ACCOUNT_REWARD_ITEMS +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_ACCOUNT_REWARD_ITEMS" ON "SWG"."ACCOUNT_REWARD_ITEMS" ("STATION_ID", "ITEM_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index OBJECT_VARIABLE_NAME_INDEX +-------------------------------------------------------- + + CREATE INDEX "SWG"."OBJECT_VARIABLE_NAME_INDEX" ON "SWG"."OBJECT_VARIABLE_NAMES" ("NAME") + PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_RERAISE_LIMITS +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_RERAISE_LIMITS" ON "SWG"."ERRORLOG_RERAISE_LIMITS" ("PACKAGE", "PROCEDURE") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_LOADBEACON_SERVER_MAP +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_LOADBEACON_SERVER_MAP" ON "SWG"."LOADBEACON_SERVER_MAP" ("OBJECT_TEMPLATE") + PCTFREE 10 INITRANS 2 MAXTRANS 255 + STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645 + PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT) + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index CONTAINER_IDX +-------------------------------------------------------- + + CREATE INDEX "SWG"."CONTAINER_IDX" ON "SWG"."OBJECTS" ("CONTAINED_BY") + PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_FACTORY_OBJECTS +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_FACTORY_OBJECTS" ON "SWG"."FACTORY_OBJECTS" ("OBJECT_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_ACCOUNTS +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_ACCOUNTS" ON "SWG"."ACCOUNTS" ("STATION_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index ACCOUNT_MAP_INDEX1 +-------------------------------------------------------- + + CREATE INDEX "SWG"."ACCOUNT_MAP_INDEX1" ON "SWG"."ACCOUNT_MAP" ("CHILD_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index AUCTION_LOCATION_NAME_IDX +-------------------------------------------------------- + + CREATE INDEX "SWG"."AUCTION_LOCATION_NAME_IDX" ON "SWG"."AUCTION_LOCATIONS" ("LOCATION_NAME") + PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_PLAYER_OBJECTS +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_PLAYER_OBJECTS" ON "SWG"."PLAYER_OBJECTS" ("OBJECT_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index ACCOUNT_INFO_PK +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."ACCOUNT_INFO_PK" ON "SWG"."ACCOUNT_INFO" ("STATION_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_SWG_CHARACTER +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_SWG_CHARACTER" ON "SWG"."SWG_CHARACTERS" ("STATION_ID", "CLUSTER_ID", "CHARACTER_NAME") + PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_FREE_OBJECT_IDS +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_FREE_OBJECT_IDS" ON "SWG"."FREE_OBJECT_IDS" ("START_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 + STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645 + PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT) + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PLAYERS_STATION_ID_IDX +-------------------------------------------------------- + + CREATE INDEX "SWG"."PLAYERS_STATION_ID_IDX" ON "SWG"."PLAYERS" ("STATION_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_MARKET_AUCTIONS +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_MARKET_AUCTIONS" ON "SWG"."MARKET_AUCTIONS" ("ITEM_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_ERRORLOG +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_ERRORLOG" ON "SWG"."ERRORLOG" ("ERROR_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_MANUFACTURE_INST_OBJECTS +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_MANUFACTURE_INST_OBJECTS" ON "SWG"."MANUFACTURE_INST_OBJECTS" ("OBJECT_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_PLAYERS +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_PLAYERS" ON "SWG"."PLAYERS" ("CHARACTER_OBJECT") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_LOCATION_LISTS +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_LOCATION_LISTS" ON "SWG"."LOCATION_LISTS" ("OBJECT_ID", "LIST_ID", "SEQUENCE_NUMBER") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_RESOURCE_TYPES +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_RESOURCE_TYPES" ON "SWG"."RESOURCE_TYPES" ("RESOURCE_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index OBJECT_TEMPLATES_NAME_IDX +-------------------------------------------------------- + + CREATE INDEX "SWG"."OBJECT_TEMPLATES_NAME_IDX" ON "SWG"."OBJECT_TEMPLATES" ("NAME") + PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index CHUNK_IDX +-------------------------------------------------------- + + CREATE INDEX "SWG"."CHUNK_IDX" ON "SWG"."OBJECTS" ("NODE_X", "NODE_Z", "SCENE_ID", "DELETED", "CONTAINED_BY", "PLAYER_CONTROLLED", "LOAD_CONTENTS") + PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index OWNER_ID_IDX +-------------------------------------------------------- + + CREATE INDEX "SWG"."OWNER_ID_IDX" ON "SWG"."TANGIBLE_OBJECTS" ("OWNER_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_SCRUNCHER +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_SCRUNCHER" ON "SWG"."SCRUNCHER" ("OLD_OBJECT_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_BATTLEFIELD_PARTICIPANTS +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_BATTLEFIELD_PARTICIPANTS" ON "SWG"."BATTLEFIELD_PARTICIPANTS" ("REGION_OBJECT_ID", "CHARACTER_OBJECT_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_AUCTION_LOCATIONS +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_AUCTION_LOCATIONS" ON "SWG"."AUCTION_LOCATIONS" ("LOCATION_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_BOUNTY_HUNTER_TARGETS +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_BOUNTY_HUNTER_TARGETS" ON "SWG"."BOUNTY_HUNTER_TARGETS" ("OBJECT_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_INTANGIBLE_OBJECTS +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_INTANGIBLE_OBJECTS" ON "SWG"."INTANGIBLE_OBJECTS" ("OBJECT_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_CLUSTER_LIST +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_CLUSTER_LIST" ON "SWG"."CLUSTER_LIST" ("ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PURGE_PHASES_PK +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PURGE_PHASES_PK" ON "SWG"."PURGE_PHASES" ("ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 + STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645 + PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT) + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index REGION_NAME_IDX +-------------------------------------------------------- + + CREATE INDEX "SWG"."REGION_NAME_IDX" ON "SWG"."BATTLEFIELD_MARKER_OBJECTS" ("REGION_NAME") + PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_EXPERIENCE_POINTS +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_EXPERIENCE_POINTS" ON "SWG"."EXPERIENCE_POINTS" ("OBJECT_ID", "EXPERIENCE_TYPE") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index ACCOUNT_EXTRACT_PK +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."ACCOUNT_EXTRACT_PK" ON "SWG"."ACCOUNT_EXTRACT" ("USER_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_OBJECTS +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_OBJECTS" ON "SWG"."OBJECTS" ("OBJECT_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_MARKET_AUCTION_BIDS +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_MARKET_AUCTION_BIDS" ON "SWG"."MARKET_AUCTION_BIDS" ("ITEM_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index DELETED_OBJECT_IDX +-------------------------------------------------------- + + CREATE INDEX "SWG"."DELETED_OBJECT_IDX" ON "SWG"."OBJECTS" ("DELETED_DATE") + PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_MISSION_OBJECTS +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_MISSION_OBJECTS" ON "SWG"."MISSION_OBJECTS" ("OBJECT_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index TIMESTAMP_IDX +-------------------------------------------------------- + + CREATE INDEX "SWG"."TIMESTAMP_IDX" ON "SWG"."ERRORLOG" ("TIMESTAMP") + PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_PUBLISH_PLAYER_FIXUP +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_PUBLISH_PLAYER_FIXUP" ON "SWG"."PUBLISH_PLAYER_FIXUP" ("PLAYER_OBJECT_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_ARMOR +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_ARMOR" ON "SWG"."ARMOR" ("OBJECT_ID", "LAYER") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_SHIP_OBJECTS +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_SHIP_OBJECTS" ON "SWG"."SHIP_OBJECTS" ("OBJECT_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index WAYPOINT_LOAD_IDX +-------------------------------------------------------- + + CREATE INDEX "SWG"."WAYPOINT_LOAD_IDX" ON "SWG"."WAYPOINTS" ("OBJECT_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index ACCOUNT_MAP_INDEX2 +-------------------------------------------------------- + + CREATE INDEX "SWG"."ACCOUNT_MAP_INDEX2" ON "SWG"."ACCOUNT_MAP" ("CHILD_ID", "PARENT_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_DEFAULT_CHARACTER_SLOTS +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_DEFAULT_CHARACTER_SLOTS" ON "SWG"."DEFAULT_CHARACTER_SLOTS" ("CHARACTER_TYPE_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 + STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645 + PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT) + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_MANF_SCHEMATIC_ATTRIBUTES +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_MANF_SCHEMATIC_ATTRIBUTES" ON "SWG"."MANF_SCHEMATIC_ATTRIBUTES" ("OBJECT_ID", "ATTRIBUTE_TYPE") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_HARVESTER_INST_OBJECTS +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_HARVESTER_INST_OBJECTS" ON "SWG"."HARVESTER_INSTALLATION_OBJECTS" ("OBJECT_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_CHARACTER_PROFILE +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_CHARACTER_PROFILE" ON "SWG"."CHARACTER_PROFILE" ("CLUSTER_NAME", "CHARACTER_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index LOAD_WITH_IDX +-------------------------------------------------------- + + CREATE INDEX "SWG"."LOAD_WITH_IDX" ON "SWG"."OBJECTS" ("LOAD_WITH") + PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_FEATURE_ID_TRANSACTIONS +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_FEATURE_ID_TRANSACTIONS" ON "SWG"."FEATURE_ID_TRANSACTIONS" ("STATION_ID", "CLUSTER_ID", "CHARACTER_ID", "ITEM_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_CHARACTER_TYPES +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_CHARACTER_TYPES" ON "SWG"."CHARACTER_TYPES" ("ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 + STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645 + PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT) + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index FK_ERRORLOG_VALUES_IDX +-------------------------------------------------------- + + CREATE INDEX "SWG"."FK_ERRORLOG_VALUES_IDX" ON "SWG"."ERRORLOG_VALUES" ("ERROR_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_OBJECT_VARIABLE_NAMES +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_OBJECT_VARIABLE_NAMES" ON "SWG"."OBJECT_VARIABLE_NAMES" ("ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_OBJECT_TEMPLATES +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_OBJECT_TEMPLATES" ON "SWG"."OBJECT_TEMPLATES" ("ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PK_EXTRA_CHARACTER_SLOTS +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PK_EXTRA_CHARACTER_SLOTS" ON "SWG"."EXTRA_CHARACTER_SLOTS" ("STATION_ID", "CLUSTER_ID", "CHARACTER_TYPE_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index PURGE_ACCOUNTS_PK +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."PURGE_ACCOUNTS_PK" ON "SWG"."PURGE_ACCOUNTS" ("STATION_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index STATUSES_PK +-------------------------------------------------------- + + CREATE UNIQUE INDEX "SWG"."STATUSES_PK" ON "SWG"."STATUSES" ("ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- DDL for Index MARKET_AUCTION_LOCATION_IDX +-------------------------------------------------------- + + CREATE INDEX "SWG"."MARKET_AUCTION_LOCATION_IDX" ON "SWG"."MARKET_AUCTIONS" ("LOCATION_ID") + PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS NOCOMPRESS LOGGING + TABLESPACE "SWG" ; +-------------------------------------------------------- +-- Constraints for Table PURGE_PHASES +-------------------------------------------------------- + + ALTER TABLE "SWG"."PURGE_PHASES" ADD CONSTRAINT "PURGE_PHASES_PK" PRIMARY KEY ("ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 + STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645 + PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT) + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table ERRORLOG_LEVEL +-------------------------------------------------------- + + ALTER TABLE "SWG"."ERRORLOG_LEVEL" MODIFY ("LEVELID" NOT NULL ENABLE); +-------------------------------------------------------- +-- Constraints for Table HARVESTER_INSTALLATION_OBJECTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."HARVESTER_INSTALLATION_OBJECTS" ADD CONSTRAINT "PK_HARVESTER_INST_OBJECTS" PRIMARY KEY ("OBJECT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table SCRUNCHER +-------------------------------------------------------- + + ALTER TABLE "SWG"."SCRUNCHER" ADD CONSTRAINT "PK_SCRUNCHER" PRIMARY KEY ("OLD_OBJECT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table ERRORLOG_LEVEL_DESC +-------------------------------------------------------- + + ALTER TABLE "SWG"."ERRORLOG_LEVEL_DESC" MODIFY ("LEVELID" NOT NULL ENABLE); + + ALTER TABLE "SWG"."ERRORLOG_LEVEL_DESC" MODIFY ("DESCRIP" NOT NULL ENABLE); +-------------------------------------------------------- +-- Constraints for Table VEHICLE_OBJECTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."VEHICLE_OBJECTS" ADD PRIMARY KEY ("OBJECT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table PROPERTY_LISTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."PROPERTY_LISTS" ADD CONSTRAINT "PK_PROPERTY_LISTS" PRIMARY KEY ("OBJECT_ID", "LIST_ID", "VALUE") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table LOCATION_LISTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."LOCATION_LISTS" ADD CONSTRAINT "PK_LOCATION_LISTS" PRIMARY KEY ("OBJECT_ID", "LIST_ID", "SEQUENCE_NUMBER") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table WEAPON_OBJECTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."WEAPON_OBJECTS" ADD CONSTRAINT "PK_WEAPON_OBJECTS" PRIMARY KEY ("OBJECT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table OBJECT_VARIABLE_NAMES +-------------------------------------------------------- + + ALTER TABLE "SWG"."OBJECT_VARIABLE_NAMES" ADD CONSTRAINT "PK_OBJECT_VARIABLE_NAMES" PRIMARY KEY ("ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table ERRORLOG +-------------------------------------------------------- + + ALTER TABLE "SWG"."ERRORLOG" ADD CONSTRAINT "PK_ERRORLOG" PRIMARY KEY ("ERROR_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; + + ALTER TABLE "SWG"."ERRORLOG" MODIFY ("ERROR_ID" NOT NULL ENABLE); + + ALTER TABLE "SWG"."ERRORLOG" MODIFY ("TIMESTAMP" NOT NULL ENABLE); + + ALTER TABLE "SWG"."ERRORLOG" MODIFY ("ORA_ERRNO" NOT NULL ENABLE); + + ALTER TABLE "SWG"."ERRORLOG" MODIFY ("ORA_ERRMSG" NOT NULL ENABLE); + + ALTER TABLE "SWG"."ERRORLOG" MODIFY ("SCHEMA_NAME" NOT NULL ENABLE); + + ALTER TABLE "SWG"."ERRORLOG" MODIFY ("MODULE_NAME" NOT NULL ENABLE); +-------------------------------------------------------- +-- Constraints for Table ACCOUNT_MAP +-------------------------------------------------------- + + ALTER TABLE "SWG"."ACCOUNT_MAP" ADD CONSTRAINT "ACCOUNT_MAP_UK1" UNIQUE ("CHILD_ID", "PARENT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; + + ALTER TABLE "SWG"."ACCOUNT_MAP" ADD CONSTRAINT "ACCOUNT_MAP_UK2" UNIQUE ("CHILD_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; + + ALTER TABLE "SWG"."ACCOUNT_MAP" MODIFY ("PARENT_ID" NOT NULL ENABLE); + + ALTER TABLE "SWG"."ACCOUNT_MAP" MODIFY ("CHILD_ID" NOT NULL ENABLE); +-------------------------------------------------------- +-- Constraints for Table WAYPOINTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."WAYPOINTS" ADD CONSTRAINT "PK_WAYPOINTS" PRIMARY KEY ("WAYPOINT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table PLAYER_QUEST_OBJECTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."PLAYER_QUEST_OBJECTS" ADD CONSTRAINT "PK_PLAYER_QUEST_OBJECTS" PRIMARY KEY ("OBJECT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table LOADBEACON_SERVER_MAP +-------------------------------------------------------- + + ALTER TABLE "SWG"."LOADBEACON_SERVER_MAP" ADD CONSTRAINT "PK_LOADBEACON_SERVER_MAP" PRIMARY KEY ("OBJECT_TEMPLATE") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 + STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645 + PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT) + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table MESSAGES +-------------------------------------------------------- + + ALTER TABLE "SWG"."MESSAGES" ADD PRIMARY KEY ("MESSAGE_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table ACCOUNT_REWARD_EVENTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."ACCOUNT_REWARD_EVENTS" ADD CONSTRAINT "PK_ACCOUNT_REWARD_EVENTS" PRIMARY KEY ("STATION_ID", "EVENT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table GUILD_OBJECTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."GUILD_OBJECTS" ADD PRIMARY KEY ("OBJECT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table VERSION_NUMBER +-------------------------------------------------------- + + ALTER TABLE "SWG"."VERSION_NUMBER" ADD PRIMARY KEY ("VERSION_NUMBER") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 + STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645 + PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT) + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table CELL_OBJECTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."CELL_OBJECTS" ADD PRIMARY KEY ("OBJECT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table PLANET_OBJECTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."PLANET_OBJECTS" ADD PRIMARY KEY ("OBJECT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table INSTALLATION_OBJECTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."INSTALLATION_OBJECTS" ADD PRIMARY KEY ("OBJECT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table ACCOUNT_INFO +-------------------------------------------------------- + + ALTER TABLE "SWG"."ACCOUNT_INFO" ADD CONSTRAINT "ACCOUNT_INFO_PK" PRIMARY KEY ("STATION_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; + + ALTER TABLE "SWG"."ACCOUNT_INFO" MODIFY ("STATION_ID" NOT NULL ENABLE); +-------------------------------------------------------- +-- Constraints for Table CLOCK +-------------------------------------------------------- + + ALTER TABLE "SWG"."CLOCK" ADD CONSTRAINT "PK_CLOCK" PRIMARY KEY ("LAST_SAVE_TIME") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 + STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645 + PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT) + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table ACCOUNT_EXTRACT +-------------------------------------------------------- + + ALTER TABLE "SWG"."ACCOUNT_EXTRACT" ADD CONSTRAINT "ACCOUNT_EXTRACT_PK" PRIMARY KEY ("USER_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table AUCTION_LOCATIONS +-------------------------------------------------------- + + ALTER TABLE "SWG"."AUCTION_LOCATIONS" ADD CONSTRAINT "PK_AUCTION_LOCATIONS" PRIMARY KEY ("LOCATION_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; + + ALTER TABLE "SWG"."AUCTION_LOCATIONS" MODIFY ("EMPTY_DATE" NOT NULL ENABLE); + + ALTER TABLE "SWG"."AUCTION_LOCATIONS" MODIFY ("LAST_ACCESS_DATE" NOT NULL ENABLE); + + ALTER TABLE "SWG"."AUCTION_LOCATIONS" MODIFY ("INACTIVE_DATE" NOT NULL ENABLE); + + ALTER TABLE "SWG"."AUCTION_LOCATIONS" MODIFY ("STATUS" NOT NULL ENABLE); + + ALTER TABLE "SWG"."AUCTION_LOCATIONS" MODIFY ("ENTRANCE_CHARGE" NOT NULL ENABLE); +-------------------------------------------------------- +-- Constraints for Table CITY_OBJECTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."CITY_OBJECTS" ADD PRIMARY KEY ("OBJECT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table TOKEN_OBJECTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."TOKEN_OBJECTS" ADD PRIMARY KEY ("OBJECT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table TANGIBLE_OBJECTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."TANGIBLE_OBJECTS" ADD CONSTRAINT "PK_TANGIBLE_OBJECTS" PRIMARY KEY ("OBJECT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table ERRORLOG_RERAISE_LIMITS +-------------------------------------------------------- + + ALTER TABLE "SWG"."ERRORLOG_RERAISE_LIMITS" ADD CONSTRAINT "PK_RERAISE_LIMITS" PRIMARY KEY ("PACKAGE", "PROCEDURE") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; + + ALTER TABLE "SWG"."ERRORLOG_RERAISE_LIMITS" MODIFY ("PACKAGE" NOT NULL ENABLE); + + ALTER TABLE "SWG"."ERRORLOG_RERAISE_LIMITS" MODIFY ("PROCEDURE" NOT NULL ENABLE); + + ALTER TABLE "SWG"."ERRORLOG_RERAISE_LIMITS" MODIFY ("ERRORLIMIT" NOT NULL ENABLE); + + ALTER TABLE "SWG"."ERRORLOG_RERAISE_LIMITS" MODIFY ("ERRORCOUNT" NOT NULL ENABLE); + + ALTER TABLE "SWG"."ERRORLOG_RERAISE_LIMITS" MODIFY ("UNLIMITED_FLAG" NOT NULL ENABLE); +-------------------------------------------------------- +-- Constraints for Table INTANGIBLE_OBJECTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."INTANGIBLE_OBJECTS" ADD CONSTRAINT "PK_INTANGIBLE_OBJECTS" PRIMARY KEY ("OBJECT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table STATIC_OBJECTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."STATIC_OBJECTS" ADD PRIMARY KEY ("OBJECT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table EXTRA_CHARACTER_SLOTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."EXTRA_CHARACTER_SLOTS" ADD CONSTRAINT "PK_EXTRA_CHARACTER_SLOTS" PRIMARY KEY ("STATION_ID", "CLUSTER_ID", "CHARACTER_TYPE_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; + + ALTER TABLE "SWG"."EXTRA_CHARACTER_SLOTS" MODIFY ("STATION_ID" NOT NULL ENABLE); + + ALTER TABLE "SWG"."EXTRA_CHARACTER_SLOTS" MODIFY ("CLUSTER_ID" NOT NULL ENABLE); + + ALTER TABLE "SWG"."EXTRA_CHARACTER_SLOTS" MODIFY ("CHARACTER_TYPE_ID" NOT NULL ENABLE); + + ALTER TABLE "SWG"."EXTRA_CHARACTER_SLOTS" MODIFY ("NUM_EXTRA_SLOTS" NOT NULL ENABLE); +-------------------------------------------------------- +-- Constraints for Table ACCOUNT_REWARD_ITEMS +-------------------------------------------------------- + + ALTER TABLE "SWG"."ACCOUNT_REWARD_ITEMS" ADD CONSTRAINT "PK_ACCOUNT_REWARD_ITEMS" PRIMARY KEY ("STATION_ID", "ITEM_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table BATTLEFIELD_PARTICIPANTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."BATTLEFIELD_PARTICIPANTS" ADD CONSTRAINT "PK_BATTLEFIELD_PARTICIPANTS" PRIMARY KEY ("REGION_OBJECT_ID", "CHARACTER_OBJECT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table FREE_OBJECT_IDS +-------------------------------------------------------- + + ALTER TABLE "SWG"."FREE_OBJECT_IDS" ADD CONSTRAINT "PK_FREE_OBJECT_IDS" PRIMARY KEY ("START_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 + STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645 + PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT) + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table EXPERIENCE_POINTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."EXPERIENCE_POINTS" ADD CONSTRAINT "PK_EXPERIENCE_POINTS" PRIMARY KEY ("OBJECT_ID", "EXPERIENCE_TYPE") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table SCRIPTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."SCRIPTS" ADD PRIMARY KEY ("OBJECT_ID", "SEQUENCE_NO") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table UNIVERSE_OBJECTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."UNIVERSE_OBJECTS" ADD PRIMARY KEY ("OBJECT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table CHARACTER_TYPES +-------------------------------------------------------- + + ALTER TABLE "SWG"."CHARACTER_TYPES" ADD CONSTRAINT "PK_CHARACTER_TYPES" PRIMARY KEY ("ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 + STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645 + PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT) + TABLESPACE "SWG" ENABLE; + + ALTER TABLE "SWG"."CHARACTER_TYPES" MODIFY ("ID" NOT NULL ENABLE); + + ALTER TABLE "SWG"."CHARACTER_TYPES" MODIFY ("DESCRIPTION" NOT NULL ENABLE); +-------------------------------------------------------- +-- Constraints for Table SHIP_OBJECTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."SHIP_OBJECTS" ADD CONSTRAINT "PK_SHIP_OBJECTS" PRIMARY KEY ("OBJECT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table BIOGRAPHIES +-------------------------------------------------------- + + ALTER TABLE "SWG"."BIOGRAPHIES" ADD CONSTRAINT "PK_BIOGRAPHIES" PRIMARY KEY ("OBJECT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table RESOURCE_CONTAINER_OBJECTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."RESOURCE_CONTAINER_OBJECTS" ADD PRIMARY KEY ("OBJECT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table MANF_SCHEMATIC_OBJECTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."MANF_SCHEMATIC_OBJECTS" ADD CONSTRAINT "PK_MANF_SCHEMATIC_OBJECTS" PRIMARY KEY ("OBJECT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table OBJECTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."OBJECTS" ADD CONSTRAINT "PK_OBJECTS" PRIMARY KEY ("OBJECT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table ERRORLOG_VALUES +-------------------------------------------------------- + + ALTER TABLE "SWG"."ERRORLOG_VALUES" MODIFY ("ERROR_ID" NOT NULL ENABLE); + + ALTER TABLE "SWG"."ERRORLOG_VALUES" MODIFY ("ELEMENT_OWNER" NOT NULL ENABLE); + + ALTER TABLE "SWG"."ERRORLOG_VALUES" MODIFY ("ELEMENT_NAME" NOT NULL ENABLE); + + ALTER TABLE "SWG"."ERRORLOG_VALUES" MODIFY ("ELEMENT_TYPE" NOT NULL ENABLE); +-------------------------------------------------------- +-- Constraints for Table RESOURCE_TYPES +-------------------------------------------------------- + + ALTER TABLE "SWG"."RESOURCE_TYPES" ADD CONSTRAINT "PK_RESOURCE_TYPES" PRIMARY KEY ("RESOURCE_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table DEFAULT_CHARACTER_SLOTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."DEFAULT_CHARACTER_SLOTS" ADD CONSTRAINT "PK_DEFAULT_CHARACTER_SLOTS" PRIMARY KEY ("CHARACTER_TYPE_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 + STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645 + PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT) + TABLESPACE "SWG" ENABLE; + + ALTER TABLE "SWG"."DEFAULT_CHARACTER_SLOTS" MODIFY ("CHARACTER_TYPE_ID" NOT NULL ENABLE); + + ALTER TABLE "SWG"."DEFAULT_CHARACTER_SLOTS" MODIFY ("NUM_SLOTS" NOT NULL ENABLE); +-------------------------------------------------------- +-- Constraints for Table BATTLEFIELD_MARKER_OBJECTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."BATTLEFIELD_MARKER_OBJECTS" ADD PRIMARY KEY ("OBJECT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table BUILDING_OBJECTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."BUILDING_OBJECTS" ADD PRIMARY KEY ("OBJECT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table AUTOMATED_QUERIES +-------------------------------------------------------- + + ALTER TABLE "SWG"."AUTOMATED_QUERIES" MODIFY ("ID" NOT NULL ENABLE); + + ALTER TABLE "SWG"."AUTOMATED_QUERIES" MODIFY ("CREATETIME" NOT NULL ENABLE); + + ALTER TABLE "SWG"."AUTOMATED_QUERIES" MODIFY ("STATUS" NOT NULL ENABLE); + + ALTER TABLE "SWG"."AUTOMATED_QUERIES" MODIFY ("TYPE" NOT NULL ENABLE); + + ALTER TABLE "SWG"."AUTOMATED_QUERIES" MODIFY ("RUN_SERIAL" NOT NULL ENABLE); + + ALTER TABLE "SWG"."AUTOMATED_QUERIES" MODIFY ("QUERY_TEXT" NOT NULL ENABLE); +-------------------------------------------------------- +-- Constraints for Table FEATURE_ID_TRANSACTIONS +-------------------------------------------------------- + + ALTER TABLE "SWG"."FEATURE_ID_TRANSACTIONS" ADD CONSTRAINT "PK_FEATURE_ID_TRANSACTIONS" PRIMARY KEY ("STATION_ID", "CLUSTER_ID", "CHARACTER_ID", "ITEM_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table PLAYER_OBJECTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."PLAYER_OBJECTS" ADD CONSTRAINT "PK_PLAYER_OBJECTS" PRIMARY KEY ("OBJECT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table DEFAULT_CHAR_LIMITS +-------------------------------------------------------- + + ALTER TABLE "SWG"."DEFAULT_CHAR_LIMITS" MODIFY ("ACCOUNT_LIMIT" NOT NULL ENABLE); + + ALTER TABLE "SWG"."DEFAULT_CHAR_LIMITS" MODIFY ("CLUSTER_LIMIT" NOT NULL ENABLE); +-------------------------------------------------------- +-- Constraints for Table BOUNTY_HUNTER_TARGETS +-------------------------------------------------------- + + ALTER TABLE "SWG"."BOUNTY_HUNTER_TARGETS" ADD CONSTRAINT "PK_BOUNTY_HUNTER_TARGETS" PRIMARY KEY ("OBJECT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; + + ALTER TABLE "SWG"."BOUNTY_HUNTER_TARGETS" MODIFY ("OBJECT_ID" NOT NULL ENABLE); + + ALTER TABLE "SWG"."BOUNTY_HUNTER_TARGETS" MODIFY ("TARGET_ID" NOT NULL ENABLE); +-------------------------------------------------------- +-- Constraints for Table SWG_CHARACTERS +-------------------------------------------------------- + + ALTER TABLE "SWG"."SWG_CHARACTERS" ADD CONSTRAINT "PK_SWG_CHARACTER" PRIMARY KEY ("STATION_ID", "CLUSTER_ID", "CHARACTER_NAME") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 COMPUTE STATISTICS NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; + + ALTER TABLE "SWG"."SWG_CHARACTERS" MODIFY ("STATION_ID" NOT NULL ENABLE); + + ALTER TABLE "SWG"."SWG_CHARACTERS" MODIFY ("CLUSTER_ID" NOT NULL ENABLE); + + ALTER TABLE "SWG"."SWG_CHARACTERS" MODIFY ("CHARACTER_NAME" NOT NULL ENABLE); + + ALTER TABLE "SWG"."SWG_CHARACTERS" MODIFY ("ENABLED" NOT NULL ENABLE); +-------------------------------------------------------- +-- Constraints for Table OBJECT_VARIABLES +-------------------------------------------------------- + + ALTER TABLE "SWG"."OBJECT_VARIABLES" ADD CONSTRAINT "PK_OBJECT_VARIABLES" PRIMARY KEY ("OBJECT_ID", "NAME_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table PLAYERS +-------------------------------------------------------- + + ALTER TABLE "SWG"."PLAYERS" ADD CONSTRAINT "PK_PLAYERS" PRIMARY KEY ("CHARACTER_OBJECT") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table OBJECT_TEMPLATES +-------------------------------------------------------- + + ALTER TABLE "SWG"."OBJECT_TEMPLATES" ADD CONSTRAINT "PK_OBJECT_TEMPLATES" PRIMARY KEY ("ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table MARKET_AUCTION_BIDS +-------------------------------------------------------- + + ALTER TABLE "SWG"."MARKET_AUCTION_BIDS" ADD CONSTRAINT "PK_MARKET_AUCTION_BIDS" PRIMARY KEY ("ITEM_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table MISSION_OBJECTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."MISSION_OBJECTS" ADD CONSTRAINT "PK_MISSION_OBJECTS" PRIMARY KEY ("OBJECT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table CLUSTER_LIST +-------------------------------------------------------- + + ALTER TABLE "SWG"."CLUSTER_LIST" ADD CONSTRAINT "PK_CLUSTER_LIST" PRIMARY KEY ("ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; + + ALTER TABLE "SWG"."CLUSTER_LIST" MODIFY ("GROUP_ID" NOT NULL ENABLE); +-------------------------------------------------------- +-- Constraints for Table PUBLISH_PLAYER_FIXUP +-------------------------------------------------------- + + ALTER TABLE "SWG"."PUBLISH_PLAYER_FIXUP" ADD CONSTRAINT "PK_PUBLISH_PLAYER_FIXUP" PRIMARY KEY ("PLAYER_OBJECT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table MARKET_AUCTIONS +-------------------------------------------------------- + + ALTER TABLE "SWG"."MARKET_AUCTIONS" ADD CONSTRAINT "PK_MARKET_AUCTIONS" PRIMARY KEY ("ITEM_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; + + ALTER TABLE "SWG"."MARKET_AUCTIONS" MODIFY ("ITEM_SIZE" NOT NULL ENABLE); +-------------------------------------------------------- +-- Constraints for Table ACCOUNTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."ACCOUNTS" ADD CONSTRAINT "PK_ACCOUNTS" PRIMARY KEY ("STATION_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table CHARACTER_PROFILE +-------------------------------------------------------- + + ALTER TABLE "SWG"."CHARACTER_PROFILE" ADD CONSTRAINT "PK_CHARACTER_PROFILE" PRIMARY KEY ("CLUSTER_NAME", "CHARACTER_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; + + ALTER TABLE "SWG"."CHARACTER_PROFILE" MODIFY ("CLUSTER_NAME" NOT NULL ENABLE); + + ALTER TABLE "SWG"."CHARACTER_PROFILE" MODIFY ("CHARACTER_ID" NOT NULL ENABLE); +-------------------------------------------------------- +-- Constraints for Table ARMOR +-------------------------------------------------------- + + ALTER TABLE "SWG"."ARMOR" ADD CONSTRAINT "PK_ARMOR" PRIMARY KEY ("OBJECT_ID", "LAYER") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table MANUFACTURE_INST_OBJECTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."MANUFACTURE_INST_OBJECTS" ADD CONSTRAINT "PK_MANUFACTURE_INST_OBJECTS" PRIMARY KEY ("OBJECT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table PURGE_ACCOUNTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."PURGE_ACCOUNTS" ADD CONSTRAINT "PURGE_ACCOUNTS_PK" PRIMARY KEY ("STATION_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table STATUSES +-------------------------------------------------------- + + ALTER TABLE "SWG"."STATUSES" ADD CONSTRAINT "STATUSES_PK" PRIMARY KEY ("ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table FACTORY_OBJECTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."FACTORY_OBJECTS" ADD CONSTRAINT "PK_FACTORY_OBJECTS" PRIMARY KEY ("OBJECT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table CREATURE_OBJECTS +-------------------------------------------------------- + + ALTER TABLE "SWG"."CREATURE_OBJECTS" ADD PRIMARY KEY ("OBJECT_ID") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table DELETE_REASONS +-------------------------------------------------------- + + ALTER TABLE "SWG"."DELETE_REASONS" ADD CONSTRAINT "PK_DELETE_REASONS" PRIMARY KEY ("REASON_CODE") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 + STORAGE(INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645 + PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT) + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table MARKET_AUCTION_ATTRIBUTES +-------------------------------------------------------- + + ALTER TABLE "SWG"."MARKET_AUCTION_ATTRIBUTES" ADD CONSTRAINT "PK_MARKET_AUCTION_ATTRIBUTES" PRIMARY KEY ("ITEM_ID", "ATTRIBUTE_NAME") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Constraints for Table MANF_SCHEMATIC_ATTRIBUTES +-------------------------------------------------------- + + ALTER TABLE "SWG"."MANF_SCHEMATIC_ATTRIBUTES" ADD CONSTRAINT "PK_MANF_SCHEMATIC_ATTRIBUTES" PRIMARY KEY ("OBJECT_ID", "ATTRIBUTE_TYPE") + USING INDEX PCTFREE 10 INITRANS 2 MAXTRANS 255 NOCOMPRESS LOGGING + TABLESPACE "SWG" ENABLE; +-------------------------------------------------------- +-- Ref Constraints for Table ERRORLOG_VALUES +-------------------------------------------------------- + + ALTER TABLE "SWG"."ERRORLOG_VALUES" ADD CONSTRAINT "FK_ERRORLOG" FOREIGN KEY ("ERROR_ID") + REFERENCES "SWG"."ERRORLOG" ("ERROR_ID") ENABLE; +-------------------------------------------------------- +-- Ref Constraints for Table MARKET_AUCTIONS +-------------------------------------------------------- + + ALTER TABLE "SWG"."MARKET_AUCTIONS" ADD CONSTRAINT "MARKET_AUCTIONS_LOCATION_ID_FK" FOREIGN KEY ("LOCATION_ID") + REFERENCES "SWG"."AUCTION_LOCATIONS" ("LOCATION_ID") ON DELETE CASCADE ENABLE; +-------------------------------------------------------- +-- Ref Constraints for Table MARKET_AUCTION_ATTRIBUTES +-------------------------------------------------------- + + ALTER TABLE "SWG"."MARKET_AUCTION_ATTRIBUTES" ADD CONSTRAINT "MARKET_ATTRIBUTES_ITEM_ID_FK" FOREIGN KEY ("ITEM_ID") + REFERENCES "SWG"."MARKET_AUCTIONS" ("ITEM_ID") ON DELETE CASCADE ENABLE; +-------------------------------------------------------- +-- Ref Constraints for Table MARKET_AUCTION_BIDS +-------------------------------------------------------- + + ALTER TABLE "SWG"."MARKET_AUCTION_BIDS" ADD CONSTRAINT "MARKET_AUCTION_BIDS_ITEM_ID_FK" FOREIGN KEY ("ITEM_ID") + REFERENCES "SWG"."MARKET_AUCTIONS" ("ITEM_ID") ON DELETE CASCADE ENABLE; +-------------------------------------------------------- +-- DDL for Package ADMIN +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE "SWG"."ADMIN" +as + type refcursor is ref cursor; + subtype objectid is number; + + procedure move_to_player (p_object_id objectid, p_target_player objectid); + procedure move_to_player_bank (p_object_id objectid, p_target_player objectid); + procedure move_to_player_datapad (p_object_id objectid, p_target_player objectid, p_max_depth number); + procedure move_to_container (p_object_id objectid, p_target_container objectid, p_target_load_with objectid); + procedure move_to_container_depth (p_object_id objectid, p_target_container objectid, p_target_load_with objectid, p_max_depth number); + function get_inventory_for_player (p_player_id objectid) return objectid; + function get_bank_for_player (p_player_id objectid) return objectid; + function get_datapad_for_player (p_player_id objectid) return objectid; + function get_player_for_player (p_player_id objectid) return objectid; + function get_container_for_object(p_object_id objectid) return objectid; + function get_object_template_id (p_object_id objectid) return number; + function restore_house (p_house_id objectid) return number; + + function restore_character (p_player_id objectid, p_name out varchar2, p_account out number, p_template_id out number) return number; + function undelete_item (p_item_id objectid) return number; + function move_item_to_player (p_object_id objectid, p_target_player objectid) return number; + + procedure fix_load_with (p_topmost_object objectid, p_starting_loadwith objectid); + procedure fix_load_with_depth (p_topmost_object objectid, p_starting_loadwith objectid, p_max_depth number); +end; + +/ + + GRANT EXECUTE ON "SWG"."ADMIN" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package BIOGRAPHY +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE "SWG"."BIOGRAPHY" +as + type refcursor is ref cursor; + subtype objectid is number; + + procedure set_biography (p_owner objectid, p_biography varchar2); + function get_biography (p_owner objectid) return refcursor; +end; + +/ + + GRANT EXECUTE ON "SWG"."BIOGRAPHY" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package BLOB_DATA_CONVERSION +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE "SWG"."BLOB_DATA_CONVERSION" as + function blob_encodeoob (v_blob blob) return varchar2; + function blob_hexdump (v_blob blob) return varchar2; + function blob_encodeoob_old (v_blob blob) return varchar2; + function blob_to_string (v_blob blob) return varchar2; + function string_hexdump (v_string varchar2) return varchar2; + procedure convert_blob_data(v_item_id number); +end; + +/ + + GRANT EXECUTE ON "SWG"."BLOB_DATA_CONVERSION" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package CM_LOADER +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE "SWG"."CM_LOADER" is + + TYPE swg_cur IS REF CURSOR; + + FUNCTION get_location_list return swg_cur; + -- + -- + -- + FUNCTION get_bid_list return swg_cur; + -- + -- + -- + FUNCTION get_auction_list return swg_cur; + -- + -- + -- + FUNCTION get_auction_attributes RETURN swg_cur; + +end cm_loader; + +/ + + GRANT EXECUTE ON "SWG"."CM_LOADER" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package CM_PERSISTER +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE "SWG"."CM_PERSISTER" +as + type refcursor is ref cursor; + subtype objectid is number; + + procedure update_auction_locations (p_location_id VAOFSTRING, + p_location_name VAOFSTRING, + p_owner_id VAOFSTRING, + p_sales_tax VAOFNUMBER, + p_sales_tax_bank_id VAOFSTRING, + p_empty_date VAOFNUMBER, + p_last_access_date VAOFNUMBER, + p_inactive_date VAOFNUMBER, + p_status VAOFNUMBER, + p_search_enabled VAOFSTRING, + p_entrance_charge VAOFNUMBER, + p_chunk_size number); + procedure insert_auction_locations (p_location_id VAOFSTRING, + p_location_name VAOFSTRING, + p_owner_id VAOFSTRING, + p_sales_tax VAOFNUMBER, + p_sales_tax_bank_id VAOFSTRING, + p_empty_date VAOFNUMBER, + p_last_access_date VAOFNUMBER, + p_inactive_date VAOFNUMBER, + p_status VAOFNUMBER, + p_search_enabled VAOFSTRING, + p_entrance_charge VAOFNUMBER, + p_chunk_size number); + procedure delete_auction_locations (p_location_id VAOFSTRING, p_chunk_size number); + + procedure insert_market_auction_bids (p_item_id VAOFSTRING, + p_bidder_id VAOFSTRING, + p_bid VAOFNUMBER, + p_max_proxy_bid VAOFNUMBER, + p_chunk_size number); + + procedure update_market_auctions (p_item_id VAOFSTRING, + p_owner_id VAOFSTRING, + p_active VAOFNUMBER, + p_chunk_size number); + procedure insert_market_auctions (p_item_id VAOFSTRING, + p_owner_id VAOFSTRING, + p_creator_id VAOFSTRING, + p_location_id VAOFSTRING, + p_min_bid VAOFNUMBER, + p_buy_now_price VAOFNUMBER, + p_auction_timer VAOFNUMBER, + p_oob VAOFLONGSTRING, + p_user_description VAOFLONGSTRING, + p_category VAOFNUMBER, + p_item_name VAOFLONGSTRING, + p_item_timer VAOFNUMBER, + p_active VAOFNUMBER, + p_item_size VAOFNUMBER, + p_object_template_id VAOFNUMBER, + p_chunk_size number); + procedure delete_market_auctions (p_item_id VAOFSTRING, p_chunk_size number); + + procedure insert_auction_attributes (p_item_id VAOFSTRING, p_attribute_name VAOFSTRING, p_attribute_value VAOFSTRING, p_chunk_size number); + +end; + +/ + + GRANT EXECUTE ON "SWG"."CM_PERSISTER" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package CUSTSERV_PROCS +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE "SWG"."CUSTSERV_PROCS" +as + type cursortype is ref cursor; + function get_characters_for_account +( + station_id_in IN players.station_id%TYPE +) + return cursortype; + + function get_deleted_items + ( + character_id_in IN objects.load_with%TYPE, + start_page_in IN number + ) + return cursortype; + + function get_structures + ( + character_id_in IN objects.object_id%TYPE + ) + return cursortype; + + function get_player_id + ( + character_name_in IN players.uc_character_name%TYPE + ) + return cursortype; + + procedure move_player + ( + character_id_in IN objects.object_id%TYPE, + x_in IN objects.x%TYPE, + y_in IN objects.y%TYPE, + z_in IN objects.z%TYPE, + scene_in IN objects.scene_id%TYPE + ); + + procedure undelete_item + ( + character_id_in IN objects.object_id%TYPE, + object_in IN objects.object_id%TYPE, + move_in IN number + ); + +end custserv_procs; + +/ + + GRANT EXECUTE ON "SWG"."CUSTSERV_PROCS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package DATALOOKUP +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE "SWG"."DATALOOKUP" +as + type refcursor is ref cursor; + + function check_character_name(p_name varchar2) return number; + function get_structures_for_purge(p_station_id number) return refcursor; + function get_vendors_for_purge(p_station_id number) return refcursor; + +end; + +/ + + GRANT EXECUTE ON "SWG"."DATALOOKUP" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package DATA_CLEANUP +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE "SWG"."DATA_CLEANUP" +as + type cursortype is ref cursor; + subtype objectid is number; + + procedure run_fix_bad_cells; + procedure run_fix_houses_w_bad_cells; + function getObjectsWithExpMessages return cursortype; + function getExperienceGrants(p_object_id objectid) return cursortype; + procedure delete_experience(p_object_id objectid); + procedure grant_experience(p_object_id objectid, p_experience_data varchar2); + function object_variable_name_cleanup return number; + function orphaned_object_cleanup return number; + function market_attributes_cleanup return number; + function messages_cleanup return number; + function vendor_object_cleanup return number; + function broken_object_cleanup return number; +end; + +/ + + GRANT EXECUTE ON "SWG"."DATA_CLEANUP" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package DB_ERROR_LOGGER +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE "SWG"."DB_ERROR_LOGGER" +as + + procedure dblogerror( p_ora_errno number, p_notes varchar2 default NULL); + procedure dblogerror_values( p_owner varchar2, p_name varchar2, p_type varchar2, p_value varchar2); + procedure stack_search ( i_search in integer, o_schema out varchar2, o_module out varchar2 ); + function getloglevel RETURN INTEGER; + function reraisecheck ( p_package varchar2 default NULL, p_procedure varchar2 default NULL) return INTEGER; + +end; + +/ + + GRANT EXECUTE ON "SWG"."DB_ERROR_LOGGER" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package GOLD_OVERRIDE +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE "SWG"."GOLD_OVERRIDE" +as + type cursortype is ref cursor; + + function load_objvar_overrides(p_schema varchar2) return cursortype; +end; + +/ + + GRANT EXECUTE ON "SWG"."GOLD_OVERRIDE" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package LAZY_DELETER +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE "SWG"."LAZY_DELETER" as + procedure purge_one_object(object_in in number); + procedure purge_objects_bulk(p_object_id VAOFSTRING, p_chunk_size number, p_enable_db_logging number); +end lazy_deleter; + +/ + + GRANT EXECUTE ON "SWG"."LAZY_DELETER" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package LOADER +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE "SWG"."LOADER" +as + type cursortype is ref cursor; + + function get_character_name_list return cursortype; + + procedure get_version_number(current_version in out number, min_version in out number); + function get_characters (p_station_id number) return cursortype; + function verify_containment_chain(p_start_with_object_id in number) return number; + function fix_player_containment_chain(p_start_with_object_id in number) return number; + procedure verify_character (p_station_id in number, p_character_id in number, p_gold_schema in varchar2, p_approved out varchar2, p_character_name out varchar2, p_scene_id out varchar2, p_container_id out number, p_x out number, p_y out number, p_z out number, p_containment_check out number); + function locate_player (p_object_id number) return number; + procedure locate_universe; + procedure locate_contained_object (p_container_id number, p_object_id number); + function locate_by_loadwith_batch (p_loadwiths vaofstring, p_chunk_size number) return number; + procedure locate_contents (p_container_id number); + function load_chunk_object_list (p_scene_id varchar, p_node_x float, p_node_z float) return number; + procedure locate_structure (p_object_id number, p_x out number, p_z out number, p_scene_id out varchar2, p_found out number); + + function load_armor return cursortype; + function load_battlefield_participants return cursortype; + function load_property_lists return cursortype; + function load_experience return cursortype; + function load_location return cursortype; + function load_manf_schematic_attributes return cursortype; + function load_messages return cursortype; + function load_object_variables return cursortype; + function load_scripts return cursortype; + function load_object return cursortype; + function load_waypoint return cursortype; + function load_player_object return cursortype; + function load_resource_types return cursortype; + function load_bounty_hunter_targets return cursortype; + +-- GENERATED PLSQL FOLLOWS +-- generated by makeloader.pl + + + function load_battlefield_marker_object return cursortype; + function load_building_object return cursortype; + function load_cell_object return cursortype; + function load_city_object return cursortype; + function load_creature_object return cursortype; + function load_factory_object return cursortype; + function load_guild_object return cursortype; + function load_harvester_inst_object return cursortype; + function load_installation_object return cursortype; + function load_intangible_object return cursortype; + function load_manf_schematic_object return cursortype; + function load_manufacture_inst_object return cursortype; + function load_mission_object return cursortype; + function load_planet_object return cursortype; + function load_resource_container_object return cursortype; + function load_ship_object return cursortype; + function load_static_object return cursortype; + function load_tangible_object return cursortype; + function load_token_object return cursortype; + function load_universe_object return cursortype; + function load_vehicle_object return cursortype; + function load_weapon_object return cursortype; + function load_player_quest_object return cursortype; +end; + +/ + + GRANT EXECUTE ON "SWG"."LOADER" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package LOGIN +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE "SWG"."LOGIN" +as + type refcursor is ref cursor; + subtype objectid is number; + + procedure register_new_cluster(p_cluster_name in varchar2, p_address in varchar2, p_cluster_id out number); + function get_cluster_list(p_group in number) return refcursor; + function get_avatar_list (p_station_id number, p_cluster_group number) return refcursor; + function get_open_character_slots(p_station_id number, p_cluster_id number) return refcursor; + function get_only_open_character_slots(p_station_id number, p_cluster_id number) return refcursor; + function is_cluster_at_limit(p_cluster_id number) return number; + function is_account_at_limit(p_station_id number) return number; + procedure delete_character(p_cluster_id number, p_character_id number, p_station_id number); + procedure rename_character(p_cluster_id number, p_character_id number, p_new_name varchar2); + procedure create_character(p_cluster_id number, p_station_id number, p_character_name varchar2, p_character_id number, p_template_id number, p_character_type number); + function restore_character(p_cluster_id number, p_station_id number, p_character_name varchar2, p_character_id number, p_template_id number, p_character_type number) return number; + procedure set_character_slots(p_cluster_id number, p_station_id number, p_slot_type number, p_num_slots number); + procedure set_character_type(p_cluster_id number, p_station_id number, p_character_id number, p_slot_type number); + function has_extra_character_slot(p_station_id number, p_character_type number) return number; + procedure toggle_disable_character(p_cluster_id number, p_character_id number, p_station_id number, p_enabled varchar2); + function enable_disable_character(p_station_id number, p_character_id number, p_enabled varchar2) return number; + function get_completed_tutorial(p_station_id number) return refcursor; + procedure toggle_completed_tutorial(p_station_id number, p_completed varchar2); + function get_consumed_reward_events(p_station_id number) return refcursor; + function get_claimed_reward_items(p_station_id number) return refcursor; + function consume_reward_event(p_station_id number, p_character_id number, p_cluster_id number, p_event_id varchar2) return number; + function claim_reward_item(p_station_id number, p_character_id number, p_cluster_id number, p_item_id varchar2) return number; + function get_feature_id_transactions(p_station_id in number, p_cluster_id in number, p_character_id in number) return refcursor; + function update_feature_id_transaction(p_station_id in number, p_cluster_id in number, p_character_id in number, p_item_id in varchar2, p_count_adjustment in number) return number; +end; + +/ + + GRANT EXECUTE ON "SWG"."LOGIN" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package OBJECTIDMANAGER +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE "SWG"."OBJECTIDMANAGER" +as + type cursortype is ref cursor; + + procedure get_ids(how_many in out number, block_start_id out number, block_end_id out number); + function get_contiguous_ids(min_count number) return number; + function get_single_id return number; + + procedure rebuild_freelist; +end; + +/ + + GRANT EXECUTE ON "SWG"."OBJECTIDMANAGER" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package OBJVAR_NAMES +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE "SWG"."OBJVAR_NAMES" +as + type cursortype is ref cursor; + + procedure add_name (p_id number, p_name varchar2); + function get_name_list return cursortype; +end; + +/ + + GRANT EXECUTE ON "SWG"."OBJVAR_NAMES" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package PERSISTER +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE "SWG"."PERSISTER" +as + type refcursor is ref cursor; + subtype objectid is number; + + procedure set_clock (p_time number); + procedure add_player (p_station_id number, p_character_object objectid, p_character_name varchar2, p_normalized_name varchar2); + function delete_character (p_station_id number, p_character_id number, p_delete_minutes number) return number; + procedure update_object_variable_batch (p_object_id vaofstring, p_name_id vaofnumber, p_type vaofnumber, p_value vaofstring, p_chunk_size number); + procedure add_object_variable_batch (p_object_id vaofstring, p_name_id vaofnumber, p_type vaofnumber, p_value vaofstring, p_chunk_size number); + procedure remove_object_variable_batch (p_object_id vaofstring, p_name_id vaofnumber, p_chunk_size number); + procedure clear_scripts (p_object_id objectid); + procedure save_message (p_message_id number, p_object_id objectid, p_method varchar, p_data varchar, p_call_time number, p_guaranteed varchar, p_delivery_type int); + procedure save_message_batch (p_message_id VAOFSTRING, p_object_id VAOFSTRING, p_method VAOFSTRING, p_data VAOFLONGSTRING, p_call_time VAOFNUMBER, p_guaranteed VAOFSTRING, p_delivery_type VAOFNUMBER, p_chunk_size number, p_enable_db_logging number ); + procedure acknowledge_message (p_message_id number); + procedure acknowledge_message_batch (p_message_id VAOFSTRING, p_chunk_size number, p_enable_db_logging number ); + procedure save_object ( p_x VAOFNUMBER, p_y VAOFNUMBER, p_z VAOFNUMBER, p_quaternion_w VAOFNUMBER, p_quaternion_x VAOFNUMBER, p_quaternion_y VAOFNUMBER, p_quaternion_z VAOFNUMBER, p_node_x VAOFNUMBER, p_node_y VAOFNUMBER, p_node_z VAOFNUMBER, p_object_template_id VAOFNUMBER, p_type_id VAOFNUMBER, p_scene_id VAOFSTRING, p_controller_type VAOFNUMBER, p_deleted VAOFNUMBER, p_object_name VAOFSTRING, p_volume VAOFNUMBER, p_contained_by VAOFSTRING, p_slot_arrangement VAOFNUMBER, p_player_controlled VAOFSTRING, p_cache_version VAOFNUMBER, p_load_contents VAOFSTRING, p_cash_balance VAOFNUMBER, p_bank_balance VAOFNUMBER, p_complexity VAOFNUMBER, p_name_string_table VAOFSTRING, p_name_string_text VAOFSTRING, p_static_item_name VAOFSTRING, p_static_item_version VAOFNUMBER, p_conversion_id VAOFNUMBER, p_load_with VAOFSTRING, + p_objvar_0_name VAOFSTRING,p_objvar_0_type VAOFNUMBER,p_objvar_0_value VAOFSTRING,p_objvar_1_name VAOFSTRING,p_objvar_1_type VAOFNUMBER,p_objvar_1_value VAOFSTRING,p_objvar_2_name VAOFSTRING,p_objvar_2_type VAOFNUMBER,p_objvar_2_value VAOFSTRING,p_objvar_3_name VAOFSTRING,p_objvar_3_type VAOFNUMBER,p_objvar_3_value VAOFSTRING,p_objvar_4_name VAOFSTRING,p_objvar_4_type VAOFNUMBER,p_objvar_4_value VAOFSTRING,p_objvar_5_name VAOFSTRING,p_objvar_5_type VAOFNUMBER,p_objvar_5_value VAOFSTRING,p_objvar_6_name VAOFSTRING,p_objvar_6_type VAOFNUMBER,p_objvar_6_value VAOFSTRING,p_objvar_7_name VAOFSTRING,p_objvar_7_type VAOFNUMBER,p_objvar_7_value VAOFSTRING,p_objvar_8_name VAOFSTRING,p_objvar_8_type VAOFNUMBER,p_objvar_8_value VAOFSTRING,p_objvar_9_name VAOFSTRING,p_objvar_9_type VAOFNUMBER,p_objvar_9_value VAOFSTRING, p_objvar_10_name VAOFSTRING,p_objvar_10_type VAOFNUMBER,p_objvar_10_value VAOFSTRING,p_objvar_11_name VAOFSTRING,p_objvar_11_type VAOFNUMBER,p_objvar_11_value VAOFSTRING,p_objvar_12_name VAOFSTRING,p_objvar_12_type VAOFNUMBER,p_objvar_12_value VAOFSTRING,p_objvar_13_name VAOFSTRING,p_objvar_13_type VAOFNUMBER,p_objvar_13_value VAOFSTRING,p_objvar_14_name VAOFSTRING,p_objvar_14_type VAOFNUMBER,p_objvar_14_value VAOFSTRING,p_objvar_15_name VAOFSTRING,p_objvar_15_type VAOFNUMBER,p_objvar_15_value VAOFSTRING,p_objvar_16_name VAOFSTRING,p_objvar_16_type VAOFNUMBER,p_objvar_16_value VAOFSTRING,p_objvar_17_name VAOFSTRING,p_objvar_17_type VAOFNUMBER,p_objvar_17_value VAOFSTRING,p_objvar_18_name VAOFSTRING,p_objvar_18_type VAOFNUMBER,p_objvar_18_value VAOFSTRING,p_objvar_19_name VAOFSTRING,p_objvar_19_type VAOFNUMBER,p_objvar_19_value VAOFSTRING, p_script_list VAOFLONGSTRING, p_object_id VAOFSTRING, p_chunk_size number); + procedure add_object ( p_x VAOFNUMBER, p_y VAOFNUMBER, p_z VAOFNUMBER, p_quaternion_w VAOFNUMBER, p_quaternion_x VAOFNUMBER, p_quaternion_y VAOFNUMBER, p_quaternion_z VAOFNUMBER, p_node_x VAOFNUMBER, p_node_y VAOFNUMBER, p_node_z VAOFNUMBER, p_object_template_id VAOFNUMBER, p_type_id VAOFNUMBER, p_scene_id VAOFSTRING, p_controller_type VAOFNUMBER, p_deleted VAOFNUMBER, p_object_name VAOFSTRING, p_volume VAOFNUMBER, p_contained_by VAOFSTRING, p_slot_arrangement VAOFNUMBER, p_player_controlled VAOFSTRING, p_cache_version VAOFNUMBER, p_load_contents VAOFSTRING, p_cash_balance VAOFNUMBER, p_bank_balance VAOFNUMBER, p_complexity VAOFNUMBER, p_name_string_table VAOFSTRING, p_name_string_text VAOFSTRING, p_static_item_name VAOFSTRING, p_static_item_version VAOFNUMBER, p_conversion_id VAOFNUMBER, p_load_with VAOFSTRING, + p_objvar_0_name VAOFSTRING,p_objvar_0_type VAOFNUMBER,p_objvar_0_value VAOFSTRING,p_objvar_1_name VAOFSTRING,p_objvar_1_type VAOFNUMBER,p_objvar_1_value VAOFSTRING,p_objvar_2_name VAOFSTRING,p_objvar_2_type VAOFNUMBER,p_objvar_2_value VAOFSTRING,p_objvar_3_name VAOFSTRING,p_objvar_3_type VAOFNUMBER,p_objvar_3_value VAOFSTRING,p_objvar_4_name VAOFSTRING,p_objvar_4_type VAOFNUMBER,p_objvar_4_value VAOFSTRING,p_objvar_5_name VAOFSTRING,p_objvar_5_type VAOFNUMBER,p_objvar_5_value VAOFSTRING,p_objvar_6_name VAOFSTRING,p_objvar_6_type VAOFNUMBER,p_objvar_6_value VAOFSTRING,p_objvar_7_name VAOFSTRING,p_objvar_7_type VAOFNUMBER,p_objvar_7_value VAOFSTRING,p_objvar_8_name VAOFSTRING,p_objvar_8_type VAOFNUMBER,p_objvar_8_value VAOFSTRING,p_objvar_9_name VAOFSTRING,p_objvar_9_type VAOFNUMBER,p_objvar_9_value VAOFSTRING, p_objvar_10_name VAOFSTRING,p_objvar_10_type VAOFNUMBER,p_objvar_10_value VAOFSTRING,p_objvar_11_name VAOFSTRING,p_objvar_11_type VAOFNUMBER,p_objvar_11_value VAOFSTRING,p_objvar_12_name VAOFSTRING,p_objvar_12_type VAOFNUMBER,p_objvar_12_value VAOFSTRING,p_objvar_13_name VAOFSTRING,p_objvar_13_type VAOFNUMBER,p_objvar_13_value VAOFSTRING,p_objvar_14_name VAOFSTRING,p_objvar_14_type VAOFNUMBER,p_objvar_14_value VAOFSTRING,p_objvar_15_name VAOFSTRING,p_objvar_15_type VAOFNUMBER,p_objvar_15_value VAOFSTRING,p_objvar_16_name VAOFSTRING,p_objvar_16_type VAOFNUMBER,p_objvar_16_value VAOFSTRING,p_objvar_17_name VAOFSTRING,p_objvar_17_type VAOFNUMBER,p_objvar_17_value VAOFSTRING,p_objvar_18_name VAOFSTRING,p_objvar_18_type VAOFNUMBER,p_objvar_18_value VAOFSTRING,p_objvar_19_name VAOFSTRING,p_objvar_19_type VAOFNUMBER,p_objvar_19_value VAOFSTRING, p_script_list VAOFLONGSTRING, p_object_id VAOFSTRING, p_chunk_size number); + procedure remove_object ( p_object_id VAOFSTRING, p_chunk_size number); + procedure save_manf_schem_attribute (p_action number, p_object_id objectid, p_attribute_type varchar2, p_value number); + procedure update_property_list (p_object_id objectid, p_list_id number, p_operation number, p_value varchar2); + procedure update_property_list_batch (p_object_id VAOFSTRING, p_list_id VAOFNUMBER, p_operation number, p_value VAOFSTRING, p_chunk_size number, p_enable_db_logging number ); + procedure save_armor (p_object_template varchar2, p_effectiveness number, p_integrity number, p_special_protections varchar2, p_encumberance_0 number, p_encumberance_1 number, p_encumberance_2 number, p_encumberance_3 number, p_encumberance_4 number, p_encumberance_5 number, p_encumberance_6 number, p_encumberance_7 number, p_encumberance_8 number, p_layer number, p_object_id objectid); + procedure add_armor (p_object_template varchar2, p_effectiveness number, p_integrity number, p_special_protections varchar2, p_encumberance_0 number, p_encumberance_1 number, p_encumberance_2 number, p_encumberance_3 number, p_encumberance_4 number, p_encumberance_5 number, p_encumberance_6 number, p_encumberance_7 number, p_encumberance_8 number, p_layer number, p_object_id objectid); + procedure save_location ( p_object_id number, p_list_id number, p_sequence_number number, p_operation number, p_name varchar2, p_scene varchar2, p_x number, p_y number, p_z number, p_radius number); + procedure save_experience ( p_points number, p_experience_type varchar2, p_object_id number ); + procedure save_battlefield_participants ( p_faction_id number, p_character_object_id number, p_region_object_id number ); + function rename_character( p_character_id objectid, p_new_name varchar2, p_normalized_name varchar2) return number; + procedure save_waypoint(p_object_id objectid, p_waypoint_id objectid, p_appearance_name_crc number, p_location_x number, p_location_y number, p_location_z number, p_location_cell number, p_location_scene number, p_name varchar2, p_color number, p_active char, p_detached char); + procedure save_player_obj( p_object_id VAOFSTRING, p_station_id VAOFNUMBER, p_house_id VAOFSTRING, p_account_num_lots VAOFNUMBER, p_account_is_outcast VAOFSTRING, p_account_cheater_level VAOFNUMBER, p_account_max_lots_adjustment VAOFNUMBER, p_personal_profile_id VAOFSTRING, p_character_profile_id VAOFSTRING, p_skill_title VAOFSTRING, p_born_date VAOFNUMBER, p_played_time VAOFNUMBER, p_force_regen_rate VAOFNUMBER, p_force_power VAOFNUMBER, p_max_force_power VAOFNUMBER, p_active_quests VAOFSTRING, p_completed_quests VAOFSTRING, p_current_quest VAOFNUMBER, p_quests VAOFLONGSTRING, p_role_icon_choice VAOFNUMBER, p_quests2 VAOFLONGSTRING, p_quests3 VAOFLONGSTRING, p_quests4 VAOFLONGSTRING, p_skill_template VAOFSTRING, p_working_skill VAOFSTRING, p_current_gcw_points VAOFNUMBER, p_current_gcw_rating VAOFNUMBER, p_current_pvp_kills VAOFNUMBER, p_lifetime_gcw_points VAOFNUMBER, p_max_gcw_imperial_rating VAOFNUMBER, p_max_gcw_rebel_rating VAOFNUMBER, p_lifetime_pvp_kills VAOFNUMBER, p_next_gcw_rating_calc_time VAOFNUMBER, p_collections VAOFLONGSTRING, p_show_backpack VAOFSTRING, p_show_helmet VAOFSTRING, p_collections2 VAOFLONGSTRING, p_chunk_size number ); + procedure add_player_obj( p_object_id VAOFSTRING, p_station_id VAOFNUMBER, p_house_id VAOFSTRING, p_account_num_lots VAOFNUMBER, p_account_is_outcast VAOFSTRING, p_account_cheater_level VAOFNUMBER, p_account_max_lots_adjustment VAOFNUMBER, p_personal_profile_id VAOFSTRING, p_character_profile_id VAOFSTRING, p_skill_title VAOFSTRING, p_born_date VAOFNUMBER, p_played_time VAOFNUMBER, p_force_regen_rate VAOFNUMBER, p_force_power VAOFNUMBER, p_max_force_power VAOFNUMBER, p_active_quests VAOFSTRING, p_completed_quests VAOFSTRING, p_current_quest VAOFNUMBER, p_quests VAOFLONGSTRING, p_role_icon_choice VAOFNUMBER, p_quests2 VAOFLONGSTRING, p_quests3 VAOFLONGSTRING, p_quests4 VAOFLONGSTRING, p_skill_template VAOFSTRING, p_working_skill VAOFSTRING, p_current_gcw_points VAOFNUMBER, p_current_gcw_rating VAOFNUMBER, p_current_pvp_kills VAOFNUMBER, p_lifetime_gcw_points VAOFNUMBER, p_max_gcw_imperial_rating VAOFNUMBER, p_max_gcw_rebel_rating VAOFNUMBER, p_lifetime_pvp_kills VAOFNUMBER, p_next_gcw_rating_calc_time VAOFNUMBER, p_collections VAOFLONGSTRING, p_show_backpack VAOFSTRING, p_show_helmet VAOFSTRING, p_collections2 VAOFLONGSTRING, p_chunk_size number ); + procedure remove_player_obj( p_object_id VAOFSTRING, p_chunk_size number ); + procedure delete_demand_container( p_object_id VAOFSTRING, p_reason VAOFNUMBER, p_chunk_size number ); + procedure save_resource_type(p_resource_id VAOFSTRING, p_resource_name VAOFSTRING, p_resource_class VAOFSTRING, p_attributes VAOFSTRING, p_fractal_seeds VAOFSTRING, p_depleted_timestamp VAOFNUMBER, p_chunk_size number); + procedure save_bounty_hunter_target(p_object_id VAOFSTRING, p_target_id VAOFSTRING, p_chunk_size number); + function subtract_money_from_object(p_object_id number, p_amount number) return char; + +-- GENERATED PLSQL FOLLOWS +-- generated by makepersister.pl + procedure save_battlefield_marker_obj(p_object_id VAOFSTRING, p_region_name VAOFSTRING, p_chunk_size number); + procedure add_battlefield_marker_obj(p_object_id VAOFSTRING, p_region_name VAOFSTRING, p_chunk_size number); + procedure remove_battlefield_marker_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure save_building_obj(p_object_id VAOFSTRING, p_maintenance_cost VAOFNUMBER, p_time_last_checked VAOFNUMBER, p_is_public VAOFSTRING, p_city_id VAOFNUMBER, p_chunk_size number); + procedure add_building_obj(p_object_id VAOFSTRING, p_maintenance_cost VAOFNUMBER, p_time_last_checked VAOFNUMBER, p_is_public VAOFSTRING, p_city_id VAOFNUMBER, p_chunk_size number); + procedure remove_building_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure save_cell_obj(p_object_id VAOFSTRING, p_cell_number VAOFNUMBER, p_is_public VAOFSTRING, p_chunk_size number); + procedure add_cell_obj(p_object_id VAOFSTRING, p_cell_number VAOFNUMBER, p_is_public VAOFSTRING, p_chunk_size number); + procedure remove_cell_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure save_city_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure add_city_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure remove_city_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure save_creature_obj(p_object_id VAOFSTRING, p_scale_factor VAOFNUMBER, p_states VAOFNUMBER, p_posture VAOFNUMBER, p_shock_wounds VAOFNUMBER, p_master_id VAOFSTRING, p_rank VAOFNUMBER, p_base_walk_speed VAOFNUMBER, p_base_run_speed VAOFNUMBER, p_attribute_0 VAOFNUMBER, p_attribute_1 VAOFNUMBER, p_attribute_2 VAOFNUMBER, p_attribute_3 VAOFNUMBER, p_attribute_4 VAOFNUMBER, p_attribute_5 VAOFNUMBER, p_attribute_6 VAOFNUMBER, p_attribute_7 VAOFNUMBER, p_attribute_8 VAOFNUMBER, p_attribute_9 VAOFNUMBER, p_attribute_10 VAOFNUMBER, p_attribute_11 VAOFNUMBER, p_attribute_12 VAOFNUMBER, p_attribute_13 VAOFNUMBER, p_attribute_14 VAOFNUMBER, p_attribute_15 VAOFNUMBER, p_attribute_16 VAOFNUMBER, p_attribute_17 VAOFNUMBER, p_attribute_18 VAOFNUMBER, p_attribute_19 VAOFNUMBER, p_attribute_20 VAOFNUMBER, p_attribute_21 VAOFNUMBER, p_attribute_22 VAOFNUMBER, p_attribute_23 VAOFNUMBER, p_attribute_24 VAOFNUMBER, p_attribute_25 VAOFNUMBER, p_attribute_26 VAOFNUMBER, p_persisted_buffs VAOFSTRING, p_ws_x VAOFNUMBER, p_ws_y VAOFNUMBER, p_ws_z VAOFNUMBER, p_chunk_size number); + procedure add_creature_obj(p_object_id VAOFSTRING, p_scale_factor VAOFNUMBER, p_states VAOFNUMBER, p_posture VAOFNUMBER, p_shock_wounds VAOFNUMBER, p_master_id VAOFSTRING, p_rank VAOFNUMBER, p_base_walk_speed VAOFNUMBER, p_base_run_speed VAOFNUMBER, p_attribute_0 VAOFNUMBER, p_attribute_1 VAOFNUMBER, p_attribute_2 VAOFNUMBER, p_attribute_3 VAOFNUMBER, p_attribute_4 VAOFNUMBER, p_attribute_5 VAOFNUMBER, p_attribute_6 VAOFNUMBER, p_attribute_7 VAOFNUMBER, p_attribute_8 VAOFNUMBER, p_attribute_9 VAOFNUMBER, p_attribute_10 VAOFNUMBER, p_attribute_11 VAOFNUMBER, p_attribute_12 VAOFNUMBER, p_attribute_13 VAOFNUMBER, p_attribute_14 VAOFNUMBER, p_attribute_15 VAOFNUMBER, p_attribute_16 VAOFNUMBER, p_attribute_17 VAOFNUMBER, p_attribute_18 VAOFNUMBER, p_attribute_19 VAOFNUMBER, p_attribute_20 VAOFNUMBER, p_attribute_21 VAOFNUMBER, p_attribute_22 VAOFNUMBER, p_attribute_23 VAOFNUMBER, p_attribute_24 VAOFNUMBER, p_attribute_25 VAOFNUMBER, p_attribute_26 VAOFNUMBER, p_persisted_buffs VAOFSTRING, p_ws_x VAOFNUMBER, p_ws_y VAOFNUMBER, p_ws_z VAOFNUMBER, p_chunk_size number); + procedure remove_creature_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure save_factory_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure add_factory_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure remove_factory_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure save_guild_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure add_guild_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure remove_guild_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure save_harvester_inst_obj(p_object_id VAOFSTRING, p_installed_efficiency VAOFNUMBER, p_max_extraction_rate VAOFNUMBER, p_current_extraction_rate VAOFNUMBER, p_max_hopper_amount VAOFNUMBER, p_hopper_resource VAOFSTRING, p_hopper_amount VAOFNUMBER, p_resource_type VAOFSTRING, p_chunk_size number); + procedure add_harvester_inst_obj(p_object_id VAOFSTRING, p_installed_efficiency VAOFNUMBER, p_max_extraction_rate VAOFNUMBER, p_current_extraction_rate VAOFNUMBER, p_max_hopper_amount VAOFNUMBER, p_hopper_resource VAOFSTRING, p_hopper_amount VAOFNUMBER, p_resource_type VAOFSTRING, p_chunk_size number); + procedure remove_harvester_inst_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure save_installation_obj(p_object_id VAOFSTRING, p_installation_type VAOFNUMBER, p_activated VAOFSTRING, p_tick_count VAOFNUMBER, p_activate_start_time VAOFNUMBER, p_power VAOFNUMBER, p_power_rate VAOFNUMBER, p_chunk_size number); + procedure add_installation_obj(p_object_id VAOFSTRING, p_installation_type VAOFNUMBER, p_activated VAOFSTRING, p_tick_count VAOFNUMBER, p_activate_start_time VAOFNUMBER, p_power VAOFNUMBER, p_power_rate VAOFNUMBER, p_chunk_size number); + procedure remove_installation_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure save_intangible_obj(p_object_id VAOFSTRING, p_count VAOFNUMBER, p_chunk_size number); + procedure add_intangible_obj(p_object_id VAOFSTRING, p_count VAOFNUMBER, p_chunk_size number); + procedure remove_intangible_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure save_manf_schematic_obj(p_object_id VAOFSTRING, p_creator_id VAOFSTRING, p_creator_name VAOFSTRING, p_items_per_container VAOFNUMBER, p_manufacture_time VAOFNUMBER, p_draft_schematic VAOFNUMBER, p_chunk_size number); + procedure add_manf_schematic_obj(p_object_id VAOFSTRING, p_creator_id VAOFSTRING, p_creator_name VAOFSTRING, p_items_per_container VAOFNUMBER, p_manufacture_time VAOFNUMBER, p_draft_schematic VAOFNUMBER, p_chunk_size number); + procedure remove_manf_schematic_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure save_manufacture_inst_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure add_manufacture_inst_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure remove_manufacture_inst_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure save_mission_obj(p_object_id VAOFSTRING, p_difficulty VAOFNUMBER, p_end_x VAOFNUMBER, p_end_y VAOFNUMBER, p_end_z VAOFNUMBER, p_end_cell VAOFSTRING, p_end_scene VAOFNUMBER, p_mission_creator VAOFSTRING, p_reward VAOFNUMBER, p_root_script_name VAOFSTRING, p_start_x VAOFNUMBER, p_start_y VAOFNUMBER, p_start_z VAOFNUMBER, p_start_cell VAOFSTRING, p_start_scene VAOFNUMBER, p_description_table VAOFSTRING, p_description_text VAOFSTRING, p_title_table VAOFSTRING, p_title_text VAOFSTRING, p_mission_holder_id VAOFSTRING, p_status VAOFNUMBER, p_mission_type VAOFNUMBER, p_target_appearance VAOFNUMBER, p_target_name VAOFSTRING, p_chunk_size number); + procedure add_mission_obj(p_object_id VAOFSTRING, p_difficulty VAOFNUMBER, p_end_x VAOFNUMBER, p_end_y VAOFNUMBER, p_end_z VAOFNUMBER, p_end_cell VAOFSTRING, p_end_scene VAOFNUMBER, p_mission_creator VAOFSTRING, p_reward VAOFNUMBER, p_root_script_name VAOFSTRING, p_start_x VAOFNUMBER, p_start_y VAOFNUMBER, p_start_z VAOFNUMBER, p_start_cell VAOFSTRING, p_start_scene VAOFNUMBER, p_description_table VAOFSTRING, p_description_text VAOFSTRING, p_title_table VAOFSTRING, p_title_text VAOFSTRING, p_mission_holder_id VAOFSTRING, p_status VAOFNUMBER, p_mission_type VAOFNUMBER, p_target_appearance VAOFNUMBER, p_target_name VAOFSTRING, p_chunk_size number); + procedure remove_mission_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure save_planet_obj(p_object_id VAOFSTRING, p_planet_name VAOFSTRING, p_chunk_size number); + procedure add_planet_obj(p_object_id VAOFSTRING, p_planet_name VAOFSTRING, p_chunk_size number); + procedure remove_planet_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure save_resource_container_obj(p_object_id VAOFSTRING, p_resource_type VAOFSTRING, p_quantity VAOFNUMBER, p_source VAOFSTRING, p_chunk_size number); + procedure add_resource_container_obj(p_object_id VAOFSTRING, p_resource_type VAOFSTRING, p_quantity VAOFNUMBER, p_source VAOFSTRING, p_chunk_size number); + procedure remove_resource_container_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure save_ship_obj(p_object_id VAOFSTRING, p_slide_dampener VAOFNUMBER, p_current_chassis_hit_points VAOFNUMBER, p_maximum_chassis_hit_points VAOFNUMBER, p_chassis_type VAOFNUMBER, p_cmp_armor_hp_maximum VAOFSTRING, p_cmp_armor_hp_current VAOFSTRING, p_cmp_efficiency_general VAOFSTRING, p_cmp_efficiency_eng VAOFSTRING, p_cmp_eng_maintenance VAOFSTRING, p_cmp_mass VAOFSTRING, p_cmp_crc VAOFSTRING, p_cmp_hp_current VAOFSTRING, p_cmp_hp_maximum VAOFSTRING, p_cmp_flags VAOFSTRING, p_cmp_names VAOFLONGSTRING, p_weapon_damage_maximum VAOFSTRING, p_weapon_damage_minimum VAOFSTRING, p_weapon_effectiveness_shields VAOFSTRING, p_weapon_effectiveness_armor VAOFSTRING, p_weapon_eng_per_shot VAOFSTRING, p_weapon_refire_rate VAOFSTRING, p_weapon_ammo_current VAOFSTRING, p_weapon_ammo_maximum VAOFSTRING, p_weapon_ammo_type VAOFSTRING, p_shield_hp_front_maximum VAOFNUMBER, p_shield_hp_back_maximum VAOFNUMBER, p_shield_recharge_rate VAOFNUMBER, p_capacitor_eng_maximum VAOFNUMBER, p_capacitor_eng_recharge_rate VAOFNUMBER, p_engine_acc_rate VAOFNUMBER, p_engine_deceleration_rate VAOFNUMBER, p_engine_pitch_acc_rate VAOFNUMBER, p_engine_yaw_acc_rate VAOFNUMBER, p_engine_roll_acc_rate VAOFNUMBER, p_engine_pitch_rate_maximum VAOFNUMBER, p_engine_yaw_rate_maximum VAOFNUMBER, p_engine_roll_rate_maximum VAOFNUMBER, p_engine_speed_maximum VAOFNUMBER, p_reactor_eng_generation_rate VAOFNUMBER, p_booster_eng_maximum VAOFNUMBER, p_booster_eng_recharge_rate VAOFNUMBER, p_booster_eng_consumption_rate VAOFNUMBER, p_booster_acc VAOFNUMBER, p_booster_speed_maximum VAOFNUMBER, p_droid_if_cmd_speed VAOFNUMBER, p_installed_dcd VAOFSTRING, p_chassis_cmp_mass_maximum VAOFNUMBER, p_cmp_creators VAOFSTRING, p_cargo_hold_contents_maximum VAOFNUMBER, p_cargo_hold_contents_current VAOFNUMBER, p_cargo_hold_contents VAOFSTRING, p_chunk_size number); + procedure add_ship_obj(p_object_id VAOFSTRING, p_slide_dampener VAOFNUMBER, p_current_chassis_hit_points VAOFNUMBER, p_maximum_chassis_hit_points VAOFNUMBER, p_chassis_type VAOFNUMBER, p_cmp_armor_hp_maximum VAOFSTRING, p_cmp_armor_hp_current VAOFSTRING, p_cmp_efficiency_general VAOFSTRING, p_cmp_efficiency_eng VAOFSTRING, p_cmp_eng_maintenance VAOFSTRING, p_cmp_mass VAOFSTRING, p_cmp_crc VAOFSTRING, p_cmp_hp_current VAOFSTRING, p_cmp_hp_maximum VAOFSTRING, p_cmp_flags VAOFSTRING, p_cmp_names VAOFLONGSTRING, p_weapon_damage_maximum VAOFSTRING, p_weapon_damage_minimum VAOFSTRING, p_weapon_effectiveness_shields VAOFSTRING, p_weapon_effectiveness_armor VAOFSTRING, p_weapon_eng_per_shot VAOFSTRING, p_weapon_refire_rate VAOFSTRING, p_weapon_ammo_current VAOFSTRING, p_weapon_ammo_maximum VAOFSTRING, p_weapon_ammo_type VAOFSTRING, p_shield_hp_front_maximum VAOFNUMBER, p_shield_hp_back_maximum VAOFNUMBER, p_shield_recharge_rate VAOFNUMBER, p_capacitor_eng_maximum VAOFNUMBER, p_capacitor_eng_recharge_rate VAOFNUMBER, p_engine_acc_rate VAOFNUMBER, p_engine_deceleration_rate VAOFNUMBER, p_engine_pitch_acc_rate VAOFNUMBER, p_engine_yaw_acc_rate VAOFNUMBER, p_engine_roll_acc_rate VAOFNUMBER, p_engine_pitch_rate_maximum VAOFNUMBER, p_engine_yaw_rate_maximum VAOFNUMBER, p_engine_roll_rate_maximum VAOFNUMBER, p_engine_speed_maximum VAOFNUMBER, p_reactor_eng_generation_rate VAOFNUMBER, p_booster_eng_maximum VAOFNUMBER, p_booster_eng_recharge_rate VAOFNUMBER, p_booster_eng_consumption_rate VAOFNUMBER, p_booster_acc VAOFNUMBER, p_booster_speed_maximum VAOFNUMBER, p_droid_if_cmd_speed VAOFNUMBER, p_installed_dcd VAOFSTRING, p_chassis_cmp_mass_maximum VAOFNUMBER, p_cmp_creators VAOFSTRING, p_cargo_hold_contents_maximum VAOFNUMBER, p_cargo_hold_contents_current VAOFNUMBER, p_cargo_hold_contents VAOFSTRING, p_chunk_size number); + procedure remove_ship_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure save_static_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure add_static_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure remove_static_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure save_tangible_obj(p_object_id VAOFSTRING, p_max_hit_points VAOFNUMBER, p_owner_id VAOFSTRING, p_visible VAOFSTRING, p_appearance_data VAOFSTRING, p_interest_radius VAOFNUMBER, p_pvp_type VAOFNUMBER, p_pvp_faction VAOFNUMBER, p_damage_taken VAOFNUMBER, p_custom_appearance VAOFSTRING, p_count VAOFNUMBER, p_condition VAOFNUMBER, p_creator_id VAOFSTRING, p_source_draft_schematic VAOFNUMBER, p_chunk_size number); + procedure add_tangible_obj(p_object_id VAOFSTRING, p_max_hit_points VAOFNUMBER, p_owner_id VAOFSTRING, p_visible VAOFSTRING, p_appearance_data VAOFSTRING, p_interest_radius VAOFNUMBER, p_pvp_type VAOFNUMBER, p_pvp_faction VAOFNUMBER, p_damage_taken VAOFNUMBER, p_custom_appearance VAOFSTRING, p_count VAOFNUMBER, p_condition VAOFNUMBER, p_creator_id VAOFSTRING, p_source_draft_schematic VAOFNUMBER, p_chunk_size number); + procedure remove_tangible_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure save_token_obj(p_object_id VAOFSTRING, p_reference VAOFSTRING, p_target_server_template_name VAOFSTRING, p_target_shared_template_name VAOFSTRING, p_waypoint VAOFSTRING, p_chunk_size number); + procedure add_token_obj(p_object_id VAOFSTRING, p_reference VAOFSTRING, p_target_server_template_name VAOFSTRING, p_target_shared_template_name VAOFSTRING, p_waypoint VAOFSTRING, p_chunk_size number); + procedure remove_token_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure save_universe_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure add_universe_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure remove_universe_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure save_vehicle_obj(p_object_id VAOFSTRING, p_bogus VAOFNUMBER, p_chunk_size number); + procedure add_vehicle_obj(p_object_id VAOFSTRING, p_bogus VAOFNUMBER, p_chunk_size number); + procedure remove_vehicle_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure save_weapon_obj(p_object_id VAOFSTRING, p_min_damage VAOFNUMBER, p_max_damage VAOFNUMBER, p_damage_type VAOFNUMBER, p_elemental_type VAOFNUMBER, p_elemental_value VAOFNUMBER, p_attack_speed VAOFNUMBER, p_wound_chance VAOFNUMBER, p_accuracy VAOFNUMBER, p_attack_cost VAOFNUMBER, p_damage_radius VAOFNUMBER, p_min_range VAOFNUMBER, p_max_range VAOFNUMBER, p_chunk_size number); + procedure add_weapon_obj(p_object_id VAOFSTRING, p_min_damage VAOFNUMBER, p_max_damage VAOFNUMBER, p_damage_type VAOFNUMBER, p_elemental_type VAOFNUMBER, p_elemental_value VAOFNUMBER, p_attack_speed VAOFNUMBER, p_wound_chance VAOFNUMBER, p_accuracy VAOFNUMBER, p_attack_cost VAOFNUMBER, p_damage_radius VAOFNUMBER, p_min_range VAOFNUMBER, p_max_range VAOFNUMBER, p_chunk_size number); + procedure remove_weapon_obj(p_object_id VAOFSTRING, p_chunk_size number); + procedure save_player_quest_obj( p_object_id VAOFSTRING, p_title VAOFSTRING, p_description VAOFSTRING, p_creator VAOFSTRING, p_total_tasks VAOFNUMBER, p_difficulty VAOFNUMBER, p_task_title1 VAOFSTRING, p_task_description1 VAOFSTRING, p_task_title2 VAOFSTRING, p_task_description2 VAOFSTRING, p_task_title3 VAOFSTRING, p_task_description3 VAOFSTRING, p_task_title4 VAOFSTRING, p_task_description4 VAOFSTRING, p_task_title5 VAOFSTRING, p_task_description5 VAOFSTRING, p_task_title6 VAOFSTRING, p_task_description6 VAOFSTRING, p_task_title7 VAOFSTRING, p_task_description7 VAOFSTRING, p_task_title8 VAOFSTRING, p_task_description8 VAOFSTRING, p_task_title9 VAOFSTRING, p_task_description9 VAOFSTRING, p_task_title10 VAOFSTRING, p_task_description10 VAOFSTRING, p_task_title11 VAOFSTRING, p_task_description11 VAOFSTRING, p_task_title12 VAOFSTRING, p_task_description12 VAOFSTRING, p_chunk_size number ); + procedure add_player_quest_obj( p_object_id VAOFSTRING, p_title VAOFSTRING, p_description VAOFSTRING, p_creator VAOFSTRING, p_total_tasks VAOFNUMBER, p_difficulty VAOFNUMBER, p_task_title1 VAOFSTRING, p_task_description1 VAOFSTRING, p_task_title2 VAOFSTRING, p_task_description2 VAOFSTRING, p_task_title3 VAOFSTRING, p_task_description3 VAOFSTRING, p_task_title4 VAOFSTRING, p_task_description4 VAOFSTRING, p_task_title5 VAOFSTRING, p_task_description5 VAOFSTRING, p_task_title6 VAOFSTRING, p_task_description6 VAOFSTRING, p_task_title7 VAOFSTRING, p_task_description7 VAOFSTRING, p_task_title8 VAOFSTRING, p_task_description8 VAOFSTRING, p_task_title9 VAOFSTRING, p_task_description9 VAOFSTRING, p_task_title10 VAOFSTRING, p_task_description10 VAOFSTRING, p_task_title11 VAOFSTRING, p_task_description11 VAOFSTRING, p_task_title12 VAOFSTRING, p_task_description12 VAOFSTRING, p_chunk_size number ); + procedure remove_player_quest_obj( p_object_id VAOFSTRING, p_chunk_size number); + +end; + +/ + + GRANT EXECUTE ON "SWG"."PERSISTER" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package PURGE_METHODS +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE "SWG"."PURGE_METHODS" is + + -- Author : AVALDES + -- Created : 19-Jun-03 4:59:49 PM + + + FUNCTION Purge_objects + (date_in in objects.deleted_date%type) + RETURN NUMBER; + -- + -- + -- + FUNCTION time_purge + (date_in IN VARCHAR2) + RETURN INTEGER; + + +end purge_methods; + +/ + + GRANT EXECUTE ON "SWG"."PURGE_METHODS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package PURGE_METHODS2 +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE "SWG"."PURGE_METHODS2" is + + -- Author : AVALDES + -- Created : 19-Jun-03 4:59:49 PM + -- Modified: 07/23/2003, DDM - changed to use bulk deleting and variable chunk size + + -- Notes: 07/29/2003 testing completed against a copy of SDKSWG04 on sdk-devdb + -- Tested running purge_objects from SYSDATE back on ~675k parent objects + -- -test run 1: ~40 min to delete all child and parent obj in batches of 10K + -- -test run 2: ~2.5 hours to do the same with rman running + -- Tested run purge_consumables from SYSDATE back on ~300k parent objects + -- -test run 1: ~50 min to delete all child and parent obj in batches of 10K + -- -test run 2: crashed with snap to old error - restarted and it finished the rest + -- + -- Progress can be gauged by looking in the Logger table. There is a logging system being + -- used to track deletion progress. It can be disabled pro commentting out references to + -- the 'LOGGING' package. This package is not necessary for the purge program to run but is + -- nice to be able to monitor progress. If used, the logger table should be cleared periodically. + + + -- number of records to delete in a bulk chunk + chunk_size CONSTANT PLS_INTEGER := 10000; + + -- collections for bulk deleting, # elements must be the same as chunk_size + TYPE Obj_list_t IS VARRAY(10000) of objects.object_id%type; -- for child table with object ids + TYPE Obj_rowid_list_t IS VARRAY(10000) of ROWID; -- for parent table (rowid lookups are faster) + + FUNCTION Purge_objects + (date_in in objects.deleted_date%type) + RETURN PLS_INTEGER; + + PROCEDURE Purge_objects_work + (Obj_list IN Obj_list_t); + -- + -- + -- + FUNCTION time_purge + (date_in IN VARCHAR2) + RETURN PLS_INTEGER; + + FUNCTION Purge_consumables + (start_date_in in objects.deleted_date%type, + end_date_in in objects.deleted_date%type) + RETURN PLS_INTEGER; + + PROCEDURE Purge_consumables_work + (Obj_list IN Obj_list_t); + -- + -- + -- + FUNCTION time_purge_consumables + (start_date_in in objects.deleted_date%type, + end_date_in in objects.deleted_date%type) + RETURN PLS_INTEGER; + + +end purge_methods2; + +/ + + GRANT EXECUTE ON "SWG"."PURGE_METHODS2" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package PURGE_PROCESS +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE "SWG"."PURGE_PROCESS" +as + type refcursor is ref cursor; + subtype objectid is number; + + procedure update_account_list (source_table varchar2); + function get_account_for_purge(p_purge_phase number, p_min_age number) return number; + procedure set_purge_status(p_station_id number, p_new_phase number); +end; + +/ + + GRANT EXECUTE ON "SWG"."PURGE_PROCESS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package SERVERCLOCK +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE "SWG"."SERVERCLOCK" +as + function get_last_save_time return number; +end; + +/ + + GRANT EXECUTE ON "SWG"."SERVERCLOCK" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package STATION_PLAYERS +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE "SWG"."STATION_PLAYERS" +as + type refcursor is ref cursor; + subtype networkid is number(20); + + procedure update_character(p_clusterName in varchar2 ,p_characterId in networkid, p_characterName in varchar2, p_objectName in varchar2, p_x in number, p_y in number, p_z in number, p_sceneId in varchar2, p_cash_balance in number, p_bank_balance in number, p_objectTemplateName in varchar2, p_stationId in networkid, p_containedBy in networkid, p_createTime in number, p_playedTime in number , p_numLots in number); +end; + +/ + + GRANT EXECUTE ON "SWG"."STATION_PLAYERS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package UNDELETE_METHODS +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE "SWG"."UNDELETE_METHODS" is + + -- Author : AVALDES + -- Created : 17-Jun-03 3:35:25 PM + + FUNCTION restore_object + (object_id_in IN objects.object_id%TYPE) + RETURN NUMBER; + + +end undelete_methods; + +/ + + GRANT EXECUTE ON "SWG"."UNDELETE_METHODS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package UTIL +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE "SWG"."UTIL" +as + type refcursor is ref cursor; + subtype networkid is number(20); + + function unix_time_2_oracle_date_PDT(p_unix_time in number) return date; + function unix_time_2_oracle_date_PST(p_unix_time in number) return date; + function unix_time_2_oracle_date_CDT(p_unix_time in number) return date; + function unix_time_2_oracle_date_CST(p_unix_time in number) return date; + function unix_time_2_oracle_date(p_unix_time in number, p_timezone_offset in number) return date; + function unix_to_oracle_date(p_unix_time in number, p_timezone_offset in number) return date; + +end; + +/ + + GRANT EXECUTE ON "SWG"."UTIL" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package Body ADMIN +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE BODY "SWG"."ADMIN" +as + + procedure move_to_player (p_object_id objectid, p_target_player objectid) + as + l_target_inventory objectid; + begin + l_target_inventory := admin.get_inventory_for_player(p_target_player); + + if (l_target_inventory <> 0) then + move_to_container(p_object_id, l_target_inventory, p_target_player); + end if; + end; + + procedure move_to_player_bank (p_object_id objectid, p_target_player objectid) + as + l_target_bank objectid; + begin + l_target_bank := admin.get_bank_for_player(p_target_player); + + if (l_target_bank <> 0) then + move_to_container(p_object_id, l_target_bank, l_target_bank); + end if; + end; + + procedure move_to_player_datapad (p_object_id objectid, p_target_player objectid, p_max_depth number) + as + l_target_datapad objectid; + begin + l_target_datapad := admin.get_datapad_for_player(p_target_player); + + if (l_target_datapad <> 0) then + move_to_container_depth(p_object_id, l_target_datapad, p_target_player, p_max_depth); + end if; + + exception + when others then + NULL; + end; + + procedure move_to_container_depth (p_object_id objectid, p_target_container objectid, p_target_load_with objectid, p_max_depth number) + as + begin + update objects + set contained_by = p_target_container, + load_with = p_target_load_with, + x = 0, + y = 0, + z = 0, + node_x = 0, + node_z = 0 + where object_id = p_object_id; + + delete market_auctions + where item_id = p_object_id; + + fix_load_with_depth(p_object_id, p_target_load_with, p_max_depth); + end; + + procedure move_to_container (p_object_id objectid, p_target_container objectid, p_target_load_with objectid) + as + begin + move_to_container_depth(p_object_id, p_target_container, p_target_load_with, -1); + end; + + function get_inventory_for_player (p_player_id objectid) return objectid + as + result objectid; + begin + select object_id + into result + from objects + where contained_by = p_player_id + and object_template_id = 2007924155 + and deleted = 0; + + return result; + + exception when others then + return 0; + end; + + function get_bank_for_player (p_player_id objectid) return objectid + as + result objectid; + begin + select object_id + into result + from objects + where contained_by = p_player_id + and object_template_id = -172438875 + and deleted = 0; + + return result; + + exception when others then + return 0; + end; + + function get_datapad_for_player (p_player_id objectid) return objectid + as + result objectid; + begin + select object_id + into result + from objects + where contained_by = p_player_id + and object_template_id = -1783727815 + and deleted = 0; + + return result; + + exception when others then + return 0; + end; + + function get_player_for_player (p_player_id objectid) return objectid + as + result objectid; + begin + select object_id + into result + from objects + where contained_by = p_player_id + and object_template_id = -640104330 + and deleted = 0; + + return result; + + exception when others then + return 0; + end; + + function get_container_for_object (p_object_id objectid) return objectid + as + result objectid; + begin + select contained_by + into result + from objects + where object_id = p_object_id; + return result; + exception when others then + return 0; + end; + + function get_object_template_id (p_object_id objectid) return number + as + result number; + begin + select object_template_id + into result + from objects + where object_id = p_object_id; + + return result; + + exception when others then + return 0; + end; + + function restore_house (p_house_id objectid) return number -- 1=success, 2=no such object or not deleted + -- result codes: + -- 1 = success + -- 2 = not a character or not deleted + -- 3 = database error + as + cells number; + begin + + select count(*) into cells + from objects + where contained_by = p_house_id; + + if (cells = 0) then + return 3; + end if; + + update objects + set deleted = 0, deleted_date = NULL, bank_balance = bank_balance + 1000 -- roughly 1 day maintenance + where object_id = p_house_id + and deleted <> 0; + + if (sql%rowcount <> 1) then + return 2; + end if; + + update tangible_objects + set damage_taken = 0 + where object_id = p_house_id; + + update objects + set deleted = 0, deleted_date = NULL + where object_id in ( + select object_id + from objects + start with object_id = p_house_id + connect by prior object_id = contained_by) and + deleted in (select reason_code + from delete_reasons + where tag in ('House', 'ContainerDeleted')); + + fix_load_with (p_house_id, p_house_id); + + return 1; + + exception + when others then + return 3; + end; + + + function restore_character (p_player_id objectid, p_name out varchar2, p_account out number, p_template_id out number) return number + -- result codes: + -- 1 = success + -- 2 = not a character or not deleted + -- 3 = database error + as + character_reason number; + begin + select reason_code + into character_reason + from delete_reasons + where tag='CharacterDeleted'; + + begin + select station_id, object_name, object_template_id + into p_account, p_name, p_template_id + from players p, objects o + where p.character_object = p_player_id + and o.object_id = p_player_id + and o.object_id = p.character_object; + exception + when no_data_found then + return 2; + end; + + update objects + set deleted = 0, deleted_date = NULL + where object_id in ( + select object_id + from objects + start with object_id = p_player_id + connect by prior object_id = contained_by + and deleted = character_reason); + + return 1; + + exception + when others then + return 3; + end; + + function undelete_item (p_item_id objectid) return number -- 1=success, 2=no such object or not deleted + -- result codes: + -- 1 = success + -- 2 = not exist + -- 3 = database error + -- 4 = success, items needs to be loaded + as + cnt number; + l_type_id number; + l_name varchar2(4000); + l_account number; + l_template_id number; + l_load_with number; + l_result number; + begin + select count(*) into cnt + from objects + where object_id = p_item_id; + + if (cnt = 0) then + return 2; + end if; + + select count(*) into cnt + from objects + where object_id = p_item_id and (deleted <> 0 or deleted_date is not null); + + if (cnt = 0) then + return 1; + end if; + + select type_id into l_type_id + from objects + where object_id = p_item_id; + + select count(*) into cnt + from players + where character_object = p_item_id; + + if (l_type_id = 1112885583) then + -- 0x4255494f = 'BUIO', building objects + l_result := restore_house(p_item_id); + if (l_result = 1) then + return 4; + else + return l_result; + end if; + else if (l_type_id = 1129465167 and cnt > 0) then + -- 0x4352454f = 'CREO', creture objects and has a row in players table + -- This is a player + return restore_character(p_item_id, l_name, l_account, l_template_id); + else + update objects + set deleted = 0, deleted_date = null + where object_id in ( + select object_id + from objects + start with object_id = p_item_id + connect by prior object_id = contained_by); + + -- find out the top most load_with + begin + select count(*) into cnt + from objects + where (contained_by = 0 or load_contents = 'N') and rownum = 1 + start with object_id = p_item_id + connect by object_id = prior contained_by; + + if (cnt > 0) then + select object_id into l_load_with + from objects + where (contained_by = 0 or load_contents = 'N') and rownum = 1 + start with object_id = p_item_id + connect by object_id = prior contained_by; + fix_load_with(p_item_id, l_load_with); + else + fix_load_with(p_item_id, p_item_id); + end if; + + exception + when others then + return 2; + end; + end if; + end if; + select count(*) into cnt + from objects + where object_id = p_item_id and + type_id in (1112885583, -- BuildingObject + 1212763727, -- HarvesterInstallationObject + 1229869903, -- InstallationObject + 1296649807); -- ManufactureInstallationObject + if (cnt = 0) then + return 1; + else + return 4; + end if; + exception + when others then + return 2; + end; + + /** + * move an object to a player + parameters: + p_object_id item object id to move + p_target_player target player id + result: + 1: success + 2: cannot find player's inventory + 3: object not found + 4: unknown database error + 5: object is a player + + if you add an item type here, also add it to ConsoleCommandParserObject::performParsing() + 6: failed because object_template_id is 2007924155 (object/tangible/inventory/character_inventory.iff) + 7: failed because object_template_id is -1436615854 (object/tangible/mission_bag/mission_bag.iff) + 8: failed because object_template_id is -1783727815 (object/tangible/datapad/character_datapad.iff) + 9: failed because object_template_id is -172438875 (object/tangible/bank/character_bank.iff) + 10: failed because object_template_id is 2131722719 (object/weapon/melee/unarmed/unarmed_default_player.iff) + 11: failed because object_template_id is -640104330 (object/player/player.iff) + 12: failed because object_template_id is -1388112109 (object/cell/cell.iff) + 13: failed because object_template_id is -1324492681 (object/tangible/inventory/vendor_inventory.iff) + 14: failed because direct parent is a datapad object. + 15: failed because object is a building object (has an entry in the building_objects table) + 16: failed because object is an installation object (has an entry in the installation_objects table) + 17: failed because object is a ship object (has an entry in the ship_objects table) + */ + function move_item_to_player (p_object_id objectid, p_target_player objectid) return number + as + l_target_inventory objectid; + l_object_player objectid; + l_object_template_id number; + l_container_id number; + l_container_template_id number; + l_row_count number; + begin + l_object_template_id := admin.get_object_template_id(p_object_id); + l_object_player := admin.get_player_for_player(p_object_id); + l_target_inventory := admin.get_inventory_for_player(p_target_player); + + if (l_object_player <> 0) then + return 5; + end if; + + if (l_object_template_id = 2007924155) then + return 6; + end if; + + if (l_object_template_id = -1436615854) then + return 7; + end if; + + if (l_object_template_id = -1783727815) then + return 8; + end if; + + if (l_object_template_id = -172438875) then + return 9; + end if; + + if (l_object_template_id = 2131722719) then + return 10; + end if; + + if (l_object_template_id = -640104330) then + return 11; + end if; + + if (l_object_template_id = -1388112109) then + return 12; + end if; + + if (l_object_template_id = -1324492681) then + return 13; + end if; + + -- check to see if our parent is a datapad. + + l_container_id := admin.get_container_for_object(p_object_id); + l_container_template_id := get_object_template_id(l_container_id); + if (l_container_template_id = -1783727815) then + return 14; + end if; + + -- check to see if we are a building + select count(*) + into l_row_count + from building_objects + where object_id = p_object_id; + if (l_row_count > 0) then + return 15; + end if; + + select count(*) + into l_row_count + from installation_objects + where object_id = p_object_id; + if (l_row_count > 0) then + return 16; + end if; + + -- check to see if we're trying to move a ship object. + select count(*) + into l_row_count + from ship_objects + where object_id = p_object_id; + if (l_row_count >0) then + return 17; + end if; + + if (l_target_inventory <> 0) then + update objects + set contained_by = l_target_inventory, + load_with = p_target_player, + x = 0, + y = 0, + z = 0, + node_x = 0, + node_z = 0 + where object_id = p_object_id; + if (sql%rowcount = 0) then + return 3; + end if; + delete market_auctions + where item_id = p_object_id; + fix_load_with(p_object_id, p_target_player); + else + return 2; + end if; + return 1; + exception + when others then + return 4; + end; + + /** + * Fix the load_with values for anything contained by the specified object with a max depth or unlimited if max depth = -1 + */ + procedure fix_load_with_depth (p_topmost_object objectid, p_starting_loadwith objectid, p_max_depth number) as + oid_stack vaofnumber := vaofnumber(p_topmost_object); -- objects to look at + load_with_stack vaofnumber := vaofnumber(p_starting_loadwith); -- the load_with to inherit from these objects + stack_top number := 1; + parent_object number := 0; + parent_load_with number := 0; + current_load_with number := 0; + inherit_load_with number := 0; + stack_top_depth vaofnumber := vaofnumber(0); -- the depth of the object at the top of the stack + current_depth number := 0; + topmost_load_contents char(1) := ''; + begin + -- Depth-first search + + update objects set load_with = p_starting_loadwith where object_id = p_topmost_object; + + -- if the first object being fixed is demand loaded, set child object load_with values to this object + if (sql%rowcount = 1) then + select load_contents into topmost_load_contents from objects where object_id = p_topmost_object; + if (topmost_load_contents = 'N') then + load_with_stack(stack_top) := p_topmost_object; + end if; + end if; + + while (stack_top <> 0) loop + parent_object := oid_stack(stack_top); + parent_load_with := load_with_stack(stack_top); + current_depth := stack_top_depth(stack_top) + 1; + stack_top := stack_top - 1; + oid_stack.trim; + load_with_stack.trim; + + -- keep adding children unless at max depth + if (p_max_depth = -1 or current_depth <= p_max_depth) then + for x in (select object_id, player_controlled, deleted, load_contents from objects where contained_by = parent_object) loop + -- look at child objects and set their load_withs + + current_load_with := parent_load_with; + inherit_load_with := parent_load_with; + + -- load_with defaults to the parent's load with, except in special cases: + + if (x.deleted <> 0 ) then -- deleted, load with is 0 for this and all its contents + current_load_with := NULL; + inherit_load_with := NULL; + else + if (x.player_controlled = 'Y') then -- player. load with = self for this and contents, even if container is deleted + current_load_with := x.object_id; + inherit_load_with := x.object_id; + else + if (x.load_contents = 'N' and current_load_with IS NOT NULL) then -- demand-load container. contents get this as their load_with except if a parent is deleted + inherit_load_with := x.object_id; + end if; + end if; + end if; + + stack_top := stack_top + 1; + oid_stack.extend; + load_with_stack.extend; + stack_top_depth.extend; + oid_stack(stack_top) := x.object_id; + load_with_stack(stack_top) := inherit_load_with; + stack_top_depth(stack_top) := current_depth; + + update objects set load_with = current_load_with where object_id = x.object_id; + end loop; + end if; + end loop; + end; + + /** + * Fix the load_with values for anything contained by the specified object + */ + procedure fix_load_with (p_topmost_object objectid, p_starting_loadwith objectid) as + begin + fix_load_with_depth(p_topmost_object, p_starting_loadwith, -1); + end; + +end; + +/ + + GRANT EXECUTE ON "SWG"."ADMIN" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package Body BIOGRAPHY +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE BODY "SWG"."BIOGRAPHY" +as + procedure set_biography (p_owner objectid, p_biography varchar2) + as + + m_enable_db_logging INTEGER := 0; + + begin + if (p_biography is not null) then + update biographies + set biography = p_biography + where object_id = p_owner; + + if (sql%rowcount = 0) then + insert into biographies (object_id, biography) + values (p_owner, p_biography); + end if; + else + delete biographies + where object_id = p_owner; + end if; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'biography.set_biography : update error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('biography.set_biography','objectid','number',p_owner); + db_error_logger.dblogerror_values('biography.set_biography','biography','varchar2',p_biography); + END IF; + END IF; + IF (db_error_logger.reraisecheck('biography','set_biography') = 1) THEN + -- RAISE; + NULL; + END IF; + end; + end; + + function get_biography (p_owner objectid) return refcursor + as + rc refcursor; + begin + open rc for + select biography + from biographies + where object_id = p_owner; + + return rc; + end; +end; + +/ + + GRANT EXECUTE ON "SWG"."BIOGRAPHY" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package Body BLOB_DATA_CONVERSION +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE BODY "SWG"."BLOB_DATA_CONVERSION" as + +function blob_encodeoob_old(v_blob blob) return varchar2 +is + retstring varchar2(4000); + b binary_integer; +begin + if utl_raw.length(v_blob) > 1 then + for i in 1..trunc(utl_raw.length(v_blob)/2) loop + begin + b := utl_raw.CAST_TO_BINARY_INTEGER(utl_raw.SUBSTR(v_blob,(i*2)-1,2),2); + if b = 0 then + retstring := retstring || chr(15712191) || chr(1); + elsif b = 65535 then + retstring := retstring || chr(15712191) || chr(2); + elsif b = 27 then + retstring := retstring || chr(15712191) || chr(3); + elsif b > 2048 then -- 3-byte encoding + retstring := retstring || chr(((224 + mod(trunc(b / 4096), 16)) * 65536) + ((128 + mod(trunc(b / 64),64)) * 256) + (128 + mod(b, 64))); + elsif b > 127 then -- 2-byte encoding + retstring := retstring || chr((mod(trunc(b / 64),32) + 192) * 256 + (mod(b, 64) + 128)); + else + retstring := retstring || chr(b); + end if; + exception + when others then + retstring := retstring || ' '; + end; + exit when length(retstring) >= 3996; + end loop; + retstring := retstring || chr(15712191) || chr(4); + return retstring; + else + return null; + end if; +exception + when others then + return null; +end; + +function blob_encodeoob(v_blob blob) return varchar2 +is + retstring varchar2(4000); + b binary_integer; + buf1 raw(10); + buf2 raw(10); + buf raw(10); +begin + if utl_raw.length(v_blob) > 1 then + for i in 1..trunc(utl_raw.length(v_blob)/2) loop + b := utl_raw.CAST_TO_BINARY_INTEGER(utl_raw.SUBSTR(v_blob,(i*2)-1,2),2); + retstring := retstring || substr(to_char(b, '0XXXX'), 3); + exit when length(retstring) >= 3998; + end loop; + return retstring; + else + return null; + end if; +exception + when others then + return null; +end; + +function blob_hexdump(v_blob blob) return varchar2 +is + retstring varchar2(4000); + b binary_integer; +begin + if utl_raw.length(v_blob) > 0 then + for i in 1..utl_raw.length(v_blob) loop + b := utl_raw.CAST_TO_BINARY_INTEGER(utl_raw.SUBSTR(v_blob,i,1)); + retstring := retstring || to_char(b, '0x'); + end loop; + return retstring; + else + return null; + end if; +exception + when others then + return null; +end; + + +function blob_to_string(v_blob blob) return varchar2 +is + retstring varchar2(2000); + c char; + b binary_integer; +begin + if utl_raw.length(v_blob) > 0 then + -- assumes blob is in UTF16 + for i in 1..trunc(utl_raw.length(v_blob)/2) loop + b := utl_raw.CAST_TO_BINARY_INTEGER(utl_raw.SUBSTR(v_blob,(i*2)-1,2),2); + if b > 2048 then -- 3-byte encoding + retstring := retstring || chr(((224 + mod(trunc(b / 4096), 16)) * 65536) + ((128 + mod(trunc(b / 64),64)) * 256) + (128 + mod(b, 64))); + elsif b > 127 then -- 2-byte encoding + retstring := retstring || chr((mod(trunc(b / 64),32) + 192) * 256 + (mod(b, 64) + 128)); + else + retstring := retstring || chr(b); + end if; + end loop; + return retstring; + else + return null; + end if; +exception + when others then + return null; +end; + + +function string_hexdump(v_string varchar2) return varchar2 +is +begin + return blob_hexdump(utl_raw.CAST_TO_RAW(v_string)); +exception + when others then + return null; +end; + + +procedure convert_blob_data(v_item_id number) +is + i number; +begin +-- update market_auctions +-- set new_oob = blob_encodeoob(oob), +-- new_item_name = blob_to_string(item_name), +-- new_user_desc = blob_to_string(user_description) +-- where item_id = v_item_id; +-- commit; + i := 0; +end; + +end; + +/ + + GRANT EXECUTE ON "SWG"."BLOB_DATA_CONVERSION" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package Body CM_LOADER +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE BODY "SWG"."CM_LOADER" is + + FUNCTION get_location_list RETURN swg_cur + IS + + swg_cur_out swg_cur; + + BEGIN + -- Clean up orphaned vendors + DELETE from Auction_Locations + WHERE owner_id > 0 and not exists + (select 1 from objects where object_id = location_id and deleted = 0); + commit; + + OPEN swg_cur_out FOR + SELECT location_id, + owner_id, + location_name, + sales_tax, + sales_tax_bank_id, + empty_date, + last_access_date, + inactive_date, + status, + search_enabled, + entrance_charge + FROM auction_locations; + + RETURN swg_cur_out; + + END get_location_list; + + FUNCTION get_bid_list RETURN swg_cur + IS + + swg_cur_out swg_cur; + + BEGIN + OPEN swg_cur_out FOR + SELECT item_id, + bidder_id, + bid, + max_proxy_bid + FROM market_auction_bids; + + RETURN swg_cur_out; + + END get_bid_list; + + FUNCTION get_auction_list RETURN swg_cur + IS + + swg_cur_out swg_cur; + + BEGIN + OPEN swg_cur_out FOR + SELECT creator_id, + min_bid, + auction_timer, + buy_now_price, + user_description, + oob, + location_id, + item_id, + category, + item_timer, + item_name, + owner_id, + active, + item_size, + object_template_id + FROM market_auctions WHERE object_template_id IS NOT NULL; + + RETURN swg_cur_out; + + END get_auction_list; + + FUNCTION get_auction_attributes RETURN swg_cur + IS + + swg_cur_out swg_cur; + + BEGIN + OPEN swg_cur_out FOR + SELECT item_id, + attribute_name, + attribute_value + FROM market_auction_attributes; + + RETURN swg_cur_out; + + END get_auction_attributes; +end cm_loader; + +/ + + GRANT EXECUTE ON "SWG"."CM_LOADER" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package Body CM_PERSISTER +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE BODY "SWG"."CM_PERSISTER" +as + + procedure update_auction_locations (p_location_id VAOFSTRING, + p_location_name VAOFSTRING, + p_owner_id VAOFSTRING, + p_sales_tax VAOFNUMBER, + p_sales_tax_bank_id VAOFSTRING, + p_empty_date VAOFNUMBER, + p_last_access_date VAOFNUMBER, + p_inactive_date VAOFNUMBER, + p_status VAOFNUMBER, + p_search_enabled VAOFSTRING, + p_entrance_charge VAOFNUMBER, + p_chunk_size number) + as + errors number; + dml_errors EXCEPTION; + PRAGMA exception_init(dml_errors, -24381); + begin + FORALL i in 1..p_chunk_size save exceptions + UPDATE AUCTION_LOCATIONS Set + location_name = DECODE(p_location_name(i), NULL, location_name, p_location_name(i)), + owner_id = DECODE(p_owner_id(i), NULL, owner_id, p_owner_id(i)), + sales_tax = DECODE(p_sales_tax(i), NULL, sales_tax, p_sales_tax(i)), + sales_tax_bank_id = DECODE(p_sales_tax_bank_id(i), NULL, sales_tax_bank_id, p_sales_tax_bank_id(i)), + empty_date = DECODE(p_empty_date(i), NULL, empty_date, p_empty_date(i)), + last_access_date = DECODE(p_last_access_date(i), NULL, last_access_date, p_last_access_date(i)), + inactive_date = DECODE(p_inactive_date(i), NULL, inactive_date, p_inactive_date(i)), + status = DECODE(p_status(i), NULL, status, p_status(i)), + search_enabled = DECODE(p_search_enabled(i), NULL, search_enabled, p_search_enabled(i)), + entrance_charge = DECODE(p_entrance_charge(i), NULL, entrance_charge, p_entrance_charge(i)) + WHERE + location_id = p_location_id(i); + exception + when dml_errors then + errors := SQL%BULK_EXCEPTIONS.count; + end; + + procedure insert_auction_locations (p_location_id VAOFSTRING, + p_location_name VAOFSTRING, + p_owner_id VAOFSTRING, + p_sales_tax VAOFNUMBER, + p_sales_tax_bank_id VAOFSTRING, + p_empty_date VAOFNUMBER, + p_last_access_date VAOFNUMBER, + p_inactive_date VAOFNUMBER, + p_status VAOFNUMBER, + p_search_enabled VAOFSTRING, + p_entrance_charge VAOFNUMBER, + p_chunk_size number) + as + errors number; + k number; + dml_errors EXCEPTION; + PRAGMA exception_init(dml_errors, -24381); + begin + FORALL i in 1..p_chunk_size save exceptions + INSERT into auction_locations ( + location_id, + location_name, + owner_id, + sales_tax, + sales_tax_bank_id, + empty_date, + last_access_date, + inactive_date, + status, + search_enabled, + entrance_charge ) + VALUES ( + p_location_id(i), + p_location_name(i), + p_owner_id(i), + p_sales_tax(i), + p_sales_tax_bank_id(i), + p_empty_date(i), + p_last_access_date(i), + p_inactive_date(i), + p_status(i), + p_search_enabled(i), + p_entrance_charge(i) ); + exception + when dml_errors then + errors := SQL%BULK_EXCEPTIONS.count; + for j in 1..errors loop + k := SQL%BULK_EXCEPTIONS(j).ERROR_INDEX; + UPDATE auction_locations Set + location_name = p_location_name(k), + owner_id = p_owner_id(k), + sales_tax = p_sales_tax(k), + sales_tax_bank_id = p_sales_tax_bank_id(k), + empty_date = p_empty_date(k), + last_access_date = p_last_access_date(k), + inactive_date = p_inactive_date(k), + status = p_status(k), + search_enabled = p_search_enabled(k), + entrance_charge = p_entrance_charge(k) + WHERE + location_id = p_location_id(k); + end loop; + end; + + procedure delete_auction_locations (p_location_id VAOFSTRING, p_chunk_size number) + as + errors number; + dml_errors EXCEPTION; + PRAGMA exception_init(dml_errors, -24381); + begin + FORALL i in 1..p_chunk_size save exceptions + delete from auction_locations + where location_id = p_location_id(i); + exception + when dml_errors then + errors := SQL%BULK_EXCEPTIONS.count; + end; + + procedure insert_market_auction_bids (p_item_id VAOFSTRING, + p_bidder_id VAOFSTRING, + p_bid VAOFNUMBER, + p_max_proxy_bid VAOFNUMBER, + p_chunk_size number) + as + errors number; + k number; + dml_errors EXCEPTION; + PRAGMA exception_init(dml_errors, -24381); + begin + FORALL i in 1..p_chunk_size save exceptions + INSERT into market_auction_bids ( + item_id, + bidder_id, + bid, + max_proxy_bid ) + VALUES ( + p_item_id(i), + p_bidder_id(i), + p_bid(i), + p_max_proxy_bid(i) ); + exception + when dml_errors then + errors := SQL%BULK_EXCEPTIONS.count; + for j in 1..errors loop + k := SQL%BULK_EXCEPTIONS(j).ERROR_INDEX; + UPDATE market_auction_bids Set + bidder_id = p_bidder_id(k), + bid = p_bid(k), + max_proxy_bid = p_max_proxy_bid(k) + WHERE + item_id = p_item_id(k); + end loop; + end; + + procedure update_market_auctions (p_item_id VAOFSTRING, + p_owner_id VAOFSTRING, + p_active VAOFNUMBER, + p_chunk_size number) + as + errors number; + dml_errors EXCEPTION; + PRAGMA exception_init(dml_errors, -24381); + begin + FORALL i in 1..p_chunk_size save exceptions + UPDATE market_auctions Set + owner_id = DECODE(p_owner_id(i), NULL, owner_id, p_owner_id(i)), + active = DECODE(p_active(i), NULL, active, p_active(i)) + WHERE + item_id = p_item_id(i); + exception + when dml_errors then + errors := SQL%BULK_EXCEPTIONS.count; + end; + + procedure insert_market_auctions (p_item_id VAOFSTRING, + p_owner_id VAOFSTRING, + p_creator_id VAOFSTRING, + p_location_id VAOFSTRING, + p_min_bid VAOFNUMBER, + p_buy_now_price VAOFNUMBER, + p_auction_timer VAOFNUMBER, + p_oob VAOFLONGSTRING, + p_user_description VAOFLONGSTRING, + p_category VAOFNUMBER, + p_item_name VAOFLONGSTRING, + p_item_timer VAOFNUMBER, + p_active VAOFNUMBER, + p_item_size VAOFNUMBER, + p_object_template_id VAOFNUMBER, + p_chunk_size number) + as + errors number; + k number; + dml_errors EXCEPTION; + PRAGMA exception_init(dml_errors, -24381); + begin + FORALL i in 1..p_chunk_size save exceptions + INSERT into market_auctions ( + item_id, + owner_id, + creator_id, + location_id, + min_bid, + buy_now_price, + auction_timer, + oob, + user_description, + category, + item_name, + item_timer, + active, + item_size, + object_template_id ) + VALUES ( + p_item_id(i), + p_owner_id(i), + p_creator_id(i), + p_location_id(i), + p_min_bid(i), + p_buy_now_price(i), + p_auction_timer(i), + p_oob(i), + p_user_description(i), + p_category(i), + p_item_name(i), + p_item_timer(i), + p_active(i), + p_item_size(i), + p_object_template_id(i) ); + exception + when dml_errors then + errors := SQL%BULK_EXCEPTIONS.count; + for j in 1..errors loop + k := SQL%BULK_EXCEPTIONS(j).ERROR_INDEX; + UPDATE market_auctions Set + owner_id = p_owner_id(k), + creator_id = p_creator_id(k), + location_id = p_location_id(k), + min_bid = p_min_bid(k), + buy_now_price = p_buy_now_price(k), + auction_timer = p_auction_timer(k), + oob = p_oob(k), + user_description = p_user_description(k), + category = p_category(k), + item_name = p_item_name(k), + item_timer = p_item_timer(k), + active = p_active(k), + item_size = p_item_size(k), + object_template_id = p_object_template_id(k) + WHERE + item_id = p_item_id(k); + end loop; + end; + + procedure delete_market_auctions (p_item_id VAOFSTRING, p_chunk_size number) + as + errors number; + dml_errors EXCEPTION; + PRAGMA exception_init(dml_errors, -24381); + begin + FORALL i in 1..p_chunk_size save exceptions + delete from market_auction_attributes + where item_id = p_item_id(i); + + FORALL i in 1..p_chunk_size save exceptions + delete from market_auctions + where item_id = p_item_id(i); + --exception + --when dml_errors then + --errors := SQL%BULK_EXCEPTIONS.count; + end; + + procedure insert_auction_attributes (p_item_id VAOFSTRING, p_attribute_name VAOFSTRING, p_attribute_value VAOFSTRING, p_chunk_size number) + as + dml_errors EXCEPTION; + PRAGMA exception_init(dml_errors, -24381); + begin + FORALL i in 1..p_chunk_size save exceptions + insert into market_auction_attributes (item_id, attribute_name, attribute_value) + values (p_item_id(i), p_attribute_name(i), p_attribute_value(i)); + exception when dml_errors then + null; + end; +end; + +/ + + GRANT EXECUTE ON "SWG"."CM_PERSISTER" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package Body CUSTSERV_PROCS +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE BODY "SWG"."CUSTSERV_PROCS" +as + + function get_characters_for_account + ( + station_id_in IN players.station_id%TYPE + ) + return cursortype + is + result cursortype; + begin + open result for + select + character_object, uc_character_name + from + players + where + station_id = station_id_in; + return result; + end get_characters_for_account; + + function get_deleted_items + ( + character_id_in IN objects.load_with%TYPE, + start_page_in IN number + ) + return cursortype + is + result cursortype; + begin + open result for + select * from + (select a.*, rownum RN from + ( select + o.object_id, name_string_table, name_string_text, object_name + from objects o, + (select object_id from objects where contained_by = character_id_in and object_template_id = -1783727815) datapad, + (select object_id from tangible_objects where owner_id = character_id_in) tangibles + where + ( deleted > 0 ) + and ( o.object_id = tangibles.object_id + or contained_by = datapad.object_id) + order by deleted_date desc ) a + where rownum <= start_page_in * 20 + 20) + where rn >= start_page_in * 20; + return result; + end get_deleted_items; + + function get_structures + ( + character_id_in IN objects.object_id%TYPE + ) + return cursortype + is + result cursortype; + begin + open result for + select o.object_id as object_id, + o.x as x, + o.y as y, + o.z as z, + o.scene_id as scene_id, + o.name_string_text as object_template, + o.deleted as deleted + from objects o, tangible_objects tan + where tan.owner_id = character_id_in + and tan.object_id = o.object_id + and ( (o.object_id in (select object_id from building_objects ) ) + or ( o.object_id in (select object_id from installation_objects) ) ); + return result; + end get_structures; + + function get_player_id + ( + character_name_in IN players.uc_character_name%TYPE + ) + return cursortype + is + result cursortype; + begin + open result for + select character_object, station_id + from players + where upper(uc_character_name) = upper(character_name_in); + return result; + end get_player_id; + + procedure move_player + ( + character_id_in IN objects.object_id%TYPE, + x_in IN objects.x%TYPE, + y_in IN objects.y%TYPE, + z_in IN objects.z%TYPE, + scene_in IN objects.scene_id%TYPE + ) + as + begin + update objects + set x = x_in, + y = y_in, + z = z_in, + scene_id = scene_in + where object_id = character_id_in; + end move_player; + + procedure undelete_item + ( + character_id_in IN objects.object_id%TYPE, + object_in IN objects.object_id%TYPE, + move_in IN number + ) + as + restore_result number; + begin + restore_result := admin.undelete_item(object_in); + if ((restore_result != 1) and (restore_result != 4)) then + return; + end if; + + if (move_in > 0) then + restore_result := admin.move_item_to_player(object_in, character_id_in); + end if; + return; + exception + when others then + return; + end undelete_item; + +end custserv_procs; + +/ + + GRANT EXECUTE ON "SWG"."CUSTSERV_PROCS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package Body DATALOOKUP +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE BODY "SWG"."DATALOOKUP" +as + + function check_character_name(p_name varchar2) return number as + obj_id number; + begin + select character_object + into obj_id + from players + where uc_character_name = p_name; + + if (obj_id is null) then + return 0; + else + return 1; + end if; + + exception + when no_data_found then + return 0; + + when too_many_rows then + return 1; + end; + + function get_structures_for_purge(p_station_id number) return refcursor + as + result_cursor refcursor; + begin + open result_cursor for + select o.object_id, t.owner_id + from players p, tangible_objects t, objects o + where p.station_id = p_station_id + and p.character_object = t.owner_id + and t.object_id = o.object_id + and o.contained_by = 0 + and o.deleted = 0 + and o.type_id in (1112885583, 1212763727, 1296649807) --house, harvester, factory + -- exclude city halls and faction hqs + and o.object_template_id not in + (2104917241, -1402078881, -1650739949, 1078805016, -1085193189, -2036447549, + -1503538066, 1083153409, -1889839602, 2103485856, -1318727266, -447776542, + -278088733, 456016075, 2103180392, -1782254683, 1221154416, 943757712, + 344955127, -1651881206, -1428516812, 121334480, -1391658348, 585958560, + 1568866170, -970221632, 1490696786, -274776875, 1419804026, -1907246, + -714325274, -2102543938, -382786695); + + return result_cursor; + end; + + function get_vendors_for_purge(p_station_id number) return refcursor + as + result_cursor refcursor; + begin + open result_cursor for + -- get all vendors owned by this station_id + select o.object_id, t.owner_id, o.object_name + from players p, tangible_objects t, objects o + where p.station_id = p_station_id + and p.character_object = t.owner_id + and t.object_id = o.object_id + and o.deleted = 0 + and o.script_list like '%terminal.vendor:%' + + union + -- plus all vendors in purge structures owned by this station_id + select t.object_id, t.owner_id, o.object_name + from tangible_objects t, objects o + where t.object_id in + ( + select object_id + from objects + where deleted = 0 + and script_list like '%terminal.vendor:%' + start with object_id in + ( + select o.object_id + from players p, tangible_objects t, objects o + where p.station_id = p_station_id + and p.character_object = t.owner_id + and t.object_id = o.object_id + and o.deleted = 0 + and o.type_id in (1112885583, 1212763727, 1296649807) --house, harvester, factory + -- exclude city halls and faction hqs + and o.object_template_id not in + (2104917241, -1402078881, -1650739949, 1078805016, -1085193189, -2036447549, + -1503538066, 1083153409, -1889839602, 2103485856, -1318727266, -447776542, + -278088733, 456016075, 2103180392, -1782254683, 1221154416, 943757712, + 344955127, -1651881206, -1428516812, 121334480, -1391658348, 585958560, + 1568866170, -970221632, 1490696786, -274776875, 1419804026, -1907246, + -714325274, -2102543938, -382786695) + ) + connect by contained_by = prior object_id + ) and t.object_id = o.object_id; + + return result_cursor; + end; +end; + +/ + + GRANT EXECUTE ON "SWG"."DATALOOKUP" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package Body DATA_CLEANUP +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE BODY "SWG"."DATA_CLEANUP" +as + procedure run_cleanup as + begin + delete messages + where not exists ( + select 1 from objects + where objects.object_id = messages.target); + end; + + procedure run_fix_bad_cells as + + v_count PLS_INTEGER := 0; + + begin + + FOR x IN + ( + SELECT * from + ( + SELECT a.object_id, a.contained_by, a.load_with, a.deleted, + (select contained_by from objects where object_id = a.contained_by) contained_by_value + FROM objects a, cell_objects b + WHERE a.object_id = b.object_id + ) + where contained_by_value = 0 and + contained_by != load_with + ) + LOOP + + UPDATE objects + SET load_with = x.contained_by + where object_id = x.object_id; + + v_count := v_count + 1; + IF (MOD(v_count, 1000) = 0) then + COMMIT; + END IF; + + END LOOP; + + COMMIT; + + run_fix_houses_w_bad_cells; + + end; + + procedure run_fix_houses_w_bad_cells as + + v_count PLS_INTEGER := 0; + v_last_contained_by NUMBER := -1; + v_current_contained_by NUMBER := 0; + v_retval NUMBER; + + begin + + FOR x IN + ( + select o1.object_id, o1.contained_by + from cell_objects c, objects o1, objects o2 + where c.object_id = o1.object_id + and o1.deleted > 0 + and o2.object_id = o1.contained_by + and o2.deleted = 0 + order by o1.contained_by + ) + LOOP + + v_current_contained_by := x.contained_by; + + UPDATE objects + SET deleted = 13, + deleted_date = SYSDATE + 100 + where object_id = x.object_id; + + IF (((v_current_contained_by != v_last_contained_by) and v_last_contained_by >=0)) THEN + + UPDATE objects + SET deleted = 13, + deleted_date = SYSDATE + 100 + where object_id = v_last_contained_by; + + v_retval := admin.restore_house (v_last_contained_by); + -- result codes: + -- 1 = success + -- 2 = not a character or not deleted + -- 3 = database error + + + END IF; + + + v_count := v_count + 1; + IF (MOD(v_count, 1000) = 0) then + COMMIT; + END IF; + + v_last_contained_by := v_current_contained_by; + + END LOOP; + + UPDATE objects + SET deleted = 13, + deleted_date = SYSDATE + 100 + where object_id = v_last_contained_by; + + v_retval := admin.restore_house (v_last_contained_by); + + + COMMIT; + + end; + + function getObjectsWithExpMessages return cursortype as + result_cursor cursortype; + begin + open result_cursor for + select target from messages where method='C++experience' group by target having count(*) > 100 order by count(*) desc; + + return result_cursor; + end; + + function getExperienceGrants(p_object_id objectid) return cursortype as + result_cursor cursortype; + begin + open result_cursor for + select data from messages where target=p_object_id and method='C++experience'; + + return result_cursor; + end; + + procedure delete_experience(p_object_id objectid) as + begin + delete messages where target=p_object_id and method='C++experience'; + end; + + procedure grant_experience(p_object_id objectid, p_experience_data varchar2) as + begin + insert into messages (message_id, target, method, data, call_time, guaranteed, delivery_type) + values (objectidmanager.get_single_id(), p_object_id, 'C++experience', p_experience_data, 0, 'Y', 0); + end; + + + + + + + -- Delete 10,000 unused object variables at a time + function object_variable_name_cleanup return number + as + begin + delete from object_variable_names where id not in (select name_id from object_variables group by name_id) and rownum < 10000; + commit; + return sql%rowcount; + end; + + + + -- Delete 25,000 orphaned rows at a time + function orphaned_object_cleanup return number + as + begin + update objects set deleted = 7 where contained_by != 0 and contained_by not in (select object_id from objects) and deleted = 0 and rownum < 25000; + commit; + return sql%rowcount; + end; + + + -- Delete 10,000 orphaned attribute rows at a time + function market_attributes_cleanup return number + as + begin + delete from market_auction_attributes where market_auction_attributes.ITEM_ID not in (select market_auctions.ITEM_ID from market_auctions group by market_auctions.ITEM_ID) and rownum < 10000; + commit; + return sql%rowcount; + end; + + + -- Delete 50,000 orphaned message rows at a time + function messages_cleanup return number + as + begin + + delete messages + where not exists ( + select 1 from objects + where objects.object_id = messages.target) and rownum < 50000; + commit; + return sql%rowcount; + end; + + + -- Delete 25,000 orphaned vendor object rows at a time + function vendor_object_cleanup return number + as + begin + update objects set deleted = 9 where + deleted = 0 + and + object_id not in (select item_id from market_auctions) + and + contained_by in (select object_id from objects where script_list like '%terminal.vendor:%') + and + rownum < 25000; + + commit; + return sql%rowcount; + end; + + + + + -- Delete 10,000 broken object rows at a time + function broken_object_cleanup return number + as + numrows number; + begin + numrows := 0; + + + delete from building_objects where not exists ( select 1 from objects where objects.object_id = building_objects.object_id ) and rownum < 10000; + commit; + numrows := numrows + sql%rowcount; + + delete from cell_objects where not exists ( select 1 from objects where objects.object_id = cell_objects.object_id ) and rownum < 10000; + commit; + numrows := numrows + sql%rowcount; + + delete from city_objects where not exists ( select 1 from objects where objects.object_id = city_objects.object_id ) and rownum < 10000; + commit; + numrows := numrows + sql%rowcount; + + delete from creature_objects where not exists ( select 1 from objects where objects.object_id = creature_objects.object_id ) and rownum < 10000; + commit; + numrows := numrows + sql%rowcount; + + delete from factory_objects where not exists ( select 1 from objects where objects.object_id = factory_objects.object_id ) and rownum < 10000; + commit; + numrows := numrows + sql%rowcount; + + delete from harvester_installation_objects where not exists ( select 1 from objects where objects.object_id = harvester_installation_objects.object_id ) and rownum < 10000; + commit; + numrows := numrows + sql%rowcount; + + delete from installation_objects where not exists ( select 1 from objects where objects.object_id = installation_objects.object_id ) and rownum < 10000; + commit; + numrows := numrows + sql%rowcount; + + delete from intangible_objects where not exists ( select 1 from objects where objects.object_id = intangible_objects.object_id ) and rownum < 10000; + commit; + numrows := numrows + sql%rowcount; + + delete from manf_schematic_objects where not exists ( select 1 from objects where objects.object_id = manf_schematic_objects.object_id ) and rownum < 10000; + commit; + numrows := numrows + sql%rowcount; + + delete from manufacture_inst_objects where not exists ( select 1 from objects where objects.object_id = manufacture_inst_objects.object_id ) and rownum < 10000; + commit; + numrows := numrows + sql%rowcount; + + delete from mission_objects where not exists ( select 1 from objects where objects.object_id = mission_objects.object_id ) and rownum < 10000; + commit; + numrows := numrows + sql%rowcount; + + delete from planet_objects where not exists ( select 1 from objects where objects.object_id = planet_objects.object_id ) and rownum < 10000; + commit; + numrows := numrows + sql%rowcount; + + delete from player_objects where not exists ( select 1 from objects where objects.object_id = player_objects.object_id ) and rownum < 10000; + commit; + numrows := numrows + sql%rowcount; + + delete from ship_objects where not exists ( select 1 from objects where objects.object_id = ship_objects.object_id ) and rownum < 10000; + commit; + numrows := numrows + sql%rowcount; + + delete from static_objects where not exists ( select 1 from objects where objects.object_id = static_objects.object_id ) and rownum < 10000; + commit; + numrows := numrows + sql%rowcount; + + delete from tangible_objects where not exists ( select 1 from objects where objects.object_id = tangible_objects.object_id ) and rownum < 10000; + commit; + numrows := numrows + sql%rowcount; + + delete from token_objects where not exists ( select 1 from objects where objects.object_id = token_objects.object_id ) and rownum < 10000; + commit; + numrows := numrows + sql%rowcount; + + delete from universe_objects where not exists ( select 1 from objects where objects.object_id = universe_objects.object_id ) and rownum < 10000; + commit; + numrows := numrows + sql%rowcount; + + delete from vehicle_objects where not exists ( select 1 from objects where objects.object_id = vehicle_objects.object_id ) and rownum < 10000; + commit; + numrows := numrows + sql%rowcount; + + delete from weapon_objects where not exists ( select 1 from objects where objects.object_id = weapon_objects.object_id ) and rownum < 10000; + commit; + numrows := numrows + sql%rowcount; + + return numrows; + end; + + +end; + +/ + + GRANT EXECUTE ON "SWG"."DATA_CLEANUP" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package Body DB_ERROR_LOGGER +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE BODY "SWG"."DB_ERROR_LOGGER" + as + procedure dblogerror( p_ora_errno number, p_notes varchar2 default NULL) + as + + PRAGMA AUTONOMOUS_TRANSACTION; + + v_ora_errmsg varchar2(255); + v_schema varchar2(30); + v_module varchar2(80); + v_notes varchar2(4000); + + begin + + v_ora_errmsg := SQLERRM(p_ora_errno); + stack_search(2, v_schema, v_module); + + if length(p_notes) > 4000 then + v_notes := substr(p_notes,1,4000); + else + v_notes := p_notes; + end if; + + insert into errorlog + ( error_id, + ora_errno, + ora_errmsg, + schema_name, + module_name, + notes ) + values + ( seq_errorlog.nextval, + p_ora_errno, + v_ora_errmsg, + v_schema, + v_module, + v_notes ); + + COMMIT; + + exception + when others then + NULL; + end; + + procedure dblogerror_values( p_owner varchar2, p_name varchar2, p_type varchar2, p_value varchar2) + as + + PRAGMA AUTONOMOUS_TRANSACTION; + v_value varchar2(4000); + + begin + + if length(p_value) > 4000 then + v_value := substr(p_value,1,4000); + else + v_value := p_value; + end if; + + insert into errorlog_values + ( error_id, + element_owner, + element_name, + element_type, + element_value ) + values + ( seq_errorlog.currval, + p_owner, + p_name, + p_type, + v_value ); + + COMMIT; + + exception + when others then + NULL; + + end; + + procedure stack_search ( i_search in integer, o_schema out varchar2, o_module out varchar2 ) + ----- + -- Returns the schema and module of the specified stack level + -- (specified by i_search). Stack level 0 is this proc. + -- Stack level 1 is this proc's caller. Level 2 is THEIR + -- caller. And so on. + ----- + as + call_stack varchar2(4096) default dbms_utility.format_call_stack; + n number; + m_found_stack boolean default false; + m_line varchar2(255); + m_count number := 0; + m_start integer := 1; + m_end integer := -1; + begin + o_schema := 'Not found'; + o_module := 'Not found'; + loop + m_end := instr( call_stack, chr(10), m_start ); + exit when ( m_count > i_search or m_end is NULL or m_end = 0 ); + m_line := ltrim(substr( call_stack, m_start + 20, m_end - (m_start + 20 ))); + m_start := m_end + 1; + -- Remove formatted stack header + if ( NOT m_found_stack ) then + if ( m_line like 'name%' ) then + m_found_stack := TRUE; + end if; + else + if ( m_count = i_search ) then + if ( m_line like 'pr%' ) then + n := length( 'procedure ' ); + elsif ( m_line like 'fun%' ) then + n := length( 'function ' ); + elsif ( m_line like 'package body%' ) then + n := length( 'package body ' ); + elsif ( m_line like 'pack%' ) then + n := length( 'package ' ); + else + n := length( 'anonymous block ' ); + end if; + m_line := substr( m_line, n ); + n := instr( m_line, '.' ); + o_schema := ltrim(rtrim(substr( m_line, 1, n-1 ))); + o_module := ltrim(rtrim(substr( m_line, n+1 ))); + end if; + m_count := m_count + 1; + end if; + end loop; +end stack_search; + + function getloglevel + RETURN INTEGER + as + + m_level INTEGER; + + begin + + select levelid + into m_level + from errorlog_level; + + return m_level; + + exception + when others then + return 0; + + end getloglevel; + + +function reraisecheck ( p_package varchar2 default NULL, p_procedure varchar2 default NULL) +return INTEGER +as + +PRAGMA AUTONOMOUS_TRANSACTION; + + m_unlimited_errors INTEGER; + m_errorlimit INTEGER; + m_errorcount INTEGER; +begin + + if (p_package IS NULL or p_procedure IS NULL) then + return 1; + else + update errorlog_reraise_limits + set errorcount = errorcount + 1 + where package = p_package and + procedure = p_procedure; + + commit; + + if (sql%rowcount = 0) then + return 1; + else + select unlimited_flag, errorlimit, errorcount + into m_unlimited_errors, m_errorlimit, m_errorcount + from errorlog_reraise_limits + where package = p_package and + procedure = p_procedure; + + if (m_unlimited_errors = 1) then + return 0; + else + if (m_errorcount <= m_errorlimit) then + return 0; + end if; + end if; + end if; + end if; + + + + return 1; + +exception + when others then + return 1; + +end reraisecheck; + +end; + +/ + + GRANT EXECUTE ON "SWG"."DB_ERROR_LOGGER" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package Body GOLD_OVERRIDE +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE BODY "SWG"."GOLD_OVERRIDE" as + + function load_objvar_overrides(p_schema varchar2) return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + 'select /*+ ORDERED USE_NL(T)*/ ' || + 't.object_id, t.name_id, t.type, t.value ' || + 'from ' || + p_schema || 'object_list l, ' || + 'object_variables t ' || + 'where l.object_id = t.object_id ' || + 'and nvl(t.detached,0) = 0'; + + return result_cursor; + end; + +end; + +/ + + GRANT EXECUTE ON "SWG"."GOLD_OVERRIDE" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package Body LAZY_DELETER +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE BODY "SWG"."LAZY_DELETER" as + + procedure purge_one_object (object_in in number) as + BEGIN + DELETE FROM armor WHERE object_id = object_in; + DELETE FROM battlefield_marker_objects WHERE object_id = object_in; + DELETE FROM battlefield_participants WHERE region_object_id = object_in; + DELETE FROM battlefield_participants WHERE character_object_id = object_in; + DELETE FROM biographies WHERE object_id = object_in; + DELETE FROM building_objects WHERE object_id = object_in; + DELETE FROM cell_objects WHERE object_id = object_in; + DELETE FROM city_objects WHERE object_id = object_in; + DELETE FROM creature_objects WHERE object_id = object_in; + DELETE FROM experience_points WHERE object_id = object_in; + DELETE FROM factory_objects WHERE object_id = object_in; + DELETE FROM guild_objects WHERE object_id = object_in; + DELETE FROM harvester_installation_objects WHERE object_id = object_in; + DELETE FROM installation_objects WHERE object_id = object_in; + DELETE FROM intangible_objects WHERE object_id = object_in; + DELETE FROM location_lists WHERE object_id = object_in; + DELETE FROM manf_schematic_attributes WHERE object_id = object_in; + DELETE FROM manf_schematic_objects WHERE object_id = object_in; + DELETE FROM manufacture_inst_objects WHERE object_id = object_in; + DELETE FROM mission_objects WHERE object_id = object_in; + DELETE FROM object_variables WHERE object_id = object_in; + DELETE FROM planet_objects WHERE object_id = object_in; + DELETE FROM player_objects WHERE object_id = object_in; + DELETE FROM player_quest_objects WHERE object_id = object_in; + DELETE FROM property_lists WHERE object_id = object_in; + DELETE FROM resource_container_objects WHERE object_id = object_in; + DELETE FROM scripts WHERE object_id = object_in; + DELETE FROM ship_objects WHERE object_id = object_in; + DELETE FROM static_objects WHERE object_id = object_in; + DELETE FROM swg_characters WHERE object_id = object_in; + DELETE FROM tangible_objects WHERE object_id = object_in; + DELETE FROM temp_characters WHERE object_id = object_in; + DELETE FROM token_objects WHERE object_id = object_in; + DELETE FROM universe_objects WHERE object_id = object_in; + DELETE FROM vehicle_objects WHERE object_id = object_in; + DELETE FROM waypoints WHERE object_id = object_in; + DELETE FROM weapon_objects WHERE object_id = object_in; + DELETE FROM messages WHERE target = object_in; + DELETE FROM objects WHERE object_id = object_in; + END purge_one_object; + + procedure purge_objects_bulk(p_object_id VAOFSTRING, p_chunk_size number, p_enable_db_logging number ) + as + + errors NUMBER; + + begin + + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM armor WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM battlefield_marker_objects WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM battlefield_participants WHERE region_object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM battlefield_participants WHERE character_object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM biographies WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM building_objects WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM cell_objects WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM city_objects WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM creature_objects WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM experience_points WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM factory_objects WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM guild_objects WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM harvester_installation_objects WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM installation_objects WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM intangible_objects WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM location_lists WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM manf_schematic_attributes WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM manf_schematic_objects WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM manufacture_inst_objects WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM mission_objects WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM object_variables WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM planet_objects WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM player_objects WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM player_quest_objects WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM property_lists WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM resource_container_objects WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM scripts WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM static_objects WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM swg_characters WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM tangible_objects WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM temp_characters WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM token_objects WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM universe_objects WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM vehicle_objects WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM waypoints WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM weapon_objects WHERE object_id = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM messages WHERE target = p_object_id(i); + FORALL i in 1..p_chunk_size SAVE EXCEPTIONS DELETE FROM objects WHERE object_id = p_object_id(i); + + exception when others then + if ( p_enable_db_logging > 0 ) then + errors:=SQL%BULK_EXCEPTIONS.COUNT; + FOR x IN 1..errors LOOP + db_error_logger.dblogerror( -SQL%BULK_EXCEPTIONS(x).ERROR_CODE, 'procedure purge_objects_bulk: error occurred in FORALL DELETE during iteration: ' || SQL%BULK_EXCEPTIONS(x).ERROR_INDEX ); + if ( p_enable_db_logging > 1 ) then + db_error_logger.dblogerror_values( 'lazy deleter', 'object_id' , 'number', p_object_id(to_number(SQL%BULK_EXCEPTIONS(x).ERROR_INDEX))); + end if; + END LOOP; + + else + NULL; + end if; + + end; + +end lazy_deleter; + +/ + + GRANT EXECUTE ON "SWG"."LAZY_DELETER" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package Body LOADER +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE BODY "SWG"."LOADER" as + + procedure get_version_number(current_version in out number, min_version in out number) + as + begin + select version_number, min_version_number + into current_version, min_version + from version_number; + end; + + function get_character_name_list return cursortype + as + result_cursor cursortype; + begin + -- free up names that aren't in use anymore + delete from players + where not exists (select 1 from objects where objects.object_id = character_object); + + open result_cursor for + select character_object, station_id, uc_character_name, character_full_name, + (create_time - to_date('01/01/1970', 'MM/DD/YYYY')) * 24 * 3600, + (last_login_time - to_date('01/01/1970', 'MM/DD/YYYY')) * 24 * 3600 + from players; + + return result_cursor; + end; + + function locate_player (p_object_id number) return number + as + begin + insert into object_list (object_id, container_level) + select object_id, 100 + from objects + where load_with = p_object_id and deleted = 0; + + return sql%rowcount; + end; + + procedure locate_universe + as + begin + insert into object_list (object_id) + select o.object_id + from objects o, universe_objects u + where o.object_id = u.object_id + and o.deleted=0; + end; + + procedure locate_contained_object (p_container_id number, p_object_id number) + as + begin + insert into object_list (object_id, container_level) + select object_id, 100 + from objects o + start with + o.object_id = p_object_id + and o.contained_by = p_container_id + and o.deleted = 0 + connect by + prior o.object_id = o.contained_by + and o.deleted = 0; + end; + + function locate_by_loadwith_batch (p_loadwiths vaofstring, p_chunk_size number) + return number + as + begin + forall i in 1..p_chunk_size + insert into object_list (object_id) + select o.object_id + from objects o + where o.load_with = p_loadwiths(i) and o.deleted = 0; + + return sql%rowcount; + end; + + procedure locate_contents (p_container_id number) + as + begin + insert into object_list (object_id, container_level) + select object_id, 100 + from objects o + where o.load_with = p_container_id and o.deleted = 0; + end; + + procedure locate_structure (p_object_id number, p_x out number, p_z out number, p_scene_id out varchar2, p_found out number) + as + begin + select x, z, scene_id, 1 into p_x, p_z, p_scene_id, p_found + from objects + where object_id = p_object_id and deleted = 0 and + type_id in (1112885583, -- BuildingObject + 1212763727, -- HarvesterInstallationObject + 1229869903, -- InstallationObject + 1296649807); -- ManufactureInstallationObject + exception + when no_data_found then + p_found := 0; + end; + + function get_characters (p_station_id number) return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select + character_object, + object_template_id, + scene_id, + object_name, + container, + x, + y, + z + from character_view + where station_id = p_station_id; + + return result_cursor; + end; + + function load_chunk_object_list (p_scene_id varchar, p_node_x float, p_node_z float) return number + as + num number; + begin + select count(*) + into num + from objects + where node_x = p_node_x + and node_z = p_node_z + and scene_id = p_scene_id + and deleted = 0; + + if (num > 0) then + insert into object_list (object_id, container_level) + select object_id, level + from objects + start with + node_x = p_node_x + and node_z = p_node_z + and scene_id = p_scene_id + and deleted = 0 + and contained_by = 0 + and player_controlled = 'N' + connect by + prior object_id = contained_by + and deleted = 0 + and player_controlled='N' + and prior load_contents='Y'; + + return sql%rowcount; + else + return 0; + end if; + end; + + function load_manf_schematic_attributes return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T) */ t.object_id, t.attribute_type, t.value + from + object_list l, + manf_schematic_attributes t + where t.object_id = l.object_id; + + return result_cursor; + end; + + function load_armor return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T) */ + t.object_id, + t.layer, + t.object_template, + t.effectiveness, + t.integrity, + t.special_protections, + t.encumberance_0, + t.encumberance_1, + t.encumberance_2, + t.encumberance_3, + t.encumberance_4, + t.encumberance_5, + t.encumberance_6, + t.encumberance_7, + t.encumberance_8 + from + object_list l, + armor t + where t.object_id = l.object_id; + + return result_cursor; + end; + + function load_scripts return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T)*/ + t.object_id, t.script, t.sequence_no + from + object_list l, + scripts t + where t.object_id = l.object_id; + + return result_cursor; + end; + + function load_object_variables return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T)*/ + t.object_id, t.name_id, t.type, t.value + from + object_list l, + object_variables t + where l.object_id = t.object_id + and nvl(t.detached,0) = 0; + + return result_cursor; + end; + + function load_property_lists return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T) */ + t.object_id, t.list_id, t.value + from object_list l, property_lists t + where t.object_id = l.object_id; + + return result_cursor; + end; + + function load_experience return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T) */ + t.object_id, t.experience_type, t.points + from object_list l, experience_points t + where t.object_id = l.object_id; + + return result_cursor; + end; + + function load_battlefield_participants return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select t.region_object_id, t.character_object_id, t.faction_id /*+ ORDERED USE_NL(T) */ + from object_list l, battlefield_participants t + where t.region_object_id = l.object_id; -- order does not matter + + return result_cursor; + end; + + function load_messages return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(MESSAGES) */ + target, message_id, method, data, call_time, guaranteed, delivery_type + from object_list, messages + where target =object_list.object_id; + + return result_cursor; + end; + + function load_location return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T) */ + t.object_id, + t.list_id, + t.sequence_number, + t.name, + t.scene, + t.x, + t.y, + t.z, + t.radius + from + object_list l, + location_lists t + where t.object_id = l.object_id; + + return result_cursor; + end; + + function load_object + return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T) */ + t.object_id, + x, + y, + z, + quaternion_w, + quaternion_x, + quaternion_y, + quaternion_z, + node_x, + node_y, + node_z, + object_template_id, + type_id, + scene_id, + controller_type, + deleted, + object_name, + volume, + contained_by, + slot_arrangement, + player_controlled, + cache_version, + load_contents, + cash_balance, + bank_balance, + complexity, + name_string_table, + name_string_text, + static_item_name, + nvl(static_item_version,0), + nvl(conversion_id,0), + load_with, + objvar_0_name, + objvar_0_type, + objvar_0_value, + objvar_1_name, + objvar_1_type, + objvar_1_value, + objvar_2_name, + objvar_2_type, + objvar_2_value, + objvar_3_name, + objvar_3_type, + objvar_3_value, + objvar_4_name, + objvar_4_type, + objvar_4_value, + objvar_5_name, + objvar_5_type, + objvar_5_value, + objvar_6_name, + objvar_6_type, + objvar_6_value, + objvar_7_name, + objvar_7_type, + objvar_7_value, + objvar_8_name, + objvar_8_type, + objvar_8_value, + objvar_9_name, + objvar_9_type, + objvar_9_value, + objvar_10_name, + objvar_10_type, + objvar_10_value, + objvar_11_name, + objvar_11_type, + objvar_11_value, + objvar_12_name, + objvar_12_type, + objvar_12_value, + objvar_13_name, + objvar_13_type, + objvar_13_value, + objvar_14_name, + objvar_14_type, + objvar_14_value, + objvar_15_name, + objvar_15_type, + objvar_15_value, + objvar_16_name, + objvar_16_type, + objvar_16_value, + objvar_17_name, + objvar_17_type, + objvar_17_value, + objvar_18_name, + objvar_18_type, + objvar_18_value, + objvar_19_name, + objvar_19_type, + objvar_19_value, + script_list, + l.container_level + from + object_list l, + objects t + where + t.object_id=l.object_id; + + return result_cursor; + end; + + function verify_containment_chain(p_start_with_object_id in number) return number + as + -- result codes: + -- 1 = containment chain is recursive and is in starting(character) object chain + -- (can be fixed by placing the object in the world if its a character) + -- 2 = containment chain is recursive but not in starting object chain (this must be fixed manually) + -- 3 = no recursion in containment chain + + m_retval pls_integer; + m_temp pls_integer; + begin +/* m_retval := 2; + + select count(*) into m_temp + from objects + start with object_id = p_start_with_object_id + connect by prior object_id = contained_by + and object_id != p_start_with_object_id; +*/ + m_retval := 1; + + select count(*) into m_temp + from objects + start with object_id = p_start_with_object_id + connect by object_id = prior contained_by; + + m_retval := 3; + + return m_retval; + exception + when others then + return m_retval; + end; + + function fix_player_containment_chain(p_start_with_object_id in number) return number + as + -- result codes: + -- 0 = database error + -- 4 = success fix player containment issues + + PRAGMA AUTONOMOUS_TRANSACTION; + + begin + update objects set contained_by = 0 where object_id = p_start_with_object_id; + admin.fix_load_with(p_start_with_object_id, p_start_with_object_id); + commit; + + return 4; + + exception + when others then + return 0; + end; + + + +procedure verify_character (p_station_id in number, p_character_id in number, p_gold_schema in varchar2, p_approved out varchar2, p_character_name out varchar2, p_scene_id out varchar2, p_container_id out number, p_x out number, p_y out number, p_z out number, p_containment_check out number) + as + + -- p_containment_check is a flag indicating the containment stautus to be used for logging on the C sid + -- 0 = there was a database error trying to fix containment + -- 1 = there is a recursive containment error in the character object chain that wasn't fixed + -- 2 = there is a recursive containment error in the containment chain not in the character chain + -- 3 = the containment chain is ok + -- 4 = there was a recursive containment error in the character object chain that was fixed + + m_containment_ok pls_integer; + + wsx number := null; + wsy number := null; + wsz number := null; + + begin + + + -- check containment chain + m_containment_ok := verify_containment_chain(p_character_id); + + -- if containment is bad for the character object try to fix it + if (m_containment_ok = 1) then + m_containment_ok := fix_player_containment_chain(p_character_id); + end if; + + p_containment_check := m_containment_ok; + + if (m_containment_ok >= 3) then + + select object_name, scene_id, contained_by, x, y, z, ws_x, ws_y, ws_z + into p_character_name, p_scene_id, p_container_id, p_x, p_y, p_z, wsx, wsy, wsz + from players p, objects o, creature_objects c + where p.station_id = p_station_id + and p.character_object = p_character_id + and o.object_id = p.character_object + and c.object_id = o.object_id + and o.deleted = 0; + + if (p_container_id = 0) then + begin + p_container_id := p_character_id; + p_approved := 'Y'; + end; + else + begin + select object_id, x,y,z,'Y' + into p_container_id, p_x, p_y, p_z, p_approved + from objects + where contained_by=0 + start with object_id = p_character_id + connect by prior contained_by=object_id and prior scene_id=scene_id and player_controlled = 'N'; + + exception + when no_data_found then + -- might be in a gold building + if (p_gold_schema is not null) then + begin + execute immediate + 'select object_id, x,y,z,''Y'' ' || + 'from ' || p_gold_schema || 'objects ' || + 'where contained_by=0 ' || + 'start with object_id = :container_id ' || + 'connect by prior contained_by=object_id' + into p_container_id, p_x, p_y, p_z, p_approved + using p_container_id; + + exception + when no_data_found then + select object_id, x,y,z,'Y' + into p_container_id, p_x, p_y, p_z, p_approved + from objects + where object_id = p_character_id; + end; + else + select object_id, x,y,z,'Y' + into p_container_id, p_x, p_y, p_z, p_approved + from objects + where object_id = p_character_id; + end if; + end; + end if; + + else + + select 'N' into p_approved from dual; + + end if; + + + if ( wsx is not null ) then + begin + p_x := wsx; + p_y := wsy; + p_z := wsz; + end; + end if; + + + update players + set last_login_time = sysdate + where station_id = p_station_id + and character_object = p_character_id; + + exception + when no_data_found then + select 'N' + into p_approved + from dual; + when too_many_rows then + select 'N' + into p_approved + from dual; + when others then + select 'N' + into p_approved + from dual; + end; + + + + + function load_waypoint + return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T) */ + t.object_id, + t.waypoint_id, + t.appearance_name_crc, + t.location_x, + t.location_y, + t.location_z, + t.location_cell, + t.location_scene, + t.name, + t.color, + t.active + from + object_list l, + waypoints t + where + t.object_id=l.object_id; + + return result_cursor; + end; + + function load_player_object return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T) USE_NL(A)*/ + t.object_id, + t.station_id, + a.house_id, + t.num_lots, + a.is_outcast, + a.cheater_level, + a.max_lots_adjustment, + t.personal_profile_id, + t.character_profile_id, + t.skill_title, + t.born_date, + t.played_time, + t.force_regen_rate, + t.force_power, + t.max_force_power, + t.active_quests, + t.completed_quests, + t.current_quest, + t.quests, + t.role_icon_choice, + t.quests2, + t.quests3, + t.quests4, + t.skill_template, + t.working_skill, + nvl(t.current_gcw_points,0), + nvl(t.current_gcw_rating,-1), + nvl(t.current_pvp_kills,0), + nvl(t.lifetime_gcw_points,0), + nvl(t.max_gcw_imperial_rating,-1), + nvl(t.max_gcw_rebel_rating,-1), + nvl(t.lifetime_pvp_kills,0), + nvl(t.next_gcw_rating_calc_time,0), + t.collections, + nvl(t.show_backpack,'Y'), + nvl(t.show_helmet,'Y'), + t.collections2 + from + object_list l, + player_objects t, + accounts a + where t.station_id = a.station_id and + t.object_id=l.object_id; + + return result_cursor; + end; + + function load_resource_types return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select + resource_id, + resource_name, + resource_class, + attributes, + fractal_seeds, + depleted_timestamp + from + resource_types; + + return result_cursor; + end; + + function load_bounty_hunter_targets return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select object_id, target_id + from bounty_hunter_targets + where target_id <> 0; + return result_cursor; + end; + +-- GENERATED PLSQL FOLLOWS +-- generated by makeloader.pl + + function load_battlefield_marker_object return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T) */ + t.object_id, + t.region_name + from + object_list l, + battlefield_marker_objects t + where + t.object_id=l.object_id; + + return result_cursor; + end; + + function load_building_object return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T) */ + t.object_id, + t.maintenance_cost, + t.time_last_checked, + t.is_public, + t.city_id + from + object_list l, + building_objects t + where + t.object_id=l.object_id; + + return result_cursor; + end; + + function load_cell_object return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T) */ + t.object_id, + t.cell_number, + t.is_public + from + object_list l, + cell_objects t + where + t.object_id=l.object_id; + + return result_cursor; + end; + + function load_city_object return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T) */ + t.object_id + from + object_list l, + city_objects t + where + t.object_id=l.object_id; + + return result_cursor; + end; + + function load_creature_object return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T) */ + t.object_id, + t.scale_factor, + t.states, + t.posture, + t.shock_wounds, + t.master_id, + t.rank, + t.base_walk_speed, + t.base_run_speed, + t.attribute_0, + t.attribute_1, + t.attribute_2, + t.attribute_3, + t.attribute_4, + t.attribute_5, + t.attribute_6, + t.attribute_7, + t.attribute_8, + t.attribute_9, + t.attribute_10, + t.attribute_11, + t.attribute_12, + t.attribute_13, + t.attribute_14, + t.attribute_15, + t.attribute_16, + t.attribute_17, + t.attribute_18, + t.attribute_19, + t.attribute_20, + t.attribute_21, + t.attribute_22, + t.attribute_23, + t.attribute_24, + t.attribute_25, + t.attribute_26, + t.persisted_buffs, + t.ws_x, + t.ws_y, + t.ws_z + from + object_list l, + creature_objects t + where + t.object_id=l.object_id; + + return result_cursor; + end; + + function load_factory_object return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T) */ + t.object_id + from + object_list l, + factory_objects t + where + t.object_id=l.object_id; + + return result_cursor; + end; + + function load_guild_object return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T) */ + t.object_id + from + object_list l, + guild_objects t + where + t.object_id=l.object_id; + + return result_cursor; + end; + + function load_harvester_inst_object return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T) */ + t.object_id, + t.installed_efficiency, + t.max_extraction_rate, + t.current_extraction_rate, + t.max_hopper_amount, + t.hopper_resource, + t.hopper_amount, + t.resource_type + from + object_list l, + harvester_installation_objects t + where + t.object_id=l.object_id; + + return result_cursor; + end; + + function load_installation_object return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T) */ + t.object_id, + t.installation_type, + t.activated, + t.tick_count, + t.activate_start_time, + t.power, + t.power_rate + from + object_list l, + installation_objects t + where + t.object_id=l.object_id; + + return result_cursor; + end; + + function load_intangible_object return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T) */ + t.object_id, + t.count + from + object_list l, + intangible_objects t + where + t.object_id=l.object_id; + + return result_cursor; + end; + + function load_manf_schematic_object return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T) */ + t.object_id, + t.creator_id, + t.creator_name, + t.items_per_container, + t.manufacture_time, + t.draft_schematic + from + object_list l, + manf_schematic_objects t + where + t.object_id=l.object_id; + + return result_cursor; + end; + + function load_manufacture_inst_object return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T) */ + t.object_id + from + object_list l, + manufacture_inst_objects t + where + t.object_id=l.object_id; + + return result_cursor; + end; + + function load_mission_object return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T) */ + t.object_id, + t.difficulty, + t.end_x, + t.end_y, + t.end_z, + t.end_cell, + t.end_scene, + t.mission_creator, + t.reward, + t.root_script_name, + t.start_x, + t.start_y, + t.start_z, + t.start_cell, + t.start_scene, + t.description_table, + t.description_text, + t.title_table, + t.title_text, + t.mission_holder_id, + t.status, + t.mission_type, + t.target_appearance, + t.target_name + from + object_list l, + mission_objects t + where + t.object_id=l.object_id; + + return result_cursor; + end; + + function load_planet_object return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T) */ + t.object_id, + t.planet_name + from + object_list l, + planet_objects t + where + t.object_id=l.object_id; + + return result_cursor; + end; + + function load_resource_container_object return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T) */ + t.object_id, + t.resource_type, + t.quantity, + t.source + from + object_list l, + resource_container_objects t + where + t.object_id=l.object_id; + + return result_cursor; + end; + + function load_ship_object return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T) */ + t.object_id, + t.slide_dampener, + t.current_chassis_hit_points, + t.maximum_chassis_hit_points, + t.chassis_type, + t.cmp_armor_hp_maximum, + t.cmp_armor_hp_current, + t.cmp_efficiency_general, + t.cmp_efficiency_eng, + t.cmp_eng_maintenance, + t.cmp_mass, + t.cmp_crc, + t.cmp_hp_current, + t.cmp_hp_maximum, + t.cmp_flags, + t.cmp_names, + t.weapon_damage_maximum, + t.weapon_damage_minimum, + t.weapon_effectiveness_shields, + t.weapon_effectiveness_armor, + t.weapon_eng_per_shot, + t.weapon_refire_rate, + t.weapon_ammo_current, + t.weapon_ammo_maximum, + t.weapon_ammo_type, + t.shield_hp_front_maximum, + t.shield_hp_back_maximum, + t.shield_recharge_rate, + t.capacitor_eng_maximum, + t.capacitor_eng_recharge_rate, + t.engine_acc_rate, + t.engine_deceleration_rate, + t.engine_pitch_acc_rate, + t.engine_yaw_acc_rate, + t.engine_roll_acc_rate, + t.engine_pitch_rate_maximum, + t.engine_yaw_rate_maximum, + t.engine_roll_rate_maximum, + t.engine_speed_maximum, + t.reactor_eng_generation_rate, + t.booster_eng_maximum, + t.booster_eng_recharge_rate, + t.booster_eng_consumption_rate, + t.booster_acc, + t.booster_speed_maximum, + t.droid_if_cmd_speed, + t.installed_dcd, + t.chassis_cmp_mass_maximum, + t.cmp_creators, + t.cargo_hold_contents_maximum, + t.cargo_hold_contents_current, + t.cargo_hold_contents + from + object_list l, + ship_objects t + where + t.object_id=l.object_id; + + return result_cursor; + end; + + function load_static_object return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T) */ + t.object_id + from + object_list l, + static_objects t + where + t.object_id=l.object_id; + + return result_cursor; + end; + + function load_tangible_object return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T) */ + t.object_id, + t.max_hit_points, + t.owner_id, + t.visible, + t.appearance_data, + t.interest_radius, + t.pvp_type, + t.pvp_faction, + t.damage_taken, + t.custom_appearance, + t.count, + t.condition, + t.creator_id, + t.source_draft_schematic + from + object_list l, + tangible_objects t + where + t.object_id=l.object_id; + + return result_cursor; + end; + + function load_token_object return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T) */ + t.object_id, + t.reference, + t.target_server_template_name, + t.target_shared_template_name, + t.waypoint + from + object_list l, + token_objects t + where + t.object_id=l.object_id; + + return result_cursor; + end; + + function load_universe_object return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T) */ + t.object_id + from + object_list l, + universe_objects t + where + t.object_id=l.object_id; + + return result_cursor; + end; + + function load_vehicle_object return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T) */ + t.object_id, + t.bogus + from + object_list l, + vehicle_objects t + where + t.object_id=l.object_id; + + return result_cursor; + end; + + function load_weapon_object return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T) */ + t.object_id, + t.min_damage, + t.max_damage, + t.damage_type, + t.elemental_type, + t.elemental_value, + t.attack_speed, + t.wound_chance, + t.accuracy, + t.attack_cost, + t.damage_radius, + t.min_range, + t.max_range + from + object_list l, + weapon_objects t + where + t.object_id=l.object_id; + + return result_cursor; + end; + + + function load_player_quest_object return cursortype + as + result_cursor cursortype; + begin + open result_cursor for + select /*+ ORDERED USE_NL(T) */ + t.object_id, + t.title, + t.description, + t.creator, + t.total_tasks, + t.difficulty, + t.task_title1, + t.task_description1, + t.task_title2, + t.task_description2, + t.task_title3, + t.task_description3, + t.task_title4, + t.task_description4, + t.task_title5, + t.task_description5, + t.task_title6, + t.task_description6, + t.task_title7, + t.task_description7, + t.task_title8, + t.task_description8, + t.task_title9, + t.task_description9, + t.task_title10, + t.task_description10, + t.task_title11, + t.task_description11, + t.task_title12, + t.task_description12 + from + object_list l, + player_quest_objects t + where + t.object_id=l.object_id; + + return result_cursor; + end; +end; + +/ + + GRANT EXECUTE ON "SWG"."LOADER" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package Body LOGIN +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE BODY "SWG"."LOGIN" +as + + procedure register_new_cluster(p_cluster_name in varchar2, p_address in varchar2, p_cluster_id out number) + as + begin + select id + into p_cluster_id + from cluster_list + where name = p_cluster_name; + + exception + when no_data_found then + insert into cluster_list (id,name,address,secret,locked, not_recommended,group_id, + online_player_limit,online_free_trial_limit,free_trial_can_create_char, online_tutorial_limit) + select nvl(max(id)+1,1), p_cluster_name,p_address,'N','N','N',1, + 2500,250,'Y',350 + from cluster_list; + + select id + into p_cluster_id + from cluster_list + where name = p_cluster_name; + end; + + function get_cluster_list (p_group in number) return refcursor + as + result_cursor refcursor; + maxCharacterPerAccount number; + begin + select account_limit into maxCharacterPerAccount + from default_char_limits; + + open result_cursor for + select id, name, address, port, secret, locked, not_recommended, maxCharacterPerAccount, + online_player_limit,online_free_trial_limit,free_trial_can_create_char,online_tutorial_limit + from cluster_list + where group_id = p_group; + + return result_cursor; + end; + + function get_avatar_list (p_station_id number, p_cluster_group number) return refcursor + as + result refcursor; + begin + open result for + select + c.character_name, + c.template_id, + c.object_id, + c.cluster_id, + c.character_type + from + swg_characters c, cluster_list l + where + c.cluster_id = l.id and + l.group_id = p_cluster_group and + station_id = p_station_id and + enabled = 'Y'; + + return result; + end; + + function get_open_character_slots(p_station_id number, p_cluster_id number) return refcursor + as + result_cursor refcursor; + over_account_limit number; + over_cluster_limit number; + begin + -- does the account have too many characters, or does the cluster have too many characters? + + select account_limit - account_counter.num, cluster_limit - cluster_list.num_characters + into over_account_limit, over_cluster_limit + from + (select count(*) num from swg_characters + where (station_id = p_station_id + OR station_id IN (SELECT CASE WHEN child_id = p_station_id THEN parent_id + ELSE child_id END as station_id FROM account_map WHERE parent_id = p_station_id + OR child_id = p_station_id)) and enabled ='Y') account_counter, + default_char_limits, + cluster_list + where + cluster_list.id = p_cluster_id; + + if (over_account_limit <= 0 or over_cluster_limit <= 0) then + open result_cursor for + select 0 character_type_id, 0 remaining_slots + from dual + where 1=2; + + return result_cursor; + end if; + + -- if not, return the number of each type of character we're allowed to create + + open result_cursor for + select limits.character_type_id, limits.limit - nvl(existing.num,0) remaining_slots + from + (select def.character_type_id, def.num_slots + nvl(cls.num_extra_slots,0) limit + from extra_character_slots cls, default_character_slots def + where def.character_type_id = cls.character_type_id (+) + and cls.station_id (+) = p_station_id + and cls.cluster_id (+) = p_cluster_id) limits, + + (select character_type, count(*) num + from swg_characters + where station_id = p_station_id + and cluster_id = p_cluster_id + and enabled = 'Y' + group by character_type) existing + where + limits.character_type_id = existing.character_type (+); + + return result_cursor; + end; + + -- unlike get_open_character_slots, this function ignores account and cluster limits + function get_only_open_character_slots(p_station_id number, p_cluster_id number) return refcursor + as + result_cursor refcursor; + begin + -- return the number of each type of character we're allowed to create + + open result_cursor for + select limits.character_type_id, limits.limit - nvl(existing.num,0) remaining_slots + from + (select def.character_type_id, def.num_slots + nvl(cls.num_extra_slots,0) limit + from extra_character_slots cls, default_character_slots def + where def.character_type_id = cls.character_type_id (+) + and cls.station_id (+) = p_station_id + and cls.cluster_id (+) = p_cluster_id) limits, + + (select character_type, count(*) num + from swg_characters + where station_id = p_station_id + and cluster_id = p_cluster_id + and enabled = 'Y' + group by character_type) existing + where + limits.character_type_id = existing.character_type (+); + + return result_cursor; + end; + + function is_cluster_at_limit(p_cluster_id number) return number + as + v_cluster_limit number; + v_num_characters number; + begin + select cluster_limit + into v_cluster_limit + from default_char_limits; + + select num_characters + into v_num_characters + from cluster_list + where id = p_cluster_id; + + if (v_num_characters >= v_cluster_limit) then + return 1; + else + return 0; + end if; + + exception + when others then + return 0; + end; + + function is_account_at_limit(p_station_id number) return number + as + v_account_limit number; + v_num_characters number; + begin + select account_limit + into v_account_limit + from default_char_limits; + + select count(*) + into v_num_characters + from swg_characters + where station_id = p_station_id and enabled ='Y' and cluster_id not in (select id from cluster_list where name in ('Corbantis', 'Europe-Infinity', 'Intrepid', 'Kauri', 'Kettemoor', 'Lowca', 'Naritus', 'Scylla', 'Tarquinas', 'Tempest', 'Valcyn', 'Wanderhome', 'Japan-Katana', 'Japan-Harla')); + + if (v_num_characters >= v_account_limit) then + return 1; + else + return 0; + end if; + + exception + when others then + return 0; + end; + + procedure delete_character(p_cluster_id number, p_character_id number, p_station_id number) + as + begin + delete from swg_characters + where station_id = p_station_id + and cluster_id = p_cluster_id + and object_id = p_character_id; + + update cluster_list + set num_characters = num_characters - 1 + where cluster_list.id = p_cluster_id; + + end; + + procedure rename_character(p_cluster_id number, p_character_id number, p_new_name varchar2) + as + begin + update swg_characters + set character_name = p_new_name + where cluster_id = p_cluster_id + and object_id = p_character_id; + end; + + procedure create_character(p_cluster_id number, p_station_id number, p_character_name varchar2, p_character_id number, p_template_id number, p_character_type number) + as + begin + insert into swg_characters (station_id, cluster_id, character_name, object_id, template_id, character_type) + values (p_station_id, p_cluster_id, p_character_name, p_character_id, p_template_id, p_character_type); + + update cluster_list + set num_characters = nvl(num_characters,0) + 1 + where cluster_list.id = p_cluster_id; + + exception when DUP_VAL_ON_INDEX then + update swg_characters + set object_id = p_character_id, + template_id = p_template_id, + character_type = p_character_type + where cluster_id = p_cluster_id + and station_id = p_station_id + and character_name = p_character_name; + end; + + function restore_character(p_cluster_id number, p_station_id number, p_character_name varchar2, p_character_id number, p_template_id number, p_character_type number) return number + -- Return codes: + -- 1: restored + -- 2: restored, but too many characters on the account now + -- 3: database error + as + l_num_characters number; + l_limit number; + begin + begin + insert into swg_characters (station_id, cluster_id, character_name, object_id, template_id, character_type) + values (p_station_id, p_cluster_id, p_character_name, p_character_id, p_template_id, p_character_type); + + update cluster_list + set num_characters = nvl(num_characters,0) + 1 + where cluster_list.id = p_cluster_id; + + exception when DUP_VAL_ON_INDEX then + null; -- already restored + when others then + return 3; + end; + + -- Check the account against the limits + select count(*) + into l_num_characters + from swg_characters + where station_id = p_station_id + and character_type = p_character_type + and enabled = 'Y' + and cluster_id not in (select id from cluster_list where name in ('Corbantis', 'Europe-Infinity', 'Intrepid', 'Kauri', 'Kettemoor', 'Lowca', 'Naritus', 'Scylla', 'Tarquinas', 'Tempest', 'Valcyn', 'Wanderhome', 'Japan-Katana', 'Japan-Harla')); + + select def.num_slots + nvl(cls.num_extra_slots,0) + into l_limit + from extra_character_slots cls, default_character_slots def + where def.character_type_id = cls.character_type_id (+) + and cls.station_id (+) = p_station_id + and cls.cluster_id (+) = p_cluster_id + and def.character_type_id = p_character_type; + + if (l_num_characters > l_limit) then + return 2; + else + return 1; + end if; + + exception + when others then + return 3; + end; + + procedure set_character_slots(p_cluster_id number, p_station_id number, p_slot_type number, p_num_slots number) + as + begin + update extra_character_slots + set num_extra_slots = p_num_slots + where cluster_id = p_cluster_id + and station_id = p_station_id + and character_type_id = p_slot_type; + + if (sql%rowcount = 0) then + insert into extra_character_slots (station_id, cluster_id, character_type_id, num_extra_slots) + values (p_station_id, p_cluster_id, p_slot_type, p_num_slots); + end if; + end; + + procedure set_character_type(p_cluster_id number, p_station_id number, p_character_id number, p_slot_type number) + as + begin + update swg_characters + set character_type = p_slot_type + where station_id = p_station_id + and cluster_id = p_cluster_id + and object_id = p_character_id; + end; + + function has_extra_character_slot(p_station_id number, p_character_type number) return number + as + rows number; + total number; + begin + select count(*), sum(num_extra_slots) + into rows, total + from extra_character_slots + where station_id = p_station_id + and character_type_id = p_character_type; + + if (rows <= 0 or total < 0) then + total := 0; + end if; + + return total; + exception + when others then + return 0; + end; + + procedure toggle_disable_character(p_cluster_id number, p_character_id number, p_station_id number, p_enabled varchar2) + as + begin + update swg_characters + set enabled = p_enabled + where station_id = p_station_id + and cluster_id = p_cluster_id + and object_id = p_character_id; + + end; + + function enable_disable_character(p_station_id number, p_character_id number, p_enabled varchar2) return number + as + begin + update swg_characters + set enabled = p_enabled + where station_id = p_station_id and + object_id = p_character_id; + if (sql%rowcount > 0) then + return 1; + else + return 2; + end if; + exception + when others then + return 3; + end; + + function get_completed_tutorial(p_station_id number) return refcursor + as + cnt number; + result_cursor refcursor; + begin + select count (*) into cnt + from account_info + where station_id = p_station_id; + + if (cnt = 0) then + insert into account_info (station_id, completed_tutorial) + values (p_station_id, 'N'); + end if; + + open result_cursor for + select completed_tutorial + from account_info + where station_id = p_station_id; + + return result_cursor; + end; + + procedure toggle_completed_tutorial(p_station_id number, p_completed varchar2) + as + begin + update account_info + set completed_tutorial = p_completed + where station_id = p_station_id; + end; + + function get_consumed_reward_events(p_station_id number) return refcursor + as + result_cursor refcursor; + begin + open result_cursor for + select event_id, cluster_id, character_id + from account_reward_events + where station_id = p_station_id; + + return result_cursor; + end; + + function get_claimed_reward_items(p_station_id number) return refcursor + as + result_cursor refcursor; + begin + open result_cursor for + select item_id, cluster_id, character_id + from account_reward_items + where station_id = p_station_id; + + return result_cursor; + end; + + function consume_reward_event(p_station_id number, p_character_id number, p_cluster_id number, p_event_id varchar2) return number + as + begin + insert into account_reward_events (station_id, event_id, date_consumed, cluster_id, character_id) + values (p_station_id, p_event_id, sysdate, p_cluster_id, p_character_id); + + return 1; + + exception + when dup_val_on_index then + -- Check whether previous claim was from the same character and cluster, if so, allow it + declare + previous_claim_cluster number; + previous_claim_character number; + begin + select cluster_id, character_id + into previous_claim_cluster, previous_claim_character + from account_reward_events + where station_id = p_station_id + and event_id = p_event_id; + + if ((p_cluster_id=previous_claim_cluster) and (p_character_id=previous_claim_character)) then + return 1; + end if; + + return 0; + end; + when others then + return 0; + end; + + function claim_reward_item(p_station_id number, p_character_id number, p_cluster_id number, p_item_id varchar2) return number + as + begin + insert into account_reward_items (station_id, item_id, date_claimed, cluster_id, character_id) + values (p_station_id, p_item_id, sysdate, p_cluster_id, p_character_id); + + return 1; + + exception + when dup_val_on_index then + -- Check whether previous claim was from the same character and cluster, if so, allow it + declare + previous_claim_cluster number; + previous_claim_character number; + begin + select cluster_id, character_id + into previous_claim_cluster, previous_claim_character + from account_reward_items + where station_id = p_station_id + and item_id = p_item_id; + + if ((p_cluster_id=previous_claim_cluster) and (p_character_id=previous_claim_character)) then + return 1; + end if; + + return 0; + exception + when others then + return 0; + end; + when others then + return 0; + end; + + function get_feature_id_transactions(p_station_id in number, p_cluster_id in number, p_character_id in number) return refcursor + as + result_cursor refcursor; + begin + open result_cursor for + select item_id, count + from feature_id_transactions + where station_id = p_station_id and cluster_id = p_cluster_id and character_id = p_character_id; + + return result_cursor; + end; + + function update_feature_id_transaction(p_station_id in number, p_cluster_id in number, p_character_id in number, p_item_id in varchar2, p_count_adjustment in number) return number + as + begin + update feature_id_transactions set date_updated = sysdate, + count = count + p_count_adjustment + where station_id = p_station_id + and cluster_id = p_cluster_id + and character_id = p_character_id + and item_id = p_item_id; + + if (sql%rowcount = 0) then + insert into feature_id_transactions (station_id, cluster_id, character_id, item_id, date_updated, count) + values (p_station_id, p_cluster_id, p_character_id, p_item_id, sysdate, p_count_adjustment); + end if; + + return 1; + + exception + when others then + return 0; + end; +end; + +/ + + GRANT EXECUTE ON "SWG"."LOGIN" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package Body OBJECTIDMANAGER +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE BODY "SWG"."OBJECTIDMANAGER" +as + + procedure get_ids(how_many in out number, block_start_id out number, block_end_id out number) + as + result_cursor cursortype; + begin + delete free_object_ids + where end_id is not null + and rownum=1 + returning start_id, end_id + into block_start_id, block_end_id; + + if (sql%rowcount = 0) then + update free_object_ids + set start_id = start_id + how_many + where end_id is null + returning start_id - how_many, start_id - 1 + into block_start_id, block_end_id; + end if; + + how_many := block_end_id - block_start_id + 1; + end; + + -- same as get_ids, except guarantees the ids are all contiguous + -- (therefore it can return just the starting id) + function get_contiguous_ids(min_count number) return number + as + result_cursor cursortype; + block_start_id number; + block_end_id number; + begin + update free_object_ids + set start_id = start_id + min_count + where (end_id - start_id + 1 >= min_count + or end_id is null) + and rownum < 2 + returning start_id - min_count, start_id - 1 + into block_start_id, block_end_id; + + if (block_start_id > block_end_id) then -- entire block was consumed + delete free_object_ids where start_id = block_start_id; + end if; + + return block_start_id; + end; + + -- get only one id + function get_single_id return number + as + block_start_id number; + block_end_id number; + begin + update + free_object_ids + set + start_id = start_id + 1 + where + rownum=1 + returning + start_id, + end_id + into + block_start_id, + block_end_id; + + if (block_start_id > block_end_id) then -- entire block was consumed + delete free_object_ids where start_id = block_start_id; + end if; + + return block_start_id - 1; + end; + + procedure rebuild_freelist + as + message_count number; + message_id_block number; + begin + delete free_object_ids; + + -- following is not legal in PL/SQL, so it must be "execute immediated" + execute immediate 'insert into free_object_ids (end_id, start_id) '|| + 'select o1.object_id-1 end_id, (select max(o2.object_id) from objects o2 where o1.object_id > o2.object_id)+1 start_id ' || + 'from objects o1 ' || + 'where o1.object_id > (select max(o2.object_id)+1 from objects o2 where o1.object_id > o2.object_id)'; + + insert into free_object_ids (start_id, end_id) + select * from + (select 1,min(object_id)-1 + from objects) + where not exists (select * from objects where object_id = 1); + + insert into free_object_ids (start_id, end_id) + select * from + (select max(object_id)+1,NULL + from objects) + where exists (select * from objects); + + --easier to ignore messages while finding free object ids and then fix them up at the end: + + select count(*) + into message_count + from messages + where rownum = 1; + + if (message_count <> 0) then + message_id_block := get_contiguous_ids(message_count); + + update messages + set message_id = rownum + message_id_block - 1; + end if; + end; +end; + +/ + + GRANT EXECUTE ON "SWG"."OBJECTIDMANAGER" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package Body OBJVAR_NAMES +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE BODY "SWG"."OBJVAR_NAMES" +as + procedure add_name (p_id number, p_name varchar2) as + begin + insert into object_variable_names (id,name) + values (p_id, p_name); + end; + + function get_name_list return cursortype as + result_cursor cursortype; + begin + open result_cursor for + select id, name from object_variable_names; + + return result_cursor; + end; +end; + +/ + + GRANT EXECUTE ON "SWG"."OBJVAR_NAMES" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package Body PERSISTER +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE BODY "SWG"."PERSISTER" +as + + procedure set_clock (p_time number) + as + begin + update clock set last_save_time = p_time, last_save_timestamp = sysdate; + end; + + procedure add_player (p_station_id number, p_character_object objectid, p_character_name varchar2, p_normalized_name varchar2) + as + rc number; + begin + insert into players (station_id, character_object,uc_character_name, character_full_name, create_time) + values (p_station_id, p_character_object, p_normalized_name, p_character_name, sysdate); + end; + + function delete_character (p_station_id number, p_character_id number, p_delete_minutes number) return number + as + valid_check number; + l_deleted_name number; + begin + l_deleted_name := 0; + + select count(*) + into valid_check + from players + where players.character_object = p_character_id + and players.station_id = p_station_id; + + if (valid_check = 1) then + + -- recursive query needed in order to get bank box contents, etc. + update objects + set + deleted = (select reason_code from delete_reasons where tag='CharacterDeleted'), + deleted_date = sysdate + where object_id in (select object_id + from objects + where deleted = 0 + start with load_with = p_character_id + connect by prior object_id = load_with and prior load_with <> load_with); + + -- remove character record if the character is new enough (so that players can experiment creating new characters + -- and deleting them right away) + delete players + where players.character_object = p_character_id + and players.station_id = p_station_id + and (sysdate - create_time) * (1440) < p_delete_minutes; + + if (sql%rowcount > 0) then + l_deleted_name := 1; + end if; + + -- Add a message for all deleted buildings owned by this character. The game will delete the buildings + -- and run appropriate cleanup the next time the buildings are loaded. + + for oid in (select o.object_id from objects o, tangible_objects t, building_objects b + where o.object_id = t.object_id + and o.object_id = b.object_id + and t.object_id = b.object_id + and t.owner_id = p_character_id + and o.deleted = 0) + loop + save_message (objectidmanager.get_single_id(), oid.object_id, 'msgDestroyStructure',NULL,0,'Y',1); + end loop; + + for oid1 in (select o.object_id from objects o, tangible_objects t, installation_objects b + where o.object_id = t.object_id + and o.object_id = b.object_id + and t.owner_id = p_character_id + and o.deleted = 0) + loop + save_message (objectidmanager.get_single_id(), oid1.object_id, 'msgDestroyStructure',NULL,0,'Y',1); + end loop; + + if (l_deleted_name=0) then + return 0; + else + return 2; + end if; + else + return 1; + end if; + end; + + + procedure update_object_variable_batch (p_object_id vaofstring, p_name_id VAOFNUMBER, p_type VAOFNUMBER, p_value VAOFSTRING, p_chunk_size number) + as + begin + FORALL i in 1..p_chunk_size + UPDATE OBJECT_VARIABLES Set + type = p_type(i), + value = p_value(i), + detached = 0 + WHERE + object_id = p_object_id(i) and + name_id = p_name_id(i); + end; + + procedure add_object_variable_batch (p_object_id vaofstring, p_name_id VAOFNUMBER, p_type VAOFNUMBER, p_value VAOFSTRING, p_chunk_size number) + as + errors number; + error_index number; + begin + FORALL i in 1..p_chunk_size + INSERT into OBJECT_VARIABLES ( + object_id, + name_id, + type, + value, + detached ) + VALUES ( + p_object_id(i), + p_name_id(i), + p_type(i), + p_value(i), + 0 ); + + exception + when DUP_VAL_ON_INDEX then + for i in 1..p_chunk_size loop + UPDATE OBJECT_VARIABLES Set + type = p_type(i), + value = p_value(i), + detached = 0 + WHERE + object_id = p_object_id(i) and + name_id = p_name_id(i); + + if SQL%ROWCOUNT=0 then + INSERT into OBJECT_VARIABLES ( + object_id, + name_id, + type, + value, + detached ) + VALUES ( + p_object_id(i), + p_name_id(i), + p_type(i), + p_value(i), + 0 ); + end if; + end loop; + end; + + procedure remove_object_variable_batch (p_object_id vaofstring, p_name_id VAOFNUMBER, p_chunk_size number) + as + begin + FORALL i in 1..p_chunk_size + delete from object_variables + where object_id = p_object_id(i) + and name_id = p_name_id(i); + end; + + procedure clear_scripts (p_object_id objectid) + as + begin + delete from scripts + where object_id = p_object_id; + end; + + procedure save_message (p_message_id number, p_object_id objectid, p_method varchar, p_data varchar, p_call_time number, p_guaranteed varchar, p_delivery_type int) + as + begin + insert into messages (message_id, target, method, data, call_time, guaranteed, delivery_type) + values (p_message_id, p_object_id, p_method, p_data, p_call_time, p_guaranteed, p_delivery_type); + end; + + procedure save_message_batch (p_message_id VAOFSTRING, p_object_id VAOFSTRING, p_method VAOFSTRING, p_data VAOFLONGSTRING, p_call_time VAOFNUMBER, p_guaranteed VAOFSTRING, p_delivery_type VAOFNUMBER, p_chunk_size number, p_enable_db_logging number ) + as + begin + + forall i in 1..p_chunk_size + insert into messages (message_id, target, method, data, call_time, guaranteed, delivery_type) + values (p_message_id(i), p_object_id(i), p_method(i), p_data(i), p_call_time(i), p_guaranteed(i), p_delivery_type(i)); + + exception when dup_val_on_index then + for i in 1..p_chunk_size loop + begin + insert into messages (message_id, target, method, data, call_time, guaranteed, delivery_type) + values (p_message_id(i), p_object_id(i), p_method(i), p_data(i), p_call_time(i), p_guaranteed(i), p_delivery_type(i)); + exception when dup_val_on_index then + if ( p_enable_db_logging > 0 ) then + + db_error_logger.dblogerror( SQLCODE, 'procedure save_message_batch: duplicate rows were sent to the message buffer that resulted in a dup_val_on_index error.'); + if ( p_enable_db_logging > 1 ) then + + db_error_logger.dblogerror_values( 'messages', 'message_id' , 'number', p_message_id(i)); + db_error_logger.dblogerror_values( 'messages', 'target' , 'number', p_object_id(i)); + db_error_logger.dblogerror_values( 'messages', 'method' , 'varchar2', p_method(i)); + db_error_logger.dblogerror_values( 'messages', 'data' , 'varchar2', p_data(i)); + db_error_logger.dblogerror_values( 'messages', 'call_time' , 'number', to_char(p_call_time(i))); + db_error_logger.dblogerror_values( 'messages', 'guaranteed' , 'varchar2', p_guaranteed(i)); + db_error_logger.dblogerror_values( 'messages', 'delivery_type' , 'number', to_char(p_delivery_type(i))); + + end if; + + else + NULL; + end if; + end; + end loop; + end; + + + procedure acknowledge_message(p_message_id number) + as + begin + delete from messages + where message_id = p_message_id; + end; + + procedure acknowledge_message_batch (p_message_id VAOFSTRING, p_chunk_size number, p_enable_db_logging number) + as + begin + + forall i in 1..p_chunk_size + delete from messages + where message_id = p_message_id(i); + + exception when dup_val_on_index then + for i in 1..p_chunk_size loop + begin + delete from messages + where message_id = p_message_id(i); + exception when dup_val_on_index then + if ( p_enable_db_logging > 0 ) then + + db_error_logger.dblogerror( SQLCODE, 'procedure acknowledge_message_batch: duplicate rows were sent to the message buffer that resulted in a dup_val_on_index error.'); + if ( p_enable_db_logging > 1 ) then + + db_error_logger.dblogerror_values( 'messages', 'message_id' , 'number', p_message_id(i)); + + end if; + + else + NULL; + end if; + end; + end loop; + + + end; + + procedure save_object ( p_x VAOFNUMBER, p_y VAOFNUMBER, p_z VAOFNUMBER, p_quaternion_w VAOFNUMBER, p_quaternion_x VAOFNUMBER, p_quaternion_y VAOFNUMBER, p_quaternion_z VAOFNUMBER, p_node_x VAOFNUMBER, p_node_y VAOFNUMBER, p_node_z VAOFNUMBER, p_object_template_id VAOFNUMBER, p_type_id VAOFNUMBER, p_scene_id VAOFSTRING, p_controller_type VAOFNUMBER, p_deleted VAOFNUMBER, p_object_name VAOFSTRING, p_volume VAOFNUMBER, p_contained_by VAOFSTRING, p_slot_arrangement VAOFNUMBER, p_player_controlled VAOFSTRING, p_cache_version VAOFNUMBER, p_load_contents VAOFSTRING, p_cash_balance VAOFNUMBER, p_bank_balance VAOFNUMBER, p_complexity VAOFNUMBER, p_name_string_table VAOFSTRING, p_name_string_text VAOFSTRING, p_static_item_name VAOFSTRING, p_static_item_version VAOFNUMBER, p_conversion_id VAOFNUMBER, p_load_with VAOFSTRING, + p_objvar_0_name VAOFSTRING,p_objvar_0_type VAOFNUMBER,p_objvar_0_value VAOFSTRING,p_objvar_1_name VAOFSTRING,p_objvar_1_type VAOFNUMBER,p_objvar_1_value VAOFSTRING,p_objvar_2_name VAOFSTRING,p_objvar_2_type VAOFNUMBER,p_objvar_2_value VAOFSTRING,p_objvar_3_name VAOFSTRING,p_objvar_3_type VAOFNUMBER,p_objvar_3_value VAOFSTRING,p_objvar_4_name VAOFSTRING,p_objvar_4_type VAOFNUMBER,p_objvar_4_value VAOFSTRING,p_objvar_5_name VAOFSTRING,p_objvar_5_type VAOFNUMBER,p_objvar_5_value VAOFSTRING,p_objvar_6_name VAOFSTRING,p_objvar_6_type VAOFNUMBER,p_objvar_6_value VAOFSTRING,p_objvar_7_name VAOFSTRING,p_objvar_7_type VAOFNUMBER,p_objvar_7_value VAOFSTRING,p_objvar_8_name VAOFSTRING,p_objvar_8_type VAOFNUMBER,p_objvar_8_value VAOFSTRING,p_objvar_9_name VAOFSTRING,p_objvar_9_type VAOFNUMBER,p_objvar_9_value VAOFSTRING, p_objvar_10_name VAOFSTRING,p_objvar_10_type VAOFNUMBER,p_objvar_10_value VAOFSTRING,p_objvar_11_name VAOFSTRING,p_objvar_11_type VAOFNUMBER,p_objvar_11_value VAOFSTRING,p_objvar_12_name VAOFSTRING,p_objvar_12_type VAOFNUMBER,p_objvar_12_value VAOFSTRING,p_objvar_13_name VAOFSTRING,p_objvar_13_type VAOFNUMBER,p_objvar_13_value VAOFSTRING,p_objvar_14_name VAOFSTRING,p_objvar_14_type VAOFNUMBER,p_objvar_14_value VAOFSTRING,p_objvar_15_name VAOFSTRING,p_objvar_15_type VAOFNUMBER,p_objvar_15_value VAOFSTRING,p_objvar_16_name VAOFSTRING,p_objvar_16_type VAOFNUMBER,p_objvar_16_value VAOFSTRING,p_objvar_17_name VAOFSTRING,p_objvar_17_type VAOFNUMBER,p_objvar_17_value VAOFSTRING,p_objvar_18_name VAOFSTRING,p_objvar_18_type VAOFNUMBER,p_objvar_18_value VAOFSTRING,p_objvar_19_name VAOFSTRING,p_objvar_19_type VAOFNUMBER,p_objvar_19_value VAOFSTRING, p_script_list VAOFLONGSTRING, p_object_id VAOFSTRING, p_chunk_size number) + as + cache_update VAOFNUMBER; + begin + + cache_update := VAOFNUMBER(); -- initialize VARRAY object + cache_update.extend(p_chunk_size); -- allocate VARRAY object memory to chunk size + + -- create cache_update array for use in bulk update + FOR i IN 1..p_chunk_size + LOOP + if + ((p_x(i) is not null) + or (p_y(i) is not null) + or (p_z(i) is not null) + or (p_quaternion_w(i) is not null) + or (p_quaternion_x(i) is not null) + or (p_quaternion_y(i) is not null) + or (p_quaternion_z(i) is not null) + or (p_contained_by(i) is not null) + or (p_cache_version(i) is not null)) + then + cache_update(i) := 0; + else + cache_update(i) := NULL; + end if; + END LOOP; + + + -- process deletes + FORALL i IN 1..p_chunk_size + update objects set + deleted = p_deleted(i), + deleted_date = sysdate, + load_with = NULL + where object_id = p_object_id(i) and + p_deleted(i) <> 0; + + -- process updates + FORALL i IN 1..p_chunk_size + update objects set + x = nvl(p_x(i),x), + y = nvl(p_y(i),y), + z = nvl(p_z(i),z), + quaternion_w = nvl(p_quaternion_w(i),quaternion_w), + quaternion_x = nvl(p_quaternion_x(i),quaternion_x), + quaternion_y = nvl(p_quaternion_y(i),quaternion_y), + quaternion_z = nvl(p_quaternion_z(i),quaternion_z), + node_x = nvl(p_node_x(i),node_x), + node_y = nvl(p_node_y(i),node_y), + node_z = nvl(p_node_z(i),node_z), + object_template_id = nvl(p_object_template_id(i),object_template_id), + type_id = nvl(p_type_id(i),type_id), + scene_id = nvl(p_scene_id(i),scene_id), + controller_type = nvl(p_controller_type(i),controller_type), + deleted = nvl(p_deleted(i),deleted), + object_name = nvl(p_object_name(i),object_name), + volume = nvl(p_volume(i),volume), + contained_by = nvl(p_contained_by(i),contained_by), + slot_arrangement = nvl(p_slot_arrangement(i),slot_arrangement), + player_controlled = nvl(p_player_controlled(i),player_controlled), + cache_version = nvl(cache_update(i),cache_version), + load_contents = nvl(p_load_contents(i),load_contents), + cash_balance = nvl(p_cash_balance(i),cash_balance), + bank_balance = nvl(p_bank_balance(i),bank_balance), + complexity = nvl(p_complexity(i),complexity), + name_string_table = nvl(p_name_string_table(i),name_string_table), + name_string_text = nvl(p_name_string_text(i),name_string_text), + static_item_name = nvl(p_static_item_name(i),static_item_name), + static_item_version = nvl(p_static_item_version(i),static_item_version), + conversion_id = nvl(p_conversion_id(i),conversion_id), + load_with = nvl(p_load_with(i),load_with), + + objvar_0_name = nvl(p_objvar_0_name(i), objvar_0_name), + objvar_0_type = nvl(p_objvar_0_type(i), objvar_0_type), + objvar_0_value= nvl(p_objvar_0_value(i),objvar_0_value), + objvar_1_name = nvl(p_objvar_1_name(i), objvar_1_name), + objvar_1_type = nvl(p_objvar_1_type(i), objvar_1_type), + objvar_1_value= nvl(p_objvar_1_value(i),objvar_1_value), + objvar_2_name = nvl(p_objvar_2_name(i), objvar_2_name), + objvar_2_type = nvl(p_objvar_2_type(i), objvar_2_type), + objvar_2_value= nvl(p_objvar_2_value(i),objvar_2_value), + objvar_3_name = nvl(p_objvar_3_name(i), objvar_3_name), + objvar_3_type = nvl(p_objvar_3_type(i), objvar_3_type), + objvar_3_value= nvl(p_objvar_3_value(i),objvar_3_value), + objvar_4_name = nvl(p_objvar_4_name(i), objvar_4_name), + objvar_4_type = nvl(p_objvar_4_type(i), objvar_4_type), + objvar_4_value= nvl(p_objvar_4_value(i),objvar_4_value), + objvar_5_name = nvl(p_objvar_5_name(i), objvar_5_name), + objvar_5_type = nvl(p_objvar_5_type(i), objvar_5_type), + objvar_5_value= nvl(p_objvar_5_value(i),objvar_5_value), + objvar_6_name = nvl(p_objvar_6_name(i), objvar_6_name), + objvar_6_type = nvl(p_objvar_6_type(i), objvar_6_type), + objvar_6_value= nvl(p_objvar_6_value(i),objvar_6_value), + objvar_7_name = nvl(p_objvar_7_name(i), objvar_7_name), + objvar_7_type = nvl(p_objvar_7_type(i), objvar_7_type), + objvar_7_value= nvl(p_objvar_7_value(i),objvar_7_value), + objvar_8_name = nvl(p_objvar_8_name(i), objvar_8_name), + objvar_8_type = nvl(p_objvar_8_type(i), objvar_8_type), + objvar_8_value= nvl(p_objvar_8_value(i),objvar_8_value), + objvar_9_name = nvl(p_objvar_9_name(i), objvar_9_name), + objvar_9_type = nvl(p_objvar_9_type(i), objvar_9_type), + objvar_9_value= nvl(p_objvar_9_value(i),objvar_9_value), + + objvar_10_name = nvl(p_objvar_10_name(i), objvar_10_name), + objvar_10_type = nvl(p_objvar_10_type(i), objvar_10_type), + objvar_10_value= nvl(p_objvar_10_value(i),objvar_10_value), + objvar_11_name = nvl(p_objvar_11_name(i), objvar_11_name), + objvar_11_type = nvl(p_objvar_11_type(i), objvar_11_type), + objvar_11_value= nvl(p_objvar_11_value(i),objvar_11_value), + objvar_12_name = nvl(p_objvar_12_name(i), objvar_12_name), + objvar_12_type = nvl(p_objvar_12_type(i), objvar_12_type), + objvar_12_value= nvl(p_objvar_12_value(i),objvar_12_value), + objvar_13_name = nvl(p_objvar_13_name(i), objvar_13_name), + objvar_13_type = nvl(p_objvar_13_type(i), objvar_13_type), + objvar_13_value= nvl(p_objvar_13_value(i),objvar_13_value), + objvar_14_name = nvl(p_objvar_14_name(i), objvar_14_name), + objvar_14_type = nvl(p_objvar_14_type(i), objvar_14_type), + objvar_14_value= nvl(p_objvar_14_value(i),objvar_14_value), + objvar_15_name = nvl(p_objvar_15_name(i), objvar_15_name), + objvar_15_type = nvl(p_objvar_15_type(i), objvar_15_type), + objvar_15_value= nvl(p_objvar_15_value(i),objvar_15_value), + objvar_16_name = nvl(p_objvar_16_name(i), objvar_16_name), + objvar_16_type = nvl(p_objvar_16_type(i), objvar_16_type), + objvar_16_value= nvl(p_objvar_16_value(i),objvar_16_value), + objvar_17_name = nvl(p_objvar_17_name(i), objvar_17_name), + objvar_17_type = nvl(p_objvar_17_type(i), objvar_17_type), + objvar_17_value= nvl(p_objvar_17_value(i),objvar_17_value), + objvar_18_name = nvl(p_objvar_18_name(i), objvar_18_name), + objvar_18_type = nvl(p_objvar_18_type(i), objvar_18_type), + objvar_18_value= nvl(p_objvar_18_value(i),objvar_18_value), + objvar_19_name = nvl(p_objvar_19_name(i), objvar_19_name), + objvar_19_type = nvl(p_objvar_19_type(i), objvar_19_type), + objvar_19_value= nvl(p_objvar_19_value(i),objvar_19_value), + + script_list = nvl(p_script_list(i),script_list) + where + object_id=p_object_id(i) and + (p_deleted(i) = 0 or p_deleted(i) is null); + + cache_update.delete; -- cleanup - delete VARRAY list + + end; + + procedure add_object ( p_x VAOFNUMBER, p_y VAOFNUMBER, p_z VAOFNUMBER, p_quaternion_w VAOFNUMBER, p_quaternion_x VAOFNUMBER, p_quaternion_y VAOFNUMBER, p_quaternion_z VAOFNUMBER, p_node_x VAOFNUMBER, p_node_y VAOFNUMBER, p_node_z VAOFNUMBER, p_object_template_id VAOFNUMBER, p_type_id VAOFNUMBER, p_scene_id VAOFSTRING, p_controller_type VAOFNUMBER, p_deleted VAOFNUMBER, p_object_name VAOFSTRING, p_volume VAOFNUMBER, p_contained_by VAOFSTRING, p_slot_arrangement VAOFNUMBER, p_player_controlled VAOFSTRING, p_cache_version VAOFNUMBER, p_load_contents VAOFSTRING, p_cash_balance VAOFNUMBER, p_bank_balance VAOFNUMBER, p_complexity VAOFNUMBER, p_name_string_table VAOFSTRING, p_name_string_text VAOFSTRING, p_static_item_name VAOFSTRING, p_static_item_version VAOFNUMBER, p_conversion_id VAOFNUMBER, p_load_with VAOFSTRING, + p_objvar_0_name VAOFSTRING,p_objvar_0_type VAOFNUMBER,p_objvar_0_value VAOFSTRING,p_objvar_1_name VAOFSTRING,p_objvar_1_type VAOFNUMBER,p_objvar_1_value VAOFSTRING,p_objvar_2_name VAOFSTRING,p_objvar_2_type VAOFNUMBER,p_objvar_2_value VAOFSTRING,p_objvar_3_name VAOFSTRING,p_objvar_3_type VAOFNUMBER,p_objvar_3_value VAOFSTRING,p_objvar_4_name VAOFSTRING,p_objvar_4_type VAOFNUMBER,p_objvar_4_value VAOFSTRING,p_objvar_5_name VAOFSTRING,p_objvar_5_type VAOFNUMBER,p_objvar_5_value VAOFSTRING,p_objvar_6_name VAOFSTRING,p_objvar_6_type VAOFNUMBER,p_objvar_6_value VAOFSTRING,p_objvar_7_name VAOFSTRING,p_objvar_7_type VAOFNUMBER,p_objvar_7_value VAOFSTRING,p_objvar_8_name VAOFSTRING,p_objvar_8_type VAOFNUMBER,p_objvar_8_value VAOFSTRING,p_objvar_9_name VAOFSTRING,p_objvar_9_type VAOFNUMBER,p_objvar_9_value VAOFSTRING, p_objvar_10_name VAOFSTRING,p_objvar_10_type VAOFNUMBER,p_objvar_10_value VAOFSTRING,p_objvar_11_name VAOFSTRING,p_objvar_11_type VAOFNUMBER,p_objvar_11_value VAOFSTRING,p_objvar_12_name VAOFSTRING,p_objvar_12_type VAOFNUMBER,p_objvar_12_value VAOFSTRING,p_objvar_13_name VAOFSTRING,p_objvar_13_type VAOFNUMBER,p_objvar_13_value VAOFSTRING,p_objvar_14_name VAOFSTRING,p_objvar_14_type VAOFNUMBER,p_objvar_14_value VAOFSTRING,p_objvar_15_name VAOFSTRING,p_objvar_15_type VAOFNUMBER,p_objvar_15_value VAOFSTRING,p_objvar_16_name VAOFSTRING,p_objvar_16_type VAOFNUMBER,p_objvar_16_value VAOFSTRING,p_objvar_17_name VAOFSTRING,p_objvar_17_type VAOFNUMBER,p_objvar_17_value VAOFSTRING,p_objvar_18_name VAOFSTRING,p_objvar_18_type VAOFNUMBER,p_objvar_18_value VAOFSTRING,p_objvar_19_name VAOFSTRING,p_objvar_19_type VAOFNUMBER,p_objvar_19_value VAOFSTRING, p_script_list VAOFLONGSTRING, p_object_id VAOFSTRING, p_chunk_size number) + as + + p_cache_update NUMBER; + + begin + FORALL i IN 1..p_chunk_size + insert into objects + ( + x, + y, + z, + quaternion_w, + quaternion_x, + quaternion_y, + quaternion_z, + node_x, + node_y, + node_z, + object_template_id, + type_id, + scene_id, + controller_type, + deleted, + object_name, + volume, + contained_by, + slot_arrangement, + player_controlled, + cache_version, + load_contents, + cash_balance, + bank_balance, + complexity, + name_string_table, + name_string_text, + static_item_name, + static_item_version, + conversion_id, + load_with, + + objvar_0_name, + objvar_0_type, + objvar_0_value, + objvar_1_name, + objvar_1_type, + objvar_1_value, + objvar_2_name, + objvar_2_type, + objvar_2_value, + objvar_3_name, + objvar_3_type, + objvar_3_value, + objvar_4_name, + objvar_4_type, + objvar_4_value, + objvar_5_name, + objvar_5_type, + objvar_5_value, + objvar_6_name, + objvar_6_type, + objvar_6_value, + objvar_7_name, + objvar_7_type, + objvar_7_value, + objvar_8_name, + objvar_8_type, + objvar_8_value, + objvar_9_name, + objvar_9_type, + objvar_9_value, + + objvar_10_name, + objvar_10_type, + objvar_10_value, + objvar_11_name, + objvar_11_type, + objvar_11_value, + objvar_12_name, + objvar_12_type, + objvar_12_value, + objvar_13_name, + objvar_13_type, + objvar_13_value, + objvar_14_name, + objvar_14_type, + objvar_14_value, + objvar_15_name, + objvar_15_type, + objvar_15_value, + objvar_16_name, + objvar_16_type, + objvar_16_value, + objvar_17_name, + objvar_17_type, + objvar_17_value, + objvar_18_name, + objvar_18_type, + objvar_18_value, + objvar_19_name, + objvar_19_type, + objvar_19_value, + + script_list, + + object_id + ) + values + ( + p_x(i), + p_y(i), + p_z(i), + p_quaternion_w(i), + p_quaternion_x(i), + p_quaternion_y(i), + p_quaternion_z(i), + p_node_x(i), + p_node_y(i), + p_node_z(i), + p_object_template_id(i), + p_type_id(i), + p_scene_id(i), + p_controller_type(i), + p_deleted(i), + p_object_name(i), + p_volume(i), + p_contained_by(i), + p_slot_arrangement(i), + p_player_controlled(i), + 0, + p_load_contents(i), + p_cash_balance(i), + p_bank_balance(i), + p_complexity(i), + p_name_string_table(i), + p_name_string_text(i), + p_static_item_name(i), + p_static_item_version(i), + p_conversion_id(i), + p_load_with(i), + + p_objvar_0_name(i), + p_objvar_0_type(i), + p_objvar_0_value(i), + p_objvar_1_name(i), + p_objvar_1_type(i), + p_objvar_1_value(i), + p_objvar_2_name(i), + p_objvar_2_type(i), + p_objvar_2_value(i), + p_objvar_3_name(i), + p_objvar_3_type(i), + p_objvar_3_value(i), + p_objvar_4_name(i), + p_objvar_4_type(i), + p_objvar_4_value(i), + p_objvar_5_name(i), + p_objvar_5_type(i), + p_objvar_5_value(i), + p_objvar_6_name(i), + p_objvar_6_type(i), + p_objvar_6_value(i), + p_objvar_7_name(i), + p_objvar_7_type(i), + p_objvar_7_value(i), + p_objvar_8_name(i), + p_objvar_8_type(i), + p_objvar_8_value(i), + p_objvar_9_name(i), + p_objvar_9_type(i), + p_objvar_9_value(i), + + p_objvar_10_name(i), + p_objvar_10_type(i), + p_objvar_10_value(i), + p_objvar_11_name(i), + p_objvar_11_type(i), + p_objvar_11_value(i), + p_objvar_12_name(i), + p_objvar_12_type(i), + p_objvar_12_value(i), + p_objvar_13_name(i), + p_objvar_13_type(i), + p_objvar_13_value(i), + p_objvar_14_name(i), + p_objvar_14_type(i), + p_objvar_14_value(i), + p_objvar_15_name(i), + p_objvar_15_type(i), + p_objvar_15_value(i), + p_objvar_16_name(i), + p_objvar_16_type(i), + p_objvar_16_value(i), + p_objvar_17_name(i), + p_objvar_17_type(i), + p_objvar_17_value(i), + p_objvar_18_name(i), + p_objvar_18_type(i), + p_objvar_18_value(i), + p_objvar_19_name(i), + p_objvar_19_type(i), + p_objvar_19_value(i), + + p_script_list(i), + + p_object_id(i) + ); + + exception when dup_val_on_index then + for i in 1..p_chunk_size loop + + if + ((p_x(i) is not null) + or (p_y(i) is not null) + or (p_z(i) is not null) + or (p_quaternion_w(i) is not null) + or (p_quaternion_x(i) is not null) + or (p_quaternion_y(i) is not null) + or (p_quaternion_z(i) is not null) + or (p_contained_by(i) is not null) + or (p_cache_version(i) is not null)) + then + p_cache_update := 0; + else + p_cache_update := NULL; + end if; + + UPDATE OBJECTS Set + x = nvl(p_x(i),x), + y = nvl(p_y(i),y), + z = nvl(p_z(i),z), + quaternion_w = nvl(p_quaternion_w(i),quaternion_w), + quaternion_x = nvl(p_quaternion_x(i),quaternion_x), + quaternion_y = nvl(p_quaternion_y(i),quaternion_y), + quaternion_z = nvl(p_quaternion_z(i),quaternion_z), + node_x = nvl(p_node_x(i),node_x), + node_y = nvl(p_node_y(i),node_y), + node_z = nvl(p_node_z(i),node_z), + object_template_id = nvl(p_object_template_id(i),object_template_id), + type_id = nvl(p_type_id(i),type_id), + scene_id = nvl(p_scene_id(i),scene_id), + controller_type = nvl(p_controller_type(i),controller_type), + deleted = nvl(p_deleted(i),deleted), + object_name = nvl(p_object_name(i),object_name), + volume = nvl(p_volume(i),volume), + contained_by = nvl(p_contained_by(i),contained_by), + slot_arrangement = nvl(p_slot_arrangement(i),slot_arrangement), + player_controlled = nvl(p_player_controlled(i),player_controlled), + cache_version = nvl(p_cache_update,cache_version), + load_contents = nvl(p_load_contents(i),load_contents), + cash_balance = nvl(p_cash_balance(i),cash_balance), + bank_balance = nvl(p_bank_balance(i),bank_balance), + complexity = nvl(p_complexity(i),complexity), + name_string_table = nvl(p_name_string_table(i),name_string_table), + name_string_text = nvl(p_name_string_text(i),name_string_text), + static_item_name = nvl(p_static_item_name(i),static_item_name), + static_item_version = nvl(p_static_item_version(i),static_item_version), + conversion_id = nvl(p_conversion_id(i),conversion_id), + load_with = nvl(p_load_with(i),load_with), + + objvar_0_name = nvl(p_objvar_0_name(i), objvar_0_name), + objvar_0_type = nvl(p_objvar_0_type(i), objvar_0_type), + objvar_0_value= nvl(p_objvar_0_value(i),objvar_0_value), + objvar_1_name = nvl(p_objvar_1_name(i), objvar_1_name), + objvar_1_type = nvl(p_objvar_1_type(i), objvar_1_type), + objvar_1_value= nvl(p_objvar_1_value(i),objvar_1_value), + objvar_2_name = nvl(p_objvar_2_name(i), objvar_2_name), + objvar_2_type = nvl(p_objvar_2_type(i), objvar_2_type), + objvar_2_value= nvl(p_objvar_2_value(i),objvar_2_value), + objvar_3_name = nvl(p_objvar_3_name(i), objvar_3_name), + objvar_3_type = nvl(p_objvar_3_type(i), objvar_3_type), + objvar_3_value= nvl(p_objvar_3_value(i),objvar_3_value), + objvar_4_name = nvl(p_objvar_4_name(i), objvar_4_name), + objvar_4_type = nvl(p_objvar_4_type(i), objvar_4_type), + objvar_4_value= nvl(p_objvar_4_value(i),objvar_4_value), + objvar_5_name = nvl(p_objvar_5_name(i), objvar_5_name), + objvar_5_type = nvl(p_objvar_5_type(i), objvar_5_type), + objvar_5_value= nvl(p_objvar_5_value(i),objvar_5_value), + objvar_6_name = nvl(p_objvar_6_name(i), objvar_6_name), + objvar_6_type = nvl(p_objvar_6_type(i), objvar_6_type), + objvar_6_value= nvl(p_objvar_6_value(i),objvar_6_value), + objvar_7_name = nvl(p_objvar_7_name(i), objvar_7_name), + objvar_7_type = nvl(p_objvar_7_type(i), objvar_7_type), + objvar_7_value= nvl(p_objvar_7_value(i),objvar_7_value), + objvar_8_name = nvl(p_objvar_8_name(i), objvar_8_name), + objvar_8_type = nvl(p_objvar_8_type(i), objvar_8_type), + objvar_8_value= nvl(p_objvar_8_value(i),objvar_8_value), + objvar_9_name = nvl(p_objvar_9_name(i), objvar_9_name), + objvar_9_type = nvl(p_objvar_9_type(i), objvar_9_type), + objvar_9_value= nvl(p_objvar_9_value(i),objvar_9_value), + + objvar_10_name = nvl(p_objvar_10_name(i), objvar_10_name), + objvar_10_type = nvl(p_objvar_10_type(i), objvar_10_type), + objvar_10_value= nvl(p_objvar_10_value(i),objvar_10_value), + objvar_11_name = nvl(p_objvar_11_name(i), objvar_11_name), + objvar_11_type = nvl(p_objvar_11_type(i), objvar_11_type), + objvar_11_value= nvl(p_objvar_11_value(i),objvar_11_value), + objvar_12_name = nvl(p_objvar_12_name(i), objvar_12_name), + objvar_12_type = nvl(p_objvar_12_type(i), objvar_12_type), + objvar_12_value= nvl(p_objvar_12_value(i),objvar_12_value), + objvar_13_name = nvl(p_objvar_13_name(i), objvar_13_name), + objvar_13_type = nvl(p_objvar_13_type(i), objvar_13_type), + objvar_13_value= nvl(p_objvar_13_value(i),objvar_13_value), + objvar_14_name = nvl(p_objvar_14_name(i), objvar_14_name), + objvar_14_type = nvl(p_objvar_14_type(i), objvar_14_type), + objvar_14_value= nvl(p_objvar_14_value(i),objvar_14_value), + objvar_15_name = nvl(p_objvar_15_name(i), objvar_15_name), + objvar_15_type = nvl(p_objvar_15_type(i), objvar_15_type), + objvar_15_value= nvl(p_objvar_15_value(i),objvar_15_value), + objvar_16_name = nvl(p_objvar_16_name(i), objvar_16_name), + objvar_16_type = nvl(p_objvar_16_type(i), objvar_16_type), + objvar_16_value= nvl(p_objvar_16_value(i),objvar_16_value), + objvar_17_name = nvl(p_objvar_17_name(i), objvar_17_name), + objvar_17_type = nvl(p_objvar_17_type(i), objvar_17_type), + objvar_17_value= nvl(p_objvar_17_value(i),objvar_17_value), + objvar_18_name = nvl(p_objvar_18_name(i), objvar_18_name), + objvar_18_type = nvl(p_objvar_18_type(i), objvar_18_type), + objvar_18_value= nvl(p_objvar_18_value(i),objvar_18_value), + objvar_19_name = nvl(p_objvar_19_name(i), objvar_19_name), + objvar_19_type = nvl(p_objvar_19_type(i), objvar_19_type), + objvar_19_value= nvl(p_objvar_19_value(i),objvar_19_value), + + script_list = nvl(p_script_list(i), script_list) + + WHERE + object_id=p_object_id(i) and + p_deleted(i) = 0; + + if SQL%ROWCOUNT=0 then + insert into objects + ( + x, + y, + z, + quaternion_w, + quaternion_x, + quaternion_y, + + quaternion_z, + node_x, + node_y, + node_z, + object_template_id, + type_id, + scene_id, + controller_type, + deleted, + object_name, + volume, + contained_by, + slot_arrangement, + player_controlled, + cache_version, + load_contents, + cash_balance, + bank_balance, + complexity, + name_string_table, + name_string_text, + static_item_name, + static_item_version, + conversion_id, + load_with, + + objvar_0_name, + objvar_0_type, + objvar_0_value, + objvar_1_name, + objvar_1_type, + objvar_1_value, + objvar_2_name, + objvar_2_type, + objvar_2_value, + objvar_3_name, + objvar_3_type, + objvar_3_value, + objvar_4_name, + objvar_4_type, + objvar_4_value, + objvar_5_name, + objvar_5_type, + objvar_5_value, + objvar_6_name, + objvar_6_type, + objvar_6_value, + objvar_7_name, + objvar_7_type, + objvar_7_value, + objvar_8_name, + objvar_8_type, + objvar_8_value, + objvar_9_name, + objvar_9_type, + objvar_9_value, + + objvar_10_name, + objvar_10_type, + objvar_10_value, + objvar_11_name, + objvar_11_type, + objvar_11_value, + objvar_12_name, + objvar_12_type, + objvar_12_value, + objvar_13_name, + objvar_13_type, + objvar_13_value, + objvar_14_name, + objvar_14_type, + objvar_14_value, + objvar_15_name, + objvar_15_type, + objvar_15_value, + objvar_16_name, + objvar_16_type, + objvar_16_value, + objvar_17_name, + objvar_17_type, + objvar_17_value, + objvar_18_name, + objvar_18_type, + objvar_18_value, + objvar_19_name, + objvar_19_type, + objvar_19_value, + + script_list, + + object_id + ) + values + ( + p_x(i), + p_y(i), + p_z(i), + p_quaternion_w(i), + p_quaternion_x(i), + p_quaternion_y(i), + p_quaternion_z(i), + p_node_x(i), + p_node_y(i), + p_node_z(i), + p_object_template_id(i), + p_type_id(i), + p_scene_id(i), + p_controller_type(i), + p_deleted(i), + p_object_name(i), + p_volume(i), + p_contained_by(i), + p_slot_arrangement(i), + p_player_controlled(i), + 0, + p_load_contents(i), + p_cash_balance(i), + p_bank_balance(i), + p_complexity(i), + p_name_string_table(i), + p_name_string_text(i), + p_static_item_name(i), + p_static_item_version(i), + p_conversion_id(i), + p_load_with(i), + + p_objvar_0_name(i), + p_objvar_0_type(i), + p_objvar_0_value(i), + p_objvar_1_name(i), + p_objvar_1_type(i), + p_objvar_1_value(i), + p_objvar_2_name(i), + p_objvar_2_type(i), + p_objvar_2_value(i), + p_objvar_3_name(i), + p_objvar_3_type(i), + p_objvar_3_value(i), + p_objvar_4_name(i), + p_objvar_4_type(i), + p_objvar_4_value(i), + p_objvar_5_name(i), + p_objvar_5_type(i), + p_objvar_5_value(i), + p_objvar_6_name(i), + p_objvar_6_type(i), + p_objvar_6_value(i), + p_objvar_7_name(i), + p_objvar_7_type(i), + p_objvar_7_value(i), + p_objvar_8_name(i), + p_objvar_8_type(i), + p_objvar_8_value(i), + p_objvar_9_name(i), + p_objvar_9_type(i), + p_objvar_9_value(i), + + p_objvar_10_name(i), + p_objvar_10_type(i), + p_objvar_10_value(i), + p_objvar_11_name(i), + p_objvar_11_type(i), + p_objvar_11_value(i), + p_objvar_12_name(i), + p_objvar_12_type(i), + p_objvar_12_value(i), + p_objvar_13_name(i), + p_objvar_13_type(i), + p_objvar_13_value(i), + p_objvar_14_name(i), + p_objvar_14_type(i), + p_objvar_14_value(i), + p_objvar_15_name(i), + p_objvar_15_type(i), + p_objvar_15_value(i), + p_objvar_16_name(i), + p_objvar_16_type(i), + p_objvar_16_value(i), + p_objvar_17_name(i), + p_objvar_17_type(i), + p_objvar_17_value(i), + p_objvar_18_name(i), + p_objvar_18_type(i), + p_objvar_18_value(i), + p_objvar_19_name(i), + p_objvar_19_type(i), + p_objvar_19_value(i), + + p_script_list(i), + + p_object_id(i) + ); + + end if; + end loop; + end; + + procedure remove_object ( p_object_id VAOFSTRING, p_chunk_size number) + as + begin + + FORALL i IN 1..p_chunk_size + delete from objects + where object_id = p_object_id(i); + + end; + + procedure save_manf_schem_attribute + ( + p_action number, + p_object_id objectid, + p_attribute_type varchar2, + p_value number + ) + as + begin + if (p_action = 0) then + delete manf_schematic_attributes + where object_id = p_object_id + and attribute_type = p_attribute_type; + else + update manf_schematic_attributes + set value = p_value + where + object_id = p_object_id + and attribute_type = p_attribute_type; + + if (sql%rowcount = 0) then + insert into manf_schematic_attributes (object_id, attribute_type, value) + values (p_object_id, p_attribute_type, p_value); + end if; + end if; + end; + + procedure update_property_list + ( + p_object_id objectid, + p_list_id number, + p_operation number, + p_value varchar2 + ) + as + begin + -- Operations: + -- 0=ERASE + -- 1=INSERT + -- 2=CLEAR + + IF p_operation = 0 THEN + delete from property_lists + where object_id = p_object_id + and list_id = p_list_id + and value = p_value; + + ELSIF p_operation = 1 THEN + insert into property_lists (object_id, list_id, value) + values (p_object_id, p_list_id, p_value); + + ELSIF p_operation = 2 THEN + delete from property_lists + where object_id = p_object_id + and list_id = p_list_id; + + ELSE + raise_application_error(-20000,'Invalid operation code passed to update_command.'); + + END IF; + + exception when dup_val_on_index then + null; + end; + + procedure update_property_list_batch (p_object_id VAOFSTRING, p_list_id VAOFNUMBER, p_operation number, p_value VAOFSTRING, p_chunk_size number, p_enable_db_logging number ) + as + begin + -- Operations: + -- 0=ERASE + -- 1=INSERT + -- 2=CLEAR + + if (p_operation = 0) THEN + FORALL i IN 1.. p_chunk_size + delete from property_lists + where object_id = p_object_id(i) + and list_id = p_list_id(i) + and value = p_value(i); + + ELSIF (p_operation = 1) THEN + FORALL i IN 1.. p_chunk_size + insert into property_lists (object_id, list_id, value) + values (p_object_id(i), p_list_id(i), p_value(i)); + + ELSIF (p_operation = 2) THEN + FORALL i IN 1.. p_chunk_size + delete from property_lists + where object_id = p_object_id(i) + and list_id = p_list_id(i); + + ELSE + raise_application_error(-20000,'Invalid operation code passed to update_command.'); + + END IF; + + exception when dup_val_on_index then + for i in 1..p_chunk_size loop + begin + insert into property_lists + ( + property_lists.list_id, + property_lists.value, + property_lists.object_id + ) + VALUES + ( + p_list_id(i), + p_value(i), + p_object_id(i) + ); + exception when dup_val_on_index then + if ( p_enable_db_logging > 0 ) then + + db_error_logger.dblogerror( SQLCODE, 'procedure update_property_list_batch: duplicate rows were sent to the property list buffer that resulted in a dup_val_on_index error.'); + if ( p_enable_db_logging > 1 ) then + + db_error_logger.dblogerror_values( 'property_lists', 'object_id' , 'number', p_object_id(i)); + db_error_logger.dblogerror_values( 'property_lists', 'list_id' , 'number', to_char(p_list_id(i))); + db_error_logger.dblogerror_values( 'property_lists', 'value' , 'varchar2', p_value(i)); + + end if; + + else + NULL; + end if; + end; + end loop; + end; + + + procedure save_armor + ( + p_object_template varchar2, + p_effectiveness number, + p_integrity number, + p_special_protections varchar2, + p_encumberance_0 number, + p_encumberance_1 number, + p_encumberance_2 number, + p_encumberance_3 number, + p_encumberance_4 number, + p_encumberance_5 number, + p_encumberance_6 number, + p_encumberance_7 number, + p_encumberance_8 number, + p_layer number, + p_object_id objectid + ) + as + begin + -- Note: armor always updates all properties + update armor + set + object_template = p_object_template, + effectiveness = p_effectiveness, + integrity = p_integrity, + special_protections = p_special_protections, + encumberance_0 = p_encumberance_0, + encumberance_1 = p_encumberance_1, + encumberance_2 = p_encumberance_2, + encumberance_3 = p_encumberance_3, + encumberance_4 = p_encumberance_4, + encumberance_5 = p_encumberance_5, + encumberance_6 = p_encumberance_6, + encumberance_7 = p_encumberance_7, + encumberance_8 = p_encumberance_8 + where + layer = p_layer + and object_id = p_object_id; + end; + + procedure add_armor + ( + p_object_template varchar2, + p_effectiveness number, + p_integrity number, + p_special_protections varchar2, + p_encumberance_0 number, + p_encumberance_1 number, + p_encumberance_2 number, + p_encumberance_3 number, + p_encumberance_4 number, + p_encumberance_5 number, + p_encumberance_6 number, + p_encumberance_7 number, + p_encumberance_8 number, + p_layer number, + p_object_id objectid + ) + as + begin + insert into armor + ( + object_template, + effectiveness, + integrity, + special_protections, + encumberance_0, + encumberance_1, + encumberance_2, + + encumberance_3, + encumberance_4, + encumberance_5, + encumberance_6, + encumberance_7, + encumberance_8, + layer, + object_id + ) + values + ( + p_object_template, + p_effectiveness, + p_integrity, + p_special_protections, + p_encumberance_0, + p_encumberance_1, + p_encumberance_2, + p_encumberance_3, + p_encumberance_4, + p_encumberance_5, + p_encumberance_6, + p_encumberance_7, + p_encumberance_8, + p_layer, + p_object_id + ); + + exception when dup_val_on_index then + null; + end; + + procedure save_location + ( + p_object_id number, + p_list_id number, + p_sequence_number number, + p_operation number, + p_name varchar2, + p_scene varchar2, + p_x number, + p_y number, + p_z number, + p_radius number + ) + as + begin + -- Operations: + -- 0=INSERT + + -- 1=DELETE + -- 2=SET + + IF p_operation = 0 THEN + insert into location_lists (object_id, list_id, sequence_number, name, scene, x, y, z, radius) + select p_object_id, p_list_id, p_sequence_number, p_name, p_scene, p_x, p_y, p_z, p_radius + from dual + where not exists (select * from location_lists + where object_id = p_object_id + and list_id = p_list_id + and sequence_number = p_sequence_number); + + ELSIF p_operation = 1 THEN + delete from location_lists + where object_id = p_object_id + and list_id = p_list_id + and sequence_number = p_sequence_number; + + update location_lists + set sequence_number = sequence_number - 1 + where object_id = p_object_id + + and list_id = p_list_id + and sequence_number > p_sequence_number; + + ELSIF p_operation = 2 THEN + update location_lists + set + name = p_name, + scene = p_scene, + x = p_x, + y = p_y, + z = p_z, + radius = p_radius + where object_id = p_object_id + and list_id = p_list_id + and sequence_number = p_sequence_number; + + ELSE + raise_application_error(-20000,'Invalid operation code passed to update_skill.'); + + END IF; + end; + + procedure save_experience ( p_points number, p_experience_type varchar2, p_object_id number ) + as + begin + update experience_points + set points = p_points + where object_id = p_object_id and experience_type = p_experience_type; + + if sql%rowcount = 0 then + insert into experience_points (object_id, experience_type, points) + values (p_object_id, p_experience_type, p_points); + end if; + end; + + procedure save_battlefield_participants ( p_faction_id number, p_character_object_id number, p_region_object_id number ) + as + begin + if (p_faction_id <> 0) then + update battlefield_participants + set faction_id = p_faction_id + where region_object_id = p_region_object_id and character_object_id = p_character_object_id; + + if sql%rowcount = 0 then + insert into battlefield_participants (region_object_id, character_object_id, faction_id) + values (p_region_object_id, p_character_object_id, p_faction_id); + end if; + else + delete battlefield_participants + where region_object_id = p_region_object_id and character_object_id = p_character_object_id; + end if; + end; + + function rename_character( p_character_id objectid, p_new_name varchar2, p_normalized_name varchar2) return number + as + l_existing_object_with_name objectid; + begin + select character_object + into l_existing_object_with_name + from players + where uc_character_name = p_normalized_name; + + if (l_existing_object_with_name = p_character_id) then + update objects + set object_name = p_new_name + where object_id = p_character_id; + + if (sql%rowcount=1) then + update players + set uc_character_name = p_normalized_name, character_full_name = p_new_name + where character_object = p_character_id; + + return 1; + else + return 0; + end if; + else + return 0; + end if; + + exception + when no_data_found then + update objects + set object_name = p_new_name + where object_id = p_character_id; + + if (sql%rowcount=1) then + update players + set uc_character_name = p_normalized_name, character_full_name = p_new_name + where character_object = p_character_id; + + return 1; + else + return 0; + end if; + + when others then + return 0; + end; + + procedure save_waypoint + ( + p_object_id objectid, + p_waypoint_id objectid, + p_appearance_name_crc number, + p_location_x number, + p_location_y number, + p_location_z number, + p_location_cell number, + p_location_scene number, + p_name varchar2, + p_color number, + p_active char, + p_detached char + ) + as + begin + if p_detached='N' then + + update waypoints set + appearance_name_crc = p_appearance_name_crc, + location_x = p_location_x, + location_y = p_location_y, + location_z = p_location_z, + location_cell = p_location_cell, + location_scene = p_location_scene, + name = p_name, + color = p_color, + active = p_active + + where + waypoint_id = p_waypoint_id; + + if (sql%rowcount=0) then + insert into waypoints + ( + object_id, + waypoint_id, + appearance_name_crc, + location_x, + location_y, + location_z, + + location_cell, + location_scene, + name, + color, + active + ) + values + ( + p_object_id, + p_waypoint_id, + p_appearance_name_crc, + p_location_x, + p_location_y, + p_location_z, + p_location_cell, + p_location_scene, + p_name, + p_color, + p_active + ); + end if; + + else -- p_detached <> 'N' + + delete waypoints + where waypoint_id = p_waypoint_id; + + end if; + EXCEPTION + WHEN OTHERS THEN + BEGIN + + Db_Error_Logger.dblogerror( SQLCODE, 'procedure save_waypoint: attempting to find numeric overflow error.'); + + Db_Error_Logger.dblogerror_values( 'waypoints', 'object_id' , 'number', p_object_id); + Db_Error_Logger.dblogerror_values( 'waypoints', 'waypoint_id' , 'number', p_waypoint_id); + Db_Error_Logger.dblogerror_values( 'waypoints', 'appearance_name_crc' , 'number', TO_CHAR(p_appearance_name_crc)); + Db_Error_Logger.dblogerror_values( 'waypoints', 'location_x' , 'number', TO_CHAR(p_location_x)); + Db_Error_Logger.dblogerror_values( 'waypoints', 'location_y' , 'number', TO_CHAR(p_location_y)); + Db_Error_Logger.dblogerror_values( 'waypoints', 'location_z' , 'number', TO_CHAR(p_location_z)); + Db_Error_Logger.dblogerror_values( 'waypoints', 'location_cell' , 'number', TO_CHAR(p_location_cell)); + Db_Error_Logger.dblogerror_values( 'waypoints', 'location_scene' , 'number', TO_CHAR(p_location_scene)); + Db_Error_Logger.dblogerror_values( 'waypoints', 'name' , 'varchar2', p_name); + Db_Error_Logger.dblogerror_values( 'waypoints', 'color' , 'char', p_color); + Db_Error_Logger.dblogerror_values( 'waypoints', 'active' , 'char', p_active); + EXCEPTION + WHEN OTHERS THEN + NULL; + END; + end; + + procedure save_player_obj( p_object_id VAOFSTRING, p_station_id VAOFNUMBER, p_house_id VAOFSTRING, p_account_num_lots VAOFNUMBER, p_account_is_outcast VAOFSTRING, p_account_cheater_level VAOFNUMBER, p_account_max_lots_adjustment VAOFNUMBER, p_personal_profile_id VAOFSTRING, p_character_profile_id VAOFSTRING, p_skill_title VAOFSTRING, p_born_date VAOFNUMBER, p_played_time VAOFNUMBER, p_force_regen_rate VAOFNUMBER, p_force_power VAOFNUMBER, p_max_force_power VAOFNUMBER, p_active_quests VAOFSTRING, p_completed_quests VAOFSTRING, p_current_quest VAOFNUMBER, p_quests VAOFLONGSTRING, p_role_icon_choice VAOFNUMBER, p_quests2 VAOFLONGSTRING, p_quests3 VAOFLONGSTRING, p_quests4 VAOFLONGSTRING, p_skill_template VAOFSTRING, p_working_skill VAOFSTRING, p_current_gcw_points VAOFNUMBER, p_current_gcw_rating VAOFNUMBER, p_current_pvp_kills VAOFNUMBER, p_lifetime_gcw_points VAOFNUMBER, p_max_gcw_imperial_rating VAOFNUMBER, p_max_gcw_rebel_rating VAOFNUMBER, p_lifetime_pvp_kills VAOFNUMBER, p_next_gcw_rating_calc_time VAOFNUMBER, p_collections VAOFLONGSTRING, p_show_backpack VAOFSTRING, p_show_helmet VAOFSTRING, p_collections2 VAOFLONGSTRING, p_chunk_size number ) + as + begin + FORALL i IN 1..p_chunk_size + update player_objects set + player_objects.station_id = nvl(p_station_id(i),player_objects.station_id), + player_objects.personal_profile_id = nvl(p_personal_profile_id(i),player_objects.personal_profile_id), + player_objects.character_profile_id = nvl(p_character_profile_id(i),player_objects.character_profile_id), + player_objects.skill_title = nvl(p_skill_title(i),player_objects.skill_title), + player_objects.born_date = nvl(p_born_date(i),player_objects.born_date), + player_objects.played_time = nvl(p_played_time(i),player_objects.played_time), + player_objects.force_regen_rate = nvl(p_force_regen_rate(i),player_objects.force_regen_rate), + player_objects.force_power = nvl(p_force_power(i),player_objects.force_power), + player_objects.max_force_power = nvl(p_max_force_power(i),player_objects.max_force_power), + player_objects.active_quests = nvl(p_active_quests(i),player_objects.active_quests), + player_objects.completed_quests = nvl(p_completed_quests(i),player_objects.completed_quests), + player_objects.current_quest = nvl(p_current_quest(i),player_objects.current_quest), + player_objects.quests = nvl(p_quests(i),player_objects.quests), + player_objects.role_icon_choice = nvl(p_role_icon_choice(i),player_objects.role_icon_choice), + player_objects.quests2 = nvl(p_quests2(i),player_objects.quests2), + player_objects.quests3 = nvl(p_quests3(i),player_objects.quests3), + player_objects.quests4 = nvl(p_quests4(i),player_objects.quests4), + player_objects.skill_template = nvl(p_skill_template(i),player_objects.skill_template), + player_objects.working_skill = nvl(p_working_skill(i),player_objects.working_skill), + player_objects.current_gcw_points = nvl(p_current_gcw_points(i),player_objects.current_gcw_points), + player_objects.current_gcw_rating = nvl(p_current_gcw_rating(i),player_objects.current_gcw_rating), + player_objects.current_pvp_kills = nvl(p_current_pvp_kills(i),player_objects.current_pvp_kills), + player_objects.lifetime_gcw_points = nvl(p_lifetime_gcw_points(i),player_objects.lifetime_gcw_points), + player_objects.max_gcw_imperial_rating = nvl(p_max_gcw_imperial_rating(i),player_objects.max_gcw_imperial_rating), + player_objects.max_gcw_rebel_rating = nvl(p_max_gcw_rebel_rating(i),player_objects.max_gcw_rebel_rating), + player_objects.lifetime_pvp_kills = nvl(p_lifetime_pvp_kills(i),player_objects.lifetime_pvp_kills), + player_objects.next_gcw_rating_calc_time = nvl(p_next_gcw_rating_calc_time(i),player_objects.next_gcw_rating_calc_time), + player_objects.collections = nvl(p_collections(i),player_objects.collections), + player_objects.show_backpack = nvl(p_show_backpack(i),player_objects.show_backpack), + player_objects.show_helmet = nvl(p_show_helmet(i),player_objects.show_helmet), + player_objects.collections2 = nvl(p_collections2(i),player_objects.collections2), + num_lots = nvl(p_account_num_lots(i), num_lots) + where + player_objects.object_id=p_object_id(i); + + FOR i IN 1.. p_chunk_size + LOOP + if (p_station_id(i) is not null) then + begin + insert into accounts (station_id, is_outcast, cheater_level) + values (p_station_id(i), 0,0); + + exception when dup_val_on_index then + null; + end; + end if; + end LOOP; + + FORALL i IN 1..p_chunk_size + update accounts + set + is_outcast = nvl(p_account_is_outcast(i), is_outcast), + cheater_level = nvl(p_account_cheater_level(i), cheater_level), + max_lots_adjustment = nvl(p_account_max_lots_adjustment(i), max_lots_adjustment), + house_id = nvl(p_house_id(i), house_id) + where + station_id = (select station_id from player_objects where object_id = p_object_id(i)); + + end; + + procedure add_player_obj( p_object_id VAOFSTRING, p_station_id VAOFNUMBER, p_house_id VAOFSTRING, p_account_num_lots VAOFNUMBER, p_account_is_outcast VAOFSTRING, p_account_cheater_level VAOFNUMBER, p_account_max_lots_adjustment VAOFNUMBER, p_personal_profile_id VAOFSTRING, p_character_profile_id VAOFSTRING, p_skill_title VAOFSTRING, p_born_date VAOFNUMBER, p_played_time VAOFNUMBER, p_force_regen_rate VAOFNUMBER, p_force_power VAOFNUMBER, p_max_force_power VAOFNUMBER, p_active_quests VAOFSTRING, p_completed_quests VAOFSTRING, p_current_quest VAOFNUMBER, p_quests VAOFLONGSTRING, p_role_icon_choice VAOFNUMBER, p_quests2 VAOFLONGSTRING, p_quests3 VAOFLONGSTRING, p_quests4 VAOFLONGSTRING, p_skill_template VAOFSTRING, p_working_skill VAOFSTRING, p_current_gcw_points VAOFNUMBER, p_current_gcw_rating VAOFNUMBER, p_current_pvp_kills VAOFNUMBER, p_lifetime_gcw_points VAOFNUMBER, p_max_gcw_imperial_rating VAOFNUMBER, p_max_gcw_rebel_rating VAOFNUMBER, p_lifetime_pvp_kills VAOFNUMBER, p_next_gcw_rating_calc_time VAOFNUMBER, p_collections VAOFLONGSTRING, p_show_backpack VAOFSTRING, p_show_helmet VAOFSTRING, p_collections2 VAOFLONGSTRING, p_chunk_size number ) + as + begin + + FORALL i IN 1..p_chunk_size + insert into player_objects + ( + player_objects.station_id, + player_objects.personal_profile_id, + player_objects.character_profile_id, + player_objects.skill_title, + player_objects.born_date, + player_objects.played_time, + player_objects.force_regen_rate, + player_objects.force_power, + player_objects.max_force_power, + player_objects.num_lots, + player_objects.object_id, + player_objects.active_quests, + player_objects.completed_quests, + player_objects.current_quest, + player_objects.quests, + player_objects.role_icon_choice, + player_objects.quests2, + player_objects.quests3, + player_objects.quests4, + player_objects.skill_template, + player_objects.working_skill, + player_objects.current_gcw_points, + player_objects.current_gcw_rating, + player_objects.current_pvp_kills, + player_objects.lifetime_gcw_points, + player_objects.max_gcw_imperial_rating, + player_objects.max_gcw_rebel_rating, + player_objects.lifetime_pvp_kills, + player_objects.next_gcw_rating_calc_time, + player_objects.collections, + player_objects.show_backpack, + player_objects.show_helmet, + player_objects.collections2 + ) + VALUES + ( + p_station_id(i), + p_personal_profile_id(i), + p_character_profile_id(i), + p_skill_title(i), + p_born_date(i), + p_played_time(i), + p_force_regen_rate(i), + p_force_power(i), + p_max_force_power(i), + p_account_num_lots(i), + p_object_id(i), + p_active_quests(i), + p_completed_quests(i), + p_current_quest(i), + p_quests(i), + p_role_icon_choice(i), + p_quests2(i), + p_quests3(i), + p_quests4(i), + p_skill_template(i), + p_working_skill(i), + p_current_gcw_points(i), + p_current_gcw_rating(i), + p_current_pvp_kills(i), + p_lifetime_gcw_points(i), + p_max_gcw_imperial_rating(i), + p_max_gcw_rebel_rating(i), + p_lifetime_pvp_kills(i), + p_next_gcw_rating_calc_time(i), + p_collections(i), + p_show_backpack(i), + p_show_helmet(i), + p_collections2(i) + ); + + FOR i IN 1.. p_chunk_size + LOOP + if (p_station_id(i) is not null) then + begin + insert into accounts (station_id, is_outcast, cheater_level, max_lots_adjustment, house_id) + values (p_station_id(i), p_account_is_outcast(i), p_account_cheater_level(i), p_account_max_lots_adjustment(i), p_house_id(i)); + + exception when dup_val_on_index then + null; + end; + end if; + end LOOP; + + exception when dup_val_on_index then + for i in 1..p_chunk_size loop + UPDATE player_objects Set + player_objects.station_id = nvl(p_station_id(i),player_objects.station_id), + player_objects.personal_profile_id = nvl(p_personal_profile_id(i),player_objects.personal_profile_id), + player_objects.character_profile_id = nvl(p_character_profile_id(i),player_objects.character_profile_id), + player_objects.skill_title = nvl(p_skill_title(i),player_objects.skill_title), + player_objects.born_date = nvl(p_born_date(i),player_objects.born_date), + player_objects.played_time = nvl(p_played_time(i),player_objects.played_time), + player_objects.force_regen_rate = nvl(p_force_regen_rate(i),player_objects.force_regen_rate), + player_objects.force_power = nvl(p_force_power(i),player_objects.force_power), + player_objects.max_force_power = nvl(p_max_force_power(i),player_objects.max_force_power), + player_objects.num_lots = nvl(p_account_num_lots(i), num_lots), + player_objects.active_quests = nvl(p_active_quests(i),player_objects.active_quests), + player_objects.completed_quests = nvl(p_completed_quests(i),player_objects.completed_quests), + player_objects.current_quest = nvl(p_current_quest(i),player_objects.current_quest), + player_objects.quests = nvl(p_quests(i),player_objects.quests), + player_objects.role_icon_choice = nvl(p_role_icon_choice(i),player_objects.role_icon_choice), + player_objects.quests2 = nvl(p_quests(i),player_objects.quests2), + player_objects.quests3 = nvl(p_quests(i),player_objects.quests3), + player_objects.quests4 = nvl(p_quests(i),player_objects.quests4), + player_objects.skill_template = nvl(p_skill_template(i),player_objects.skill_template), + player_objects.working_skill = nvl(p_working_skill(i),player_objects.working_skill), + player_objects.current_gcw_points = nvl(p_current_gcw_points(i),player_objects.current_gcw_points), + player_objects.current_gcw_rating = nvl(p_current_gcw_rating(i),player_objects.current_gcw_rating), + player_objects.current_pvp_kills = nvl(p_current_pvp_kills(i),player_objects.current_pvp_kills), + player_objects.lifetime_gcw_points = nvl(p_lifetime_gcw_points(i),player_objects.lifetime_gcw_points), + player_objects.max_gcw_imperial_rating = nvl(p_max_gcw_imperial_rating(i),player_objects.max_gcw_imperial_rating), + player_objects.max_gcw_rebel_rating = nvl(p_max_gcw_rebel_rating(i),player_objects.max_gcw_rebel_rating), + player_objects.lifetime_pvp_kills = nvl(p_lifetime_pvp_kills(i),player_objects.lifetime_pvp_kills), + player_objects.next_gcw_rating_calc_time = nvl(p_next_gcw_rating_calc_time(i),player_objects.next_gcw_rating_calc_time), + player_objects.collections = nvl(p_collections(i),player_objects.collections), + player_objects.show_backpack = nvl(p_show_backpack(i),player_objects.show_backpack), + player_objects.show_helmet = nvl(p_show_helmet(i),player_objects.show_helmet), + player_objects.collections2 = nvl(p_collections2(i),player_objects.collections2) + where + player_objects.object_id=p_object_id(i); + + if SQL%ROWCOUNT=0 then + insert into player_objects + ( + player_objects.station_id, + player_objects.personal_profile_id, + player_objects.character_profile_id, + player_objects.skill_title, + player_objects.born_date, + player_objects.played_time, + player_objects.force_regen_rate, + player_objects.force_power, + player_objects.max_force_power, + player_objects.num_lots, + player_objects.object_id, + player_objects.active_quests, + player_objects.completed_quests, + player_objects.current_quest, + player_objects.quests, + player_objects.role_icon_choice, + player_objects.quests2, + player_objects.quests3, + player_objects.quests4, + player_objects.skill_template, + player_objects.working_skill, + player_objects.current_gcw_points, + player_objects.current_gcw_rating, + player_objects.current_pvp_kills, + player_objects.lifetime_gcw_points, + player_objects.max_gcw_imperial_rating, + player_objects.max_gcw_rebel_rating, + player_objects.lifetime_pvp_kills, + player_objects.next_gcw_rating_calc_time, + player_objects.collections, + player_objects.show_backpack, + player_objects.show_helmet, + player_objects.collections2 + ) + VALUES + ( + p_station_id(i), + p_personal_profile_id(i), + p_character_profile_id(i), + p_skill_title(i), + p_born_date(i), + p_played_time(i), + p_force_regen_rate(i), + p_force_power(i), + p_max_force_power(i), + p_account_num_lots(i), + p_object_id(i), + p_active_quests(i), + p_completed_quests(i), + p_current_quest(i), + p_quests(i), + p_role_icon_choice(i), + p_quests2(i), + p_quests3(i), + p_quests4(i), + p_skill_template(i), + p_working_skill(i), + p_current_gcw_points(i), + p_current_gcw_rating(i), + p_current_pvp_kills(i), + p_lifetime_gcw_points(i), + p_max_gcw_imperial_rating(i), + p_max_gcw_rebel_rating(i), + p_lifetime_pvp_kills(i), + p_next_gcw_rating_calc_time(i), + p_collections(i), + p_show_backpack(i), + p_show_helmet(i), + p_collections2(i) + ); + end if; + end loop; + + FOR i IN 1.. p_chunk_size + LOOP + if (p_station_id(i) is not null) then + begin + insert into accounts (station_id, is_outcast, cheater_level, max_lots_adjustment, house_id) + values (p_station_id(i), p_account_is_outcast(i), p_account_cheater_level(i), p_account_max_lots_adjustment(i), p_house_id(i)); + + exception when dup_val_on_index then + null; + end; + end if; + end LOOP; + end; + + procedure remove_player_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + begin + FORALL i IN 1..p_chunk_size + delete player_objects + where + object_id=p_object_id(i); + end; + + procedure delete_demand_container( p_object_id VAOFSTRING, p_reason VAOFNUMBER, p_chunk_size number ) + as + l_delete_reason number; + begin + select reason_code + into l_delete_reason + from delete_reasons + where tag='ContainerDeleted'; + + FOR i IN 1.. p_chunk_size + LOOP + update objects + set deleted = decode(p_reason(i),0,l_delete_reason,p_reason(i)), -- use reason if specified, otherwise use 'ContainerDeleted' if it is 0 + load_with = null, + deleted_date = sysdate + where load_with = p_object_id(i); + end LOOP; + end; + + procedure save_resource_type(p_resource_id VAOFSTRING, p_resource_name VAOFSTRING, p_resource_class VAOFSTRING, p_attributes VAOFSTRING, p_fractal_seeds VAOFSTRING, p_depleted_timestamp VAOFNUMBER, p_chunk_size number) + as + begin + forall i in 1..p_chunk_size + insert into resource_types + ( + resource_id, + resource_name, + resource_class, + attributes, + fractal_seeds, + depleted_timestamp + ) + values + ( + p_resource_id(i), + p_resource_name(i), + p_resource_class(i), + p_attributes(i), + p_fractal_seeds(i), + p_depleted_timestamp(i) + ); + + exception when dup_val_on_index then + for i in 1..p_chunk_size loop + update resource_types set + resource_name = p_resource_name(i), + resource_class = p_resource_class(i), + attributes = p_attributes(i), + fractal_seeds = p_fractal_seeds(i), + depleted_timestamp = p_depleted_timestamp(i) + where + resource_id=p_resource_id(i); + + if SQL%ROWCOUNT=0 then + insert into resource_types + ( + resource_id, + resource_name, + resource_class, + attributes, + fractal_seeds, + depleted_timestamp + ) + values + ( + p_resource_id(i), + p_resource_name(i), + p_resource_class(i), + p_attributes(i), + p_fractal_seeds(i), + p_depleted_timestamp(i) + ); + end if; + end loop; + end; + + procedure save_bounty_hunter_target(p_object_id VAOFSTRING, p_target_id VAOFSTRING, p_chunk_size number) + as + begin + forall i in 1..p_chunk_size + insert into bounty_hunter_targets + ( + object_id, + target_id + ) + values + ( + p_object_id(i), + p_target_id(i) + ); + + delete bounty_hunter_targets + where target_id = 0; + + exception when dup_val_on_index then + begin + for i in 1..p_chunk_size loop + update bounty_hunter_targets set + target_id = p_target_id(i) + where + object_id = p_object_id(i); + + if SQL%ROWCOUNT=0 then + insert into bounty_hunter_targets + ( + object_id, + target_id + ) + values + ( + p_object_id(i), + p_target_id(i) + ); + end if; + end loop; + + delete bounty_hunter_targets + where target_id = 0; + end; + end; + + function subtract_money_from_object(p_object_id number, p_amount number) return char + as + new_bank_balance number; + new_cash_balance number; + begin + select bank_balance, cash_balance + into new_bank_balance, new_cash_balance + from objects + where object_id = p_object_id + for update; + + if (new_bank_balance + new_cash_balance < p_amount) then + return 'N'; + end if; + + new_bank_balance := new_bank_balance - p_amount; + if (new_bank_balance < 0) then + new_cash_balance := new_cash_balance + new_bank_balance; + new_bank_balance := 0; + end if; + + update objects + set bank_balance = new_bank_balance, cash_balance = new_cash_balance + where object_id = p_object_id; + + return 'Y'; + exception + when others then + return 'N'; + end; + +-- GENERATED PLSQL FOLLOWS +-- generated by makepersister.pl + + procedure save_battlefield_marker_obj( p_object_id VAOFSTRING, p_region_name VAOFSTRING, p_chunk_size number ) + as + + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + update battlefield_marker_objects set + battlefield_marker_objects.region_name = nvl(p_region_name(i),battlefield_marker_objects.region_name) + where + battlefield_marker_objects.object_id=p_object_id(i); + exception + when others then + begin + FOR i IN 1..p_chunk_size LOOP + m_error_index := i; + update battlefield_marker_objects set + battlefield_marker_objects.region_name = nvl(p_region_name(i),battlefield_marker_objects.region_name) + where + battlefield_marker_objects.object_id=p_object_id(i); + end LOOP; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.save_battlefield_marker_obj : update error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.save_battlefield_marker_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.save_battlefield_marker_obj','region_name','varchar2',p_region_name(m_error_index)); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','save_battlefield_marker_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure add_battlefield_marker_obj( p_object_id VAOFSTRING, p_region_name VAOFSTRING, p_chunk_size number ) + as + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + insert into battlefield_marker_objects + ( + battlefield_marker_objects.region_name, + battlefield_marker_objects.object_id + ) + VALUES + ( + p_region_name(i), + p_object_id(i) + ); + + exception + when dup_val_on_index then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_battlefield_marker_obj : dup_val_on_index error.'); + END IF; + for i in 1..p_chunk_size loop + m_error_index := i; + UPDATE battlefield_marker_objects Set + battlefield_marker_objects.region_name = nvl(p_region_name(i),battlefield_marker_objects.region_name) + where + battlefield_marker_objects.object_id=p_object_id(i); + + if SQL%ROWCOUNT=0 then + insert into battlefield_marker_objects + ( + battlefield_marker_objects.region_name, + battlefield_marker_objects.object_id + ) + VALUES + ( + p_region_name(i), + p_object_id(i) + ); + end if; + end loop; + end; + when others then + begin + for i in 1..p_chunk_size loop + m_error_index := i; + insert into battlefield_marker_objects + ( + battlefield_marker_objects.region_name, + battlefield_marker_objects.object_id + ) + VALUES + ( + p_region_name(i), + p_object_id(i) + ); + + end loop; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_battlefield_marker_obj : error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.add_battlefield_marker_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.add_battlefield_marker_obj','region_name','varchar2',p_region_name(m_error_index)); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','add_battlefield_marker_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure remove_battlefield_marker_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + begin + FORALL i IN 1..p_chunk_size + delete battlefield_marker_objects + where + object_id=p_object_id(i); + end; + + procedure save_building_obj( p_object_id VAOFSTRING, p_maintenance_cost VAOFNUMBER, p_time_last_checked VAOFNUMBER, p_is_public VAOFSTRING, p_city_id VAOFNUMBER, p_chunk_size number ) + as + + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + update building_objects set + building_objects.maintenance_cost = nvl(p_maintenance_cost(i),building_objects.maintenance_cost), + building_objects.time_last_checked = nvl(p_time_last_checked(i),building_objects.time_last_checked), + building_objects.is_public = nvl(p_is_public(i),building_objects.is_public), + building_objects.city_id = nvl(p_city_id(i),building_objects.city_id) + where + building_objects.object_id=p_object_id(i); + exception + when others then + begin + FOR i IN 1..p_chunk_size LOOP + m_error_index := i; + update building_objects set + building_objects.maintenance_cost = nvl(p_maintenance_cost(i),building_objects.maintenance_cost), + building_objects.time_last_checked = nvl(p_time_last_checked(i),building_objects.time_last_checked), + building_objects.is_public = nvl(p_is_public(i),building_objects.is_public), + building_objects.city_id = nvl(p_city_id(i),building_objects.city_id) + where + building_objects.object_id=p_object_id(i); + end LOOP; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.save_building_obj : update error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.save_building_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.save_building_obj','maintenance_cost','int',to_char(p_maintenance_cost(m_error_index))); + db_error_logger.dblogerror_values('persister.save_building_obj','time_last_checked','float',to_char(p_time_last_checked(m_error_index))); + db_error_logger.dblogerror_values('persister.save_building_obj','is_public','char',p_is_public(m_error_index)); + db_error_logger.dblogerror_values('persister.save_building_obj','city_id','int',to_char(p_city_id(m_error_index))); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','save_building_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure add_building_obj( p_object_id VAOFSTRING, p_maintenance_cost VAOFNUMBER, p_time_last_checked VAOFNUMBER, p_is_public VAOFSTRING, p_city_id VAOFNUMBER, p_chunk_size number ) + as + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + insert into building_objects + ( + building_objects.maintenance_cost, + building_objects.time_last_checked, + building_objects.is_public, + building_objects.city_id, + building_objects.object_id + ) + VALUES + ( + p_maintenance_cost(i), + p_time_last_checked(i), + p_is_public(i), + p_city_id(i), + p_object_id(i) + ); + + exception + when dup_val_on_index then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_building_obj : dup_val_on_index error.'); + END IF; + for i in 1..p_chunk_size loop + m_error_index := i; + UPDATE building_objects Set + building_objects.maintenance_cost = nvl(p_maintenance_cost(i),building_objects.maintenance_cost), + building_objects.time_last_checked = nvl(p_time_last_checked(i),building_objects.time_last_checked), + building_objects.is_public = nvl(p_is_public(i),building_objects.is_public), + building_objects.city_id = nvl(p_city_id(i),building_objects.city_id) + where + building_objects.object_id=p_object_id(i); + + if SQL%ROWCOUNT=0 then + insert into building_objects + ( + building_objects.maintenance_cost, + building_objects.time_last_checked, + building_objects.is_public, + building_objects.city_id, + building_objects.object_id + ) + VALUES + ( + p_maintenance_cost(i), + p_time_last_checked(i), + p_is_public(i), + p_city_id(i), + p_object_id(i) + ); + end if; + end loop; + end; + when others then + begin + for i in 1..p_chunk_size loop + m_error_index := i; + insert into building_objects + ( + building_objects.maintenance_cost, + building_objects.time_last_checked, + building_objects.is_public, + building_objects.city_id, + building_objects.object_id + ) + VALUES + ( + p_maintenance_cost(i), + p_time_last_checked(i), + p_is_public(i), + p_city_id(i), + p_object_id(i) + ); + + end loop; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_building_obj : error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.add_building_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.add_building_obj','maintenance_cost','int',to_char(p_maintenance_cost(m_error_index))); + db_error_logger.dblogerror_values('persister.add_building_obj','time_last_checked','float',to_char(p_time_last_checked(m_error_index))); + db_error_logger.dblogerror_values('persister.add_building_obj','is_public','char',p_is_public(m_error_index)); + db_error_logger.dblogerror_values('persister.add_building_obj','city_id','int',to_char(p_city_id(m_error_index))); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','add_building_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure remove_building_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + begin + FORALL i IN 1..p_chunk_size + delete building_objects + where + object_id=p_object_id(i); + end; + + procedure save_cell_obj( p_object_id VAOFSTRING, p_cell_number VAOFNUMBER, p_is_public VAOFSTRING, p_chunk_size number ) + as + + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + update cell_objects set + cell_objects.cell_number = nvl(p_cell_number(i),cell_objects.cell_number), + cell_objects.is_public = nvl(p_is_public(i),cell_objects.is_public) + where + cell_objects.object_id=p_object_id(i); + exception + when others then + begin + FOR i IN 1..p_chunk_size LOOP + m_error_index := i; + update cell_objects set + cell_objects.cell_number = nvl(p_cell_number(i),cell_objects.cell_number), + cell_objects.is_public = nvl(p_is_public(i),cell_objects.is_public) + where + cell_objects.object_id=p_object_id(i); + end LOOP; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.save_cell_obj : update error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.save_cell_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.save_cell_obj','cell_number','int',to_char(p_cell_number(m_error_index))); + db_error_logger.dblogerror_values('persister.save_cell_obj','is_public','char',p_is_public(m_error_index)); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','save_cell_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure add_cell_obj( p_object_id VAOFSTRING, p_cell_number VAOFNUMBER, p_is_public VAOFSTRING, p_chunk_size number ) + as + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + insert into cell_objects + ( + cell_objects.cell_number, + cell_objects.is_public, + cell_objects.object_id + ) + VALUES + ( + p_cell_number(i), + p_is_public(i), + p_object_id(i) + ); + + exception + when dup_val_on_index then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_cell_obj : dup_val_on_index error.'); + END IF; + for i in 1..p_chunk_size loop + m_error_index := i; + UPDATE cell_objects Set + cell_objects.cell_number = nvl(p_cell_number(i),cell_objects.cell_number), + cell_objects.is_public = nvl(p_is_public(i),cell_objects.is_public) + where + cell_objects.object_id=p_object_id(i); + + if SQL%ROWCOUNT=0 then + insert into cell_objects + ( + cell_objects.cell_number, + cell_objects.is_public, + cell_objects.object_id + ) + VALUES + ( + p_cell_number(i), + p_is_public(i), + p_object_id(i) + ); + end if; + end loop; + end; + when others then + begin + for i in 1..p_chunk_size loop + m_error_index := i; + insert into cell_objects + ( + cell_objects.cell_number, + cell_objects.is_public, + cell_objects.object_id + ) + VALUES + ( + p_cell_number(i), + p_is_public(i), + p_object_id(i) + ); + + end loop; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_cell_obj : error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.add_cell_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.add_cell_obj','cell_number','int',to_char(p_cell_number(m_error_index))); + db_error_logger.dblogerror_values('persister.add_cell_obj','is_public','char',p_is_public(m_error_index)); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','add_cell_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure remove_cell_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + begin + FORALL i IN 1..p_chunk_size + delete cell_objects + where + object_id=p_object_id(i); + end; + + procedure save_city_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + null; + end; + + procedure add_city_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + insert into city_objects + ( + city_objects.object_id + ) + VALUES + ( + p_object_id(i) + ); + + exception + when dup_val_on_index then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_city_obj : dup_val_on_index error.'); + END IF; + end; + when others then + begin + for i in 1..p_chunk_size loop + m_error_index := i; + insert into city_objects + ( + city_objects.object_id + ) + VALUES + ( + p_object_id(i) + ); + + end loop; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_city_obj : error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.add_city_obj','object_id','number',p_object_id(m_error_index)); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','add_city_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure remove_city_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + begin + null; + end; + + procedure save_creature_obj( p_object_id VAOFSTRING, p_scale_factor VAOFNUMBER, p_states VAOFNUMBER, p_posture VAOFNUMBER, p_shock_wounds VAOFNUMBER, p_master_id VAOFSTRING, p_rank VAOFNUMBER, p_base_walk_speed VAOFNUMBER, p_base_run_speed VAOFNUMBER, p_attribute_0 VAOFNUMBER, p_attribute_1 VAOFNUMBER, p_attribute_2 VAOFNUMBER, p_attribute_3 VAOFNUMBER, p_attribute_4 VAOFNUMBER, p_attribute_5 VAOFNUMBER, p_attribute_6 VAOFNUMBER, p_attribute_7 VAOFNUMBER, p_attribute_8 VAOFNUMBER, p_attribute_9 VAOFNUMBER, p_attribute_10 VAOFNUMBER, p_attribute_11 VAOFNUMBER, p_attribute_12 VAOFNUMBER, p_attribute_13 VAOFNUMBER, p_attribute_14 VAOFNUMBER, p_attribute_15 VAOFNUMBER, p_attribute_16 VAOFNUMBER, p_attribute_17 VAOFNUMBER, p_attribute_18 VAOFNUMBER, p_attribute_19 VAOFNUMBER, p_attribute_20 VAOFNUMBER, p_attribute_21 VAOFNUMBER, p_attribute_22 VAOFNUMBER, p_attribute_23 VAOFNUMBER, p_attribute_24 VAOFNUMBER, p_attribute_25 VAOFNUMBER, p_attribute_26 VAOFNUMBER, p_persisted_buffs VAOFSTRING, p_ws_x VAOFNUMBER, p_ws_y VAOFNUMBER, p_ws_z VAOFNUMBER, p_chunk_size number ) + as + + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + update creature_objects set + creature_objects.scale_factor = nvl(p_scale_factor(i),creature_objects.scale_factor), + creature_objects.states = nvl(p_states(i),creature_objects.states), + creature_objects.posture = nvl(p_posture(i),creature_objects.posture), + creature_objects.shock_wounds = nvl(p_shock_wounds(i),creature_objects.shock_wounds), + creature_objects.master_id = nvl(p_master_id(i),creature_objects.master_id), + creature_objects.rank = nvl(p_rank(i),creature_objects.rank), + creature_objects.base_walk_speed = nvl(p_base_walk_speed(i),creature_objects.base_walk_speed), + creature_objects.base_run_speed = nvl(p_base_run_speed(i),creature_objects.base_run_speed), + creature_objects.attribute_0 = nvl(p_attribute_0(i),creature_objects.attribute_0), + creature_objects.attribute_1 = nvl(p_attribute_1(i),creature_objects.attribute_1), + creature_objects.attribute_2 = nvl(p_attribute_2(i),creature_objects.attribute_2), + creature_objects.attribute_3 = nvl(p_attribute_3(i),creature_objects.attribute_3), + creature_objects.attribute_4 = nvl(p_attribute_4(i),creature_objects.attribute_4), + creature_objects.attribute_5 = nvl(p_attribute_5(i),creature_objects.attribute_5), + creature_objects.attribute_6 = nvl(p_attribute_6(i),creature_objects.attribute_6), + creature_objects.attribute_7 = nvl(p_attribute_7(i),creature_objects.attribute_7), + creature_objects.attribute_8 = nvl(p_attribute_8(i),creature_objects.attribute_8), + creature_objects.attribute_9 = nvl(p_attribute_9(i),creature_objects.attribute_9), + creature_objects.attribute_10 = nvl(p_attribute_10(i),creature_objects.attribute_10), + creature_objects.attribute_11 = nvl(p_attribute_11(i),creature_objects.attribute_11), + creature_objects.attribute_12 = nvl(p_attribute_12(i),creature_objects.attribute_12), + creature_objects.attribute_13 = nvl(p_attribute_13(i),creature_objects.attribute_13), + creature_objects.attribute_14 = nvl(p_attribute_14(i),creature_objects.attribute_14), + creature_objects.attribute_15 = nvl(p_attribute_15(i),creature_objects.attribute_15), + creature_objects.attribute_16 = nvl(p_attribute_16(i),creature_objects.attribute_16), + creature_objects.attribute_17 = nvl(p_attribute_17(i),creature_objects.attribute_17), + creature_objects.attribute_18 = nvl(p_attribute_18(i),creature_objects.attribute_18), + creature_objects.attribute_19 = nvl(p_attribute_19(i),creature_objects.attribute_19), + creature_objects.attribute_20 = nvl(p_attribute_20(i),creature_objects.attribute_20), + creature_objects.attribute_21 = nvl(p_attribute_21(i),creature_objects.attribute_21), + creature_objects.attribute_22 = nvl(p_attribute_22(i),creature_objects.attribute_22), + creature_objects.attribute_23 = nvl(p_attribute_23(i),creature_objects.attribute_23), + creature_objects.attribute_24 = nvl(p_attribute_24(i),creature_objects.attribute_24), + creature_objects.attribute_25 = nvl(p_attribute_25(i),creature_objects.attribute_25), + creature_objects.attribute_26 = nvl(p_attribute_26(i),creature_objects.attribute_26), + creature_objects.persisted_buffs = nvl(p_persisted_buffs(i),creature_objects.persisted_buffs), + creature_objects.ws_x = nvl(p_ws_x(i),creature_objects.ws_x), + creature_objects.ws_y = nvl(p_ws_y(i),creature_objects.ws_y), + creature_objects.ws_z = nvl(p_ws_z(i),creature_objects.ws_z) + where + creature_objects.object_id=p_object_id(i); + exception + when others then + begin + FOR i IN 1..p_chunk_size LOOP + m_error_index := i; + update creature_objects set + creature_objects.scale_factor = nvl(p_scale_factor(i),creature_objects.scale_factor), + creature_objects.states = nvl(p_states(i),creature_objects.states), + creature_objects.posture = nvl(p_posture(i),creature_objects.posture), + creature_objects.shock_wounds = nvl(p_shock_wounds(i),creature_objects.shock_wounds), + creature_objects.master_id = nvl(p_master_id(i),creature_objects.master_id), + creature_objects.rank = nvl(p_rank(i),creature_objects.rank), + creature_objects.base_walk_speed = nvl(p_base_walk_speed(i),creature_objects.base_walk_speed), + creature_objects.base_run_speed = nvl(p_base_run_speed(i),creature_objects.base_run_speed), + creature_objects.attribute_0 = nvl(p_attribute_0(i),creature_objects.attribute_0), + creature_objects.attribute_1 = nvl(p_attribute_1(i),creature_objects.attribute_1), + creature_objects.attribute_2 = nvl(p_attribute_2(i),creature_objects.attribute_2), + creature_objects.attribute_3 = nvl(p_attribute_3(i),creature_objects.attribute_3), + creature_objects.attribute_4 = nvl(p_attribute_4(i),creature_objects.attribute_4), + creature_objects.attribute_5 = nvl(p_attribute_5(i),creature_objects.attribute_5), + creature_objects.attribute_6 = nvl(p_attribute_6(i),creature_objects.attribute_6), + creature_objects.attribute_7 = nvl(p_attribute_7(i),creature_objects.attribute_7), + creature_objects.attribute_8 = nvl(p_attribute_8(i),creature_objects.attribute_8), + creature_objects.attribute_9 = nvl(p_attribute_9(i),creature_objects.attribute_9), + creature_objects.attribute_10 = nvl(p_attribute_10(i),creature_objects.attribute_10), + creature_objects.attribute_11 = nvl(p_attribute_11(i),creature_objects.attribute_11), + creature_objects.attribute_12 = nvl(p_attribute_12(i),creature_objects.attribute_12), + creature_objects.attribute_13 = nvl(p_attribute_13(i),creature_objects.attribute_13), + creature_objects.attribute_14 = nvl(p_attribute_14(i),creature_objects.attribute_14), + creature_objects.attribute_15 = nvl(p_attribute_15(i),creature_objects.attribute_15), + creature_objects.attribute_16 = nvl(p_attribute_16(i),creature_objects.attribute_16), + creature_objects.attribute_17 = nvl(p_attribute_17(i),creature_objects.attribute_17), + creature_objects.attribute_18 = nvl(p_attribute_18(i),creature_objects.attribute_18), + creature_objects.attribute_19 = nvl(p_attribute_19(i),creature_objects.attribute_19), + creature_objects.attribute_20 = nvl(p_attribute_20(i),creature_objects.attribute_20), + creature_objects.attribute_21 = nvl(p_attribute_21(i),creature_objects.attribute_21), + creature_objects.attribute_22 = nvl(p_attribute_22(i),creature_objects.attribute_22), + creature_objects.attribute_23 = nvl(p_attribute_23(i),creature_objects.attribute_23), + creature_objects.attribute_24 = nvl(p_attribute_24(i),creature_objects.attribute_24), + creature_objects.attribute_25 = nvl(p_attribute_25(i),creature_objects.attribute_25), + creature_objects.attribute_26 = nvl(p_attribute_26(i),creature_objects.attribute_26), + creature_objects.persisted_buffs = nvl(p_persisted_buffs(i),creature_objects.persisted_buffs), + creature_objects.ws_x = nvl(p_ws_x(i),creature_objects.ws_x), + creature_objects.ws_y = nvl(p_ws_y(i),creature_objects.ws_y), + creature_objects.ws_z = nvl(p_ws_z(i),creature_objects.ws_z) + where + creature_objects.object_id=p_object_id(i); + end LOOP; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.save_creature_obj : update error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.save_creature_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.save_creature_obj','scale_factor','float',to_char(p_scale_factor(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','states','int',to_char(p_states(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','posture','int',to_char(p_posture(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','shock_wounds','int',to_char(p_shock_wounds(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','master_id','number',p_master_id(m_error_index)); + db_error_logger.dblogerror_values('persister.save_creature_obj','rank','int',to_char(p_rank(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','base_walk_speed','float',to_char(p_base_walk_speed(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','base_run_speed','float',to_char(p_base_run_speed(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','attribute_0','int',to_char(p_attribute_0(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','attribute_1','int',to_char(p_attribute_1(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','attribute_2','int',to_char(p_attribute_2(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','attribute_3','int',to_char(p_attribute_3(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','attribute_4','int',to_char(p_attribute_4(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','attribute_5','int',to_char(p_attribute_5(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','attribute_6','int',to_char(p_attribute_6(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','attribute_7','int',to_char(p_attribute_7(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','attribute_8','int',to_char(p_attribute_8(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','attribute_9','int',to_char(p_attribute_9(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','attribute_10','int',to_char(p_attribute_10(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','attribute_11','int',to_char(p_attribute_11(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','attribute_12','int',to_char(p_attribute_12(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','attribute_13','int',to_char(p_attribute_13(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','attribute_14','int',to_char(p_attribute_14(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','attribute_15','int',to_char(p_attribute_15(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','attribute_16','int',to_char(p_attribute_16(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','attribute_17','int',to_char(p_attribute_17(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','attribute_18','int',to_char(p_attribute_18(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','attribute_19','int',to_char(p_attribute_19(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','attribute_20','int',to_char(p_attribute_20(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','attribute_21','int',to_char(p_attribute_21(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','attribute_22','int',to_char(p_attribute_22(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','attribute_23','int',to_char(p_attribute_23(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','attribute_24','int',to_char(p_attribute_24(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','attribute_25','int',to_char(p_attribute_25(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','attribute_26','int',to_char(p_attribute_26(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','persisted_buffs','varchar2',p_persisted_buffs(m_error_index)); + + db_error_logger.dblogerror_values('persister.save_creature_obj','ws_x','float',to_char(p_ws_x(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','ws_y','float',to_char(p_ws_y(m_error_index))); + db_error_logger.dblogerror_values('persister.save_creature_obj','ws_z','float',to_char(p_ws_z(m_error_index))); + + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','save_creature_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure add_creature_obj( p_object_id VAOFSTRING, p_scale_factor VAOFNUMBER, p_states VAOFNUMBER, p_posture VAOFNUMBER, p_shock_wounds VAOFNUMBER, p_master_id VAOFSTRING, p_rank VAOFNUMBER, p_base_walk_speed VAOFNUMBER, p_base_run_speed VAOFNUMBER, p_attribute_0 VAOFNUMBER, p_attribute_1 VAOFNUMBER, p_attribute_2 VAOFNUMBER, p_attribute_3 VAOFNUMBER, p_attribute_4 VAOFNUMBER, p_attribute_5 VAOFNUMBER, p_attribute_6 VAOFNUMBER, p_attribute_7 VAOFNUMBER, p_attribute_8 VAOFNUMBER, p_attribute_9 VAOFNUMBER, p_attribute_10 VAOFNUMBER, p_attribute_11 VAOFNUMBER, p_attribute_12 VAOFNUMBER, p_attribute_13 VAOFNUMBER, p_attribute_14 VAOFNUMBER, p_attribute_15 VAOFNUMBER, p_attribute_16 VAOFNUMBER, p_attribute_17 VAOFNUMBER, p_attribute_18 VAOFNUMBER, p_attribute_19 VAOFNUMBER, p_attribute_20 VAOFNUMBER, p_attribute_21 VAOFNUMBER, p_attribute_22 VAOFNUMBER, p_attribute_23 VAOFNUMBER, p_attribute_24 VAOFNUMBER, p_attribute_25 VAOFNUMBER, p_attribute_26 VAOFNUMBER, p_persisted_buffs VAOFSTRING, p_ws_x VAOFNUMBER, p_ws_y VAOFNUMBER, p_ws_z VAOFNUMBER, p_chunk_size number ) + as + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + insert into creature_objects + ( + creature_objects.scale_factor, + creature_objects.states, + creature_objects.posture, + creature_objects.shock_wounds, + creature_objects.master_id, + creature_objects.rank, + creature_objects.base_walk_speed, + creature_objects.base_run_speed, + creature_objects.attribute_0, + creature_objects.attribute_1, + creature_objects.attribute_2, + creature_objects.attribute_3, + creature_objects.attribute_4, + creature_objects.attribute_5, + creature_objects.attribute_6, + creature_objects.attribute_7, + creature_objects.attribute_8, + creature_objects.attribute_9, + creature_objects.attribute_10, + creature_objects.attribute_11, + creature_objects.attribute_12, + creature_objects.attribute_13, + creature_objects.attribute_14, + creature_objects.attribute_15, + creature_objects.attribute_16, + creature_objects.attribute_17, + creature_objects.attribute_18, + creature_objects.attribute_19, + creature_objects.attribute_20, + creature_objects.attribute_21, + creature_objects.attribute_22, + creature_objects.attribute_23, + creature_objects.attribute_24, + creature_objects.attribute_25, + creature_objects.attribute_26, + creature_objects.persisted_buffs, + creature_objects.object_id, + creature_objects.ws_x, + creature_objects.ws_y, + creature_objects.ws_z + ) + VALUES + ( + p_scale_factor(i), + p_states(i), + p_posture(i), + p_shock_wounds(i), + p_master_id(i), + p_rank(i), + p_base_walk_speed(i), + p_base_run_speed(i), + p_attribute_0(i), + p_attribute_1(i), + p_attribute_2(i), + p_attribute_3(i), + p_attribute_4(i), + p_attribute_5(i), + p_attribute_6(i), + p_attribute_7(i), + p_attribute_8(i), + p_attribute_9(i), + p_attribute_10(i), + p_attribute_11(i), + p_attribute_12(i), + p_attribute_13(i), + p_attribute_14(i), + p_attribute_15(i), + p_attribute_16(i), + p_attribute_17(i), + p_attribute_18(i), + p_attribute_19(i), + p_attribute_20(i), + p_attribute_21(i), + p_attribute_22(i), + p_attribute_23(i), + p_attribute_24(i), + p_attribute_25(i), + p_attribute_26(i), + p_persisted_buffs(i), + p_object_id(i), + NULL, + NULL, + NULL + ); + + exception + when dup_val_on_index then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_creature_obj : dup_val_on_index error.'); + END IF; + for i in 1..p_chunk_size loop + m_error_index := i; + UPDATE creature_objects Set + creature_objects.scale_factor = nvl(p_scale_factor(i),creature_objects.scale_factor), + creature_objects.states = nvl(p_states(i),creature_objects.states), + creature_objects.posture = nvl(p_posture(i),creature_objects.posture), + creature_objects.shock_wounds = nvl(p_shock_wounds(i),creature_objects.shock_wounds), + creature_objects.master_id = nvl(p_master_id(i),creature_objects.master_id), + creature_objects.rank = nvl(p_rank(i),creature_objects.rank), + creature_objects.base_walk_speed = nvl(p_base_walk_speed(i),creature_objects.base_walk_speed), + creature_objects.base_run_speed = nvl(p_base_run_speed(i),creature_objects.base_run_speed), + creature_objects.attribute_0 = nvl(p_attribute_0(i),creature_objects.attribute_0), + creature_objects.attribute_1 = nvl(p_attribute_1(i),creature_objects.attribute_1), + creature_objects.attribute_2 = nvl(p_attribute_2(i),creature_objects.attribute_2), + creature_objects.attribute_3 = nvl(p_attribute_3(i),creature_objects.attribute_3), + creature_objects.attribute_4 = nvl(p_attribute_4(i),creature_objects.attribute_4), + creature_objects.attribute_5 = nvl(p_attribute_5(i),creature_objects.attribute_5), + creature_objects.attribute_6 = nvl(p_attribute_6(i),creature_objects.attribute_6), + creature_objects.attribute_7 = nvl(p_attribute_7(i),creature_objects.attribute_7), + creature_objects.attribute_8 = nvl(p_attribute_8(i),creature_objects.attribute_8), + creature_objects.attribute_9 = nvl(p_attribute_9(i),creature_objects.attribute_9), + creature_objects.attribute_10 = nvl(p_attribute_10(i),creature_objects.attribute_10), + creature_objects.attribute_11 = nvl(p_attribute_11(i),creature_objects.attribute_11), + creature_objects.attribute_12 = nvl(p_attribute_12(i),creature_objects.attribute_12), + creature_objects.attribute_13 = nvl(p_attribute_13(i),creature_objects.attribute_13), + creature_objects.attribute_14 = nvl(p_attribute_14(i),creature_objects.attribute_14), + creature_objects.attribute_15 = nvl(p_attribute_15(i),creature_objects.attribute_15), + creature_objects.attribute_16 = nvl(p_attribute_16(i),creature_objects.attribute_16), + creature_objects.attribute_17 = nvl(p_attribute_17(i),creature_objects.attribute_17), + creature_objects.attribute_18 = nvl(p_attribute_18(i),creature_objects.attribute_18), + creature_objects.attribute_19 = nvl(p_attribute_19(i),creature_objects.attribute_19), + creature_objects.attribute_20 = nvl(p_attribute_20(i),creature_objects.attribute_20), + creature_objects.attribute_21 = nvl(p_attribute_21(i),creature_objects.attribute_21), + creature_objects.attribute_22 = nvl(p_attribute_22(i),creature_objects.attribute_22), + creature_objects.attribute_23 = nvl(p_attribute_23(i),creature_objects.attribute_23), + creature_objects.attribute_24 = nvl(p_attribute_24(i),creature_objects.attribute_24), + creature_objects.attribute_25 = nvl(p_attribute_25(i),creature_objects.attribute_25), + creature_objects.attribute_26 = nvl(p_attribute_26(i),creature_objects.attribute_26), + creature_objects.persisted_buffs = nvl(p_persisted_buffs(i),creature_objects.persisted_buffs), + creature_objects.ws_x = nvl(p_ws_x(i),creature_objects.ws_x), + creature_objects.ws_y = nvl(p_ws_y(i),creature_objects.ws_y), + creature_objects.ws_z = nvl(p_ws_z(i),creature_objects.ws_z) + where + creature_objects.object_id=p_object_id(i); + + if SQL%ROWCOUNT=0 then + insert into creature_objects + ( + creature_objects.scale_factor, + creature_objects.states, + creature_objects.posture, + creature_objects.shock_wounds, + creature_objects.master_id, + creature_objects.rank, + creature_objects.base_walk_speed, + creature_objects.base_run_speed, + creature_objects.attribute_0, + creature_objects.attribute_1, + creature_objects.attribute_2, + creature_objects.attribute_3, + creature_objects.attribute_4, + creature_objects.attribute_5, + creature_objects.attribute_6, + creature_objects.attribute_7, + creature_objects.attribute_8, + creature_objects.attribute_9, + creature_objects.attribute_10, + creature_objects.attribute_11, + creature_objects.attribute_12, + creature_objects.attribute_13, + creature_objects.attribute_14, + creature_objects.attribute_15, + creature_objects.attribute_16, + creature_objects.attribute_17, + creature_objects.attribute_18, + creature_objects.attribute_19, + creature_objects.attribute_20, + creature_objects.attribute_21, + creature_objects.attribute_22, + creature_objects.attribute_23, + creature_objects.attribute_24, + creature_objects.attribute_25, + creature_objects.attribute_26, + creature_objects.persisted_buffs, + creature_objects.object_id, + creature_objects.ws_x, + creature_objects.ws_y, + creature_objects.ws_z + ) + VALUES + ( + p_scale_factor(i), + p_states(i), + p_posture(i), + p_shock_wounds(i), + p_master_id(i), + p_rank(i), + p_base_walk_speed(i), + p_base_run_speed(i), + p_attribute_0(i), + p_attribute_1(i), + p_attribute_2(i), + p_attribute_3(i), + p_attribute_4(i), + p_attribute_5(i), + p_attribute_6(i), + p_attribute_7(i), + p_attribute_8(i), + p_attribute_9(i), + p_attribute_10(i), + p_attribute_11(i), + p_attribute_12(i), + p_attribute_13(i), + p_attribute_14(i), + p_attribute_15(i), + p_attribute_16(i), + p_attribute_17(i), + p_attribute_18(i), + p_attribute_19(i), + p_attribute_20(i), + p_attribute_21(i), + p_attribute_22(i), + p_attribute_23(i), + p_attribute_24(i), + p_attribute_25(i), + p_attribute_26(i), + p_persisted_buffs(i), + p_object_id(i), + NULL, + NULL, + NULL + ); + end if; + end loop; + end; + when others then + begin + for i in 1..p_chunk_size loop + m_error_index := i; + insert into creature_objects + ( + creature_objects.scale_factor, + creature_objects.states, + creature_objects.posture, + creature_objects.shock_wounds, + creature_objects.master_id, + creature_objects.rank, + creature_objects.base_walk_speed, + creature_objects.base_run_speed, + creature_objects.attribute_0, + creature_objects.attribute_1, + creature_objects.attribute_2, + creature_objects.attribute_3, + creature_objects.attribute_4, + creature_objects.attribute_5, + creature_objects.attribute_6, + creature_objects.attribute_7, + creature_objects.attribute_8, + creature_objects.attribute_9, + creature_objects.attribute_10, + creature_objects.attribute_11, + creature_objects.attribute_12, + creature_objects.attribute_13, + creature_objects.attribute_14, + creature_objects.attribute_15, + creature_objects.attribute_16, + creature_objects.attribute_17, + creature_objects.attribute_18, + creature_objects.attribute_19, + creature_objects.attribute_20, + creature_objects.attribute_21, + creature_objects.attribute_22, + creature_objects.attribute_23, + creature_objects.attribute_24, + creature_objects.attribute_25, + creature_objects.attribute_26, + creature_objects.persisted_buffs, + creature_objects.object_id, + creature_objects.ws_x, + creature_objects.ws_y, + creature_objects.ws_z + ) + VALUES + ( + p_scale_factor(i), + p_states(i), + p_posture(i), + p_shock_wounds(i), + p_master_id(i), + p_rank(i), + p_base_walk_speed(i), + p_base_run_speed(i), + p_attribute_0(i), + p_attribute_1(i), + p_attribute_2(i), + p_attribute_3(i), + p_attribute_4(i), + p_attribute_5(i), + p_attribute_6(i), + p_attribute_7(i), + p_attribute_8(i), + p_attribute_9(i), + p_attribute_10(i), + p_attribute_11(i), + p_attribute_12(i), + p_attribute_13(i), + p_attribute_14(i), + p_attribute_15(i), + p_attribute_16(i), + p_attribute_17(i), + p_attribute_18(i), + p_attribute_19(i), + p_attribute_20(i), + p_attribute_21(i), + p_attribute_22(i), + p_attribute_23(i), + p_attribute_24(i), + p_attribute_25(i), + p_attribute_26(i), + p_persisted_buffs(i), + p_object_id(i), + NULL, + NULL, + NULL + ); + + end loop; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_creature_obj : error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.add_creature_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.add_creature_obj','scale_factor','float',to_char(p_scale_factor(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','states','int',to_char(p_states(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','posture','int',to_char(p_posture(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','shock_wounds','int',to_char(p_shock_wounds(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','master_id','number',p_master_id(m_error_index)); + db_error_logger.dblogerror_values('persister.add_creature_obj','rank','int',to_char(p_rank(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','base_walk_speed','float',to_char(p_base_walk_speed(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','base_run_speed','float',to_char(p_base_run_speed(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','attribute_0','int',to_char(p_attribute_0(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','attribute_1','int',to_char(p_attribute_1(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','attribute_2','int',to_char(p_attribute_2(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','attribute_3','int',to_char(p_attribute_3(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','attribute_4','int',to_char(p_attribute_4(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','attribute_5','int',to_char(p_attribute_5(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','attribute_6','int',to_char(p_attribute_6(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','attribute_7','int',to_char(p_attribute_7(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','attribute_8','int',to_char(p_attribute_8(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','attribute_9','int',to_char(p_attribute_9(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','attribute_10','int',to_char(p_attribute_10(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','attribute_11','int',to_char(p_attribute_11(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','attribute_12','int',to_char(p_attribute_12(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','attribute_13','int',to_char(p_attribute_13(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','attribute_14','int',to_char(p_attribute_14(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','attribute_15','int',to_char(p_attribute_15(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','attribute_16','int',to_char(p_attribute_16(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','attribute_17','int',to_char(p_attribute_17(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','attribute_18','int',to_char(p_attribute_18(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','attribute_19','int',to_char(p_attribute_19(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','attribute_20','int',to_char(p_attribute_20(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','attribute_21','int',to_char(p_attribute_21(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','attribute_22','int',to_char(p_attribute_22(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','attribute_23','int',to_char(p_attribute_23(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','attribute_24','int',to_char(p_attribute_24(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','attribute_25','int',to_char(p_attribute_25(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','attribute_26','int',to_char(p_attribute_26(m_error_index))); + db_error_logger.dblogerror_values('persister.add_creature_obj','persisted_buffs','varchar2',p_persisted_buffs(m_error_index)); + db_error_logger.dblogerror_values('persister.add_creature_obj','ws_x','float',p_ws_x(m_error_index)); + db_error_logger.dblogerror_values('persister.add_creature_obj','ws_y','float',p_ws_y(m_error_index)); + db_error_logger.dblogerror_values('persister.add_creature_obj','ws_z','float',p_ws_z(m_error_index)); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','add_creature_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure remove_creature_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + begin + FORALL i IN 1..p_chunk_size + delete creature_objects + where + object_id=p_object_id(i); + end; + + procedure save_factory_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + null; + end; + + procedure add_factory_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + insert into factory_objects + ( + factory_objects.object_id + ) + VALUES + ( + p_object_id(i) + ); + + exception + when dup_val_on_index then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_factory_obj : dup_val_on_index error.'); + END IF; + end; + when others then + begin + for i in 1..p_chunk_size loop + m_error_index := i; + insert into factory_objects + ( + factory_objects.object_id + ) + VALUES + ( + p_object_id(i) + ); + + end loop; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_factory_obj : error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.add_factory_obj','object_id','number',p_object_id(m_error_index)); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','add_factory_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure remove_factory_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + begin + null; + end; + + procedure save_guild_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + null; + end; + + procedure add_guild_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + insert into guild_objects + ( + guild_objects.object_id + ) + VALUES + ( + p_object_id(i) + ); + + exception + when dup_val_on_index then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_guild_obj : dup_val_on_index error.'); + END IF; + end; + when others then + begin + for i in 1..p_chunk_size loop + m_error_index := i; + insert into guild_objects + ( + guild_objects.object_id + ) + VALUES + ( + p_object_id(i) + ); + + end loop; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_guild_obj : error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.add_guild_obj','object_id','number',p_object_id(m_error_index)); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','add_guild_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure remove_guild_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + begin + null; + end; + + procedure save_harvester_inst_obj( p_object_id VAOFSTRING, p_installed_efficiency VAOFNUMBER, p_max_extraction_rate VAOFNUMBER, p_current_extraction_rate VAOFNUMBER, p_max_hopper_amount VAOFNUMBER, p_hopper_resource VAOFSTRING, p_hopper_amount VAOFNUMBER, p_resource_type VAOFSTRING, p_chunk_size number ) + as + + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + update harvester_installation_objects set + harvester_installation_objects.installed_efficiency = nvl(p_installed_efficiency(i),harvester_installation_objects.installed_efficiency), + harvester_installation_objects.max_extraction_rate = nvl(p_max_extraction_rate(i),harvester_installation_objects.max_extraction_rate), + harvester_installation_objects.current_extraction_rate = nvl(p_current_extraction_rate(i),harvester_installation_objects.current_extraction_rate), + harvester_installation_objects.max_hopper_amount = nvl(p_max_hopper_amount(i),harvester_installation_objects.max_hopper_amount), + harvester_installation_objects.hopper_resource = nvl(p_hopper_resource(i),harvester_installation_objects.hopper_resource), + harvester_installation_objects.hopper_amount = nvl(p_hopper_amount(i),harvester_installation_objects.hopper_amount), + harvester_installation_objects.resource_type = nvl(p_resource_type(i),harvester_installation_objects.resource_type) + where + harvester_installation_objects.object_id=p_object_id(i); + exception + when others then + begin + FOR i IN 1..p_chunk_size LOOP + m_error_index := i; + update harvester_installation_objects set + harvester_installation_objects.installed_efficiency = nvl(p_installed_efficiency(i),harvester_installation_objects.installed_efficiency), + harvester_installation_objects.max_extraction_rate = nvl(p_max_extraction_rate(i),harvester_installation_objects.max_extraction_rate), + harvester_installation_objects.current_extraction_rate = nvl(p_current_extraction_rate(i),harvester_installation_objects.current_extraction_rate), + harvester_installation_objects.max_hopper_amount = nvl(p_max_hopper_amount(i),harvester_installation_objects.max_hopper_amount), + harvester_installation_objects.hopper_resource = nvl(p_hopper_resource(i),harvester_installation_objects.hopper_resource), + harvester_installation_objects.hopper_amount = nvl(p_hopper_amount(i),harvester_installation_objects.hopper_amount), + harvester_installation_objects.resource_type = nvl(p_resource_type(i),harvester_installation_objects.resource_type) + where + harvester_installation_objects.object_id=p_object_id(i); + end LOOP; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.save_harvester_inst_obj : update error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.save_harvester_inst_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.save_harvester_inst_obj','installed_efficiency','float',to_char(p_installed_efficiency(m_error_index))); + db_error_logger.dblogerror_values('persister.save_harvester_inst_obj','max_extraction_rate','int',to_char(p_max_extraction_rate(m_error_index))); + db_error_logger.dblogerror_values('persister.save_harvester_inst_obj','current_extraction_rate','float',to_char(p_current_extraction_rate(m_error_index))); + db_error_logger.dblogerror_values('persister.save_harvester_inst_obj','max_hopper_amount','int',to_char(p_max_hopper_amount(m_error_index))); + db_error_logger.dblogerror_values('persister.save_harvester_inst_obj','hopper_resource','number',p_hopper_resource(m_error_index)); + db_error_logger.dblogerror_values('persister.save_harvester_inst_obj','hopper_amount','float',to_char(p_hopper_amount(m_error_index))); + db_error_logger.dblogerror_values('persister.save_harvester_inst_obj','resource_type','number',p_resource_type(m_error_index)); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','save_harvester_inst_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure add_harvester_inst_obj( p_object_id VAOFSTRING, p_installed_efficiency VAOFNUMBER, p_max_extraction_rate VAOFNUMBER, p_current_extraction_rate VAOFNUMBER, p_max_hopper_amount VAOFNUMBER, p_hopper_resource VAOFSTRING, p_hopper_amount VAOFNUMBER, p_resource_type VAOFSTRING, p_chunk_size number ) + as + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + insert into harvester_installation_objects + ( + harvester_installation_objects.installed_efficiency, + harvester_installation_objects.max_extraction_rate, + harvester_installation_objects.current_extraction_rate, + harvester_installation_objects.max_hopper_amount, + harvester_installation_objects.hopper_resource, + harvester_installation_objects.hopper_amount, + harvester_installation_objects.resource_type, + harvester_installation_objects.object_id + ) + VALUES + ( + p_installed_efficiency(i), + p_max_extraction_rate(i), + p_current_extraction_rate(i), + p_max_hopper_amount(i), + p_hopper_resource(i), + p_hopper_amount(i), + p_resource_type(i), + p_object_id(i) + ); + + exception + when dup_val_on_index then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_harvester_inst_obj : dup_val_on_index error.'); + END IF; + for i in 1..p_chunk_size loop + m_error_index := i; + UPDATE harvester_installation_objects Set + harvester_installation_objects.installed_efficiency = nvl(p_installed_efficiency(i),harvester_installation_objects.installed_efficiency), + harvester_installation_objects.max_extraction_rate = nvl(p_max_extraction_rate(i),harvester_installation_objects.max_extraction_rate), + harvester_installation_objects.current_extraction_rate = nvl(p_current_extraction_rate(i),harvester_installation_objects.current_extraction_rate), + harvester_installation_objects.max_hopper_amount = nvl(p_max_hopper_amount(i),harvester_installation_objects.max_hopper_amount), + harvester_installation_objects.hopper_resource = nvl(p_hopper_resource(i),harvester_installation_objects.hopper_resource), + harvester_installation_objects.hopper_amount = nvl(p_hopper_amount(i),harvester_installation_objects.hopper_amount), + harvester_installation_objects.resource_type = nvl(p_resource_type(i),harvester_installation_objects.resource_type) + where + harvester_installation_objects.object_id=p_object_id(i); + + if SQL%ROWCOUNT=0 then + insert into harvester_installation_objects + ( + harvester_installation_objects.installed_efficiency, + harvester_installation_objects.max_extraction_rate, + harvester_installation_objects.current_extraction_rate, + harvester_installation_objects.max_hopper_amount, + harvester_installation_objects.hopper_resource, + harvester_installation_objects.hopper_amount, + harvester_installation_objects.resource_type, + harvester_installation_objects.object_id + ) + VALUES + ( + p_installed_efficiency(i), + p_max_extraction_rate(i), + p_current_extraction_rate(i), + p_max_hopper_amount(i), + p_hopper_resource(i), + p_hopper_amount(i), + p_resource_type(i), + p_object_id(i) + ); + end if; + end loop; + end; + when others then + begin + for i in 1..p_chunk_size loop + m_error_index := i; + insert into harvester_installation_objects + ( + harvester_installation_objects.installed_efficiency, + harvester_installation_objects.max_extraction_rate, + harvester_installation_objects.current_extraction_rate, + harvester_installation_objects.max_hopper_amount, + harvester_installation_objects.hopper_resource, + harvester_installation_objects.hopper_amount, + harvester_installation_objects.resource_type, + harvester_installation_objects.object_id + ) + VALUES + ( + p_installed_efficiency(i), + p_max_extraction_rate(i), + p_current_extraction_rate(i), + p_max_hopper_amount(i), + p_hopper_resource(i), + p_hopper_amount(i), + p_resource_type(i), + p_object_id(i) + ); + + end loop; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_harvester_inst_obj : error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.add_harvester_inst_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.add_harvester_inst_obj','installed_efficiency','float',to_char(p_installed_efficiency(m_error_index))); + db_error_logger.dblogerror_values('persister.add_harvester_inst_obj','max_extraction_rate','int',to_char(p_max_extraction_rate(m_error_index))); + db_error_logger.dblogerror_values('persister.add_harvester_inst_obj','current_extraction_rate','float',to_char(p_current_extraction_rate(m_error_index))); + db_error_logger.dblogerror_values('persister.add_harvester_inst_obj','max_hopper_amount','int',to_char(p_max_hopper_amount(m_error_index))); + db_error_logger.dblogerror_values('persister.add_harvester_inst_obj','hopper_resource','number',p_hopper_resource(m_error_index)); + db_error_logger.dblogerror_values('persister.add_harvester_inst_obj','hopper_amount','float',to_char(p_hopper_amount(m_error_index))); + db_error_logger.dblogerror_values('persister.add_harvester_inst_obj','resource_type','number',p_resource_type(m_error_index)); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','add_harvester_inst_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure remove_harvester_inst_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + begin + FORALL i IN 1..p_chunk_size + delete harvester_installation_objects + where + object_id=p_object_id(i); + end; + + procedure save_installation_obj( p_object_id VAOFSTRING, p_installation_type VAOFNUMBER, p_activated VAOFSTRING, p_tick_count VAOFNUMBER, p_activate_start_time VAOFNUMBER, p_power VAOFNUMBER, p_power_rate VAOFNUMBER, p_chunk_size number ) + as + + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + update installation_objects set + installation_objects.installation_type = nvl(p_installation_type(i),installation_objects.installation_type), + installation_objects.activated = nvl(p_activated(i),installation_objects.activated), + installation_objects.tick_count = nvl(p_tick_count(i),installation_objects.tick_count), + installation_objects.activate_start_time = nvl(p_activate_start_time(i),installation_objects.activate_start_time), + installation_objects.power = nvl(p_power(i),installation_objects.power), + installation_objects.power_rate = nvl(p_power_rate(i),installation_objects.power_rate) + where + installation_objects.object_id=p_object_id(i); + exception + when others then + begin + FOR i IN 1..p_chunk_size LOOP + m_error_index := i; + update installation_objects set + installation_objects.installation_type = nvl(p_installation_type(i),installation_objects.installation_type), + installation_objects.activated = nvl(p_activated(i),installation_objects.activated), + installation_objects.tick_count = nvl(p_tick_count(i),installation_objects.tick_count), + installation_objects.activate_start_time = nvl(p_activate_start_time(i),installation_objects.activate_start_time), + installation_objects.power = nvl(p_power(i),installation_objects.power), + installation_objects.power_rate = nvl(p_power_rate(i),installation_objects.power_rate) + where + installation_objects.object_id=p_object_id(i); + end LOOP; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.save_installation_obj : update error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.save_installation_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.save_installation_obj','installation_type','int',to_char(p_installation_type(m_error_index))); + db_error_logger.dblogerror_values('persister.save_installation_obj','activated','char',p_activated(m_error_index)); + db_error_logger.dblogerror_values('persister.save_installation_obj','tick_count','float',to_char(p_tick_count(m_error_index))); + db_error_logger.dblogerror_values('persister.save_installation_obj','activate_start_time','float',to_char(p_activate_start_time(m_error_index))); + db_error_logger.dblogerror_values('persister.save_installation_obj','power','float',to_char(p_power(m_error_index))); + db_error_logger.dblogerror_values('persister.save_installation_obj','power_rate','float',to_char(p_power_rate(m_error_index))); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','save_installation_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure add_installation_obj( p_object_id VAOFSTRING, p_installation_type VAOFNUMBER, p_activated VAOFSTRING, p_tick_count VAOFNUMBER, p_activate_start_time VAOFNUMBER, p_power VAOFNUMBER, p_power_rate VAOFNUMBER, p_chunk_size number ) + as + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + insert into installation_objects + ( + installation_objects.installation_type, + installation_objects.activated, + installation_objects.tick_count, + installation_objects.activate_start_time, + installation_objects.power, + installation_objects.power_rate, + installation_objects.object_id + ) + VALUES + ( + p_installation_type(i), + p_activated(i), + p_tick_count(i), + p_activate_start_time(i), + p_power(i), + p_power_rate(i), + p_object_id(i) + ); + + exception + when dup_val_on_index then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_installation_obj : dup_val_on_index error.'); + END IF; + for i in 1..p_chunk_size loop + m_error_index := i; + UPDATE installation_objects Set + installation_objects.installation_type = nvl(p_installation_type(i),installation_objects.installation_type), + installation_objects.activated = nvl(p_activated(i),installation_objects.activated), + installation_objects.tick_count = nvl(p_tick_count(i),installation_objects.tick_count), + installation_objects.activate_start_time = nvl(p_activate_start_time(i),installation_objects.activate_start_time), + installation_objects.power = nvl(p_power(i),installation_objects.power), + installation_objects.power_rate = nvl(p_power_rate(i),installation_objects.power_rate) + where + installation_objects.object_id=p_object_id(i); + + if SQL%ROWCOUNT=0 then + insert into installation_objects + ( + installation_objects.installation_type, + installation_objects.activated, + installation_objects.tick_count, + installation_objects.activate_start_time, + installation_objects.power, + installation_objects.power_rate, + installation_objects.object_id + ) + VALUES + ( + p_installation_type(i), + p_activated(i), + p_tick_count(i), + p_activate_start_time(i), + p_power(i), + p_power_rate(i), + p_object_id(i) + ); + end if; + end loop; + end; + when others then + begin + for i in 1..p_chunk_size loop + m_error_index := i; + insert into installation_objects + ( + installation_objects.installation_type, + installation_objects.activated, + installation_objects.tick_count, + installation_objects.activate_start_time, + installation_objects.power, + installation_objects.power_rate, + installation_objects.object_id + ) + VALUES + ( + p_installation_type(i), + p_activated(i), + p_tick_count(i), + p_activate_start_time(i), + p_power(i), + p_power_rate(i), + p_object_id(i) + ); + + end loop; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_installation_obj : error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.add_installation_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.add_installation_obj','installation_type','int',to_char(p_installation_type(m_error_index))); + db_error_logger.dblogerror_values('persister.add_installation_obj','activated','char',p_activated(m_error_index)); + db_error_logger.dblogerror_values('persister.add_installation_obj','tick_count','float',to_char(p_tick_count(m_error_index))); + db_error_logger.dblogerror_values('persister.add_installation_obj','activate_start_time','float',to_char(p_activate_start_time(m_error_index))); + db_error_logger.dblogerror_values('persister.add_installation_obj','power','float',to_char(p_power(m_error_index))); + db_error_logger.dblogerror_values('persister.add_installation_obj','power_rate','float',to_char(p_power_rate(m_error_index))); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','add_installation_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure remove_installation_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + begin + FORALL i IN 1..p_chunk_size + delete installation_objects + where + object_id=p_object_id(i); + end; + + procedure save_intangible_obj( p_object_id VAOFSTRING, p_count VAOFNUMBER, p_chunk_size number ) + as + + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + update intangible_objects set + intangible_objects.count = nvl(p_count(i),intangible_objects.count) + where + intangible_objects.object_id=p_object_id(i); + exception + when others then + begin + FOR i IN 1..p_chunk_size LOOP + m_error_index := i; + update intangible_objects set + intangible_objects.count = nvl(p_count(i),intangible_objects.count) + where + intangible_objects.object_id=p_object_id(i); + end LOOP; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.save_intangible_obj : update error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.save_intangible_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.save_intangible_obj','count','int',to_char(p_count(m_error_index))); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','save_intangible_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure add_intangible_obj( p_object_id VAOFSTRING, p_count VAOFNUMBER, p_chunk_size number ) + as + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + insert into intangible_objects + ( + intangible_objects.count, + intangible_objects.object_id + ) + VALUES + ( + p_count(i), + p_object_id(i) + ); + + exception + when dup_val_on_index then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_intangible_obj : dup_val_on_index error.'); + END IF; + for i in 1..p_chunk_size loop + m_error_index := i; + UPDATE intangible_objects Set + intangible_objects.count = nvl(p_count(i),intangible_objects.count) + where + intangible_objects.object_id=p_object_id(i); + + if SQL%ROWCOUNT=0 then + insert into intangible_objects + ( + intangible_objects.count, + intangible_objects.object_id + ) + VALUES + ( + p_count(i), + p_object_id(i) + ); + end if; + end loop; + end; + when others then + begin + for i in 1..p_chunk_size loop + m_error_index := i; + insert into intangible_objects + ( + intangible_objects.count, + intangible_objects.object_id + ) + VALUES + ( + p_count(i), + p_object_id(i) + ); + + end loop; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_intangible_obj : error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.add_intangible_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.add_intangible_obj','count','int',to_char(p_count(m_error_index))); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','add_intangible_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure remove_intangible_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + begin + FORALL i IN 1..p_chunk_size + delete intangible_objects + where + object_id=p_object_id(i); + end; + + procedure save_manf_schematic_obj( p_object_id VAOFSTRING, p_creator_id VAOFSTRING, p_creator_name VAOFSTRING, p_items_per_container VAOFNUMBER, p_manufacture_time VAOFNUMBER, p_draft_schematic VAOFNUMBER, p_chunk_size number ) + as + + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + update manf_schematic_objects set + manf_schematic_objects.creator_id = nvl(p_creator_id(i),manf_schematic_objects.creator_id), + manf_schematic_objects.creator_name = nvl(p_creator_name(i),manf_schematic_objects.creator_name), + manf_schematic_objects.items_per_container = nvl(p_items_per_container(i),manf_schematic_objects.items_per_container), + manf_schematic_objects.manufacture_time = nvl(p_manufacture_time(i),manf_schematic_objects.manufacture_time), + manf_schematic_objects.draft_schematic = nvl(p_draft_schematic(i),manf_schematic_objects.draft_schematic) + where + manf_schematic_objects.object_id=p_object_id(i); + exception + when others then + begin + FOR i IN 1..p_chunk_size LOOP + m_error_index := i; + update manf_schematic_objects set + manf_schematic_objects.creator_id = nvl(p_creator_id(i),manf_schematic_objects.creator_id), + manf_schematic_objects.creator_name = nvl(p_creator_name(i),manf_schematic_objects.creator_name), + manf_schematic_objects.items_per_container = nvl(p_items_per_container(i),manf_schematic_objects.items_per_container), + manf_schematic_objects.manufacture_time = nvl(p_manufacture_time(i),manf_schematic_objects.manufacture_time), + manf_schematic_objects.draft_schematic = nvl(p_draft_schematic(i),manf_schematic_objects.draft_schematic) + where + manf_schematic_objects.object_id=p_object_id(i); + end LOOP; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.save_manf_schematic_obj : update error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.save_manf_schematic_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.save_manf_schematic_obj','creator_id','number',p_creator_id(m_error_index)); + db_error_logger.dblogerror_values('persister.save_manf_schematic_obj','creator_name','varchar2',p_creator_name(m_error_index)); + db_error_logger.dblogerror_values('persister.save_manf_schematic_obj','items_per_container','int',to_char(p_items_per_container(m_error_index))); + db_error_logger.dblogerror_values('persister.save_manf_schematic_obj','manufacture_time','float',to_char(p_manufacture_time(m_error_index))); + db_error_logger.dblogerror_values('persister.save_manf_schematic_obj','draft_schematic','int',to_char(p_draft_schematic(m_error_index))); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','save_manf_schematic_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure add_manf_schematic_obj( p_object_id VAOFSTRING, p_creator_id VAOFSTRING, p_creator_name VAOFSTRING, p_items_per_container VAOFNUMBER, p_manufacture_time VAOFNUMBER, p_draft_schematic VAOFNUMBER, p_chunk_size number ) + as + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + insert into manf_schematic_objects + ( + manf_schematic_objects.creator_id, + manf_schematic_objects.creator_name, + manf_schematic_objects.items_per_container, + manf_schematic_objects.manufacture_time, + manf_schematic_objects.draft_schematic, + manf_schematic_objects.object_id + ) + VALUES + ( + p_creator_id(i), + p_creator_name(i), + p_items_per_container(i), + p_manufacture_time(i), + p_draft_schematic(i), + p_object_id(i) + ); + + exception + when dup_val_on_index then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_manf_schematic_obj : dup_val_on_index error.'); + END IF; + for i in 1..p_chunk_size loop + m_error_index := i; + UPDATE manf_schematic_objects Set + manf_schematic_objects.creator_id = nvl(p_creator_id(i),manf_schematic_objects.creator_id), + manf_schematic_objects.creator_name = nvl(p_creator_name(i),manf_schematic_objects.creator_name), + manf_schematic_objects.items_per_container = nvl(p_items_per_container(i),manf_schematic_objects.items_per_container), + manf_schematic_objects.manufacture_time = nvl(p_manufacture_time(i),manf_schematic_objects.manufacture_time), + manf_schematic_objects.draft_schematic = nvl(p_draft_schematic(i),manf_schematic_objects.draft_schematic) + where + manf_schematic_objects.object_id=p_object_id(i); + + if SQL%ROWCOUNT=0 then + insert into manf_schematic_objects + ( + manf_schematic_objects.creator_id, + manf_schematic_objects.creator_name, + manf_schematic_objects.items_per_container, + manf_schematic_objects.manufacture_time, + manf_schematic_objects.draft_schematic, + manf_schematic_objects.object_id + ) + VALUES + ( + p_creator_id(i), + p_creator_name(i), + p_items_per_container(i), + p_manufacture_time(i), + p_draft_schematic(i), + p_object_id(i) + ); + end if; + end loop; + end; + when others then + begin + for i in 1..p_chunk_size loop + m_error_index := i; + insert into manf_schematic_objects + ( + manf_schematic_objects.creator_id, + manf_schematic_objects.creator_name, + manf_schematic_objects.items_per_container, + manf_schematic_objects.manufacture_time, + manf_schematic_objects.draft_schematic, + manf_schematic_objects.object_id + ) + VALUES + ( + p_creator_id(i), + p_creator_name(i), + p_items_per_container(i), + p_manufacture_time(i), + p_draft_schematic(i), + p_object_id(i) + ); + + end loop; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_manf_schematic_obj : error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.add_manf_schematic_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.add_manf_schematic_obj','creator_id','number',p_creator_id(m_error_index)); + db_error_logger.dblogerror_values('persister.add_manf_schematic_obj','creator_name','varchar2',p_creator_name(m_error_index)); + db_error_logger.dblogerror_values('persister.add_manf_schematic_obj','items_per_container','int',to_char(p_items_per_container(m_error_index))); + db_error_logger.dblogerror_values('persister.add_manf_schematic_obj','manufacture_time','float',to_char(p_manufacture_time(m_error_index))); + db_error_logger.dblogerror_values('persister.add_manf_schematic_obj','draft_schematic','int',to_char(p_draft_schematic(m_error_index))); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','add_manf_schematic_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure remove_manf_schematic_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + begin + FORALL i IN 1..p_chunk_size + delete manf_schematic_objects + where + object_id=p_object_id(i); + end; + + procedure save_manufacture_inst_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + null; + end; + + procedure add_manufacture_inst_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + insert into manufacture_inst_objects + ( + manufacture_inst_objects.object_id + ) + VALUES + ( + p_object_id(i) + ); + + exception + when dup_val_on_index then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_manufacture_inst_obj : dup_val_on_index error.'); + END IF; + end; + when others then + begin + for i in 1..p_chunk_size loop + m_error_index := i; + insert into manufacture_inst_objects + ( + manufacture_inst_objects.object_id + ) + VALUES + ( + p_object_id(i) + ); + + end loop; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_manufacture_inst_obj : error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.add_manufacture_inst_obj','object_id','number',p_object_id(m_error_index)); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','add_manufacture_inst_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure remove_manufacture_inst_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + begin + null; + end; + + procedure save_mission_obj( p_object_id VAOFSTRING, p_difficulty VAOFNUMBER, p_end_x VAOFNUMBER, p_end_y VAOFNUMBER, p_end_z VAOFNUMBER, p_end_cell VAOFSTRING, p_end_scene VAOFNUMBER, p_mission_creator VAOFSTRING, p_reward VAOFNUMBER, p_root_script_name VAOFSTRING, p_start_x VAOFNUMBER, p_start_y VAOFNUMBER, p_start_z VAOFNUMBER, p_start_cell VAOFSTRING, p_start_scene VAOFNUMBER, p_description_table VAOFSTRING, p_description_text VAOFSTRING, p_title_table VAOFSTRING, p_title_text VAOFSTRING, p_mission_holder_id VAOFSTRING, p_status VAOFNUMBER, p_mission_type VAOFNUMBER, p_target_appearance VAOFNUMBER, p_target_name VAOFSTRING, p_chunk_size number ) + as + + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + update mission_objects set + mission_objects.difficulty = nvl(p_difficulty(i),mission_objects.difficulty), + mission_objects.end_x = nvl(p_end_x(i),mission_objects.end_x), + mission_objects.end_y = nvl(p_end_y(i),mission_objects.end_y), + mission_objects.end_z = nvl(p_end_z(i),mission_objects.end_z), + mission_objects.end_cell = nvl(p_end_cell(i),mission_objects.end_cell), + mission_objects.end_scene = nvl(p_end_scene(i),mission_objects.end_scene), + mission_objects.mission_creator = nvl(p_mission_creator(i),mission_objects.mission_creator), + mission_objects.reward = nvl(p_reward(i),mission_objects.reward), + mission_objects.root_script_name = nvl(p_root_script_name(i),mission_objects.root_script_name), + mission_objects.start_x = nvl(p_start_x(i),mission_objects.start_x), + mission_objects.start_y = nvl(p_start_y(i),mission_objects.start_y), + mission_objects.start_z = nvl(p_start_z(i),mission_objects.start_z), + mission_objects.start_cell = nvl(p_start_cell(i),mission_objects.start_cell), + mission_objects.start_scene = nvl(p_start_scene(i),mission_objects.start_scene), + mission_objects.description_table = nvl(p_description_table(i),mission_objects.description_table), + mission_objects.description_text = nvl(p_description_text(i),mission_objects.description_text), + mission_objects.title_table = nvl(p_title_table(i),mission_objects.title_table), + mission_objects.title_text = nvl(p_title_text(i),mission_objects.title_text), + mission_objects.mission_holder_id = nvl(p_mission_holder_id(i),mission_objects.mission_holder_id), + mission_objects.status = nvl(p_status(i),mission_objects.status), + mission_objects.mission_type = nvl(p_mission_type(i),mission_objects.mission_type), + mission_objects.target_appearance = nvl(p_target_appearance(i),mission_objects.target_appearance), + mission_objects.target_name = nvl(p_target_name(i),mission_objects.target_name) + where + mission_objects.object_id=p_object_id(i); + exception + when others then + begin + FOR i IN 1..p_chunk_size LOOP + m_error_index := i; + update mission_objects set + mission_objects.difficulty = nvl(p_difficulty(i),mission_objects.difficulty), + mission_objects.end_x = nvl(p_end_x(i),mission_objects.end_x), + mission_objects.end_y = nvl(p_end_y(i),mission_objects.end_y), + mission_objects.end_z = nvl(p_end_z(i),mission_objects.end_z), + mission_objects.end_cell = nvl(p_end_cell(i),mission_objects.end_cell), + mission_objects.end_scene = nvl(p_end_scene(i),mission_objects.end_scene), + mission_objects.mission_creator = nvl(p_mission_creator(i),mission_objects.mission_creator), + mission_objects.reward = nvl(p_reward(i),mission_objects.reward), + mission_objects.root_script_name = nvl(p_root_script_name(i),mission_objects.root_script_name), + mission_objects.start_x = nvl(p_start_x(i),mission_objects.start_x), + mission_objects.start_y = nvl(p_start_y(i),mission_objects.start_y), + mission_objects.start_z = nvl(p_start_z(i),mission_objects.start_z), + mission_objects.start_cell = nvl(p_start_cell(i),mission_objects.start_cell), + mission_objects.start_scene = nvl(p_start_scene(i),mission_objects.start_scene), + mission_objects.description_table = nvl(p_description_table(i),mission_objects.description_table), + mission_objects.description_text = nvl(p_description_text(i),mission_objects.description_text), + mission_objects.title_table = nvl(p_title_table(i),mission_objects.title_table), + mission_objects.title_text = nvl(p_title_text(i),mission_objects.title_text), + mission_objects.mission_holder_id = nvl(p_mission_holder_id(i),mission_objects.mission_holder_id), + mission_objects.status = nvl(p_status(i),mission_objects.status), + mission_objects.mission_type = nvl(p_mission_type(i),mission_objects.mission_type), + mission_objects.target_appearance = nvl(p_target_appearance(i),mission_objects.target_appearance), + mission_objects.target_name = nvl(p_target_name(i),mission_objects.target_name) + where + mission_objects.object_id=p_object_id(i); + end LOOP; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.save_mission_obj : update error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.save_mission_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.save_mission_obj','difficulty','int',to_char(p_difficulty(m_error_index))); + db_error_logger.dblogerror_values('persister.save_mission_obj','end_x','float',to_char(p_end_x(m_error_index))); + db_error_logger.dblogerror_values('persister.save_mission_obj','end_y','float',to_char(p_end_y(m_error_index))); + db_error_logger.dblogerror_values('persister.save_mission_obj','end_z','float',to_char(p_end_z(m_error_index))); + db_error_logger.dblogerror_values('persister.save_mission_obj','end_cell','number',p_end_cell(m_error_index)); + db_error_logger.dblogerror_values('persister.save_mission_obj','end_scene','int',to_char(p_end_scene(m_error_index))); + db_error_logger.dblogerror_values('persister.save_mission_obj','mission_creator','varchar2',p_mission_creator(m_error_index)); + db_error_logger.dblogerror_values('persister.save_mission_obj','reward','int',to_char(p_reward(m_error_index))); + db_error_logger.dblogerror_values('persister.save_mission_obj','root_script_name','varchar2',p_root_script_name(m_error_index)); + db_error_logger.dblogerror_values('persister.save_mission_obj','start_x','float',to_char(p_start_x(m_error_index))); + db_error_logger.dblogerror_values('persister.save_mission_obj','start_y','float',to_char(p_start_y(m_error_index))); + db_error_logger.dblogerror_values('persister.save_mission_obj','start_z','float',to_char(p_start_z(m_error_index))); + db_error_logger.dblogerror_values('persister.save_mission_obj','start_cell','number',p_start_cell(m_error_index)); + db_error_logger.dblogerror_values('persister.save_mission_obj','start_scene','int',to_char(p_start_scene(m_error_index))); + db_error_logger.dblogerror_values('persister.save_mission_obj','description_table','varchar2',p_description_table(m_error_index)); + db_error_logger.dblogerror_values('persister.save_mission_obj','description_text','varchar2',p_description_text(m_error_index)); + db_error_logger.dblogerror_values('persister.save_mission_obj','title_table','varchar2',p_title_table(m_error_index)); + db_error_logger.dblogerror_values('persister.save_mission_obj','title_text','varchar2',p_title_text(m_error_index)); + db_error_logger.dblogerror_values('persister.save_mission_obj','mission_holder_id','number',p_mission_holder_id(m_error_index)); + db_error_logger.dblogerror_values('persister.save_mission_obj','status','int',to_char(p_status(m_error_index))); + db_error_logger.dblogerror_values('persister.save_mission_obj','mission_type','int',to_char(p_mission_type(m_error_index))); + db_error_logger.dblogerror_values('persister.save_mission_obj','target_appearance','int',to_char(p_target_appearance(m_error_index))); + db_error_logger.dblogerror_values('persister.save_mission_obj','target_name','varchar2',p_target_name(m_error_index)); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','save_mission_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure add_mission_obj( p_object_id VAOFSTRING, p_difficulty VAOFNUMBER, p_end_x VAOFNUMBER, p_end_y VAOFNUMBER, p_end_z VAOFNUMBER, p_end_cell VAOFSTRING, p_end_scene VAOFNUMBER, p_mission_creator VAOFSTRING, p_reward VAOFNUMBER, p_root_script_name VAOFSTRING, p_start_x VAOFNUMBER, p_start_y VAOFNUMBER, p_start_z VAOFNUMBER, p_start_cell VAOFSTRING, p_start_scene VAOFNUMBER, p_description_table VAOFSTRING, p_description_text VAOFSTRING, p_title_table VAOFSTRING, p_title_text VAOFSTRING, p_mission_holder_id VAOFSTRING, p_status VAOFNUMBER, p_mission_type VAOFNUMBER, p_target_appearance VAOFNUMBER, p_target_name VAOFSTRING, p_chunk_size number ) + as + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + insert into mission_objects + ( + mission_objects.difficulty, + mission_objects.end_x, + mission_objects.end_y, + mission_objects.end_z, + mission_objects.end_cell, + mission_objects.end_scene, + mission_objects.mission_creator, + mission_objects.reward, + mission_objects.root_script_name, + mission_objects.start_x, + mission_objects.start_y, + mission_objects.start_z, + mission_objects.start_cell, + mission_objects.start_scene, + mission_objects.description_table, + mission_objects.description_text, + mission_objects.title_table, + mission_objects.title_text, + mission_objects.mission_holder_id, + mission_objects.status, + mission_objects.mission_type, + mission_objects.target_appearance, + mission_objects.target_name, + mission_objects.object_id + ) + VALUES + ( + p_difficulty(i), + p_end_x(i), + p_end_y(i), + p_end_z(i), + p_end_cell(i), + p_end_scene(i), + p_mission_creator(i), + p_reward(i), + p_root_script_name(i), + p_start_x(i), + p_start_y(i), + p_start_z(i), + p_start_cell(i), + p_start_scene(i), + p_description_table(i), + p_description_text(i), + p_title_table(i), + p_title_text(i), + p_mission_holder_id(i), + p_status(i), + p_mission_type(i), + p_target_appearance(i), + p_target_name(i), + p_object_id(i) + ); + + exception + when dup_val_on_index then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_mission_obj : dup_val_on_index error.'); + END IF; + for i in 1..p_chunk_size loop + m_error_index := i; + UPDATE mission_objects Set + mission_objects.difficulty = nvl(p_difficulty(i),mission_objects.difficulty), + mission_objects.end_x = nvl(p_end_x(i),mission_objects.end_x), + mission_objects.end_y = nvl(p_end_y(i),mission_objects.end_y), + mission_objects.end_z = nvl(p_end_z(i),mission_objects.end_z), + mission_objects.end_cell = nvl(p_end_cell(i),mission_objects.end_cell), + mission_objects.end_scene = nvl(p_end_scene(i),mission_objects.end_scene), + mission_objects.mission_creator = nvl(p_mission_creator(i),mission_objects.mission_creator), + mission_objects.reward = nvl(p_reward(i),mission_objects.reward), + mission_objects.root_script_name = nvl(p_root_script_name(i),mission_objects.root_script_name), + mission_objects.start_x = nvl(p_start_x(i),mission_objects.start_x), + mission_objects.start_y = nvl(p_start_y(i),mission_objects.start_y), + mission_objects.start_z = nvl(p_start_z(i),mission_objects.start_z), + mission_objects.start_cell = nvl(p_start_cell(i),mission_objects.start_cell), + mission_objects.start_scene = nvl(p_start_scene(i),mission_objects.start_scene), + mission_objects.description_table = nvl(p_description_table(i),mission_objects.description_table), + mission_objects.description_text = nvl(p_description_text(i),mission_objects.description_text), + mission_objects.title_table = nvl(p_title_table(i),mission_objects.title_table), + mission_objects.title_text = nvl(p_title_text(i),mission_objects.title_text), + mission_objects.mission_holder_id = nvl(p_mission_holder_id(i),mission_objects.mission_holder_id), + mission_objects.status = nvl(p_status(i),mission_objects.status), + mission_objects.mission_type = nvl(p_mission_type(i),mission_objects.mission_type), + mission_objects.target_appearance = nvl(p_target_appearance(i),mission_objects.target_appearance), + mission_objects.target_name = nvl(p_target_name(i),mission_objects.target_name) + where + mission_objects.object_id=p_object_id(i); + + if SQL%ROWCOUNT=0 then + insert into mission_objects + ( + mission_objects.difficulty, + mission_objects.end_x, + mission_objects.end_y, + mission_objects.end_z, + mission_objects.end_cell, + mission_objects.end_scene, + mission_objects.mission_creator, + mission_objects.reward, + mission_objects.root_script_name, + mission_objects.start_x, + mission_objects.start_y, + mission_objects.start_z, + mission_objects.start_cell, + mission_objects.start_scene, + mission_objects.description_table, + mission_objects.description_text, + mission_objects.title_table, + mission_objects.title_text, + mission_objects.mission_holder_id, + mission_objects.status, + mission_objects.mission_type, + mission_objects.target_appearance, + mission_objects.target_name, + mission_objects.object_id + ) + VALUES + ( + p_difficulty(i), + p_end_x(i), + p_end_y(i), + p_end_z(i), + p_end_cell(i), + p_end_scene(i), + p_mission_creator(i), + p_reward(i), + p_root_script_name(i), + p_start_x(i), + p_start_y(i), + p_start_z(i), + p_start_cell(i), + p_start_scene(i), + p_description_table(i), + p_description_text(i), + p_title_table(i), + p_title_text(i), + p_mission_holder_id(i), + p_status(i), + p_mission_type(i), + p_target_appearance(i), + p_target_name(i), + p_object_id(i) + ); + end if; + end loop; + end; + when others then + begin + for i in 1..p_chunk_size loop + m_error_index := i; + insert into mission_objects + ( + mission_objects.difficulty, + mission_objects.end_x, + mission_objects.end_y, + mission_objects.end_z, + mission_objects.end_cell, + mission_objects.end_scene, + mission_objects.mission_creator, + mission_objects.reward, + mission_objects.root_script_name, + mission_objects.start_x, + mission_objects.start_y, + mission_objects.start_z, + mission_objects.start_cell, + mission_objects.start_scene, + mission_objects.description_table, + mission_objects.description_text, + mission_objects.title_table, + mission_objects.title_text, + mission_objects.mission_holder_id, + mission_objects.status, + mission_objects.mission_type, + mission_objects.target_appearance, + mission_objects.target_name, + mission_objects.object_id + ) + VALUES + ( + p_difficulty(i), + p_end_x(i), + p_end_y(i), + p_end_z(i), + p_end_cell(i), + p_end_scene(i), + p_mission_creator(i), + p_reward(i), + p_root_script_name(i), + p_start_x(i), + p_start_y(i), + p_start_z(i), + p_start_cell(i), + p_start_scene(i), + p_description_table(i), + p_description_text(i), + p_title_table(i), + p_title_text(i), + p_mission_holder_id(i), + p_status(i), + p_mission_type(i), + p_target_appearance(i), + p_target_name(i), + p_object_id(i) + ); + + end loop; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_mission_obj : error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.add_mission_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.add_mission_obj','difficulty','int',to_char(p_difficulty(m_error_index))); + db_error_logger.dblogerror_values('persister.add_mission_obj','end_x','float',to_char(p_end_x(m_error_index))); + db_error_logger.dblogerror_values('persister.add_mission_obj','end_y','float',to_char(p_end_y(m_error_index))); + db_error_logger.dblogerror_values('persister.add_mission_obj','end_z','float',to_char(p_end_z(m_error_index))); + db_error_logger.dblogerror_values('persister.add_mission_obj','end_cell','number',p_end_cell(m_error_index)); + db_error_logger.dblogerror_values('persister.add_mission_obj','end_scene','int',to_char(p_end_scene(m_error_index))); + db_error_logger.dblogerror_values('persister.add_mission_obj','mission_creator','varchar2',p_mission_creator(m_error_index)); + db_error_logger.dblogerror_values('persister.add_mission_obj','reward','int',to_char(p_reward(m_error_index))); + db_error_logger.dblogerror_values('persister.add_mission_obj','root_script_name','varchar2',p_root_script_name(m_error_index)); + db_error_logger.dblogerror_values('persister.add_mission_obj','start_x','float',to_char(p_start_x(m_error_index))); + db_error_logger.dblogerror_values('persister.add_mission_obj','start_y','float',to_char(p_start_y(m_error_index))); + db_error_logger.dblogerror_values('persister.add_mission_obj','start_z','float',to_char(p_start_z(m_error_index))); + db_error_logger.dblogerror_values('persister.add_mission_obj','start_cell','number',p_start_cell(m_error_index)); + db_error_logger.dblogerror_values('persister.add_mission_obj','start_scene','int',to_char(p_start_scene(m_error_index))); + db_error_logger.dblogerror_values('persister.add_mission_obj','description_table','varchar2',p_description_table(m_error_index)); + db_error_logger.dblogerror_values('persister.add_mission_obj','description_text','varchar2',p_description_text(m_error_index)); + db_error_logger.dblogerror_values('persister.add_mission_obj','title_table','varchar2',p_title_table(m_error_index)); + db_error_logger.dblogerror_values('persister.add_mission_obj','title_text','varchar2',p_title_text(m_error_index)); + db_error_logger.dblogerror_values('persister.add_mission_obj','mission_holder_id','number',p_mission_holder_id(m_error_index)); + db_error_logger.dblogerror_values('persister.add_mission_obj','status','int',to_char(p_status(m_error_index))); + db_error_logger.dblogerror_values('persister.add_mission_obj','mission_type','int',to_char(p_mission_type(m_error_index))); + db_error_logger.dblogerror_values('persister.add_mission_obj','target_appearance','int',to_char(p_target_appearance(m_error_index))); + db_error_logger.dblogerror_values('persister.add_mission_obj','target_name','varchar2',p_target_name(m_error_index)); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','add_mission_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure remove_mission_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + begin + FORALL i IN 1..p_chunk_size + delete mission_objects + where + object_id=p_object_id(i); + end; + + procedure save_planet_obj( p_object_id VAOFSTRING, p_planet_name VAOFSTRING, p_chunk_size number ) + as + + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + update planet_objects set + planet_objects.planet_name = nvl(p_planet_name(i),planet_objects.planet_name) + where + planet_objects.object_id=p_object_id(i); + exception + when others then + begin + FOR i IN 1..p_chunk_size LOOP + m_error_index := i; + update planet_objects set + planet_objects.planet_name = nvl(p_planet_name(i),planet_objects.planet_name) + where + planet_objects.object_id=p_object_id(i); + end LOOP; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.save_planet_obj : update error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.save_planet_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.save_planet_obj','planet_name','varchar',p_planet_name(m_error_index)); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','save_planet_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure add_planet_obj( p_object_id VAOFSTRING, p_planet_name VAOFSTRING, p_chunk_size number ) + as + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + insert into planet_objects + ( + planet_objects.planet_name, + planet_objects.object_id + ) + VALUES + ( + p_planet_name(i), + p_object_id(i) + ); + + exception + when dup_val_on_index then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_planet_obj : dup_val_on_index error.'); + END IF; + for i in 1..p_chunk_size loop + m_error_index := i; + UPDATE planet_objects Set + planet_objects.planet_name = nvl(p_planet_name(i),planet_objects.planet_name) + where + planet_objects.object_id=p_object_id(i); + + if SQL%ROWCOUNT=0 then + insert into planet_objects + ( + planet_objects.planet_name, + planet_objects.object_id + ) + VALUES + ( + p_planet_name(i), + p_object_id(i) + ); + end if; + end loop; + end; + when others then + begin + for i in 1..p_chunk_size loop + m_error_index := i; + insert into planet_objects + ( + planet_objects.planet_name, + planet_objects.object_id + ) + VALUES + ( + p_planet_name(i), + p_object_id(i) + ); + + end loop; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_planet_obj : error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.add_planet_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.add_planet_obj','planet_name','varchar',p_planet_name(m_error_index)); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','add_planet_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure remove_planet_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + begin + FORALL i IN 1..p_chunk_size + delete planet_objects + where + object_id=p_object_id(i); + end; + + procedure save_resource_container_obj( p_object_id VAOFSTRING, p_resource_type VAOFSTRING, p_quantity VAOFNUMBER, p_source VAOFSTRING, p_chunk_size number ) + as + + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + update resource_container_objects set + resource_container_objects.resource_type = nvl(p_resource_type(i),resource_container_objects.resource_type), + resource_container_objects.quantity = nvl(p_quantity(i),resource_container_objects.quantity), + resource_container_objects.source = nvl(p_source(i),resource_container_objects.source) + where + resource_container_objects.object_id=p_object_id(i); + exception + when others then + begin + FOR i IN 1..p_chunk_size LOOP + m_error_index := i; + update resource_container_objects set + resource_container_objects.resource_type = nvl(p_resource_type(i),resource_container_objects.resource_type), + resource_container_objects.quantity = nvl(p_quantity(i),resource_container_objects.quantity), + resource_container_objects.source = nvl(p_source(i),resource_container_objects.source) + where + resource_container_objects.object_id=p_object_id(i); + end LOOP; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.save_resource_container_obj : update error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.save_resource_container_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.save_resource_container_obj','resource_type','number',p_resource_type(m_error_index)); + db_error_logger.dblogerror_values('persister.save_resource_container_obj','quantity','int',to_char(p_quantity(m_error_index))); + db_error_logger.dblogerror_values('persister.save_resource_container_obj','source','number',p_source(m_error_index)); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','save_resource_container_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure add_resource_container_obj( p_object_id VAOFSTRING, p_resource_type VAOFSTRING, p_quantity VAOFNUMBER, p_source VAOFSTRING, p_chunk_size number ) + as + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + insert into resource_container_objects + ( + resource_container_objects.resource_type, + resource_container_objects.quantity, + resource_container_objects.source, + resource_container_objects.object_id + ) + VALUES + ( + p_resource_type(i), + p_quantity(i), + p_source(i), + p_object_id(i) + ); + + exception + when dup_val_on_index then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_resource_container_obj : dup_val_on_index error.'); + END IF; + for i in 1..p_chunk_size loop + m_error_index := i; + UPDATE resource_container_objects Set + resource_container_objects.resource_type = nvl(p_resource_type(i),resource_container_objects.resource_type), + resource_container_objects.quantity = nvl(p_quantity(i),resource_container_objects.quantity), + resource_container_objects.source = nvl(p_source(i),resource_container_objects.source) + where + resource_container_objects.object_id=p_object_id(i); + + if SQL%ROWCOUNT=0 then + insert into resource_container_objects + ( + resource_container_objects.resource_type, + resource_container_objects.quantity, + resource_container_objects.source, + resource_container_objects.object_id + ) + VALUES + ( + p_resource_type(i), + p_quantity(i), + p_source(i), + p_object_id(i) + ); + end if; + end loop; + end; + when others then + begin + for i in 1..p_chunk_size loop + m_error_index := i; + insert into resource_container_objects + ( + resource_container_objects.resource_type, + resource_container_objects.quantity, + resource_container_objects.source, + resource_container_objects.object_id + ) + VALUES + ( + p_resource_type(i), + p_quantity(i), + p_source(i), + p_object_id(i) + ); + + end loop; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_resource_container_obj : error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.add_resource_container_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.add_resource_container_obj','resource_type','number',p_resource_type(m_error_index)); + db_error_logger.dblogerror_values('persister.add_resource_container_obj','quantity','int',to_char(p_quantity(m_error_index))); + db_error_logger.dblogerror_values('persister.add_resource_container_obj','source','number',p_source(m_error_index)); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','add_resource_container_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure remove_resource_container_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + begin + FORALL i IN 1..p_chunk_size + delete resource_container_objects + where + object_id=p_object_id(i); + end; + + procedure save_ship_obj(p_object_id VAOFSTRING, p_slide_dampener VAOFNUMBER, p_current_chassis_hit_points VAOFNUMBER, p_maximum_chassis_hit_points VAOFNUMBER, p_chassis_type VAOFNUMBER, p_cmp_armor_hp_maximum VAOFSTRING, p_cmp_armor_hp_current VAOFSTRING, p_cmp_efficiency_general VAOFSTRING, p_cmp_efficiency_eng VAOFSTRING, p_cmp_eng_maintenance VAOFSTRING, p_cmp_mass VAOFSTRING, p_cmp_crc VAOFSTRING, p_cmp_hp_current VAOFSTRING, p_cmp_hp_maximum VAOFSTRING, p_cmp_flags VAOFSTRING, p_cmp_names VAOFLONGSTRING, p_weapon_damage_maximum VAOFSTRING, p_weapon_damage_minimum VAOFSTRING, p_weapon_effectiveness_shields VAOFSTRING, p_weapon_effectiveness_armor VAOFSTRING, p_weapon_eng_per_shot VAOFSTRING, p_weapon_refire_rate VAOFSTRING, p_weapon_ammo_current VAOFSTRING, p_weapon_ammo_maximum VAOFSTRING, p_weapon_ammo_type VAOFSTRING, p_shield_hp_front_maximum VAOFNUMBER, p_shield_hp_back_maximum VAOFNUMBER, p_shield_recharge_rate VAOFNUMBER, p_capacitor_eng_maximum VAOFNUMBER, p_capacitor_eng_recharge_rate VAOFNUMBER, p_engine_acc_rate VAOFNUMBER, p_engine_deceleration_rate VAOFNUMBER, p_engine_pitch_acc_rate VAOFNUMBER, p_engine_yaw_acc_rate VAOFNUMBER, p_engine_roll_acc_rate VAOFNUMBER, p_engine_pitch_rate_maximum VAOFNUMBER, p_engine_yaw_rate_maximum VAOFNUMBER, p_engine_roll_rate_maximum VAOFNUMBER, p_engine_speed_maximum VAOFNUMBER, p_reactor_eng_generation_rate VAOFNUMBER, p_booster_eng_maximum VAOFNUMBER, p_booster_eng_recharge_rate VAOFNUMBER, p_booster_eng_consumption_rate VAOFNUMBER, p_booster_acc VAOFNUMBER, p_booster_speed_maximum VAOFNUMBER, p_droid_if_cmd_speed VAOFNUMBER, p_installed_dcd VAOFSTRING, p_chassis_cmp_mass_maximum VAOFNUMBER, p_cmp_creators VAOFSTRING, p_cargo_hold_contents_maximum VAOFNUMBER, p_cargo_hold_contents_current VAOFNUMBER, p_cargo_hold_contents VAOFSTRING, p_chunk_size number) + as + + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + update ship_objects set + ship_objects.slide_dampener = nvl(p_slide_dampener(i),ship_objects.slide_dampener), + ship_objects.current_chassis_hit_points = nvl(p_current_chassis_hit_points(i),ship_objects.current_chassis_hit_points), + ship_objects.maximum_chassis_hit_points = nvl(p_maximum_chassis_hit_points(i),ship_objects.maximum_chassis_hit_points), + ship_objects.chassis_type = nvl(p_chassis_type(i),ship_objects.chassis_type), + ship_objects.cmp_armor_hp_maximum = nvl(p_cmp_armor_hp_maximum(i),ship_objects.cmp_armor_hp_maximum), + ship_objects.cmp_armor_hp_current = nvl(p_cmp_armor_hp_current(i),ship_objects.cmp_armor_hp_current), + ship_objects.cmp_efficiency_general = nvl(p_cmp_efficiency_general(i),ship_objects.cmp_efficiency_general), + ship_objects.cmp_efficiency_eng = nvl(p_cmp_efficiency_eng(i),ship_objects.cmp_efficiency_eng), + ship_objects.cmp_eng_maintenance = nvl(p_cmp_eng_maintenance(i),ship_objects.cmp_eng_maintenance), + ship_objects.cmp_mass = nvl(p_cmp_mass(i),ship_objects.cmp_mass), + ship_objects.cmp_crc = nvl(p_cmp_crc(i),ship_objects.cmp_crc), + ship_objects.cmp_hp_current = nvl(p_cmp_hp_current(i),ship_objects.cmp_hp_current), + ship_objects.cmp_hp_maximum = nvl(p_cmp_hp_maximum(i),ship_objects.cmp_hp_maximum), + ship_objects.cmp_flags = nvl(p_cmp_flags(i),ship_objects.cmp_flags), + ship_objects.cmp_names = nvl(p_cmp_names(i),ship_objects.cmp_names), + ship_objects.weapon_damage_maximum = nvl(p_weapon_damage_maximum(i),ship_objects.weapon_damage_maximum), + ship_objects.weapon_damage_minimum = nvl(p_weapon_damage_minimum(i),ship_objects.weapon_damage_minimum), + ship_objects.weapon_effectiveness_shields = nvl(p_weapon_effectiveness_shields(i),ship_objects.weapon_effectiveness_shields), + ship_objects.weapon_effectiveness_armor = nvl(p_weapon_effectiveness_armor(i),ship_objects.weapon_effectiveness_armor), + ship_objects.weapon_eng_per_shot = nvl(p_weapon_eng_per_shot(i),ship_objects.weapon_eng_per_shot), + ship_objects.weapon_refire_rate = nvl(p_weapon_refire_rate(i),ship_objects.weapon_refire_rate), + ship_objects.weapon_ammo_current = nvl(p_weapon_ammo_current(i),ship_objects.weapon_ammo_current), + ship_objects.weapon_ammo_maximum = nvl(p_weapon_ammo_maximum(i),ship_objects.weapon_ammo_maximum), + ship_objects.weapon_ammo_type = nvl(p_weapon_ammo_type(i),ship_objects.weapon_ammo_type), + ship_objects.shield_hp_front_maximum = nvl(p_shield_hp_front_maximum(i),ship_objects.shield_hp_front_maximum), + ship_objects.shield_hp_back_maximum = nvl(p_shield_hp_back_maximum(i),ship_objects.shield_hp_back_maximum), + ship_objects.shield_recharge_rate = nvl(p_shield_recharge_rate(i),ship_objects.shield_recharge_rate), + ship_objects.capacitor_eng_maximum = nvl(p_capacitor_eng_maximum(i),ship_objects.capacitor_eng_maximum), + ship_objects.capacitor_eng_recharge_rate = nvl(p_capacitor_eng_recharge_rate(i),ship_objects.capacitor_eng_recharge_rate), + ship_objects.engine_acc_rate = nvl(p_engine_acc_rate(i),ship_objects.engine_acc_rate), + ship_objects.engine_deceleration_rate = nvl(p_engine_deceleration_rate(i),ship_objects.engine_deceleration_rate), + ship_objects.engine_pitch_acc_rate = nvl(p_engine_pitch_acc_rate(i),ship_objects.engine_pitch_acc_rate), + ship_objects.engine_yaw_acc_rate = nvl(p_engine_yaw_acc_rate(i),ship_objects.engine_yaw_acc_rate), + ship_objects.engine_roll_acc_rate = nvl(p_engine_roll_acc_rate(i),ship_objects.engine_roll_acc_rate), + ship_objects.engine_pitch_rate_maximum = nvl(p_engine_pitch_rate_maximum(i),ship_objects.engine_pitch_rate_maximum), + ship_objects.engine_yaw_rate_maximum = nvl(p_engine_yaw_rate_maximum(i),ship_objects.engine_yaw_rate_maximum), + ship_objects.engine_roll_rate_maximum = nvl(p_engine_roll_rate_maximum(i),ship_objects.engine_roll_rate_maximum), + ship_objects.engine_speed_maximum = nvl(p_engine_speed_maximum(i),ship_objects.engine_speed_maximum), + ship_objects.reactor_eng_generation_rate = nvl(p_reactor_eng_generation_rate(i),ship_objects.reactor_eng_generation_rate), + ship_objects.booster_eng_maximum = nvl(p_booster_eng_maximum(i),ship_objects.booster_eng_maximum), + ship_objects.booster_eng_recharge_rate = nvl(p_booster_eng_recharge_rate(i),ship_objects.booster_eng_recharge_rate), + ship_objects.booster_eng_consumption_rate = nvl(p_booster_eng_consumption_rate(i),ship_objects.booster_eng_consumption_rate), + ship_objects.booster_acc = nvl(p_booster_acc(i),ship_objects.booster_acc), + ship_objects.booster_speed_maximum = nvl(p_booster_speed_maximum(i),ship_objects.booster_speed_maximum), + ship_objects.droid_if_cmd_speed = nvl(p_droid_if_cmd_speed(i),ship_objects.droid_if_cmd_speed), + ship_objects.installed_dcd = nvl(p_installed_dcd(i),ship_objects.installed_dcd), + ship_objects.chassis_cmp_mass_maximum = nvl(p_chassis_cmp_mass_maximum(i),ship_objects.chassis_cmp_mass_maximum), + ship_objects.cmp_creators = nvl(p_cmp_creators(i),ship_objects.cmp_creators), + ship_objects.cargo_hold_contents_maximum = nvl(p_cargo_hold_contents_maximum(i),ship_objects.cargo_hold_contents_maximum), + ship_objects.cargo_hold_contents_current = nvl(p_cargo_hold_contents_current(i),ship_objects.cargo_hold_contents_current), + ship_objects.cargo_hold_contents = nvl(p_cargo_hold_contents(i),ship_objects.cargo_hold_contents) + where + ship_objects.object_id=p_object_id(i); + exception + when others then + begin + FOR i IN 1..p_chunk_size LOOP + m_error_index := i; + update ship_objects set + ship_objects.slide_dampener = nvl(p_slide_dampener(i),ship_objects.slide_dampener), + ship_objects.current_chassis_hit_points = nvl(p_current_chassis_hit_points(i),ship_objects.current_chassis_hit_points), + ship_objects.maximum_chassis_hit_points = nvl(p_maximum_chassis_hit_points(i),ship_objects.maximum_chassis_hit_points), + ship_objects.chassis_type = nvl(p_chassis_type(i),ship_objects.chassis_type), + ship_objects.cmp_armor_hp_maximum = nvl(p_cmp_armor_hp_maximum(i),ship_objects.cmp_armor_hp_maximum), + ship_objects.cmp_armor_hp_current = nvl(p_cmp_armor_hp_current(i),ship_objects.cmp_armor_hp_current), + ship_objects.cmp_efficiency_general = nvl(p_cmp_efficiency_general(i),ship_objects.cmp_efficiency_general), + ship_objects.cmp_efficiency_eng = nvl(p_cmp_efficiency_eng(i),ship_objects.cmp_efficiency_eng), + ship_objects.cmp_eng_maintenance = nvl(p_cmp_eng_maintenance(i),ship_objects.cmp_eng_maintenance), + ship_objects.cmp_mass = nvl(p_cmp_mass(i),ship_objects.cmp_mass), + ship_objects.cmp_crc = nvl(p_cmp_crc(i),ship_objects.cmp_crc), + ship_objects.cmp_hp_current = nvl(p_cmp_hp_current(i),ship_objects.cmp_hp_current), + ship_objects.cmp_hp_maximum = nvl(p_cmp_hp_maximum(i),ship_objects.cmp_hp_maximum), + ship_objects.cmp_flags = nvl(p_cmp_flags(i),ship_objects.cmp_flags), + ship_objects.cmp_names = nvl(p_cmp_names(i),ship_objects.cmp_names), + ship_objects.weapon_damage_maximum = nvl(p_weapon_damage_maximum(i),ship_objects.weapon_damage_maximum), + ship_objects.weapon_damage_minimum = nvl(p_weapon_damage_minimum(i),ship_objects.weapon_damage_minimum), + ship_objects.weapon_effectiveness_shields = nvl(p_weapon_effectiveness_shields(i),ship_objects.weapon_effectiveness_shields), + ship_objects.weapon_effectiveness_armor = nvl(p_weapon_effectiveness_armor(i),ship_objects.weapon_effectiveness_armor), + ship_objects.weapon_eng_per_shot = nvl(p_weapon_eng_per_shot(i),ship_objects.weapon_eng_per_shot), + ship_objects.weapon_refire_rate = nvl(p_weapon_refire_rate(i),ship_objects.weapon_refire_rate), + ship_objects.weapon_ammo_current = nvl(p_weapon_ammo_current(i),ship_objects.weapon_ammo_current), + ship_objects.weapon_ammo_maximum = nvl(p_weapon_ammo_maximum(i),ship_objects.weapon_ammo_maximum), + ship_objects.weapon_ammo_type = nvl(p_weapon_ammo_type(i),ship_objects.weapon_ammo_type), + ship_objects.shield_hp_front_maximum = nvl(p_shield_hp_front_maximum(i),ship_objects.shield_hp_front_maximum), + ship_objects.shield_hp_back_maximum = nvl(p_shield_hp_back_maximum(i),ship_objects.shield_hp_back_maximum), + ship_objects.shield_recharge_rate = nvl(p_shield_recharge_rate(i),ship_objects.shield_recharge_rate), + ship_objects.capacitor_eng_maximum = nvl(p_capacitor_eng_maximum(i),ship_objects.capacitor_eng_maximum), + ship_objects.capacitor_eng_recharge_rate = nvl(p_capacitor_eng_recharge_rate(i),ship_objects.capacitor_eng_recharge_rate), + ship_objects.engine_acc_rate = nvl(p_engine_acc_rate(i),ship_objects.engine_acc_rate), + ship_objects.engine_deceleration_rate = nvl(p_engine_deceleration_rate(i),ship_objects.engine_deceleration_rate), + ship_objects.engine_pitch_acc_rate = nvl(p_engine_pitch_acc_rate(i),ship_objects.engine_pitch_acc_rate), + ship_objects.engine_yaw_acc_rate = nvl(p_engine_yaw_acc_rate(i),ship_objects.engine_yaw_acc_rate), + ship_objects.engine_roll_acc_rate = nvl(p_engine_roll_acc_rate(i),ship_objects.engine_roll_acc_rate), + ship_objects.engine_pitch_rate_maximum = nvl(p_engine_pitch_rate_maximum(i),ship_objects.engine_pitch_rate_maximum), + ship_objects.engine_yaw_rate_maximum = nvl(p_engine_yaw_rate_maximum(i),ship_objects.engine_yaw_rate_maximum), + ship_objects.engine_roll_rate_maximum = nvl(p_engine_roll_rate_maximum(i),ship_objects.engine_roll_rate_maximum), + ship_objects.engine_speed_maximum = nvl(p_engine_speed_maximum(i),ship_objects.engine_speed_maximum), + ship_objects.reactor_eng_generation_rate = nvl(p_reactor_eng_generation_rate(i),ship_objects.reactor_eng_generation_rate), + ship_objects.booster_eng_maximum = nvl(p_booster_eng_maximum(i),ship_objects.booster_eng_maximum), + ship_objects.booster_eng_recharge_rate = nvl(p_booster_eng_recharge_rate(i),ship_objects.booster_eng_recharge_rate), + ship_objects.booster_eng_consumption_rate = nvl(p_booster_eng_consumption_rate(i),ship_objects.booster_eng_consumption_rate), + ship_objects.booster_acc = nvl(p_booster_acc(i),ship_objects.booster_acc), + ship_objects.booster_speed_maximum = nvl(p_booster_speed_maximum(i),ship_objects.booster_speed_maximum), + ship_objects.droid_if_cmd_speed = nvl(p_droid_if_cmd_speed(i),ship_objects.droid_if_cmd_speed), + ship_objects.installed_dcd = nvl(p_installed_dcd(i),ship_objects.installed_dcd), + ship_objects.chassis_cmp_mass_maximum = nvl(p_chassis_cmp_mass_maximum(i),ship_objects.chassis_cmp_mass_maximum), + ship_objects.cmp_creators = nvl(p_cmp_creators(i),ship_objects.cmp_creators), + ship_objects.cargo_hold_contents_maximum = nvl(p_cargo_hold_contents_maximum(i),ship_objects.cargo_hold_contents_maximum), + ship_objects.cargo_hold_contents_current = nvl(p_cargo_hold_contents_current(i),ship_objects.cargo_hold_contents_current), + ship_objects.cargo_hold_contents = nvl(p_cargo_hold_contents(i),ship_objects.cargo_hold_contents) + where + ship_objects.object_id=p_object_id(i); + end LOOP; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.save_ship_obj : update error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.save_ship_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.save_ship_obj','slide_dampener','float',to_char(p_slide_dampener(m_error_index))); + db_error_logger.dblogerror_values('persister.save_ship_obj','current_chassis_hit_points','float',to_char(p_current_chassis_hit_points(m_error_index))); + db_error_logger.dblogerror_values('persister.save_ship_obj','maximum_chassis_hit_points','float',to_char(p_maximum_chassis_hit_points(m_error_index))); + db_error_logger.dblogerror_values('persister.save_ship_obj','chassis_type','int',to_char(p_chassis_type(m_error_index))); + db_error_logger.dblogerror_values('persister.save_ship_obj','cmp_armor_hp_maximum','varchar2',p_cmp_armor_hp_maximum(m_error_index)); + db_error_logger.dblogerror_values('persister.save_ship_obj','cmp_armor_hp_current','varchar2',p_cmp_armor_hp_current(m_error_index)); + db_error_logger.dblogerror_values('persister.save_ship_obj','cmp_efficiency_general','varchar2',p_cmp_efficiency_general(m_error_index)); + db_error_logger.dblogerror_values('persister.save_ship_obj','cmp_efficiency_eng','varchar2',p_cmp_efficiency_eng(m_error_index)); + db_error_logger.dblogerror_values('persister.save_ship_obj','cmp_eng_maintenance','varchar2',p_cmp_eng_maintenance(m_error_index)); + db_error_logger.dblogerror_values('persister.save_ship_obj','cmp_mass','varchar2',p_cmp_mass(m_error_index)); + db_error_logger.dblogerror_values('persister.save_ship_obj','cmp_crc','varchar2',p_cmp_crc(m_error_index)); + db_error_logger.dblogerror_values('persister.save_ship_obj','cmp_hp_current','varchar2',p_cmp_hp_current(m_error_index)); + db_error_logger.dblogerror_values('persister.save_ship_obj','cmp_hp_maximum','varchar2',p_cmp_hp_maximum(m_error_index)); + db_error_logger.dblogerror_values('persister.save_ship_obj','cmp_flags','varchar2',p_cmp_flags(m_error_index)); + db_error_logger.dblogerror_values('persister.save_ship_obj','cmp_names','varchar2',p_cmp_names(m_error_index)); + db_error_logger.dblogerror_values('persister.save_ship_obj','weapon_damage_maximum','varchar2',p_weapon_damage_maximum(m_error_index)); + db_error_logger.dblogerror_values('persister.save_ship_obj','weapon_damage_minimum','varchar2',p_weapon_damage_minimum(m_error_index)); + db_error_logger.dblogerror_values('persister.save_ship_obj','weapon_effectiveness_shields','varchar2',p_weapon_effectiveness_shields(m_error_index)); + db_error_logger.dblogerror_values('persister.save_ship_obj','weapon_effectiveness_armor','varchar2',p_weapon_effectiveness_armor(m_error_index)); + db_error_logger.dblogerror_values('persister.save_ship_obj','weapon_eng_per_shot','varchar2',p_weapon_eng_per_shot(m_error_index)); + db_error_logger.dblogerror_values('persister.save_ship_obj','weapon_refire_rate','varchar2',p_weapon_refire_rate(m_error_index)); + db_error_logger.dblogerror_values('persister.save_ship_obj','weapon_ammo_current','varchar2',p_weapon_ammo_current(m_error_index)); + db_error_logger.dblogerror_values('persister.save_ship_obj','weapon_ammo_maximum','varchar2',p_weapon_ammo_maximum(m_error_index)); + db_error_logger.dblogerror_values('persister.save_ship_obj','weapon_ammo_type','varchar2',p_weapon_ammo_type(m_error_index)); + db_error_logger.dblogerror_values('persister.save_ship_obj','shield_hp_front_maximum','float',to_char(p_shield_hp_front_maximum(m_error_index))); + db_error_logger.dblogerror_values('persister.save_ship_obj','shield_hp_back_maximum','float',to_char(p_shield_hp_back_maximum(m_error_index))); + db_error_logger.dblogerror_values('persister.save_ship_obj','shield_recharge_rate','float',to_char(p_shield_recharge_rate(m_error_index))); + db_error_logger.dblogerror_values('persister.save_ship_obj','capacitor_eng_maximum','float',to_char(p_capacitor_eng_maximum(m_error_index))); + db_error_logger.dblogerror_values('persister.save_ship_obj','capacitor_eng_recharge_rate','float',to_char(p_capacitor_eng_recharge_rate(m_error_index))); + db_error_logger.dblogerror_values('persister.save_ship_obj','engine_acc_rate','float',to_char(p_engine_acc_rate(m_error_index))); + db_error_logger.dblogerror_values('persister.save_ship_obj','engine_deceleration_rate','float',to_char(p_engine_deceleration_rate(m_error_index))); + db_error_logger.dblogerror_values('persister.save_ship_obj','engine_pitch_acc_rate','float',to_char(p_engine_pitch_acc_rate(m_error_index))); + db_error_logger.dblogerror_values('persister.save_ship_obj','engine_yaw_acc_rate','float',to_char(p_engine_yaw_acc_rate(m_error_index))); + db_error_logger.dblogerror_values('persister.save_ship_obj','engine_roll_acc_rate','float',to_char(p_engine_roll_acc_rate(m_error_index))); + db_error_logger.dblogerror_values('persister.save_ship_obj','engine_pitch_rate_maximum','float',to_char(p_engine_pitch_rate_maximum(m_error_index))); + db_error_logger.dblogerror_values('persister.save_ship_obj','engine_yaw_rate_maximum','float',to_char(p_engine_yaw_rate_maximum(m_error_index))); + db_error_logger.dblogerror_values('persister.save_ship_obj','engine_roll_rate_maximum','float',to_char(p_engine_roll_rate_maximum(m_error_index))); + db_error_logger.dblogerror_values('persister.save_ship_obj','engine_speed_maximum','float',to_char(p_engine_speed_maximum(m_error_index))); + db_error_logger.dblogerror_values('persister.save_ship_obj','reactor_eng_generation_rate','float',to_char(p_reactor_eng_generation_rate(m_error_index))); + db_error_logger.dblogerror_values('persister.save_ship_obj','booster_eng_maximum','float',to_char(p_booster_eng_maximum(m_error_index))); + db_error_logger.dblogerror_values('persister.save_ship_obj','booster_eng_recharge_rate','float',to_char(p_booster_eng_recharge_rate(m_error_index))); + db_error_logger.dblogerror_values('persister.save_ship_obj','booster_eng_consumption_rate','float',to_char(p_booster_eng_consumption_rate(m_error_index))); + db_error_logger.dblogerror_values('persister.save_ship_obj','booster_acc','float',to_char(p_booster_acc(m_error_index))); + db_error_logger.dblogerror_values('persister.save_ship_obj','booster_speed_maximum','float',to_char(p_booster_speed_maximum(m_error_index))); + db_error_logger.dblogerror_values('persister.save_ship_obj','droid_if_cmd_speed','float',to_char(p_droid_if_cmd_speed(m_error_index))); + db_error_logger.dblogerror_values('persister.save_ship_obj','installed_dcd','number',p_installed_dcd(m_error_index)); + db_error_logger.dblogerror_values('persister.save_ship_obj','chassis_cmp_mass_maximum','float',to_char(p_chassis_cmp_mass_maximum(m_error_index))); + db_error_logger.dblogerror_values('persister.save_ship_obj','cmp_creators','varchar2',p_cmp_creators(m_error_index)); + db_error_logger.dblogerror_values('persister.save_ship_obj','cargo_hold_contents_maximum','number',to_char(p_cargo_hold_contents_maximum(m_error_index))); + db_error_logger.dblogerror_values('persister.save_ship_obj','cargo_hold_contents_current','number',to_char(p_cargo_hold_contents_current(m_error_index))); + db_error_logger.dblogerror_values('persister.save_ship_obj','cargo_hold_contents','varchar2',p_cargo_hold_contents(m_error_index)); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','save_ship_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure add_ship_obj(p_object_id VAOFSTRING, p_slide_dampener VAOFNUMBER, p_current_chassis_hit_points VAOFNUMBER, p_maximum_chassis_hit_points VAOFNUMBER, p_chassis_type VAOFNUMBER, p_cmp_armor_hp_maximum VAOFSTRING, p_cmp_armor_hp_current VAOFSTRING, p_cmp_efficiency_general VAOFSTRING, p_cmp_efficiency_eng VAOFSTRING, p_cmp_eng_maintenance VAOFSTRING, p_cmp_mass VAOFSTRING, p_cmp_crc VAOFSTRING, p_cmp_hp_current VAOFSTRING, p_cmp_hp_maximum VAOFSTRING, p_cmp_flags VAOFSTRING, p_cmp_names VAOFLONGSTRING, p_weapon_damage_maximum VAOFSTRING, p_weapon_damage_minimum VAOFSTRING, p_weapon_effectiveness_shields VAOFSTRING, p_weapon_effectiveness_armor VAOFSTRING, p_weapon_eng_per_shot VAOFSTRING, p_weapon_refire_rate VAOFSTRING, p_weapon_ammo_current VAOFSTRING, p_weapon_ammo_maximum VAOFSTRING, p_weapon_ammo_type VAOFSTRING, p_shield_hp_front_maximum VAOFNUMBER, p_shield_hp_back_maximum VAOFNUMBER, p_shield_recharge_rate VAOFNUMBER, p_capacitor_eng_maximum VAOFNUMBER, p_capacitor_eng_recharge_rate VAOFNUMBER, p_engine_acc_rate VAOFNUMBER, p_engine_deceleration_rate VAOFNUMBER, p_engine_pitch_acc_rate VAOFNUMBER, p_engine_yaw_acc_rate VAOFNUMBER, p_engine_roll_acc_rate VAOFNUMBER, p_engine_pitch_rate_maximum VAOFNUMBER, p_engine_yaw_rate_maximum VAOFNUMBER, p_engine_roll_rate_maximum VAOFNUMBER, p_engine_speed_maximum VAOFNUMBER, p_reactor_eng_generation_rate VAOFNUMBER, p_booster_eng_maximum VAOFNUMBER, p_booster_eng_recharge_rate VAOFNUMBER, p_booster_eng_consumption_rate VAOFNUMBER, p_booster_acc VAOFNUMBER, p_booster_speed_maximum VAOFNUMBER, p_droid_if_cmd_speed VAOFNUMBER, p_installed_dcd VAOFSTRING, p_chassis_cmp_mass_maximum VAOFNUMBER, p_cmp_creators VAOFSTRING, p_cargo_hold_contents_maximum VAOFNUMBER, p_cargo_hold_contents_current VAOFNUMBER, p_cargo_hold_contents VAOFSTRING, p_chunk_size number) + as + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + insert into ship_objects + ( + ship_objects.slide_dampener, + ship_objects.current_chassis_hit_points, + ship_objects.maximum_chassis_hit_points, + ship_objects.chassis_type, + ship_objects.cmp_armor_hp_maximum, + ship_objects.cmp_armor_hp_current, + ship_objects.cmp_efficiency_general, + ship_objects.cmp_efficiency_eng, + ship_objects.cmp_eng_maintenance, + ship_objects.cmp_mass, + ship_objects.cmp_crc, + ship_objects.cmp_hp_current, + ship_objects.cmp_hp_maximum, + ship_objects.cmp_flags, + ship_objects.cmp_names, + ship_objects.weapon_damage_maximum, + ship_objects.weapon_damage_minimum, + ship_objects.weapon_effectiveness_shields, + ship_objects.weapon_effectiveness_armor, + ship_objects.weapon_eng_per_shot, + ship_objects.weapon_refire_rate, + ship_objects.weapon_ammo_current, + ship_objects.weapon_ammo_maximum, + ship_objects.weapon_ammo_type, + ship_objects.shield_hp_front_maximum, + ship_objects.shield_hp_back_maximum, + ship_objects.shield_recharge_rate, + ship_objects.capacitor_eng_maximum, + ship_objects.capacitor_eng_recharge_rate, + ship_objects.engine_acc_rate, + ship_objects.engine_deceleration_rate, + ship_objects.engine_pitch_acc_rate, + ship_objects.engine_yaw_acc_rate, + ship_objects.engine_roll_acc_rate, + ship_objects.engine_pitch_rate_maximum, + ship_objects.engine_yaw_rate_maximum, + ship_objects.engine_roll_rate_maximum, + ship_objects.engine_speed_maximum, + ship_objects.reactor_eng_generation_rate, + ship_objects.booster_eng_maximum, + ship_objects.booster_eng_recharge_rate, + ship_objects.booster_eng_consumption_rate, + ship_objects.booster_acc, + ship_objects.booster_speed_maximum, + ship_objects.droid_if_cmd_speed, + ship_objects.installed_dcd, + ship_objects.chassis_cmp_mass_maximum, + ship_objects.cmp_creators, + ship_objects.cargo_hold_contents_maximum, + ship_objects.cargo_hold_contents_current, + ship_objects.cargo_hold_contents, + ship_objects.object_id + ) + VALUES + ( + p_slide_dampener(i), + p_current_chassis_hit_points(i), + p_maximum_chassis_hit_points(i), + p_chassis_type(i), + p_cmp_armor_hp_maximum(i), + p_cmp_armor_hp_current(i), + p_cmp_efficiency_general(i), + p_cmp_efficiency_eng(i), + p_cmp_eng_maintenance(i), + p_cmp_mass(i), + p_cmp_crc(i), + p_cmp_hp_current(i), + p_cmp_hp_maximum(i), + p_cmp_flags(i), + p_cmp_names(i), + p_weapon_damage_maximum(i), + p_weapon_damage_minimum(i), + p_weapon_effectiveness_shields(i), + p_weapon_effectiveness_armor(i), + p_weapon_eng_per_shot(i), + p_weapon_refire_rate(i), + p_weapon_ammo_current(i), + p_weapon_ammo_maximum(i), + p_weapon_ammo_type(i), + p_shield_hp_front_maximum(i), + p_shield_hp_back_maximum(i), + p_shield_recharge_rate(i), + p_capacitor_eng_maximum(i), + p_capacitor_eng_recharge_rate(i), + p_engine_acc_rate(i), + p_engine_deceleration_rate(i), + p_engine_pitch_acc_rate(i), + p_engine_yaw_acc_rate(i), + p_engine_roll_acc_rate(i), + p_engine_pitch_rate_maximum(i), + p_engine_yaw_rate_maximum(i), + p_engine_roll_rate_maximum(i), + p_engine_speed_maximum(i), + p_reactor_eng_generation_rate(i), + p_booster_eng_maximum(i), + p_booster_eng_recharge_rate(i), + p_booster_eng_consumption_rate(i), + p_booster_acc(i), + p_booster_speed_maximum(i), + p_droid_if_cmd_speed(i), + p_installed_dcd(i), + p_chassis_cmp_mass_maximum(i), + p_cmp_creators(i), + p_cargo_hold_contents_maximum(i), + p_cargo_hold_contents_current(i), + p_cargo_hold_contents(i), + p_object_id(i) + ); + + exception + when dup_val_on_index then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_ship_obj : dup_val_on_index error.'); + END IF; + for i in 1..p_chunk_size loop + m_error_index := i; + UPDATE ship_objects Set + ship_objects.slide_dampener = nvl(p_slide_dampener(i),ship_objects.slide_dampener), + ship_objects.current_chassis_hit_points = nvl(p_current_chassis_hit_points(i),ship_objects.current_chassis_hit_points), + ship_objects.maximum_chassis_hit_points = nvl(p_maximum_chassis_hit_points(i),ship_objects.maximum_chassis_hit_points), + ship_objects.chassis_type = nvl(p_chassis_type(i),ship_objects.chassis_type), + ship_objects.cmp_armor_hp_maximum = nvl(p_cmp_armor_hp_maximum(i),ship_objects.cmp_armor_hp_maximum), + ship_objects.cmp_armor_hp_current = nvl(p_cmp_armor_hp_current(i),ship_objects.cmp_armor_hp_current), + ship_objects.cmp_efficiency_general = nvl(p_cmp_efficiency_general(i),ship_objects.cmp_efficiency_general), + ship_objects.cmp_efficiency_eng = nvl(p_cmp_efficiency_eng(i),ship_objects.cmp_efficiency_eng), + ship_objects.cmp_eng_maintenance = nvl(p_cmp_eng_maintenance(i),ship_objects.cmp_eng_maintenance), + ship_objects.cmp_mass = nvl(p_cmp_mass(i),ship_objects.cmp_mass), + ship_objects.cmp_crc = nvl(p_cmp_crc(i),ship_objects.cmp_crc), + ship_objects.cmp_hp_current = nvl(p_cmp_hp_current(i),ship_objects.cmp_hp_current), + ship_objects.cmp_hp_maximum = nvl(p_cmp_hp_maximum(i),ship_objects.cmp_hp_maximum), + ship_objects.cmp_flags = nvl(p_cmp_flags(i),ship_objects.cmp_flags), + ship_objects.cmp_names = nvl(p_cmp_names(i),ship_objects.cmp_names), + ship_objects.weapon_damage_maximum = nvl(p_weapon_damage_maximum(i),ship_objects.weapon_damage_maximum), + ship_objects.weapon_damage_minimum = nvl(p_weapon_damage_minimum(i),ship_objects.weapon_damage_minimum), + ship_objects.weapon_effectiveness_shields = nvl(p_weapon_effectiveness_shields(i),ship_objects.weapon_effectiveness_shields), + ship_objects.weapon_effectiveness_armor = nvl(p_weapon_effectiveness_armor(i),ship_objects.weapon_effectiveness_armor), + ship_objects.weapon_eng_per_shot = nvl(p_weapon_eng_per_shot(i),ship_objects.weapon_eng_per_shot), + ship_objects.weapon_refire_rate = nvl(p_weapon_refire_rate(i),ship_objects.weapon_refire_rate), + ship_objects.weapon_ammo_current = nvl(p_weapon_ammo_current(i),ship_objects.weapon_ammo_current), + ship_objects.weapon_ammo_maximum = nvl(p_weapon_ammo_maximum(i),ship_objects.weapon_ammo_maximum), + ship_objects.weapon_ammo_type = nvl(p_weapon_ammo_type(i),ship_objects.weapon_ammo_type), + ship_objects.shield_hp_front_maximum = nvl(p_shield_hp_front_maximum(i),ship_objects.shield_hp_front_maximum), + ship_objects.shield_hp_back_maximum = nvl(p_shield_hp_back_maximum(i),ship_objects.shield_hp_back_maximum), + ship_objects.shield_recharge_rate = nvl(p_shield_recharge_rate(i),ship_objects.shield_recharge_rate), + ship_objects.capacitor_eng_maximum = nvl(p_capacitor_eng_maximum(i),ship_objects.capacitor_eng_maximum), + ship_objects.capacitor_eng_recharge_rate = nvl(p_capacitor_eng_recharge_rate(i),ship_objects.capacitor_eng_recharge_rate), + ship_objects.engine_acc_rate = nvl(p_engine_acc_rate(i),ship_objects.engine_acc_rate), + ship_objects.engine_deceleration_rate = nvl(p_engine_deceleration_rate(i),ship_objects.engine_deceleration_rate), + ship_objects.engine_pitch_acc_rate = nvl(p_engine_pitch_acc_rate(i),ship_objects.engine_pitch_acc_rate), + ship_objects.engine_yaw_acc_rate = nvl(p_engine_yaw_acc_rate(i),ship_objects.engine_yaw_acc_rate), + ship_objects.engine_roll_acc_rate = nvl(p_engine_roll_acc_rate(i),ship_objects.engine_roll_acc_rate), + ship_objects.engine_pitch_rate_maximum = nvl(p_engine_pitch_rate_maximum(i),ship_objects.engine_pitch_rate_maximum), + ship_objects.engine_yaw_rate_maximum = nvl(p_engine_yaw_rate_maximum(i),ship_objects.engine_yaw_rate_maximum), + ship_objects.engine_roll_rate_maximum = nvl(p_engine_roll_rate_maximum(i),ship_objects.engine_roll_rate_maximum), + ship_objects.engine_speed_maximum = nvl(p_engine_speed_maximum(i),ship_objects.engine_speed_maximum), + ship_objects.reactor_eng_generation_rate = nvl(p_reactor_eng_generation_rate(i),ship_objects.reactor_eng_generation_rate), + ship_objects.booster_eng_maximum = nvl(p_booster_eng_maximum(i),ship_objects.booster_eng_maximum), + ship_objects.booster_eng_recharge_rate = nvl(p_booster_eng_recharge_rate(i),ship_objects.booster_eng_recharge_rate), + ship_objects.booster_eng_consumption_rate = nvl(p_booster_eng_consumption_rate(i),ship_objects.booster_eng_consumption_rate), + ship_objects.booster_acc = nvl(p_booster_acc(i),ship_objects.booster_acc), + ship_objects.booster_speed_maximum = nvl(p_booster_speed_maximum(i),ship_objects.booster_speed_maximum), + ship_objects.droid_if_cmd_speed = nvl(p_droid_if_cmd_speed(i),ship_objects.droid_if_cmd_speed), + ship_objects.installed_dcd = nvl(p_installed_dcd(i),ship_objects.installed_dcd), + ship_objects.chassis_cmp_mass_maximum = nvl(p_chassis_cmp_mass_maximum(i),ship_objects.chassis_cmp_mass_maximum), + ship_objects.cmp_creators = nvl(p_cmp_creators(i),ship_objects.cmp_creators), + ship_objects.cargo_hold_contents_maximum = nvl(p_cargo_hold_contents_maximum(i),ship_objects.cargo_hold_contents_maximum), + ship_objects.cargo_hold_contents_current = nvl(p_cargo_hold_contents_current(i),ship_objects.cargo_hold_contents_current), + ship_objects.cargo_hold_contents = nvl(p_cargo_hold_contents(i),ship_objects.cargo_hold_contents) + where + ship_objects.object_id=p_object_id(i); + + if SQL%ROWCOUNT=0 then + insert into ship_objects + ( + ship_objects.slide_dampener, + ship_objects.current_chassis_hit_points, + ship_objects.maximum_chassis_hit_points, + ship_objects.chassis_type, + ship_objects.cmp_armor_hp_maximum, + ship_objects.cmp_armor_hp_current, + ship_objects.cmp_efficiency_general, + ship_objects.cmp_efficiency_eng, + ship_objects.cmp_eng_maintenance, + ship_objects.cmp_mass, + ship_objects.cmp_crc, + ship_objects.cmp_hp_current, + ship_objects.cmp_hp_maximum, + ship_objects.cmp_flags, + ship_objects.cmp_names, + ship_objects.weapon_damage_maximum, + ship_objects.weapon_damage_minimum, + ship_objects.weapon_effectiveness_shields, + ship_objects.weapon_effectiveness_armor, + ship_objects.weapon_eng_per_shot, + ship_objects.weapon_refire_rate, + ship_objects.weapon_ammo_current, + ship_objects.weapon_ammo_maximum, + ship_objects.weapon_ammo_type, + ship_objects.shield_hp_front_maximum, + ship_objects.shield_hp_back_maximum, + ship_objects.shield_recharge_rate, + ship_objects.capacitor_eng_maximum, + ship_objects.capacitor_eng_recharge_rate, + ship_objects.engine_acc_rate, + ship_objects.engine_deceleration_rate, + ship_objects.engine_pitch_acc_rate, + ship_objects.engine_yaw_acc_rate, + ship_objects.engine_roll_acc_rate, + ship_objects.engine_pitch_rate_maximum, + ship_objects.engine_yaw_rate_maximum, + ship_objects.engine_roll_rate_maximum, + ship_objects.engine_speed_maximum, + ship_objects.reactor_eng_generation_rate, + ship_objects.booster_eng_maximum, + ship_objects.booster_eng_recharge_rate, + ship_objects.booster_eng_consumption_rate, + ship_objects.booster_acc, + ship_objects.booster_speed_maximum, + ship_objects.droid_if_cmd_speed, + ship_objects.installed_dcd, + ship_objects.chassis_cmp_mass_maximum, + ship_objects.cmp_creators, + ship_objects.cargo_hold_contents_maximum, + ship_objects.cargo_hold_contents_current, + ship_objects.cargo_hold_contents, + ship_objects.object_id + ) + VALUES + ( + p_slide_dampener(i), + p_current_chassis_hit_points(i), + p_maximum_chassis_hit_points(i), + p_chassis_type(i), + p_cmp_armor_hp_maximum(i), + p_cmp_armor_hp_current(i), + p_cmp_efficiency_general(i), + p_cmp_efficiency_eng(i), + p_cmp_eng_maintenance(i), + p_cmp_mass(i), + p_cmp_crc(i), + p_cmp_hp_current(i), + p_cmp_hp_maximum(i), + p_cmp_flags(i), + p_cmp_names(i), + p_weapon_damage_maximum(i), + p_weapon_damage_minimum(i), + p_weapon_effectiveness_shields(i), + p_weapon_effectiveness_armor(i), + p_weapon_eng_per_shot(i), + p_weapon_refire_rate(i), + p_weapon_ammo_current(i), + p_weapon_ammo_maximum(i), + p_weapon_ammo_type(i), + p_shield_hp_front_maximum(i), + p_shield_hp_back_maximum(i), + p_shield_recharge_rate(i), + p_capacitor_eng_maximum(i), + p_capacitor_eng_recharge_rate(i), + p_engine_acc_rate(i), + p_engine_deceleration_rate(i), + p_engine_pitch_acc_rate(i), + p_engine_yaw_acc_rate(i), + p_engine_roll_acc_rate(i), + p_engine_pitch_rate_maximum(i), + p_engine_yaw_rate_maximum(i), + p_engine_roll_rate_maximum(i), + p_engine_speed_maximum(i), + p_reactor_eng_generation_rate(i), + p_booster_eng_maximum(i), + p_booster_eng_recharge_rate(i), + p_booster_eng_consumption_rate(i), + p_booster_acc(i), + p_booster_speed_maximum(i), + p_droid_if_cmd_speed(i), + p_installed_dcd(i), + p_chassis_cmp_mass_maximum(i), + p_cmp_creators(i), + p_cargo_hold_contents_maximum(i), + p_cargo_hold_contents_current(i), + p_cargo_hold_contents(i), + p_object_id(i) + ); + end if; + end loop; + end; + when others then + begin + for i in 1..p_chunk_size loop + m_error_index := i; + insert into ship_objects + ( + ship_objects.slide_dampener, + ship_objects.current_chassis_hit_points, + ship_objects.maximum_chassis_hit_points, + ship_objects.chassis_type, + ship_objects.cmp_armor_hp_maximum, + ship_objects.cmp_armor_hp_current, + ship_objects.cmp_efficiency_general, + ship_objects.cmp_efficiency_eng, + ship_objects.cmp_eng_maintenance, + ship_objects.cmp_mass, + ship_objects.cmp_crc, + ship_objects.cmp_hp_current, + ship_objects.cmp_hp_maximum, + ship_objects.cmp_flags, + ship_objects.cmp_names, + ship_objects.weapon_damage_maximum, + ship_objects.weapon_damage_minimum, + ship_objects.weapon_effectiveness_shields, + ship_objects.weapon_effectiveness_armor, + ship_objects.weapon_eng_per_shot, + ship_objects.weapon_refire_rate, + ship_objects.weapon_ammo_current, + ship_objects.weapon_ammo_maximum, + ship_objects.weapon_ammo_type, + ship_objects.shield_hp_front_maximum, + ship_objects.shield_hp_back_maximum, + ship_objects.shield_recharge_rate, + ship_objects.capacitor_eng_maximum, + ship_objects.capacitor_eng_recharge_rate, + ship_objects.engine_acc_rate, + ship_objects.engine_deceleration_rate, + ship_objects.engine_pitch_acc_rate, + ship_objects.engine_yaw_acc_rate, + ship_objects.engine_roll_acc_rate, + ship_objects.engine_pitch_rate_maximum, + ship_objects.engine_yaw_rate_maximum, + ship_objects.engine_roll_rate_maximum, + ship_objects.engine_speed_maximum, + ship_objects.reactor_eng_generation_rate, + ship_objects.booster_eng_maximum, + ship_objects.booster_eng_recharge_rate, + ship_objects.booster_eng_consumption_rate, + ship_objects.booster_acc, + ship_objects.booster_speed_maximum, + ship_objects.droid_if_cmd_speed, + ship_objects.installed_dcd, + ship_objects.chassis_cmp_mass_maximum, + ship_objects.cmp_creators, + ship_objects.cargo_hold_contents_maximum, + ship_objects.cargo_hold_contents_current, + ship_objects.cargo_hold_contents, + ship_objects.object_id + ) + VALUES + ( + p_slide_dampener(i), + p_current_chassis_hit_points(i), + p_maximum_chassis_hit_points(i), + p_chassis_type(i), + p_cmp_armor_hp_maximum(i), + p_cmp_armor_hp_current(i), + p_cmp_efficiency_general(i), + p_cmp_efficiency_eng(i), + p_cmp_eng_maintenance(i), + p_cmp_mass(i), + p_cmp_crc(i), + p_cmp_hp_current(i), + p_cmp_hp_maximum(i), + p_cmp_flags(i), + p_cmp_names(i), + p_weapon_damage_maximum(i), + p_weapon_damage_minimum(i), + p_weapon_effectiveness_shields(i), + p_weapon_effectiveness_armor(i), + p_weapon_eng_per_shot(i), + p_weapon_refire_rate(i), + p_weapon_ammo_current(i), + p_weapon_ammo_maximum(i), + p_weapon_ammo_type(i), + p_shield_hp_front_maximum(i), + p_shield_hp_back_maximum(i), + p_shield_recharge_rate(i), + p_capacitor_eng_maximum(i), + p_capacitor_eng_recharge_rate(i), + p_engine_acc_rate(i), + p_engine_deceleration_rate(i), + p_engine_pitch_acc_rate(i), + p_engine_yaw_acc_rate(i), + p_engine_roll_acc_rate(i), + p_engine_pitch_rate_maximum(i), + p_engine_yaw_rate_maximum(i), + p_engine_roll_rate_maximum(i), + p_engine_speed_maximum(i), + p_reactor_eng_generation_rate(i), + p_booster_eng_maximum(i), + p_booster_eng_recharge_rate(i), + p_booster_eng_consumption_rate(i), + p_booster_acc(i), + p_booster_speed_maximum(i), + p_droid_if_cmd_speed(i), + p_installed_dcd(i), + p_chassis_cmp_mass_maximum(i), + p_cmp_creators(i), + p_cargo_hold_contents_maximum(i), + p_cargo_hold_contents_current(i), + p_cargo_hold_contents(i), + p_object_id(i) + ); + + end loop; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_ship_obj : error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.add_ship_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.add_ship_obj','slide_dampener','float',to_char(p_slide_dampener(m_error_index))); + db_error_logger.dblogerror_values('persister.add_ship_obj','current_chassis_hit_points','float',to_char(p_current_chassis_hit_points(m_error_index))); + db_error_logger.dblogerror_values('persister.add_ship_obj','maximum_chassis_hit_points','float',to_char(p_maximum_chassis_hit_points(m_error_index))); + db_error_logger.dblogerror_values('persister.add_ship_obj','chassis_type','int',to_char(p_chassis_type(m_error_index))); + db_error_logger.dblogerror_values('persister.add_ship_obj','cmp_armor_hp_maximum','varchar2',p_cmp_armor_hp_maximum(m_error_index)); + db_error_logger.dblogerror_values('persister.add_ship_obj','cmp_armor_hp_current','varchar2',p_cmp_armor_hp_current(m_error_index)); + db_error_logger.dblogerror_values('persister.add_ship_obj','cmp_efficiency_general','varchar2',p_cmp_efficiency_general(m_error_index)); + db_error_logger.dblogerror_values('persister.add_ship_obj','cmp_efficiency_eng','varchar2',p_cmp_efficiency_eng(m_error_index)); + db_error_logger.dblogerror_values('persister.add_ship_obj','cmp_eng_maintenance','varchar2',p_cmp_eng_maintenance(m_error_index)); + db_error_logger.dblogerror_values('persister.add_ship_obj','cmp_mass','varchar2',p_cmp_mass(m_error_index)); + db_error_logger.dblogerror_values('persister.add_ship_obj','cmp_crc','varchar2',p_cmp_crc(m_error_index)); + db_error_logger.dblogerror_values('persister.add_ship_obj','cmp_hp_current','varchar2',p_cmp_hp_current(m_error_index)); + db_error_logger.dblogerror_values('persister.add_ship_obj','cmp_hp_maximum','varchar2',p_cmp_hp_maximum(m_error_index)); + db_error_logger.dblogerror_values('persister.add_ship_obj','cmp_flags','varchar2',p_cmp_flags(m_error_index)); + db_error_logger.dblogerror_values('persister.add_ship_obj','cmp_names','varchar2',p_cmp_names(m_error_index)); + db_error_logger.dblogerror_values('persister.add_ship_obj','weapon_damage_maximum','varchar2',p_weapon_damage_maximum(m_error_index)); + db_error_logger.dblogerror_values('persister.add_ship_obj','weapon_damage_minimum','varchar2',p_weapon_damage_minimum(m_error_index)); + db_error_logger.dblogerror_values('persister.add_ship_obj','weapon_effectiveness_shields','varchar2',p_weapon_effectiveness_shields(m_error_index)); + db_error_logger.dblogerror_values('persister.add_ship_obj','weapon_effectiveness_armor','varchar2',p_weapon_effectiveness_armor(m_error_index)); + db_error_logger.dblogerror_values('persister.add_ship_obj','weapon_eng_per_shot','varchar2',p_weapon_eng_per_shot(m_error_index)); + db_error_logger.dblogerror_values('persister.add_ship_obj','weapon_refire_rate','varchar2',p_weapon_refire_rate(m_error_index)); + db_error_logger.dblogerror_values('persister.add_ship_obj','weapon_ammo_current','varchar2',p_weapon_ammo_current(m_error_index)); + db_error_logger.dblogerror_values('persister.add_ship_obj','weapon_ammo_maximum','varchar2',p_weapon_ammo_maximum(m_error_index)); + db_error_logger.dblogerror_values('persister.add_ship_obj','weapon_ammo_type','varchar2',p_weapon_ammo_type(m_error_index)); + db_error_logger.dblogerror_values('persister.add_ship_obj','shield_hp_front_maximum','float',to_char(p_shield_hp_front_maximum(m_error_index))); + db_error_logger.dblogerror_values('persister.add_ship_obj','shield_hp_back_maximum','float',to_char(p_shield_hp_back_maximum(m_error_index))); + db_error_logger.dblogerror_values('persister.add_ship_obj','shield_recharge_rate','float',to_char(p_shield_recharge_rate(m_error_index))); + db_error_logger.dblogerror_values('persister.add_ship_obj','capacitor_eng_maximum','float',to_char(p_capacitor_eng_maximum(m_error_index))); + db_error_logger.dblogerror_values('persister.add_ship_obj','capacitor_eng_recharge_rate','float',to_char(p_capacitor_eng_recharge_rate(m_error_index))); + db_error_logger.dblogerror_values('persister.add_ship_obj','engine_acc_rate','float',to_char(p_engine_acc_rate(m_error_index))); + db_error_logger.dblogerror_values('persister.add_ship_obj','engine_deceleration_rate','float',to_char(p_engine_deceleration_rate(m_error_index))); + db_error_logger.dblogerror_values('persister.add_ship_obj','engine_pitch_acc_rate','float',to_char(p_engine_pitch_acc_rate(m_error_index))); + db_error_logger.dblogerror_values('persister.add_ship_obj','engine_yaw_acc_rate','float',to_char(p_engine_yaw_acc_rate(m_error_index))); + db_error_logger.dblogerror_values('persister.add_ship_obj','engine_roll_acc_rate','float',to_char(p_engine_roll_acc_rate(m_error_index))); + db_error_logger.dblogerror_values('persister.add_ship_obj','engine_pitch_rate_maximum','float',to_char(p_engine_pitch_rate_maximum(m_error_index))); + db_error_logger.dblogerror_values('persister.add_ship_obj','engine_yaw_rate_maximum','float',to_char(p_engine_yaw_rate_maximum(m_error_index))); + db_error_logger.dblogerror_values('persister.add_ship_obj','engine_roll_rate_maximum','float',to_char(p_engine_roll_rate_maximum(m_error_index))); + db_error_logger.dblogerror_values('persister.add_ship_obj','engine_speed_maximum','float',to_char(p_engine_speed_maximum(m_error_index))); + db_error_logger.dblogerror_values('persister.add_ship_obj','reactor_eng_generation_rate','float',to_char(p_reactor_eng_generation_rate(m_error_index))); + db_error_logger.dblogerror_values('persister.add_ship_obj','booster_eng_maximum','float',to_char(p_booster_eng_maximum(m_error_index))); + db_error_logger.dblogerror_values('persister.add_ship_obj','booster_eng_recharge_rate','float',to_char(p_booster_eng_recharge_rate(m_error_index))); + db_error_logger.dblogerror_values('persister.add_ship_obj','booster_eng_consumption_rate','float',to_char(p_booster_eng_consumption_rate(m_error_index))); + db_error_logger.dblogerror_values('persister.add_ship_obj','booster_acc','float',to_char(p_booster_acc(m_error_index))); + db_error_logger.dblogerror_values('persister.add_ship_obj','booster_speed_maximum','float',to_char(p_booster_speed_maximum(m_error_index))); + db_error_logger.dblogerror_values('persister.add_ship_obj','droid_if_cmd_speed','float',to_char(p_droid_if_cmd_speed(m_error_index))); + db_error_logger.dblogerror_values('persister.add_ship_obj','installed_dcd','number',p_installed_dcd(m_error_index)); + db_error_logger.dblogerror_values('persister.add_ship_obj','chassis_cmp_mass_maximum','float',to_char(p_chassis_cmp_mass_maximum(m_error_index))); + db_error_logger.dblogerror_values('persister.add_ship_obj','cmp_creators','varchar2',p_cmp_creators(m_error_index)); + db_error_logger.dblogerror_values('persister.add_ship_obj','cargo_hold_contents_maximum','number',to_char(p_cargo_hold_contents_maximum(m_error_index))); + db_error_logger.dblogerror_values('persister.add_ship_obj','cargo_hold_contents_current','number',to_char(p_cargo_hold_contents_current(m_error_index))); + db_error_logger.dblogerror_values('persister.add_ship_obj','cargo_hold_contents','varchar2',p_cargo_hold_contents(m_error_index)); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','add_ship_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure remove_ship_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + begin + FORALL i IN 1..p_chunk_size + delete ship_objects + where + object_id=p_object_id(i); + end; + + procedure save_static_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + null; + end; + + procedure add_static_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + insert into static_objects + ( + static_objects.object_id + ) + VALUES + ( + p_object_id(i) + ); + + exception + when dup_val_on_index then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_static_obj : dup_val_on_index error.'); + END IF; + end; + when others then + begin + for i in 1..p_chunk_size loop + m_error_index := i; + insert into static_objects + ( + static_objects.object_id + ) + VALUES + ( + p_object_id(i) + ); + + end loop; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_static_obj : error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.add_static_obj','object_id','number',p_object_id(m_error_index)); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','add_static_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure remove_static_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + begin + null; + end; + + procedure save_tangible_obj( p_object_id VAOFSTRING, p_max_hit_points VAOFNUMBER, p_owner_id VAOFSTRING, p_visible VAOFSTRING, p_appearance_data VAOFSTRING, p_interest_radius VAOFNUMBER, p_pvp_type VAOFNUMBER, p_pvp_faction VAOFNUMBER, p_damage_taken VAOFNUMBER, p_custom_appearance VAOFSTRING, p_count VAOFNUMBER, p_condition VAOFNUMBER, p_creator_id VAOFSTRING, p_source_draft_schematic VAOFNUMBER, p_chunk_size number ) + as + + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + update tangible_objects set + tangible_objects.max_hit_points = nvl(p_max_hit_points(i),tangible_objects.max_hit_points), + tangible_objects.owner_id = nvl(p_owner_id(i),tangible_objects.owner_id), + tangible_objects.visible = nvl(p_visible(i),tangible_objects.visible), + tangible_objects.appearance_data = nvl(p_appearance_data(i),tangible_objects.appearance_data), + tangible_objects.interest_radius = nvl(p_interest_radius(i),tangible_objects.interest_radius), + tangible_objects.pvp_type = nvl(p_pvp_type(i),tangible_objects.pvp_type), + tangible_objects.pvp_faction = nvl(p_pvp_faction(i),tangible_objects.pvp_faction), + tangible_objects.damage_taken = nvl(p_damage_taken(i),tangible_objects.damage_taken), + tangible_objects.custom_appearance = nvl(p_custom_appearance(i),tangible_objects.custom_appearance), + tangible_objects.count = nvl(p_count(i),tangible_objects.count), + tangible_objects.condition = nvl(p_condition(i),tangible_objects.condition), + tangible_objects.creator_id = nvl(p_creator_id(i),tangible_objects.creator_id), + tangible_objects.source_draft_schematic = nvl(p_source_draft_schematic(i),tangible_objects.source_draft_schematic) + where + tangible_objects.object_id=p_object_id(i); + exception + when others then + begin + FOR i IN 1..p_chunk_size LOOP + m_error_index := i; + update tangible_objects set + tangible_objects.max_hit_points = nvl(p_max_hit_points(i),tangible_objects.max_hit_points), + tangible_objects.owner_id = nvl(p_owner_id(i),tangible_objects.owner_id), + tangible_objects.visible = nvl(p_visible(i),tangible_objects.visible), + tangible_objects.appearance_data = nvl(p_appearance_data(i),tangible_objects.appearance_data), + tangible_objects.interest_radius = nvl(p_interest_radius(i),tangible_objects.interest_radius), + tangible_objects.pvp_type = nvl(p_pvp_type(i),tangible_objects.pvp_type), + tangible_objects.pvp_faction = nvl(p_pvp_faction(i),tangible_objects.pvp_faction), + tangible_objects.damage_taken = nvl(p_damage_taken(i),tangible_objects.damage_taken), + tangible_objects.custom_appearance = nvl(p_custom_appearance(i),tangible_objects.custom_appearance), + tangible_objects.count = nvl(p_count(i),tangible_objects.count), + tangible_objects.condition = nvl(p_condition(i),tangible_objects.condition), + tangible_objects.creator_id = nvl(p_creator_id(i),tangible_objects.creator_id), + tangible_objects.source_draft_schematic = nvl(p_source_draft_schematic(i),tangible_objects.source_draft_schematic) + where + tangible_objects.object_id=p_object_id(i); + end LOOP; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.save_tangible_obj : update error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.save_tangible_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.save_tangible_obj','max_hit_points','int',to_char(p_max_hit_points(m_error_index))); + db_error_logger.dblogerror_values('persister.save_tangible_obj','owner_id','int',p_owner_id(m_error_index)); + db_error_logger.dblogerror_values('persister.save_tangible_obj','visible','char',p_visible(m_error_index)); + db_error_logger.dblogerror_values('persister.save_tangible_obj','appearance_data','varchar',p_appearance_data(m_error_index)); + db_error_logger.dblogerror_values('persister.save_tangible_obj','interest_radius','int',to_char(p_interest_radius(m_error_index))); + db_error_logger.dblogerror_values('persister.save_tangible_obj','pvp_type','int',to_char(p_pvp_type(m_error_index))); + db_error_logger.dblogerror_values('persister.save_tangible_obj','pvp_faction','int',to_char(p_pvp_faction(m_error_index))); + db_error_logger.dblogerror_values('persister.save_tangible_obj','damage_taken','int',to_char(p_damage_taken(m_error_index))); + db_error_logger.dblogerror_values('persister.save_tangible_obj','custom_appearance','varchar2',p_custom_appearance(m_error_index)); + db_error_logger.dblogerror_values('persister.save_tangible_obj','count','int',to_char(p_count(m_error_index))); + db_error_logger.dblogerror_values('persister.save_tangible_obj','condition','int',to_char(p_condition(m_error_index))); + db_error_logger.dblogerror_values('persister.save_tangible_obj','creator_id','number',p_creator_id(m_error_index)); + db_error_logger.dblogerror_values('persister.save_tangible_obj','source_draft_schematic','int',to_char(p_source_draft_schematic(m_error_index))); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','save_tangible_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure add_tangible_obj( p_object_id VAOFSTRING, p_max_hit_points VAOFNUMBER, p_owner_id VAOFSTRING, p_visible VAOFSTRING, p_appearance_data VAOFSTRING, p_interest_radius VAOFNUMBER, p_pvp_type VAOFNUMBER, p_pvp_faction VAOFNUMBER, p_damage_taken VAOFNUMBER, p_custom_appearance VAOFSTRING, p_count VAOFNUMBER, p_condition VAOFNUMBER, p_creator_id VAOFSTRING, p_source_draft_schematic VAOFNUMBER, p_chunk_size number ) + as + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + insert into tangible_objects + ( + tangible_objects.max_hit_points, + tangible_objects.owner_id, + tangible_objects.visible, + tangible_objects.appearance_data, + tangible_objects.interest_radius, + tangible_objects.pvp_type, + tangible_objects.pvp_faction, + tangible_objects.damage_taken, + tangible_objects.custom_appearance, + tangible_objects.count, + tangible_objects.condition, + tangible_objects.creator_id, + tangible_objects.source_draft_schematic, + tangible_objects.object_id + ) + VALUES + ( + p_max_hit_points(i), + p_owner_id(i), + p_visible(i), + p_appearance_data(i), + p_interest_radius(i), + p_pvp_type(i), + p_pvp_faction(i), + p_damage_taken(i), + p_custom_appearance(i), + p_count(i), + p_condition(i), + p_creator_id(i), + p_source_draft_schematic(i), + p_object_id(i) + ); + + exception + when dup_val_on_index then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_tangible_obj : dup_val_on_index error.'); + END IF; + for i in 1..p_chunk_size loop + m_error_index := i; + UPDATE tangible_objects Set + tangible_objects.max_hit_points = nvl(p_max_hit_points(i),tangible_objects.max_hit_points), + tangible_objects.owner_id = nvl(p_owner_id(i),tangible_objects.owner_id), + tangible_objects.visible = nvl(p_visible(i),tangible_objects.visible), + tangible_objects.appearance_data = nvl(p_appearance_data(i),tangible_objects.appearance_data), + tangible_objects.interest_radius = nvl(p_interest_radius(i),tangible_objects.interest_radius), + tangible_objects.pvp_type = nvl(p_pvp_type(i),tangible_objects.pvp_type), + tangible_objects.pvp_faction = nvl(p_pvp_faction(i),tangible_objects.pvp_faction), + tangible_objects.damage_taken = nvl(p_damage_taken(i),tangible_objects.damage_taken), + tangible_objects.custom_appearance = nvl(p_custom_appearance(i),tangible_objects.custom_appearance), + tangible_objects.count = nvl(p_count(i),tangible_objects.count), + tangible_objects.condition = nvl(p_condition(i),tangible_objects.condition), + tangible_objects.creator_id = nvl(p_creator_id(i),tangible_objects.creator_id), + tangible_objects.source_draft_schematic = nvl(p_source_draft_schematic(i),tangible_objects.source_draft_schematic) + where + tangible_objects.object_id=p_object_id(i); + + if SQL%ROWCOUNT=0 then + insert into tangible_objects + ( + tangible_objects.max_hit_points, + tangible_objects.owner_id, + tangible_objects.visible, + tangible_objects.appearance_data, + tangible_objects.interest_radius, + tangible_objects.pvp_type, + tangible_objects.pvp_faction, + tangible_objects.damage_taken, + tangible_objects.custom_appearance, + tangible_objects.count, + tangible_objects.condition, + tangible_objects.creator_id, + tangible_objects.source_draft_schematic, + tangible_objects.object_id + ) + VALUES + ( + p_max_hit_points(i), + p_owner_id(i), + p_visible(i), + p_appearance_data(i), + p_interest_radius(i), + p_pvp_type(i), + p_pvp_faction(i), + p_damage_taken(i), + p_custom_appearance(i), + p_count(i), + p_condition(i), + p_creator_id(i), + p_source_draft_schematic(i), + p_object_id(i) + ); + end if; + end loop; + end; + when others then + begin + for i in 1..p_chunk_size loop + m_error_index := i; + insert into tangible_objects + ( + tangible_objects.max_hit_points, + tangible_objects.owner_id, + tangible_objects.visible, + tangible_objects.appearance_data, + tangible_objects.interest_radius, + tangible_objects.pvp_type, + tangible_objects.pvp_faction, + tangible_objects.damage_taken, + tangible_objects.custom_appearance, + tangible_objects.count, + tangible_objects.condition, + tangible_objects.creator_id, + tangible_objects.source_draft_schematic, + tangible_objects.object_id + ) + VALUES + ( + p_max_hit_points(i), + p_owner_id(i), + p_visible(i), + p_appearance_data(i), + p_interest_radius(i), + p_pvp_type(i), + p_pvp_faction(i), + p_damage_taken(i), + p_custom_appearance(i), + p_count(i), + p_condition(i), + p_creator_id(i), + p_source_draft_schematic(i), + p_object_id(i) + ); + + end loop; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_tangible_obj : error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.add_tangible_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.add_tangible_obj','max_hit_points','int',to_char(p_max_hit_points(m_error_index))); + db_error_logger.dblogerror_values('persister.add_tangible_obj','owner_id','int',p_owner_id(m_error_index)); + db_error_logger.dblogerror_values('persister.add_tangible_obj','visible','char',p_visible(m_error_index)); + db_error_logger.dblogerror_values('persister.add_tangible_obj','appearance_data','varchar',p_appearance_data(m_error_index)); + db_error_logger.dblogerror_values('persister.add_tangible_obj','interest_radius','int',to_char(p_interest_radius(m_error_index))); + db_error_logger.dblogerror_values('persister.add_tangible_obj','pvp_type','int',to_char(p_pvp_type(m_error_index))); + db_error_logger.dblogerror_values('persister.add_tangible_obj','pvp_faction','int',to_char(p_pvp_faction(m_error_index))); + db_error_logger.dblogerror_values('persister.add_tangible_obj','damage_taken','int',to_char(p_damage_taken(m_error_index))); + db_error_logger.dblogerror_values('persister.add_tangible_obj','custom_appearance','varchar2',p_custom_appearance(m_error_index)); + db_error_logger.dblogerror_values('persister.add_tangible_obj','count','int',to_char(p_count(m_error_index))); + db_error_logger.dblogerror_values('persister.add_tangible_obj','condition','int',to_char(p_condition(m_error_index))); + db_error_logger.dblogerror_values('persister.add_tangible_obj','creator_id','number',p_creator_id(m_error_index)); + db_error_logger.dblogerror_values('persister.add_tangible_obj','source_draft_schematic','int',to_char(p_source_draft_schematic(m_error_index))); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','add_tangible_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure remove_tangible_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + begin + FORALL i IN 1..p_chunk_size + delete tangible_objects + where + object_id=p_object_id(i); + end; + + procedure save_token_obj( p_object_id VAOFSTRING, p_reference VAOFSTRING, p_target_server_template_name VAOFSTRING, p_target_shared_template_name VAOFSTRING, p_waypoint VAOFSTRING, p_chunk_size number ) + as + + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + update token_objects set + token_objects.reference = nvl(p_reference(i),token_objects.reference), + token_objects.target_server_template_name = nvl(p_target_server_template_name(i),token_objects.target_server_template_name), + token_objects.target_shared_template_name = nvl(p_target_shared_template_name(i),token_objects.target_shared_template_name), + token_objects.waypoint = nvl(p_waypoint(i),token_objects.waypoint) + where + token_objects.object_id=p_object_id(i); + exception + when others then + begin + FOR i IN 1..p_chunk_size LOOP + m_error_index := i; + update token_objects set + token_objects.reference = nvl(p_reference(i),token_objects.reference), + token_objects.target_server_template_name = nvl(p_target_server_template_name(i),token_objects.target_server_template_name), + token_objects.target_shared_template_name = nvl(p_target_shared_template_name(i),token_objects.target_shared_template_name), + token_objects.waypoint = nvl(p_waypoint(i),token_objects.waypoint) + where + token_objects.object_id=p_object_id(i); + end LOOP; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.save_token_obj : update error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.save_token_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.save_token_obj','reference','number',p_reference(m_error_index)); + db_error_logger.dblogerror_values('persister.save_token_obj','target_server_template_name','varchar2',p_target_server_template_name(m_error_index)); + db_error_logger.dblogerror_values('persister.save_token_obj','target_shared_template_name','varchar2',p_target_shared_template_name(m_error_index)); + db_error_logger.dblogerror_values('persister.save_token_obj','waypoint','number',p_waypoint(m_error_index)); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','save_token_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure add_token_obj( p_object_id VAOFSTRING, p_reference VAOFSTRING, p_target_server_template_name VAOFSTRING, p_target_shared_template_name VAOFSTRING, p_waypoint VAOFSTRING, p_chunk_size number ) + as + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + insert into token_objects + ( + token_objects.reference, + token_objects.target_server_template_name, + token_objects.target_shared_template_name, + token_objects.waypoint, + token_objects.object_id + ) + VALUES + ( + p_reference(i), + p_target_server_template_name(i), + p_target_shared_template_name(i), + p_waypoint(i), + p_object_id(i) + ); + + exception + when dup_val_on_index then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_token_obj : dup_val_on_index error.'); + END IF; + for i in 1..p_chunk_size loop + m_error_index := i; + UPDATE token_objects Set + token_objects.reference = nvl(p_reference(i),token_objects.reference), + token_objects.target_server_template_name = nvl(p_target_server_template_name(i),token_objects.target_server_template_name), + token_objects.target_shared_template_name = nvl(p_target_shared_template_name(i),token_objects.target_shared_template_name), + token_objects.waypoint = nvl(p_waypoint(i),token_objects.waypoint) + where + token_objects.object_id=p_object_id(i); + + if SQL%ROWCOUNT=0 then + insert into token_objects + ( + token_objects.reference, + token_objects.target_server_template_name, + token_objects.target_shared_template_name, + token_objects.waypoint, + token_objects.object_id + ) + VALUES + ( + p_reference(i), + p_target_server_template_name(i), + p_target_shared_template_name(i), + p_waypoint(i), + p_object_id(i) + ); + end if; + end loop; + end; + when others then + begin + for i in 1..p_chunk_size loop + m_error_index := i; + insert into token_objects + ( + token_objects.reference, + token_objects.target_server_template_name, + token_objects.target_shared_template_name, + token_objects.waypoint, + token_objects.object_id + ) + VALUES + ( + p_reference(i), + p_target_server_template_name(i), + p_target_shared_template_name(i), + p_waypoint(i), + p_object_id(i) + ); + + end loop; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_token_obj : error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.add_token_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.add_token_obj','reference','number',p_reference(m_error_index)); + db_error_logger.dblogerror_values('persister.add_token_obj','target_server_template_name','varchar2',p_target_server_template_name(m_error_index)); + db_error_logger.dblogerror_values('persister.add_token_obj','target_shared_template_name','varchar2',p_target_shared_template_name(m_error_index)); + db_error_logger.dblogerror_values('persister.add_token_obj','waypoint','number',p_waypoint(m_error_index)); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','add_token_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure remove_token_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + begin + FORALL i IN 1..p_chunk_size + delete token_objects + where + object_id=p_object_id(i); + end; + + procedure save_universe_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + null; + end; + + procedure add_universe_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + insert into universe_objects + ( + universe_objects.object_id + ) + VALUES + ( + p_object_id(i) + ); + + exception + when dup_val_on_index then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_universe_obj : dup_val_on_index error.'); + END IF; + end; + when others then + begin + for i in 1..p_chunk_size loop + m_error_index := i; + insert into universe_objects + ( + universe_objects.object_id + ) + VALUES + ( + p_object_id(i) + ); + + end loop; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_universe_obj : error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.add_universe_obj','object_id','number',p_object_id(m_error_index)); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','add_universe_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure remove_universe_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + begin + null; + end; + + procedure save_vehicle_obj( p_object_id VAOFSTRING, p_bogus VAOFNUMBER, p_chunk_size number ) + as + + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + update vehicle_objects set + vehicle_objects.bogus = nvl(p_bogus(i),vehicle_objects.bogus) + where + vehicle_objects.object_id=p_object_id(i); + exception + when others then + begin + FOR i IN 1..p_chunk_size LOOP + m_error_index := i; + update vehicle_objects set + vehicle_objects.bogus = nvl(p_bogus(i),vehicle_objects.bogus) + where + vehicle_objects.object_id=p_object_id(i); + end LOOP; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.save_vehicle_obj : update error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.save_vehicle_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.save_vehicle_obj','bogus','int',to_char(p_bogus(m_error_index))); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','save_vehicle_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure add_vehicle_obj( p_object_id VAOFSTRING, p_bogus VAOFNUMBER, p_chunk_size number ) + as + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + insert into vehicle_objects + ( + vehicle_objects.bogus, + vehicle_objects.object_id + ) + VALUES + ( + p_bogus(i), + p_object_id(i) + ); + + exception + when dup_val_on_index then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_vehicle_obj : dup_val_on_index error.'); + END IF; + for i in 1..p_chunk_size loop + m_error_index := i; + UPDATE vehicle_objects Set + vehicle_objects.bogus = nvl(p_bogus(i),vehicle_objects.bogus) + where + vehicle_objects.object_id=p_object_id(i); + + if SQL%ROWCOUNT=0 then + insert into vehicle_objects + ( + vehicle_objects.bogus, + vehicle_objects.object_id + ) + VALUES + ( + p_bogus(i), + p_object_id(i) + ); + end if; + end loop; + end; + when others then + begin + for i in 1..p_chunk_size loop + m_error_index := i; + insert into vehicle_objects + ( + vehicle_objects.bogus, + vehicle_objects.object_id + ) + VALUES + ( + p_bogus(i), + p_object_id(i) + ); + + end loop; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_vehicle_obj : error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.add_vehicle_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.add_vehicle_obj','bogus','int',to_char(p_bogus(m_error_index))); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','add_vehicle_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure remove_vehicle_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + begin + FORALL i IN 1..p_chunk_size + delete vehicle_objects + where + object_id=p_object_id(i); + end; + + procedure save_weapon_obj( p_object_id VAOFSTRING, p_min_damage VAOFNUMBER, p_max_damage VAOFNUMBER, p_damage_type VAOFNUMBER, p_elemental_type VAOFNUMBER, p_elemental_value VAOFNUMBER, p_attack_speed VAOFNUMBER, p_wound_chance VAOFNUMBER, p_accuracy VAOFNUMBER, p_attack_cost VAOFNUMBER, p_damage_radius VAOFNUMBER, p_min_range VAOFNUMBER, p_max_range VAOFNUMBER, p_chunk_size number ) + as + + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + update weapon_objects set + weapon_objects.min_damage = nvl(p_min_damage(i),weapon_objects.min_damage), + weapon_objects.max_damage = nvl(p_max_damage(i),weapon_objects.max_damage), + weapon_objects.damage_type = nvl(p_damage_type(i),weapon_objects.damage_type), + weapon_objects.elemental_type = nvl(p_elemental_type(i),weapon_objects.elemental_type), + weapon_objects.elemental_value = nvl(p_elemental_value(i),weapon_objects.elemental_value), + weapon_objects.attack_speed = nvl(p_attack_speed(i),weapon_objects.attack_speed), + weapon_objects.wound_chance = nvl(p_wound_chance(i),weapon_objects.wound_chance), + weapon_objects.accuracy = nvl(p_accuracy(i),weapon_objects.accuracy), + weapon_objects.attack_cost = nvl(p_attack_cost(i),weapon_objects.attack_cost), + weapon_objects.damage_radius = nvl(p_damage_radius(i),weapon_objects.damage_radius), + weapon_objects.min_range = nvl(p_min_range(i),weapon_objects.min_range), + weapon_objects.max_range = nvl(p_max_range(i),weapon_objects.max_range) + where + weapon_objects.object_id=p_object_id(i); + exception + when others then + begin + FOR i IN 1..p_chunk_size LOOP + m_error_index := i; + update weapon_objects set + weapon_objects.min_damage = nvl(p_min_damage(i),weapon_objects.min_damage), + weapon_objects.max_damage = nvl(p_max_damage(i),weapon_objects.max_damage), + weapon_objects.damage_type = nvl(p_damage_type(i),weapon_objects.damage_type), + weapon_objects.elemental_type = nvl(p_elemental_type(i),weapon_objects.elemental_type), + weapon_objects.elemental_value = nvl(p_elemental_value(i),weapon_objects.elemental_value), + weapon_objects.attack_speed = nvl(p_attack_speed(i),weapon_objects.attack_speed), + weapon_objects.wound_chance = nvl(p_wound_chance(i),weapon_objects.wound_chance), + weapon_objects.accuracy = nvl(p_accuracy(i),weapon_objects.accuracy), + weapon_objects.attack_cost = nvl(p_attack_cost(i),weapon_objects.attack_cost), + weapon_objects.damage_radius = nvl(p_damage_radius(i),weapon_objects.damage_radius), + weapon_objects.min_range = nvl(p_min_range(i),weapon_objects.min_range), + weapon_objects.max_range = nvl(p_max_range(i),weapon_objects.max_range) + where + weapon_objects.object_id=p_object_id(i); + end LOOP; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.save_weapon_obj : update error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.save_weapon_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.save_weapon_obj','min_damage','int',to_char(p_min_damage(m_error_index))); + db_error_logger.dblogerror_values('persister.save_weapon_obj','max_damage','int',to_char(p_max_damage(m_error_index))); + db_error_logger.dblogerror_values('persister.save_weapon_obj','damage_type','int',to_char(p_damage_type(m_error_index))); + db_error_logger.dblogerror_values('persister.save_weapon_obj','elemental_type','int',to_char(p_elemental_type(m_error_index))); + db_error_logger.dblogerror_values('persister.save_weapon_obj','elemental_value','int',to_char(p_elemental_value(m_error_index))); + db_error_logger.dblogerror_values('persister.save_weapon_obj','attack_speed','float',to_char(p_attack_speed(m_error_index))); + db_error_logger.dblogerror_values('persister.save_weapon_obj','wound_chance','float',to_char(p_wound_chance(m_error_index))); + db_error_logger.dblogerror_values('persister.save_weapon_obj','accuracy','int',to_char(p_accuracy(m_error_index))); + db_error_logger.dblogerror_values('persister.save_weapon_obj','attack_cost','int',to_char(p_attack_cost(m_error_index))); + db_error_logger.dblogerror_values('persister.save_weapon_obj','damage_radius','float',to_char(p_damage_radius(m_error_index))); + db_error_logger.dblogerror_values('persister.save_weapon_obj','min_range','float',to_char(p_min_range(m_error_index))); + db_error_logger.dblogerror_values('persister.save_weapon_obj','max_range','float',to_char(p_max_range(m_error_index))); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','save_weapon_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure add_weapon_obj( p_object_id VAOFSTRING, p_min_damage VAOFNUMBER, p_max_damage VAOFNUMBER, p_damage_type VAOFNUMBER, p_elemental_type VAOFNUMBER, p_elemental_value VAOFNUMBER, p_attack_speed VAOFNUMBER, p_wound_chance VAOFNUMBER, p_accuracy VAOFNUMBER, p_attack_cost VAOFNUMBER, p_damage_radius VAOFNUMBER, p_min_range VAOFNUMBER, p_max_range VAOFNUMBER, p_chunk_size number ) + as + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=1; + begin + FORALL i IN 1..p_chunk_size + insert into weapon_objects + ( + weapon_objects.min_damage, + weapon_objects.max_damage, + weapon_objects.damage_type, + weapon_objects.elemental_type, + weapon_objects.elemental_value, + weapon_objects.attack_speed, + weapon_objects.wound_chance, + weapon_objects.accuracy, + weapon_objects.attack_cost, + weapon_objects.damage_radius, + weapon_objects.min_range, + weapon_objects.max_range, + weapon_objects.object_id + ) + VALUES + ( + p_min_damage(i), + p_max_damage(i), + p_damage_type(i), + p_elemental_type(i), + p_elemental_value(i), + p_attack_speed(i), + p_wound_chance(i), + p_accuracy(i), + p_attack_cost(i), + p_damage_radius(i), + p_min_range(i), + p_max_range(i), + p_object_id(i) + ); + + exception + when dup_val_on_index then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_weapon_obj : dup_val_on_index error.'); + END IF; + for i in 1..p_chunk_size loop + m_error_index := i; + UPDATE weapon_objects Set + weapon_objects.min_damage = nvl(p_min_damage(i),weapon_objects.min_damage), + weapon_objects.max_damage = nvl(p_max_damage(i),weapon_objects.max_damage), + weapon_objects.damage_type = nvl(p_damage_type(i),weapon_objects.damage_type), + weapon_objects.elemental_type = nvl(p_elemental_type(i),weapon_objects.elemental_type), + weapon_objects.elemental_value = nvl(p_elemental_value(i),weapon_objects.elemental_value), + weapon_objects.attack_speed = nvl(p_attack_speed(i),weapon_objects.attack_speed), + weapon_objects.wound_chance = nvl(p_wound_chance(i),weapon_objects.wound_chance), + weapon_objects.accuracy = nvl(p_accuracy(i),weapon_objects.accuracy), + weapon_objects.attack_cost = nvl(p_attack_cost(i),weapon_objects.attack_cost), + weapon_objects.damage_radius = nvl(p_damage_radius(i),weapon_objects.damage_radius), + weapon_objects.min_range = nvl(p_min_range(i),weapon_objects.min_range), + weapon_objects.max_range = nvl(p_max_range(i),weapon_objects.max_range) + where + weapon_objects.object_id=p_object_id(i); + + if SQL%ROWCOUNT=0 then + insert into weapon_objects + ( + weapon_objects.min_damage, + weapon_objects.max_damage, + weapon_objects.damage_type, + weapon_objects.elemental_type, + weapon_objects.elemental_value, + weapon_objects.attack_speed, + weapon_objects.wound_chance, + weapon_objects.accuracy, + weapon_objects.attack_cost, + weapon_objects.damage_radius, + weapon_objects.min_range, + weapon_objects.max_range, + weapon_objects.object_id + ) + VALUES + ( + p_min_damage(i), + p_max_damage(i), + p_damage_type(i), + p_elemental_type(i), + p_elemental_value(i), + p_attack_speed(i), + p_wound_chance(i), + p_accuracy(i), + p_attack_cost(i), + p_damage_radius(i), + p_min_range(i), + p_max_range(i), + p_object_id(i) + ); + end if; + end loop; + end; + when others then + begin + for i in 1..p_chunk_size loop + m_error_index := i; + insert into weapon_objects + ( + weapon_objects.min_damage, + weapon_objects.max_damage, + weapon_objects.damage_type, + weapon_objects.elemental_type, + weapon_objects.elemental_value, + weapon_objects.attack_speed, + weapon_objects.wound_chance, + weapon_objects.accuracy, + weapon_objects.attack_cost, + weapon_objects.damage_radius, + weapon_objects.min_range, + weapon_objects.max_range, + weapon_objects.object_id + ) + VALUES + ( + p_min_damage(i), + p_max_damage(i), + p_damage_type(i), + p_elemental_type(i), + p_elemental_value(i), + p_attack_speed(i), + p_wound_chance(i), + p_accuracy(i), + p_attack_cost(i), + p_damage_radius(i), + p_min_range(i), + p_max_range(i), + p_object_id(i) + ); + + end loop; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_weapon_obj : error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.add_weapon_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.add_weapon_obj','min_damage','int',to_char(p_min_damage(m_error_index))); + db_error_logger.dblogerror_values('persister.add_weapon_obj','max_damage','int',to_char(p_max_damage(m_error_index))); + db_error_logger.dblogerror_values('persister.add_weapon_obj','damage_type','int',to_char(p_damage_type(m_error_index))); + db_error_logger.dblogerror_values('persister.add_weapon_obj','elemental_type','int',to_char(p_elemental_type(m_error_index))); + db_error_logger.dblogerror_values('persister.add_weapon_obj','elemental_value','int',to_char(p_elemental_value(m_error_index))); + db_error_logger.dblogerror_values('persister.add_weapon_obj','attack_speed','float',to_char(p_attack_speed(m_error_index))); + db_error_logger.dblogerror_values('persister.add_weapon_obj','wound_chance','float',to_char(p_wound_chance(m_error_index))); + db_error_logger.dblogerror_values('persister.add_weapon_obj','accuracy','int',to_char(p_accuracy(m_error_index))); + db_error_logger.dblogerror_values('persister.add_weapon_obj','attack_cost','int',to_char(p_attack_cost(m_error_index))); + db_error_logger.dblogerror_values('persister.add_weapon_obj','damage_radius','float',to_char(p_damage_radius(m_error_index))); + db_error_logger.dblogerror_values('persister.add_weapon_obj','min_range','float',to_char(p_min_range(m_error_index))); + db_error_logger.dblogerror_values('persister.add_weapon_obj','max_range','float',to_char(p_max_range(m_error_index))); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','add_weapon_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure remove_weapon_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + begin + FORALL i IN 1..p_chunk_size + delete weapon_objects + where + object_id=p_object_id(i); + end; + + procedure save_player_quest_obj( p_object_id VAOFSTRING, p_title VAOFSTRING, p_description VAOFSTRING, p_creator VAOFSTRING, p_total_tasks VAOFNUMBER, p_difficulty VAOFNUMBER, p_task_title1 VAOFSTRING, p_task_description1 VAOFSTRING, p_task_title2 VAOFSTRING, p_task_description2 VAOFSTRING, p_task_title3 VAOFSTRING, p_task_description3 VAOFSTRING, p_task_title4 VAOFSTRING, p_task_description4 VAOFSTRING, p_task_title5 VAOFSTRING, p_task_description5 VAOFSTRING, p_task_title6 VAOFSTRING, p_task_description6 VAOFSTRING, p_task_title7 VAOFSTRING, p_task_description7 VAOFSTRING, p_task_title8 VAOFSTRING, p_task_description8 VAOFSTRING, p_task_title9 VAOFSTRING, p_task_description9 VAOFSTRING, p_task_title10 VAOFSTRING, p_task_description10 VAOFSTRING, p_task_title11 VAOFSTRING, p_task_description11 VAOFSTRING, p_task_title12 VAOFSTRING, p_task_description12 VAOFSTRING, p_chunk_size number ) + as + + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=0; + begin + FORALL i IN 1..p_chunk_size + update player_quest_objects set + player_quest_objects.title = nvl(p_title(i),player_quest_objects.title), + player_quest_objects.description = nvl(p_description(i),player_quest_objects.description), + player_quest_objects.creator = nvl(p_creator(i),player_quest_objects.creator), + player_quest_objects.total_tasks = nvl(p_total_tasks(i),player_quest_objects.total_tasks), + player_quest_objects.difficulty = nvl(p_difficulty(i),player_quest_objects.difficulty), + player_quest_objects.task_title1 = nvl(p_task_title1(i),player_quest_objects.task_title1), + player_quest_objects.task_description1 = nvl(p_task_description1(i),player_quest_objects.task_description1), + player_quest_objects.task_title2 = nvl(p_task_title2(i),player_quest_objects.task_title2), + player_quest_objects.task_description2 = nvl(p_task_description2(i),player_quest_objects.task_description2), + player_quest_objects.task_title3 = nvl(p_task_title3(i),player_quest_objects.task_title3), + player_quest_objects.task_description3 = nvl(p_task_description3(i),player_quest_objects.task_description3), + player_quest_objects.task_title4 = nvl(p_task_title4(i),player_quest_objects.task_title4), + player_quest_objects.task_description4 = nvl(p_task_description4(i),player_quest_objects.task_description4), + player_quest_objects.task_title5 = nvl(p_task_title5(i),player_quest_objects.task_title5), + player_quest_objects.task_description5 = nvl(p_task_description5(i),player_quest_objects.task_description5), + player_quest_objects.task_title6 = nvl(p_task_title6(i),player_quest_objects.task_title6), + player_quest_objects.task_description6 = nvl(p_task_description6(i),player_quest_objects.task_description6), + player_quest_objects.task_title7 = nvl(p_task_title7(i),player_quest_objects.task_title7), + player_quest_objects.task_description7 = nvl(p_task_description7(i),player_quest_objects.task_description7), + player_quest_objects.task_title8 = nvl(p_task_title8(i),player_quest_objects.task_title8), + player_quest_objects.task_description8 = nvl(p_task_description8(i),player_quest_objects.task_description8), + player_quest_objects.task_title9 = nvl(p_task_title9(i),player_quest_objects.task_title9), + player_quest_objects.task_description9 = nvl(p_task_description9(i),player_quest_objects.task_description9), + player_quest_objects.task_title10 = nvl(p_task_title10(i),player_quest_objects.task_title10), + player_quest_objects.task_description10 = nvl(p_task_description10(i),player_quest_objects.task_description10), + player_quest_objects.task_title11 = nvl(p_task_title11(i),player_quest_objects.task_title11), + player_quest_objects.task_description11 = nvl(p_task_description11(i),player_quest_objects.task_description11), + player_quest_objects.task_title12 = nvl(p_task_title12(i),player_quest_objects.task_title12), + player_quest_objects.task_description12 = nvl(p_task_description12(i),player_quest_objects.task_description12) + where + player_quest_objects.object_id=p_object_id(i); + exception + when others then + begin + FOR i IN 1..p_chunk_size LOOP + m_error_index := i; + update player_quest_objects set + player_quest_objects.title = nvl(p_title(i),player_quest_objects.title), + player_quest_objects.description = nvl(p_description(i),player_quest_objects.description), + player_quest_objects.creator = nvl(p_creator(i),player_quest_objects.creator), + player_quest_objects.total_tasks = nvl(p_total_tasks(i),player_quest_objects.total_tasks), + player_quest_objects.difficulty = nvl(p_difficulty(i),player_quest_objects.difficulty), + player_quest_objects.task_title1 = nvl(p_task_title1(i),player_quest_objects.task_title1), + player_quest_objects.task_description1 = nvl(p_task_description1(i),player_quest_objects.task_description1), + player_quest_objects.task_title2 = nvl(p_task_title2(i),player_quest_objects.task_title2), + player_quest_objects.task_description2 = nvl(p_task_description2(i),player_quest_objects.task_description2), + player_quest_objects.task_title3 = nvl(p_task_title3(i),player_quest_objects.task_title3), + player_quest_objects.task_description3 = nvl(p_task_description3(i),player_quest_objects.task_description3), + player_quest_objects.task_title4 = nvl(p_task_title4(i),player_quest_objects.task_title4), + player_quest_objects.task_description4 = nvl(p_task_description4(i),player_quest_objects.task_description4), + player_quest_objects.task_title5 = nvl(p_task_title5(i),player_quest_objects.task_title5), + player_quest_objects.task_description5 = nvl(p_task_description5(i),player_quest_objects.task_description5), + player_quest_objects.task_title6 = nvl(p_task_title6(i),player_quest_objects.task_title6), + player_quest_objects.task_description6 = nvl(p_task_description6(i),player_quest_objects.task_description6), + player_quest_objects.task_title7 = nvl(p_task_title7(i),player_quest_objects.task_title7), + player_quest_objects.task_description7 = nvl(p_task_description7(i),player_quest_objects.task_description7), + player_quest_objects.task_title8 = nvl(p_task_title8(i),player_quest_objects.task_title8), + player_quest_objects.task_description8 = nvl(p_task_description8(i),player_quest_objects.task_description8), + player_quest_objects.task_title9 = nvl(p_task_title9(i),player_quest_objects.task_title9), + player_quest_objects.task_description9 = nvl(p_task_description9(i),player_quest_objects.task_description9), + player_quest_objects.task_title10 = nvl(p_task_title10(i),player_quest_objects.task_title10), + player_quest_objects.task_description10 = nvl(p_task_description10(i),player_quest_objects.task_description10), + player_quest_objects.task_title11 = nvl(p_task_title11(i),player_quest_objects.task_title11), + player_quest_objects.task_description11 = nvl(p_task_description11(i),player_quest_objects.task_description11), + player_quest_objects.task_title12 = nvl(p_task_title12(i),player_quest_objects.task_title12), + player_quest_objects.task_description12 = nvl(p_task_description12(i),player_quest_objects.task_description12) + where + player_quest_objects.object_id=p_object_id(i); + end LOOP; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.save_player_quest_obj : update error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.save_player_quest_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.save_player_quest_obj','title','varchar2',p_title(m_error_index)); + db_error_logger.dblogerror_values('persister.save_player_quest_obj','description','varchar2',p_description(m_error_index)); + db_error_logger.dblogerror_values('persister.save_player_quest_obj','creator','number',p_creator(m_error_index)); + db_error_logger.dblogerror_values('persister.save_player_quest_obj','total_tasks','int',to_char(p_total_tasks(m_error_index))); + db_error_logger.dblogerror_values('persister.save_player_quest_obj','difficulty','int',to_char(p_difficulty(m_error_index))); + db_error_logger.dblogerror_values('persister.save_player_quest_obj','task_title1','varchar2',p_task_title1(m_error_index)); + db_error_logger.dblogerror_values('persister.save_player_quest_obj','task_description1','varchar2',p_task_description1(m_error_index)); + db_error_logger.dblogerror_values('persister.save_player_quest_obj','task_title2','varchar2',p_task_title2(m_error_index)); + db_error_logger.dblogerror_values('persister.save_player_quest_obj','task_description2','varchar2',p_task_description2(m_error_index)); + db_error_logger.dblogerror_values('persister.save_player_quest_obj','task_title3','varchar2',p_task_title3(m_error_index)); + db_error_logger.dblogerror_values('persister.save_player_quest_obj','task_description3','varchar2',p_task_description3(m_error_index)); + db_error_logger.dblogerror_values('persister.save_player_quest_obj','task_title4','varchar2',p_task_title4(m_error_index)); + db_error_logger.dblogerror_values('persister.save_player_quest_obj','task_description4','varchar2',p_task_description4(m_error_index)); + db_error_logger.dblogerror_values('persister.save_player_quest_obj','task_title5','varchar2',p_task_title5(m_error_index)); + db_error_logger.dblogerror_values('persister.save_player_quest_obj','task_description5','varchar2',p_task_description5(m_error_index)); + db_error_logger.dblogerror_values('persister.save_player_quest_obj','task_title6','varchar2',p_task_title6(m_error_index)); + db_error_logger.dblogerror_values('persister.save_player_quest_obj','task_description6','varchar2',p_task_description6(m_error_index)); + db_error_logger.dblogerror_values('persister.save_player_quest_obj','task_title7','varchar2',p_task_title7(m_error_index)); + db_error_logger.dblogerror_values('persister.save_player_quest_obj','task_description7','varchar2',p_task_description7(m_error_index)); + db_error_logger.dblogerror_values('persister.save_player_quest_obj','task_title8','varchar2',p_task_title8(m_error_index)); + db_error_logger.dblogerror_values('persister.save_player_quest_obj','task_description8','varchar2',p_task_description8(m_error_index)); + db_error_logger.dblogerror_values('persister.save_player_quest_obj','task_title9','varchar2',p_task_title9(m_error_index)); + db_error_logger.dblogerror_values('persister.save_player_quest_obj','task_description9','varchar2',p_task_description9(m_error_index)); + db_error_logger.dblogerror_values('persister.save_player_quest_obj','task_title10','varchar2',p_task_title10(m_error_index)); + db_error_logger.dblogerror_values('persister.save_player_quest_obj','task_description10','varchar2',p_task_description10(m_error_index)); + db_error_logger.dblogerror_values('persister.save_player_quest_obj','task_title11','varchar2',p_task_title11(m_error_index)); + db_error_logger.dblogerror_values('persister.save_player_quest_obj','task_description11','varchar2',p_task_description11(m_error_index)); + db_error_logger.dblogerror_values('persister.save_player_quest_obj','task_title12','varchar2',p_task_title12(m_error_index)); + db_error_logger.dblogerror_values('persister.save_player_quest_obj','task_description12','varchar2',p_task_description12(m_error_index)); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','save_player_quest_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure add_player_quest_obj( p_object_id VAOFSTRING, p_title VAOFSTRING, p_description VAOFSTRING, p_creator VAOFSTRING, p_total_tasks VAOFNUMBER, p_difficulty VAOFNUMBER, p_task_title1 VAOFSTRING, p_task_description1 VAOFSTRING, p_task_title2 VAOFSTRING, p_task_description2 VAOFSTRING, p_task_title3 VAOFSTRING, p_task_description3 VAOFSTRING, p_task_title4 VAOFSTRING, p_task_description4 VAOFSTRING, p_task_title5 VAOFSTRING, p_task_description5 VAOFSTRING, p_task_title6 VAOFSTRING, p_task_description6 VAOFSTRING, p_task_title7 VAOFSTRING, p_task_description7 VAOFSTRING, p_task_title8 VAOFSTRING, p_task_description8 VAOFSTRING, p_task_title9 VAOFSTRING, p_task_description9 VAOFSTRING, p_task_title10 VAOFSTRING, p_task_description10 VAOFSTRING, p_task_title11 VAOFSTRING, p_task_description11 VAOFSTRING, p_task_title12 VAOFSTRING, p_task_description12 VAOFSTRING, p_chunk_size number ) + as + m_enable_db_logging INTEGER := 0; + m_error_index INTEGER :=0; + begin + FORALL i IN 1..p_chunk_size + insert into player_quest_objects + ( + player_quest_objects.title, + player_quest_objects.description, + player_quest_objects.creator, + player_quest_objects.total_tasks, + player_quest_objects.difficulty, + player_quest_objects.task_title1, + player_quest_objects.task_description1, + player_quest_objects.task_title2, + player_quest_objects.task_description2, + player_quest_objects.task_title3, + player_quest_objects.task_description3, + player_quest_objects.task_title4, + player_quest_objects.task_description4, + player_quest_objects.task_title5, + player_quest_objects.task_description5, + player_quest_objects.task_title6, + player_quest_objects.task_description6, + player_quest_objects.task_title7, + player_quest_objects.task_description7, + player_quest_objects.task_title8, + player_quest_objects.task_description8, + player_quest_objects.task_title9, + player_quest_objects.task_description9, + player_quest_objects.task_title10, + player_quest_objects.task_description10, + player_quest_objects.task_title11, + player_quest_objects.task_description11, + player_quest_objects.task_title12, + player_quest_objects.task_description12, + player_quest_objects.object_id + ) + VALUES + ( + p_title(i), + p_description(i), + p_creator(i), + p_total_tasks(i), + p_difficulty(i), + p_task_title1(i), + p_task_description1(i), + p_task_title2(i), + p_task_description2(i), + p_task_title3(i), + p_task_description3(i), + p_task_title4(i), + p_task_description4(i), + p_task_title5(i), + p_task_description5(i), + p_task_title6(i), + p_task_description6(i), + p_task_title7(i), + p_task_description7(i), + p_task_title8(i), + p_task_description8(i), + p_task_title9(i), + p_task_description9(i), + p_task_title10(i), + p_task_description10(i), + p_task_title11(i), + p_task_description11(i), + p_task_title12(i), + p_task_description12(i), + p_object_id(i) + ); + + exception + when dup_val_on_index then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_player_quest_obj : dup_val_on_index error.'); + END IF; + for i in 1..p_chunk_size loop + m_error_index := i; + UPDATE player_quest_objects Set + player_quest_objects.title = nvl(p_title(i),player_quest_objects.title), + player_quest_objects.description = nvl(p_description(i),player_quest_objects.description), + player_quest_objects.creator = nvl(p_creator(i),player_quest_objects.creator), + player_quest_objects.total_tasks = nvl(p_total_tasks(i),player_quest_objects.total_tasks), + player_quest_objects.difficulty = nvl(p_difficulty(i),player_quest_objects.difficulty), + player_quest_objects.task_title1 = nvl(p_task_title1(i),player_quest_objects.task_title1), + player_quest_objects.task_description1 = nvl(p_task_description1(i),player_quest_objects.task_description1), + player_quest_objects.task_title2 = nvl(p_task_title2(i),player_quest_objects.task_title2), + player_quest_objects.task_description2 = nvl(p_task_description2(i),player_quest_objects.task_description2), + player_quest_objects.task_title3 = nvl(p_task_title3(i),player_quest_objects.task_title3), + player_quest_objects.task_description3 = nvl(p_task_description3(i),player_quest_objects.task_description3), + player_quest_objects.task_title4 = nvl(p_task_title4(i),player_quest_objects.task_title4), + player_quest_objects.task_description4 = nvl(p_task_description4(i),player_quest_objects.task_description4), + player_quest_objects.task_title5 = nvl(p_task_title5(i),player_quest_objects.task_title5), + player_quest_objects.task_description5 = nvl(p_task_description5(i),player_quest_objects.task_description5), + player_quest_objects.task_title6 = nvl(p_task_title6(i),player_quest_objects.task_title6), + player_quest_objects.task_description6 = nvl(p_task_description6(i),player_quest_objects.task_description6), + player_quest_objects.task_title7 = nvl(p_task_title7(i),player_quest_objects.task_title7), + player_quest_objects.task_description7 = nvl(p_task_description7(i),player_quest_objects.task_description7), + player_quest_objects.task_title8 = nvl(p_task_title8(i),player_quest_objects.task_title8), + player_quest_objects.task_description8 = nvl(p_task_description8(i),player_quest_objects.task_description8), + player_quest_objects.task_title9 = nvl(p_task_title9(i),player_quest_objects.task_title9), + player_quest_objects.task_description9 = nvl(p_task_description9(i),player_quest_objects.task_description9), + player_quest_objects.task_title10 = nvl(p_task_title10(i),player_quest_objects.task_title10), + player_quest_objects.task_description10 = nvl(p_task_description10(i),player_quest_objects.task_description10), + player_quest_objects.task_title11 = nvl(p_task_title11(i),player_quest_objects.task_title11), + player_quest_objects.task_description11 = nvl(p_task_description11(i),player_quest_objects.task_description11), + player_quest_objects.task_title12 = nvl(p_task_title12(i),player_quest_objects.task_title12), + player_quest_objects.task_description12 = nvl(p_task_description12(i),player_quest_objects.task_description12) + where + player_quest_objects.object_id=p_object_id(i); + + if SQL%ROWCOUNT=0 then + insert into player_quest_objects + ( + player_quest_objects.title, + player_quest_objects.description, + player_quest_objects.creator, + player_quest_objects.total_tasks, + player_quest_objects.difficulty, + player_quest_objects.task_title1, + player_quest_objects.task_description1, + player_quest_objects.task_title2, + player_quest_objects.task_description2, + player_quest_objects.task_title3, + player_quest_objects.task_description3, + player_quest_objects.task_title4, + player_quest_objects.task_description4, + player_quest_objects.task_title5, + player_quest_objects.task_description5, + player_quest_objects.task_title6, + player_quest_objects.task_description6, + player_quest_objects.task_title7, + player_quest_objects.task_description7, + player_quest_objects.task_title8, + player_quest_objects.task_description8, + player_quest_objects.task_title9, + player_quest_objects.task_description9, + player_quest_objects.task_title10, + player_quest_objects.task_description10, + player_quest_objects.task_title11, + player_quest_objects.task_description11, + player_quest_objects.task_title12, + player_quest_objects.task_description12, + player_quest_objects.object_id + ) + VALUES + ( + p_title(i), + p_description(i), + p_creator(i), + p_total_tasks(i), + p_difficulty(i), + p_task_title1(i), + p_task_description1(i), + p_task_title2(i), + p_task_description2(i), + p_task_title3(i), + p_task_description3(i), + p_task_title4(i), + p_task_description4(i), + p_task_title5(i), + p_task_description5(i), + p_task_title6(i), + p_task_description6(i), + p_task_title7(i), + p_task_description7(i), + p_task_title8(i), + p_task_description8(i), + p_task_title9(i), + p_task_description9(i), + p_task_title10(i), + p_task_description10(i), + p_task_title11(i), + p_task_description11(i), + p_task_title12(i), + p_task_description12(i), + p_object_id(i) + ); + end if; + end loop; + end; + when others then + begin + for i in 1..p_chunk_size loop + m_error_index := i; + insert into player_quest_objects + ( + player_quest_objects.title, + player_quest_objects.description, + player_quest_objects.creator, + player_quest_objects.total_tasks, + player_quest_objects.difficulty, + player_quest_objects.task_title1, + player_quest_objects.task_description1, + player_quest_objects.task_title2, + player_quest_objects.task_description2, + player_quest_objects.task_title3, + player_quest_objects.task_description3, + player_quest_objects.task_title4, + player_quest_objects.task_description4, + player_quest_objects.task_title5, + player_quest_objects.task_description5, + player_quest_objects.task_title6, + player_quest_objects.task_description6, + player_quest_objects.task_title7, + player_quest_objects.task_description7, + player_quest_objects.task_title8, + player_quest_objects.task_description8, + player_quest_objects.task_title9, + player_quest_objects.task_description9, + player_quest_objects.task_title10, + player_quest_objects.task_description10, + player_quest_objects.task_title11, + player_quest_objects.task_description11, + player_quest_objects.task_title12, + player_quest_objects.task_description12, + player_quest_objects.object_id + ) + VALUES + ( + p_title(i), + p_description(i), + p_creator(i), + p_total_tasks(i), + p_difficulty(i), + p_task_title1(i), + p_task_description1(i), + p_task_title2(i), + p_task_description2(i), + p_task_title3(i), + p_task_description3(i), + p_task_title4(i), + p_task_description4(i), + p_task_title5(i), + p_task_description5(i), + p_task_title6(i), + p_task_description6(i), + p_task_title7(i), + p_task_description7(i), + p_task_title8(i), + p_task_description8(i), + p_task_title9(i), + p_task_description9(i), + p_task_title10(i), + p_task_description10(i), + p_task_title11(i), + p_task_description11(i), + p_task_title12(i), + p_task_description12(i), + p_object_id(i) + ); + + end loop; + exception + when others then + begin + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'persister.add_player_quest_obj : error.'); + IF (m_enable_db_logging > 1) THEN + db_error_logger.dblogerror_values('persister.add_player_quest_obj','object_id','number',p_object_id(m_error_index)); + db_error_logger.dblogerror_values('persister.add_player_quest_obj','title','varchar2',p_title(m_error_index)); + db_error_logger.dblogerror_values('persister.add_player_quest_obj','description','varchar2',p_description(m_error_index)); + db_error_logger.dblogerror_values('persister.add_player_quest_obj','creator','number',p_creator(m_error_index)); + db_error_logger.dblogerror_values('persister.add_player_quest_obj','total_tasks','int',to_char(p_total_tasks(m_error_index))); + db_error_logger.dblogerror_values('persister.add_player_quest_obj','difficulty','int',to_char(p_difficulty(m_error_index))); + db_error_logger.dblogerror_values('persister.add_player_quest_obj','task_title1','varchar2',p_task_title1(m_error_index)); + db_error_logger.dblogerror_values('persister.add_player_quest_obj','task_description1','varchar2',p_task_description1(m_error_index)); + db_error_logger.dblogerror_values('persister.add_player_quest_obj','task_title2','varchar2',p_task_title2(m_error_index)); + db_error_logger.dblogerror_values('persister.add_player_quest_obj','task_description2','varchar2',p_task_description2(m_error_index)); + db_error_logger.dblogerror_values('persister.add_player_quest_obj','task_title3','varchar2',p_task_title3(m_error_index)); + db_error_logger.dblogerror_values('persister.add_player_quest_obj','task_description3','varchar2',p_task_description3(m_error_index)); + db_error_logger.dblogerror_values('persister.add_player_quest_obj','task_title4','varchar2',p_task_title4(m_error_index)); + db_error_logger.dblogerror_values('persister.add_player_quest_obj','task_description4','varchar2',p_task_description4(m_error_index)); + db_error_logger.dblogerror_values('persister.add_player_quest_obj','task_title5','varchar2',p_task_title5(m_error_index)); + db_error_logger.dblogerror_values('persister.add_player_quest_obj','task_description5','varchar2',p_task_description5(m_error_index)); + db_error_logger.dblogerror_values('persister.add_player_quest_obj','task_title6','varchar2',p_task_title6(m_error_index)); + db_error_logger.dblogerror_values('persister.add_player_quest_obj','task_description6','varchar2',p_task_description6(m_error_index)); + db_error_logger.dblogerror_values('persister.add_player_quest_obj','task_title7','varchar2',p_task_title7(m_error_index)); + db_error_logger.dblogerror_values('persister.add_player_quest_obj','task_description7','varchar2',p_task_description7(m_error_index)); + db_error_logger.dblogerror_values('persister.add_player_quest_obj','task_title8','varchar2',p_task_title8(m_error_index)); + db_error_logger.dblogerror_values('persister.add_player_quest_obj','task_description8','varchar2',p_task_description8(m_error_index)); + db_error_logger.dblogerror_values('persister.add_player_quest_obj','task_title9','varchar2',p_task_title9(m_error_index)); + db_error_logger.dblogerror_values('persister.add_player_quest_obj','task_description9','varchar2',p_task_description9(m_error_index)); + db_error_logger.dblogerror_values('persister.add_player_quest_obj','task_title10','varchar2',p_task_title10(m_error_index)); + db_error_logger.dblogerror_values('persister.add_player_quest_obj','task_description10','varchar2',p_task_description10(m_error_index)); + db_error_logger.dblogerror_values('persister.add_player_quest_obj','task_title11','varchar2',p_task_title11(m_error_index)); + db_error_logger.dblogerror_values('persister.add_player_quest_obj','task_description11','varchar2',p_task_description11(m_error_index)); + db_error_logger.dblogerror_values('persister.add_player_quest_obj','task_title12','varchar2',p_task_title12(m_error_index)); + db_error_logger.dblogerror_values('persister.add_player_quest_obj','task_description12','varchar2',p_task_description12(m_error_index)); + END IF; + END IF; + IF (db_error_logger.reraisecheck('persister','add_player_quest_obj') = 1) THEN + RAISE; + END IF; + end; + end; + end; + + procedure remove_player_quest_obj( p_object_id VAOFSTRING, p_chunk_size number ) + as + begin + FORALL i IN 1..p_chunk_size + delete player_quest_objects + where + object_id=p_object_id(i); + end; + +end; + +/ + + GRANT EXECUTE ON "SWG"."PERSISTER" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package Body PURGE_METHODS +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE BODY "SWG"."PURGE_METHODS" IS + + FUNCTION Purge_objects + (date_in in objects.deleted_date%type) + RETURN NUMBER IS + v_count NUMBER := 0; + BEGIN + --open the cursor for the object ids we want to purge. + --we will use these ids to delete child records from other tables + FOR x IN (SELECT /*+ INDEX (OBJECTS DELETED_OBJECT_IDX) */ object_id + FROM objects + WHERE deleted_date < date_in) LOOP + + IF v_count = 0 THEN + dbms_output.put_line ('Starting to delete....'); + END IF; + + --delete all children + DELETE FROM armor nologging WHERE object_id = x.object_id; + + DELETE FROM battlefield_marker_objects nologging WHERE object_id = x.object_id; + DELETE FROM battlefield_participants nologging WHERE region_object_id = x.object_id; + DELETE FROM battlefield_participants nologging WHERE character_object_id = x.object_id ; + DELETE FROM biographies nologging WHERE object_id = x.object_id ; + DELETE FROM building_objects nologging WHERE object_id = x.object_id ; + DELETE FROM cell_objects nologging WHERE object_id = x.object_id ; + DELETE FROM creature_objects nologging WHERE object_id = x.object_id ; + DELETE FROM experience_points nologging WHERE object_id = x.object_id ; + DELETE FROM factory_objects nologging WHERE object_id = x.object_id ; + DELETE FROM guild_objects nologging WHERE object_id = x.object_id ; + DELETE FROM harvester_installation_objects nologging WHERE object_id = x.object_id ; + DELETE FROM installation_objects nologging WHERE object_id = x.object_id ; + DELETE FROM intangible_objects nologging WHERE object_id = x.object_id ; + DELETE FROM location_lists nologging WHERE object_id = x.object_id ; + DELETE FROM manf_schematic_attributes nologging WHERE object_id = x.object_id ; + DELETE FROM manf_schematic_objects nologging WHERE object_id = x.object_id ; + DELETE FROM manufacture_inst_objects nologging WHERE object_id = x.object_id ; + DELETE FROM mission_objects nologging WHERE object_id = x.object_id ; + + DELETE FROM object_variables nologging WHERE object_id = x.object_id ; + DELETE FROM planet_objects nologging WHERE object_id = x.object_id ; + DELETE FROM player_objects nologging WHERE object_id = x.object_id ; + DELETE FROM property_lists nologging WHERE object_id = x.object_id ; + DELETE FROM resource_container_objects nologging WHERE object_id = x.object_id ; + DELETE FROM scripts nologging WHERE object_id = x.object_id ; + DELETE FROM static_objects nologging WHERE object_id = x.object_id ; + DELETE FROM tangible_objects nologging WHERE object_id = x.object_id ; + DELETE FROM token_objects nologging WHERE object_id = x.object_id ; + DELETE FROM universe_objects nologging WHERE object_id = x.object_id ; + DELETE FROM vehicle_objects nologging WHERE object_id = x.object_id ; + DELETE FROM waypoints nologging WHERE object_id = x.object_id ; + DELETE FROM weapon_objects nologging WHERE object_id = x.object_id ; + --delete messages target(object_id) + DELETE FROM messages nologging WHERE target = x.object_id ; + + v_count := v_count + 1; + + COMMIT; + + END LOOP; + + --delete parent + DELETE /*+ INDEX (OBJECTS DELETED_OBJECT_IDX) */ FROM objects + nologging WHERE deleted_date < date_in; + + dbms_output.put_line (v_count||': iterations'); + + COMMIT; + RETURN 0; + + EXCEPTION + WHEN OTHERS THEN + ROLLBACK; + IF v_count = 0 THEN + dbms_output.put_line ('never deleted'); + END IF; + dbms_output.put_line (v_count||': iterations'); + RETURN SQLCODE; + END Purge_objects; + -- + -- + -- + FUNCTION time_purge + (date_in IN VARCHAR2) + RETURN INTEGER IS + v_retval NUMBER := 0; + v_date VARCHAR2(20) := date_in; + v_time NUMBER := 1; + BEGIN + + FOR i IN 1..24 LOOP + dbms_output.put_line(to_char(to_date(v_date, 'dd-mon-yy hh24:mi:ss') + v_time/24, 'DD-MON-YY hh24:mi:ss')); + v_retval := purge_objects(to_date(v_date, 'dd-mon-yy hh24:mi:ss') + v_time/24); + EXIT WHEN v_retval <> 0; + + IF v_time = 23 THEN + v_time := v_time + (59/60); + ELSE + v_time := v_time + 1; + END IF; + END LOOP; + + RETURN 0; + + EXCEPTION + WHEN OTHERS THEN + ROLLBACK; + dbms_output.put_line('Purge return values: '||v_retval); + dbms_output.put_line('Time it failed at: '||v_time); + RETURN SQLCODE; + END time_purge; + +end purge_methods; + +/ + + GRANT EXECUTE ON "SWG"."PURGE_METHODS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package Body PURGE_METHODS2 +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE BODY "SWG"."PURGE_METHODS2" is +/**********************************************************************/ +/*** Purge Objects ***/ +/*** ***/ +/*** Deletes objects marked for deletion in object tables and ***/ +/*** then the master objects table based on date value ***/ +/**********************************************************************/ + + FUNCTION Purge_objects + (date_in in objects.deleted_date%type) + RETURN PLS_INTEGER + IS + v_count PLS_INTEGER := 0; + + Obj_list Obj_list_t; -- VARRAY object to hold ids to bulk delete for child objects + Obj_list_index PLS_INTEGER; -- index into VARRAY object + + BEGIN + + Obj_list := Obj_list_t(); -- initialize VARRAY object + Obj_list.extend(chunk_size); -- allocate VARRAY object memory to chunk size + + -- LOGGING.LOG_STATUS(1,'Starting object deletions.'); + + --open the cursor for the object ids we want to purge. + --we will use these ids to delete records from other tables + FOR x IN (SELECT /*+ INDEX (OBJECTS DELETED_OBJECT_IDX) */ object_id + FROM objects + WHERE deleted_date < date_in) LOOP + + v_count := v_count + 1; + Obj_list_index := MOD(v_count, chunk_size); -- what obj index for this batch + + If Obj_list_index = 0 then + Obj_list(chunk_size) := x.object_id; -- make sure we fill last VARRAY element + Purge_objects_work(Obj_list); -- bulk delete object ids in VARRAY list + COMMIT; + -- LOGGING.LOG_STATUS(v_count,'batch purged'); + Else + Obj_list(Obj_list_index) := x.object_id; -- fill VARRAY with ids + End If; + + END LOOP; + + -- LOGGING.LOG_STATUS(v_count,'Child object main loop exited.'); + + --Now delete remaining partially full object list for objects + If Obj_list_index != 0 then + Obj_list.trim(chunk_size - Obj_list_index); + Purge_objects_work(Obj_list); + COMMIT; + -- LOGGING.LOG_STATUS(v_count,'Deleting chunk remainder.'); + End If; + + Obj_list.delete; -- cleanup - delete VARRAY list + +-- LOGGING.LOG_STATUS(v_count,'Finished deleting '|| to_char(v_count) ||' references to objects.'); + + RETURN 0; + + EXCEPTION + WHEN OTHERS THEN + ROLLBACK; + + IF v_count = 0 THEN + dbms_output.put_line ('never deleted'); + -- LOGGING.LOG_ERROR(SQLCODE, SQLERRM); + END IF; + dbms_output.put_line (v_count||': iterations'); + -- LOGGING.LOG_ERROR(SQLCODE, SQLERRM); + RETURN SQLCODE; + END Purge_objects; + +/**********************************************************************/ +/*** Purge Objects Work ***/ +/*** ***/ +/*** Bulk delete objects marked for deletion in child object tables ***/ +/*** given a list of object ids passed in from a VARRAY. Called ***/ +/*** purge objects function. ***/ +/**********************************************************************/ + + PROCEDURE Purge_objects_work + (Obj_list IN Obj_list_t) IS + + BEGIN + + --delete all children + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM armor WHERE object_id = Obj_list(i); + + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM battlefield_marker_objects WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM battlefield_participants WHERE region_object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM battlefield_participants WHERE character_object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM biographies WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM building_objects WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM cell_objects WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM creature_objects WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM experience_points WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM factory_objects WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM guild_objects WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM harvester_installation_objects WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM installation_objects WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM intangible_objects WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM location_lists WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM manf_schematic_attributes WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM manf_schematic_objects WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM manufacture_inst_objects WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM mission_objects WHERE object_id = Obj_list(i); + + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM object_variables WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM planet_objects WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM player_objects WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM property_lists WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM resource_container_objects WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM scripts WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM static_objects WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM tangible_objects WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM token_objects WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM universe_objects WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM vehicle_objects WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM waypoints WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM weapon_objects WHERE object_id = Obj_list(i); + --delete messages target(object_id) + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM messages WHERE target = Obj_list(i); + + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM objects WHERE object_id = Obj_list(i); + + END Purge_objects_work; + -- + -- + -- + FUNCTION time_purge + (date_in IN VARCHAR2) + RETURN PLS_INTEGER IS + v_retval PLS_INTEGER := 0; + v_date VARCHAR2(20) := date_in; + v_time NUMBER := 1; + BEGIN + + FOR i IN 1..24 LOOP + dbms_output.put_line(to_char(to_date(v_date, 'dd-mon-yy hh24:mi:ss') + v_time/24, 'DD-MON-YY hh24:mi:ss')); + v_retval := purge_objects(to_date(v_date, 'dd-mon-yy hh24:mi:ss') + v_time/24); + EXIT WHEN v_retval <> 0; + + IF v_time = 23 THEN + v_time := v_time + (59/60); + ELSE + v_time := v_time + 1; + END IF; + END LOOP; + + RETURN 0; + + EXCEPTION + WHEN OTHERS THEN + ROLLBACK; + dbms_output.put_line('Purge return values: '||v_retval); + dbms_output.put_line('Time it failed at: '||v_time); + RETURN SQLCODE; + END time_purge; + +/**********************************************************************/ +/*** Purge Consumables ***/ +/*** ***/ +/*** Deletes consumable objects marked for deletion in child object ***/ +/*** tables and then the master objects table based on date value ***/ +/**********************************************************************/ + + FUNCTION Purge_consumables + (start_date_in in objects.deleted_date%type, + end_date_in in objects.deleted_date%type) + RETURN PLS_INTEGER + IS + v_count PLS_INTEGER := 0; + + Obj_list Obj_list_t; -- VARRAY object to hold ids to bulk delete for objects + Obj_list_index PLS_INTEGER; -- index into VARRAY object + + BEGIN + + Obj_list := Obj_list_t(); -- initialize VARRAY object + Obj_list.extend(chunk_size); -- allocate VARRAY object memory to chunk size + + -- LOGGING.LOG_STATUS(1,'Starting child object deletions for consumables.'); + + --open the cursor for the object ids we want to purge. + --we will use these ids to delete records from other tables + FOR x IN (SELECT object_id + FROM objects + WHERE deleted_date is not NULL + AND deleted_date BETWEEN start_date_in AND end_date_in + and object_template_id in ( + 300281711, + 352903310, + 1006954225, + 9343642, + 35614291, + 339194814, + 1001781097, + 1632911215, + 1139268412, + 2059421636, + 1349101341, + -1657672270, + 1931602976, + -1440714292, + -1436615854, + -1614624973, + -1556205486, + -679440489, + -1397391672, + -541746271, + -718648728, + -789429729, + -786663538, + -610128810, + -132487792, + -1129945606, + -104858180, + -82570045)) LOOP + + v_count := v_count + 1; + Obj_list_index := MOD(v_count, chunk_size); -- what obj index for this batch + + If Obj_list_index = 0 then + Obj_list(chunk_size) := x.object_id; -- make sure we fill last VARRAY element + Purge_consumables_work(Obj_list); -- bulk delete object ids in VARRAY list + COMMIT; + -- LOGGING.LOG_STATUS(v_count,'batch purged'); + Else + Obj_list(Obj_list_index) := x.object_id; -- fill VARRAY with ids + End If; + + END LOOP; + + -- LOGGING.LOG_STATUS(v_count,'Consumables object main loop exited.'); + + --Now delete remaining partially full object list for objects + If Obj_list_index != 0 then + Obj_list.trim(chunk_size - Obj_list_index); + Purge_consumables_work(Obj_list); + COMMIT; + -- LOGGING.LOG_STATUS(v_count,'Deleting chunk remainder.'); + End If; + + Obj_list.delete; -- cleanup - delete VARRAY list + + -- LOGGING.LOG_STATUS(v_count,'Finished deleting '|| to_char(v_count) ||' consumable objects.'); + RETURN 0; + + EXCEPTION + WHEN OTHERS THEN + ROLLBACK; + IF v_count = 0 THEN + dbms_output.put_line ('never deleted'); + -- LOGGING.LOG_ERROR(SQLCODE, SQLERRM); + END IF; + dbms_output.put_line (v_count||': iterations'); + -- LOGGING.LOG_ERROR(SQLCODE, SQLERRM); + RETURN SQLCODE; + END Purge_consumables; + +/**********************************************************************/ +/*** Purge Consumables Work ***/ +/*** ***/ +/*** Bulk delete consumable objects marked for deletion in child ***/ +/*** object tables given a list of object ids passed in from a ***/ +/*** VARRAY. Called purge consumables function. ***/ +/**********************************************************************/ + + PROCEDURE Purge_consumables_work + (Obj_list IN Obj_list_t) + IS + + BEGIN + + --delete all children + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM armor WHERE object_id = Obj_list(i); + + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM battlefield_marker_objects WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM biographies nologging WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM creature_objects nologging WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM experience_points nologging WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM factory_objects nologging WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM intangible_objects nologging WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM location_lists nologging WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM mission_objects nologging WHERE object_id = Obj_list(i); + + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM object_variables nologging WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM property_lists nologging WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM resource_container_objects nologging WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM scripts nologging WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM tangible_objects nologging WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM token_objects nologging WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM vehicle_objects nologging WHERE object_id = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM weapon_objects nologging WHERE object_id = Obj_list(i); + --delete messages target(object_id) + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM messages nologging WHERE target = Obj_list(i); + FORALL i IN Obj_list.First..Obj_list.Last DELETE FROM objects nologging WHERE object_id = Obj_list(i); + END Purge_consumables_work; + + + -- + -- + -- + FUNCTION time_purge_consumables + (start_date_in in objects.deleted_date%type, + end_date_in in objects.deleted_date%type) + RETURN PLS_INTEGER IS + v_retval PLS_INTEGER := 0; + v_start_date DATE := start_date_in; + v_end_date DATE := end_date_in; + v_hours NUMBER := (v_end_date - v_start_date) * 24; + v_time NUMBER := 1; + BEGIN + dbms_output.put_line('Hours between dates: '||v_hours); + FOR i IN 1..v_hours LOOP + v_end_date := v_start_date + v_time/24; + dbms_output.put_line ('Calling proc with Start Date: '||to_char(v_start_date, 'dd-mon-yy hh24:mi:ss')||'-'||'End Date: '||to_char(v_end_date, 'dd-mon-yy hh24:mi:ss')); + v_retval := purge_consumables(v_start_date, v_end_date); + v_start_date := v_start_date + v_time/24; + + EXIT WHEN v_retval <> 0; + + END LOOP; + RETURN 0; + + EXCEPTION + WHEN OTHERS THEN + ROLLBACK; + dbms_output.put_line('Purge return value: '||v_retval); + RETURN SQLCODE; + END time_purge_consumables; + +end purge_methods2; + +/ + + GRANT EXECUTE ON "SWG"."PURGE_METHODS2" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package Body PURGE_PROCESS +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE BODY "SWG"."PURGE_PROCESS" +as + procedure update_account_list (source_table varchar2) as + begin + --Add new status codes + execute immediate + 'insert into statuses (id, description, do_purge, reviewed) ' || + 'select distinct status, status_desc, ''N'', ''N'' ' || + 'from ' || source_table || ' ' || + 'where not exists (select * from statuses where statuses.id = ' || source_table || '.status)'; + + --Add any new accounts. + execute immediate + 'insert into purge_accounts (station_id,purge_phase) ' || + 'select user_id, 0 ' || + 'from ' || source_table || ' ' || + 'where not exists (select * from purge_accounts where purge_accounts.station_id = ' || source_table ||'.user_id)'; + + --Reset purge phase on existing accounts who may have reactivated: + execute immediate + 'update purge_accounts ' || + 'set purge_phase = 0, ' || + 'purge_start_date = null ' || + 'where purge_phase<>0 ' || + 'and exists (select * from ' || source_table || ' , statuses ' || + 'where ' || source_table || '.user_id = purge_accounts.station_id ' || + 'and ' || source_table || '.status = statuses.id ' || + 'and statuses.do_purge=''N'')'; + + --Start purge process on accounts who have deactivated: + execute immediate + 'update purge_accounts ' || + 'set purge_phase = 1, ' || + 'purge_start_date=(select nvl(max(close_date),sysdate) from ' || source_table || + ' where ' || source_table || '.user_id = purge_accounts.station_id) ' || + 'where purge_phase=0 ' || + 'and exists (select * from ' || source_table || ', statuses ' || + 'where ' || source_table || '.user_id = purge_accounts.station_id ' || + 'and ' || source_table || '.status = statuses.id ' || + 'and statuses.do_purge=''Y'')'; + --TODO: immediate purge for banned accounts + end; + + function get_account_for_purge(p_purge_phase number, p_min_age number) return number + -- Grabs one account from the list to be purged, and sets a lock on it so that no other process + -- will attempt to purge it. (Ignores locks from more than 1 day ago, because those probably mean + -- something in the process failed.) + as + result number; + begin + select station_id + into result + from purge_accounts + where purge_accounts.purge_phase = p_purge_phase + and sysdate - nvl(purge_accounts.purge_phase_date, purge_accounts.purge_start_date) > p_min_age + and (purge_lock is null or sysdate - purge_lock > 1) + and rownum < 2 + order by purge_accounts.purge_start_date + for update; + + update purge_accounts + set purge_lock=sysdate + where station_id = result; + + return result; + end; + + procedure set_purge_status(p_station_id number, p_new_phase number) + as + begin + if (p_new_phase = 0) then + update purge_accounts + set purge_phase = p_new_phase, + purge_start_date = null, + purge_phase_date = null, + purge_lock = null + where station_id = p_station_id; + else + update purge_accounts + set purge_phase = p_new_phase, + purge_phase_date = sysdate, + purge_lock = null + where station_id = p_station_id; + end if; + + end; +end; + +/ + + GRANT EXECUTE ON "SWG"."PURGE_PROCESS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package Body SERVERCLOCK +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE BODY "SWG"."SERVERCLOCK" +as + + function get_last_save_time return number + as + result number; + begin + select + last_save_time + into + result + from + clock; + return result; + end; + +end; + +/ + + GRANT EXECUTE ON "SWG"."SERVERCLOCK" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package Body STATION_PLAYERS +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE BODY "SWG"."STATION_PLAYERS" +as + procedure update_character(p_clusterName in varchar2 ,p_characterId in networkid, p_characterName in varchar2, p_objectName in varchar2, p_x in number, p_y in number, p_z in number, p_sceneId in varchar2, p_cash_balance in number, p_bank_balance in number, p_objectTemplateName in varchar2, p_stationId in networkid, p_containedBy in networkid, p_createTime in number, p_playedTime in number , p_numLots in number) + as + m_enable_db_logging INTEGER := 0; + begin + insert into character_profile (cluster_name, character_id, character_name, object_name, x, y, z, scene_id, cash_balance, bank_balance, object_template_name, station_id, contained_by, create_time, played_time, num_lots) + values (p_clusterName, p_characterId, p_characterName, p_objectName, p_x, p_y, p_z, p_sceneId, p_cash_balance, p_bank_balance, p_objectTemplateName, p_stationId, p_containedBy, util.unix_time_2_oracle_date_PDT(p_createTime), util.unix_time_2_oracle_date_PDT(p_playedTime), p_numLots); + + + + exception + when dup_val_on_index then + begin + + update character_profile set + character_name = NVL(p_characterName,character_name), + object_name = NVL(p_objectName, object_name), + x = NVL(p_x, x), + y = NVL(p_y, y), + z = NVL(p_z, z), + scene_id = NVL(p_sceneId, scene_id), + cash_balance = NVL(p_cash_balance, cash_balance), + bank_balance = NVL(p_bank_balance, bank_balance), + object_template_name = NVL(p_objectTemplateName, object_template_name), + station_id = NVL(p_stationId, station_id), + contained_by = NVL(p_containedBy, contained_by), + create_time = NVL(util.unix_time_2_oracle_date_PDT(p_createTime), create_time), + played_time = NVL(util.unix_time_2_oracle_date_PDT(p_playedTime), played_time), + num_lots = NVL(p_numLots, num_lots) + where cluster_name = p_clusterName + and character_id = p_characterId; + + end; + when others then + m_enable_db_logging := db_error_logger.getLogLevel(); + IF (m_enable_db_logging > 0) THEN + db_error_logger.dblogerror(SQLCODE,'station_players.update_character : error.'); + IF (m_enable_db_logging > 1) THEN + NULL; + END IF; + END IF; + IF (db_error_logger.reraisecheck('station_players','update_character') = 1) THEN + RAISE; + END IF; + end; +end; + +/ + + GRANT EXECUTE ON "SWG"."STATION_PLAYERS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package Body UNDELETE_METHODS +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE BODY "SWG"."UNDELETE_METHODS" is + + FUNCTION restore_object + (object_id_in IN objects.object_id%TYPE) + RETURN NUMBER IS + BEGIN + --update an object and its children + --continue down tree with any object + --whose contained_by is a valid object id. + UPDATE objects + SET deleted = 0, + deleted_date = NULL + WHERE object_id = object_id_in; + + COMMIT; + RETURN 0; + + EXCEPTION + WHEN OTHERS THEN + ROLLBACK; + RETURN SQLCODE; + END restore_object; + +end undelete_methods; + +/ + + GRANT EXECUTE ON "SWG"."UNDELETE_METHODS" TO PUBLIC; +-------------------------------------------------------- +-- DDL for Package Body UTIL +-------------------------------------------------------- + + CREATE OR REPLACE PACKAGE BODY "SWG"."UTIL" +as + function unix_time_2_oracle_date_PDT(p_unix_time in number) return date + as + begin + return new_time( to_date('01011970','ddmmyyyy') + 1/24/60/60 * p_unix_time, 'GMT', 'PDT' ); + end; + + function unix_time_2_oracle_date_PST(p_unix_time in number) return date + as + begin + return new_time( to_date('01011970','ddmmyyyy') + 1/24/60/60 * p_unix_time, 'GMT', 'PST' ); + end; + + function unix_time_2_oracle_date_CDT(p_unix_time in number) return date + as + begin + return new_time( to_date('01011970','ddmmyyyy') + 1/24/60/60 * p_unix_time, 'GMT', 'CDT' ); + end; + + function unix_time_2_oracle_date_CST(p_unix_time in number) return date + as + begin + return new_time( to_date('01011970','ddmmyyyy') + 1/24/60/60 * p_unix_time, 'GMT', 'CST' ); + end; + + function unix_time_2_oracle_date(p_unix_time in number, p_timezone_offset in number) return date + as + begin + return ((to_date('01011970','ddmmyyyy') + 1/24/60/60 * p_unix_time) + p_timezone_offset/24); + end; + + function unix_to_oracle_date(p_unix_time in number, p_timezone_offset in number) return date + as + begin + return unix_time_2_oracle_date(p_unix_time, p_timezone_offset); + end; + +end; + +/ + + GRANT EXECUTE ON "SWG"."UTIL" TO PUBLIC;