Skip to Main Content

SQL Developer Data Modeler

Announcement

For appeals, questions and feedback about Oracle Forums, please email oracle-forums-moderators_us@oracle.com. Technical questions should be asked in the appropriate category. Thank you!

Interested in getting your voice heard by members of the Developer Marketing team at Oracle? Check out this post for AppDev or this post for AI focus group information.

Oracle Data Modeler - DDL Script preview

User_NRYK9Mar 16 2021

hi,
may i have an help about ddl script appearance, when i select DDL preview from a table on Phisycal Design i see this for trigger syntax, there are all LF in bad position and the code was write in one row format:
i.e. an example
CREATE OR REPLACE TRIGGER USER.TR00_MY_TAB
BEFORE INSERT OR UPDATE ON USER.MY_TAB
FOR EACH ROW
ENABLE DECLARE
V_SYSTIMESTAMP TIMESTAMP(6) DEFAULT SYSTIMESTAMP;
BEGIN

IF NOT ( INSERTING AND USER = ‘XXXXX’ AND UPPER ( SYS_CONTEXT ( ‘USERENV’ , ‘OS_USER’ ) ) = ‘ORACLE’ AND UPPER ( SYS_CONTEXT (
‘USERENV’ , ‘HOST’ ) ) IN ( ‘XXXXX’ , ‘XXXXX’ ) AND UPPER ( SYS_CONTEXT ( ‘USERENV’ , ‘DB_NAME’ ) ) IN ( ‘XXXXX’ ,
‘XXXXX’ , ‘XXXXX’ , ‘XXXXX’ , ‘XXXXX’ , ‘XXXXX’ , ‘XXXXX’ , ‘XXXXX’ , ‘XXXXX’ ) ) THEN IF INSERTING THEN : NEW . ID_TMST_INS : = V_SYSTIMESTAMP ;
END IF ; : NEW . ID_TMST_UPD : = V_SYSTIMESTAMP ; : NEW . ID_DEN_FUNZIONE : = TRIM ( : NEW . ID_DEN_FUNZIONE ) ; : NEW . ID_DEN_OPERATORE : =
TRIM ( : NEW . ID_DEN_OPERATORE ) ; : NEW . ID_TXT_COMMENTO : = TRIM ( : NEW . ID_TXT_COMMENTO ) ; END IF ; EXCEPTION WHEN OTHERS
THEN RAISE_APPLICATION_ERROR ( – 20599 , ‘Errore Trigger: ‘ | | $$PLSQL_UNIT | | ‘ alla linea: ‘ | | $$PLSQL_LINE | | CHR ( 10 ) | |
TRIM ( SQLERRM ) ) ; END ;
/
————————————
i prefer this layout
CREATE OR REPLACE TRIGGER USER.TR00_MY_TAB BEFORE
INSERT OR UPDATE ON USER.MY_TAB
FOR EACH ROW
ENABLE
DECLARE
V_SYSTIMESTAMP TIMESTAMP(6) DEFAULT SYSTIMESTAMP;
BEGIN

IF NOT ( INSERTING AND USER = ‘XXXXXX’
AND UPPER(SYS_CONTEXT(‘USERENV’, ‘OS_USER’)) = ‘ORACLE’
AND UPPER(SYS_CONTEXT(‘USERENV’, ‘HOST’)) IN ( ‘XXXXXX’, ‘XXXXXX’ )
AND UPPER(SYS_CONTEXT(‘USERENV’, ‘DB_NAME’)) IN
( ‘XXXXXX’, ‘XXXXXX’, ‘XXXXXX’, ‘XXXXXX’, ‘XXXXXX’, ‘XXXXXX’, ‘XXXXXX’, ‘XXXXXX’, ‘XXXXXX’ )
) THEN
IF INSERTING THEN
:NEW.ID_TMST_INS := V_SYSTIMESTAMP;
END IF;
:NEW.ID_TMST_UPD := V_SYSTIMESTAMP;
:NEW.ID_DEN_FUNZIONE := TRIM(:NEW.ID_DEN_FUNZIONE);
:NEW.ID_DEN_OPERATORE := TRIM(:NEW.ID_DEN_OPERATORE);
:NEW.ID_TXT_COMMENTO := TRIM(:NEW.ID_TXT_COMMENTO);
END IF;
EXCEPTION
WHEN OTHERS THEN
RAISE_APPLICATION_ERROR(-20599, ‘Errore Trigger: ‘ || $$PLSQL_UNIT || ‘ alla linea: ‘
|| $$PLSQL_LINE || CHR(10) || TRIM(SQLERRM));
END;
/
thanks

Comments

Post Details

Added on Mar 16 2021
2 comments
463 views