0
我使用Oracle 12.2C,我需要执行触发器:执行该触发器后我的触发器有什么问题?
审核表
CREATE TABLE "MY_USER"."AUDIT"
(
"TABLE_NAME" VARCHAR2(20 CHAR) NOT NULL ENABLE,
"REGISTER_ID" NUMBER(19, 0) DEFAULT 0 NOT NULL ENABLE,
"OPERATION" VARCHAR2(20 CHAR) NOT NULL ENABLE,
"DATETIME" TIMESTAMP(6) NOT NULL ENABLE,
"PO_DOCUMENT" CLOB,
CONSTRAINT "ENSURE_JSON" CHECK (po_document IS JSON) ENABLE
);
触发
CREATE OR REPLACE EDITIONABLE TRIGGER "MY_USER"."TRG_PARTNER"
AFTER DELETE OR INSERT OR UPDATE ON "MY_USER"."PARTNER"
FOR EACH ROW
DECLARE
vOperation VARCHAR2(6);
vTableName VARCHAR2(30) := 'PARTNER';
vLOGON_TYPE CHAR(1);
vLAST_UPDATE DATE;
vSTATUS CHAR(1);
vADMIN_PASSWORD VARCHAR2(255 CHAR);
vPASSWORD VARCHAR2(255 CHAR);
vSESSION_VALID_SECONDS NUMBER(10, 0);
vONBOARDING CHAR(1);
vID VARCHAR2(255 CHAR);
vNAME VARCHAR2(255 CHAR);
vNETWORK_CODE VARCHAR2(255 CHAR);
BEGIN
IF INSERTING THEN
vOperation := 'INSERT';
vLOGON_TYPE := :NEW.LOGON_TYPE;
vLAST_UPDATE := :NEW.LAST_UPDATE;
vSTATUS := :NEW.STATUS;
vADMIN_PASSWORD := :NEW.ADMIN_PASSWORD;
vPASSWORD := :NEW.PASSWORD;
vSESSION_VALID_SECONDS := :NEW.SESSION_VALID_SECONDS;
vONBOARDING := :NEW.ONBOARDING;
vID := :NEW.ID;
vNAME := :NEW.NAME;
vNETWORK_CODE := :NEW.NETWORK_CODE;
ELSIF UPDATING THEN
vOperation := 'UPDATE';
vLOGON_TYPE := :NEW.LOGON_TYPE;
vLAST_UPDATE := :NEW.LAST_UPDATE;
vSTATUS := :NEW.STATUS;
vADMIN_PASSWORD := :NEW.ADMIN_PASSWORD;
vPASSWORD := :NEW.PASSWORD;
vSESSION_VALID_SECONDS := :NEW.SESSION_VALID_SECONDS;
vONBOARDING := :NEW.ONBOARDING;
vID := :NEW.ID;
vNAME := :NEW.NAME;
vNETWORK_CODE := :NEW.NETWORK_CODE;
ELSIF DELETING THEN
vOperation := 'DELETE';
vLOGON_TYPE := :OLD.LOGON_TYPE;
vLAST_UPDATE := :OLD.LAST_UPDATE;
vSTATUS := :OLD.STATUS;
vADMIN_PASSWORD := :OLD.ADMIN_PASSWORD;
vPASSWORD := :OLD.PASSWORD;
vSESSION_VALID_SECONDS := :OLD.SESSION_VALID_SECONDS;
vONBOARDING := :OLD.ONBOARDING;
vID := :OLD.ID;
vNAME := :OLD.NAME;
vNETWORK_CODE := :OLD.NETWORK_CODE;
END IF;
INSERT INTO "MY_USER"."AUDIT" (TABLE_NAME, REGISTER_ID, OPERATION, DATETIME, PO_DOCUMENT)
VALUES (
vTableName,
vID,
vOperation,
sysdate,
json_object('logon_type' VALUE vLOGON_TYPE, 'last_update' VALUE vLAST_UPDATE, 'status' VALUE vSTATUS, 'admin_password' VALUE vADMIN_PASSWORD, 'password' VALUE vPASSWORD, 'session_valid_seconds' VALUE vSESSION_VALID_SECONDS, 'onboarding' VALUE vONBOARDING, 'id' VALUE vID, 'name' VALUE vNAME, 'network_code' VALUE vNETWORK_CODE)
);
END;
,并尝试插入的东西,我得到一个错误。但是如果我放弃这个触发器并执行相同的操作insert没有问题。
[2017年10月10日10时38分08秒] [42000] [1722] ORA-01722:无效号码
[2017年10月10日10时38分08秒] ORA-06512:在 “MY_USER.TRG_PARTNER” 58行
[2017年10月10日10时38分08秒] ORA-04088:触发器 'MY_USER.TRG_PARTNER'
什么是执行过程中的错误是错误的触发?这是我的插入:
INSERT INTO PARTNER
(ID, ADMIN_PASSWORD, LAST_UPDATE, LOGON_TYPE, NAME, ONBOARDING, PASSWORD, SESSION_VALID_SECONDS, STATUS, NETWORK_CODE)
VALUES ('example foo', 'foo', TO_DATE('2003/05/03 21:02:44', 'yyyy/mm/dd hh24:mi:ss'), 'T', 'foo', 'o', 'foo', 4344, 'A', 'foo');
和线路58 vNETWORK_CODE VARCHAR2(255 CHAR);这不是一个数字
合作伙伴
CREATE TABLE PARTNER (
ID VARCHAR2(255 CHAR) PRIMARY KEY,
ADMIN_PASSWORD VARCHAR2(255 CHAR) NOT NULL,
LAST_UPDATE DATE NOT NULL,
LOGON_TYPE CHAR(1) NOT NULL,
NAME VARCHAR2(255 CHAR) NOT NULL,
ONBOARDING CHAR(1) NOT NULL,
PASSWORD VARCHAR2(255 CHAR) NOT NULL,
SESSION_VALID_SECONDS NUMBER(10, 0) NOT NULL,
STATUS CHAR(1) NOT NULL,
NETWORK_CODE VARCHAR2(255 CHAR),
CONSTRAINT UK_PARTNER_NAME UNIQUE (NAME)
);
好吧,58线在哪里?错误是非常具体的。无论你有什么价值,它都不是一个有效的数字。 – OldProgrammer
不是Oracle专家,但该“第58行”表示问题出现在最后一个插入位置。我会写一些东西来找到你为特定语句获得的价值。 – HLGEM
什么是合作伙伴的ddl – Moudiz