I'm using code from an answer given in a different question thread which creates sequences and triggers based on the table name.
However, I have tables which are very close to exceededing (or have already reached) the 30 character limit so I get this error:
Error report:
ORA-00972: identifier is too long
ORA-06512: at line 15
00972. 00000 - "identifier is too long"
*Cause: An identifier with more than 30 characters was specified.
*Action: Specify at most 30 characters.
My question is, how do I concat the table names so they won't throw this error whislt still keeping some of the table name in the title? Maybe concat to something like 20 characters and "_SEQ" or "_TRIG" at the end?
Here's my code:
DECLARE
CURSOR TABLES
IS
SELECT *
FROM USER_TABLES
WHERE 0 =
(SELECT COUNT(*)
FROM USER_CONSTRAINTS
WHERE USER_CONSTRAINTS.TABLE_NAME = USER_TABLES.TABLE_NAME
AND USER_CONSTRAINTS.CONSTRAINT_TYPE = 'P'
);
BEGIN
FOR T IN TABLES
LOOP
EXECUTE IMMEDIATE 'CREATE SEQUENCE '||T.TABLE_NAME||'_SEQ START WITH 1';
EXECUTE IMMEDIATE 'UPDATE '||T.TABLE_NAME||' SET ID = '||T.TABLE_NAME||'Seq.NEXTVAL';
EXECUTE IMMEDIATE 'ALTER TABLE '||T.TABLE_NAME||' ADD PRIMARY KEY (ID)';
EXECUTE IMMEDIATE 'CREATE OR REPLACE TRIGGER '||T.TABLE_NAME||'_TRIG '||CHR(10) ||'BEFORE INSERT ON '||T.TABLE_NAME||' '||CHR(10) ||'FOR EACH ROW '||CHR(10) ||'BEGIN '||CHR(10) ||':NEW.ID := '||T.TABLE_NAME||'Seq.NEXTVAL; '||CHR(10) ||'END; ';
END LOOP;
END;
/