Versão funcional e operante

unknown · unknown · commit 390af9b3e558 · 2016-09-12T14:54:34.000-03:00
diff --git a/compile.bat b/compile.bat
@@ -1,3 +1,3 @@
 flex sqlscriptparser.lex
 bison -d sqlscriptparser.y
-gcc sqlscriptparser.tab.c lex.yy.c -o myparser.out
+gcc sqlscriptparser.tab.c lex.yy.c -o sqlparser.exe
diff --git a/sqlscriptparser.lex b/sqlscriptparser.lex
@@ -28,7 +28,8 @@
 "."												{}
 "*"												{}
 ","												{}
-[A-Z0-9]*							/*ignore*/
-
+"+" 											{}
+"?" 											{}
+[A-Z0-9a-z]*							/*ignore*/
 %%
 
diff --git a/sqlscriptparser.y b/sqlscriptparser.y
@@ -112,6 +112,7 @@ instrucao: CREATE_TABLE OWNER_OBJECT FIM_COMANDO  {
 	| FIM_COMANDO 					{} 
 	| OWNER_OBJECT 					{}
 	| FK_NAME						{}		
+	| CHECK_NAME					{}
 	| COLUMN						{}	
 //
  ;
diff --git a/teste.txt b/teste.txt
@@ -1,6 +1,4 @@
 
-
-
 DECLARE
   RESOURCE_BUSY EXCEPTION;
   PRAGMA EXCEPTION_INIT(RESOURCE_BUSY, -00054);
@@ -96,12 +94,27 @@ END;
 -- INDEX P/ FK
 CREATE INDEX SAFEPAY_ADM.PROM_IDX02 ON SAFEPAY_ADM.PROMOTION (IDT_PAYMENT_REQUEST_MODEL) TABLESPACE TSISAFEPAY01 INITRANS 8 ONLINE;
 
-ALTER TABLE SAFEPAY_ADM.TRANSACTION_CHECKOUT  ADD CONSTRAINT FUCK_CK01  CHECK( IND_CHECKOUT_TYPE IN (''W'', ''L'', ''T'', ''G'', ''M'', ''A'', ''V'')) ENABLE NOVALIDATE;
-
-CREATE INDEX SAFEPAY_ADM.PROM_IDX02 ON SAFEPAY_ADM.PROMOTION (IDT_PAYMENT_REQUEST_MODEL) TABLESPACE TSISAFEPAY01 INITRANS 8 ONLINE;
+ALTER TABLE SAFEPAY_ADM.TRANSACTION_CHECKOUT  ADD CONSTRAINT FUCK_CK01  CHECK( IND_CHECKOUT_TYPE IN ('W',)) ENABLE NOVALIDATE;
 
-ALTER TABLE SAFEPAY_ADM.TRANSACTION_CHECKOUT  ADD CONSTRAINT TRANCHEC_CK01  CHECK (IND_CHECKOUT_TYPE IN (''W'', ''L'', ''T'', ''G'', ''M'', ''A'', ''V'')) ENABLE NOVALIDATE;
+DECLARE
+  RESOURCE_BUSY EXCEPTION;
+  PRAGMA EXCEPTION_INIT(RESOURCE_BUSY, -00054);
+  NAOEXECUTOU BOOLEAN := TRUE;
+BEGIN
+  WHILE NAOEXECUTOU
+  LOOP
+    BEGIN
+      EXECUTE IMMEDIATE 'ALTER TABLE SAFEPAY_ADM.TRANSACTION_CHECKOUT  ADD CONSTRAINT TRANCHEC_CK01  CHECK (IND_CHECKOUT_TYPE IN (''W'', ''L'', ''T'', ''G'', ''M'', ''A'', ''V'')) ENABLE NOVALIDATE';
+      NAOEXECUTOU := FALSE;
+			DBMS_OUTPUT.PUT_LINE('RECRIADA TRANCHEC_CK01'); 
+    EXCEPTION
+      WHEN RESOURCE_BUSY THEN
+        DBMS_LOCK.SLEEP(SECONDS =>1);
+      WHEN OTHERS THEN
+        RAISE;
+    END;
+  END LOOP;
+END; 
+/
 
---aaaaaa teste
 
-bbbb

Original file line number	Diff line number	Diff line change
`@@ -112,6 +112,7 @@ instrucao: CREATE_TABLE OWNER_OBJECT FIM_COMANDO {`
`112`	`112`	`\| FIM_COMANDO {}`
`113`	`113`	`\| OWNER_OBJECT {}`
`114`	`114`	`\| FK_NAME {}`
	`115`	`+ \| CHECK_NAME {}`
`115`	`116`	`\| COLUMN {}`
`116`	`117`	`//`
`117`	`118`	`;`