TBL_COL(b_key).COL_NAME; -- ISP_OUPUT_STR('--La colonne ' || NEW_TBL.TBL_COL(b_key).COL_NAME || ' existe déjà') ,
TBL_COL(b_key)COL_NAME || ' '; --La variable TMP sera utilisé pour savoir s'il faut exécuter la commande une fois celle-ci complétée TMP := 0; ---Comparaison des types de données antre la colonne existante et la colonne du record de description IF UPPERCOL_TYPE || ' ';TMP := 1; END IF, THEN STR := STR || NEW_TBL.TBL_COL(b_key)Comparaison de la valeur par défaut entre la colonne existante et la colonne du record de description IF NVL(TRIM(TMP_DEFAULT),'NULL')='NULL' AND NEW_TBL.TBL_COL(b_key).COL_DEFAULT IS NOT NULL THEN STR := STR || 'DEFAULT ''' || REPLACE(NEW_TBL.TBL_COL(b_key).COL_DEFAULT ,
TBL_COL(b_key), COL_DEFAULT IS NULL THEN STR := STR || 'DEFAULT NULL, issue.1 ,
TBL_COL(b_key)COL_DEFAULT, Comparaison de la nullabilité entre la colonne existante et la colonne du record de description IF NEW_TBL.TBL_COL(b_key).COL_NULLABLE = FALSE AND TMP_NULLABLE = 'Y' THEN STR := STR || 'NOT NULL ';TMP := 1 ,
TBL_COL(b_key)COL_CHECKTBL_COL(b_key)COL_CHECK || ') '; TMP := 1; END IF, IF TMP != 0 THEN --Si des modifications ont été précédemment détectées alors on exécute la commande ISP_OUPUT_STR ,
Une colonne du même nom n'a pas été trouvée ISP_OUPUT_STR, La colonne ' || NEW_TBL.TBL_COL(b_key).COL_NAME || ' doit être créée') ,
20' ,'SELDR0133','25' ,'SELDR0028','30' ,'SELDR0080','35' ,'SELDR0025','40' ,'SELDR0092','42' ,'SELDR0029','45' ,'SELDR0087','50' ,'SELDR0023','55' ,'SELDR0024','60' ,'SELDR0084','65, DECODE(RECORD_STATUSREPLACE(SRCOuverture de la connexion vers la base d'audit Audit_DB_Conn = DriverManager.getConnection (Connection_String ,
Data Base Connection OK, Trace.GN_NIVEAU_LOG_DEBUG ,
getSize().height ,
setBorder(new javax.swing.border.BevelBorder(javax.swing.border, BevelBorder.LOWERED) ,