Preparing for Oracle T4SQL Templates

Author: AbelCheng

T4SQLTemplateLibrary/ConsoleTest/App.Config

@@ -5,7 +5,7 @@
 	</configSections>
 	<connectionStrings>
 		<!--<add name="T4SQLDB" providerName="System.Data.SqlClient" connectionString="Data Source=.\SQLEXPRESS;Initial Catalog=T4SQLDB;Integrated Security=True"/>-->
-		<add name="T4SQLDB" providerName="Oracle.ManagedDataAccess.Client" connectionString="Data Source=ORCL;User Id=/" />
+		<add name="T4SQLDB" providerName="Oracle.ManagedDataAccess.Client" connectionString="Data Source=ORCL;User Id=T4SQL;Password=T4SQL#Pwd" />
 	</connectionStrings>
 	<appSettings>
 		<!--<add key="Engine_Package" value="T4SQL.ENGINE_" />-->

T4SQLTemplateLibrary/Databases/Oracle/T4SQLDB/Scripts/4-Packages/02-ENGINE.pck

@@ -135,15 +135,15 @@ END ENGINE;
 CREATE OR REPLACE PACKAGE BODY T4SQL.ENGINE IS
 
 
-g_Polling_Interval	NUMBER(3);
+g_Polling_Interval	NUMBER;
 
 
 FUNCTION GET_POLL_INTERVAL
 RETURN	NUMBER
 AS
 BEGIN
 	IF g_Polling_Interval IS NULL THEN
-		SELECT	NUMBER_VALUE		INTO g_Polling_Interval
+		SELECT	NUMBER_VALUE / 86400.0		INTO g_Polling_Interval
 		FROM	T4SQL.ENGINE_CONFIG
 		WHERE	ELEMENT_NAME = 'POLL_INTERVAL';
 	END IF;
@@ -208,6 +208,8 @@ BEGIN
 		ELSE
 			outSwitch_To_Mode	:= 'Standby';
 		END IF;
+	ELSE
+		outSwitch_To_Mode	:= 'Standby';
 	END IF;
 
 	SERVICE_PING('N');

T4SQLTemplateLibrary/Databases/Oracle/T4SQLDB/Scripts/4-Packages/03-CMD.pck

@@ -1,4 +1,4 @@
-CREATE OR REPLACE PACKAGE T4SQL.CMD IS
+CREATE OR REPLACE PACKAGE T4SQL.CMD AUTHID CURRENT_USER IS
 
 ----------------------------------------------------------------------------------------------------
 --
@@ -75,6 +75,7 @@ BEGIN
 	END IF;
 
 	EXECUTE IMMEDIATE tSQL;
+	COMMIT;
 
 	tSQL	:= 'SELECT START_BUILD, OBJECT_CODE, COMPILED_ERROR FROM ' || inWorkitem_Table || ' WHERE WORKITEM_NAME = :workitem_name';
 

T4SQLTemplateLibrary/Databases/Oracle/Test/Scripts/2-InitData/1-CreateSampleWorkspace.sql

@@ -1,3 +1,5 @@
+--	Run as a user with execute permission on T4SQL.META package
+
 BEGIN
 	IF NOT T4SQL.META.EXISTS_TABLE('test.sample_workspace') AND NOT T4SQL.META.EXISTS_TABLE('test.sample_properties') THEN
 		T4SQL.META.CREATE_WORKSPACE('test.sample_workspace', 'test.sample_properties', 'Sample Workspace', 'test');

T4SQLTemplateLibrary/Databases/Oracle/Test/Scripts/2-InitData/2-GenerateTestData.sql

@@ -1,4 +1,4 @@
-
+--	Run in test schema
 
 insert into test.date_time_points (date_, catalog_id, position_id, value_, other_col)
 select

T4SQLTemplateLibrary/Databases/Oracle/Test/Scripts/2-InitData/3-SetupWorkitems.sql

@@ -1,3 +1,5 @@
+--	Run after your T4SQL Template Engine (either Windows Service or Console Test) has started.
+
 DECLARE
 	tExists	PLS_INTEGER;
 BEGIN

T4SQLTemplateLibrary/Databases/Oracle/Test/Scripts/Privileges.sql

@@ -1 +1,2 @@
 GRANT SELECT, INSERT ON TEST.SAMPLE_PROPERTIES TO T4SQL;
+GRANT SELECT, UPDATE ON TEST.SAMPLE_WORKSPACE TO T4SQL;

T4SQLTemplateLibrary/Databases/SqlServer/Schema Objects/Schemas/T4SQL/Programmability/Stored Procedures/T4SQL.ENGINE_STANDBY_PING.proc.sql

@@ -23,7 +23,9 @@ AS
 			SET	@outSwitch_To_Mode	= N'Primary';
 		ELSE
 			SET	@outSwitch_To_Mode	= N'Standby';
-	END;
+	END
+	ELSE
+		SET	@outSwitch_To_Mode	= N'Standby';
 
 	EXEC T4SQL.ENGINE_SERVICE_PING 0;
 

T4SQLTemplateLibrary/T4Templates/Date/VTimePointsToRanges.Oracle.sql

@@ -1,7 +1,13 @@
 CREATE OR REPLACE VIEW <#= ObjectView #> AS
 SELECT
 -- This code was generated by <#= TemplateName #> @ <#= DateTime.Now.ToString() #>
-	*
+<#
+	string tEndDateCol = IsEndDateNext ? DateColumn : string.Format("({0} - 1)", DateColumn);
+#>
+	<#= SelectColumns.InsertLeft() #>
+	<#= DateColumn #>		AS <#= RangeStartDateColumn #>,
+	LEAD(<#= tEndDateCol #>, 1<#= DefaultEndDate.IsNullString() ? "" : ", " + DefaultEndDate #>) OVER (PARTITION BY <#= Key_Columns #> ORDER BY <#= DateColumn #>)
+								AS <#= RangeEndDateColumn #>
 FROM
 	<#= SourceView #>
 

T4SQLTemplateLibrary/T4Templates/Date/VTimePointsToRanges.cs

@@ -280,9 +280,74 @@ public virtual string TransformText()
 
             #line default
             #line hidden
-            this.Write("\r\n\t*\r\nFROM\r\n\t");
+            this.Write("\r\n");
+            
+            #line 4 "E:\Projects\T4SQL\T4SQLTemplateLibrary\T4Templates\Date\VTimePointsToRanges.Oracle.sql"
+
+	string tEndDateCol = IsEndDateNext ? DateColumn : string.Format("({0} - 1)", DateColumn);
+
+            
+            #line default
+            #line hidden
+            this.Write("\t");
+            
+            #line 7 "E:\Projects\T4SQL\T4SQLTemplateLibrary\T4Templates\Date\VTimePointsToRanges.Oracle.sql"
+            this.Write(this.ToStringHelper.ToStringWithCulture(SelectColumns.InsertLeft()));
+            
+            #line default
+            #line hidden
+            this.Write("\r\n\t");
+            
+            #line 8 "E:\Projects\T4SQL\T4SQLTemplateLibrary\T4Templates\Date\VTimePointsToRanges.Oracle.sql"
+            this.Write(this.ToStringHelper.ToStringWithCulture(DateColumn));
+            
+            #line default
+            #line hidden
+            this.Write("\t\tAS ");
+            
+            #line 8 "E:\Projects\T4SQL\T4SQLTemplateLibrary\T4Templates\Date\VTimePointsToRanges.Oracle.sql"
+            this.Write(this.ToStringHelper.ToStringWithCulture(RangeStartDateColumn));
+            
+            #line default
+            #line hidden
+            this.Write(",\r\n\tLEAD(");
+            
+            #line 9 "E:\Projects\T4SQL\T4SQLTemplateLibrary\T4Templates\Date\VTimePointsToRanges.Oracle.sql"
+            this.Write(this.ToStringHelper.ToStringWithCulture(tEndDateCol));
+            
+            #line default
+            #line hidden
+            this.Write(", 1");
+            
+            #line 9 "E:\Projects\T4SQL\T4SQLTemplateLibrary\T4Templates\Date\VTimePointsToRanges.Oracle.sql"
+            this.Write(this.ToStringHelper.ToStringWithCulture(DefaultEndDate.IsNullString() ? "" : ", " + DefaultEndDate));
+            
+            #line default
+            #line hidden
+            this.Write(") OVER (PARTITION BY ");
+            
+            #line 9 "E:\Projects\T4SQL\T4SQLTemplateLibrary\T4Templates\Date\VTimePointsToRanges.Oracle.sql"
+            this.Write(this.ToStringHelper.ToStringWithCulture(Key_Columns));
+            
+            #line default
+            #line hidden
+            this.Write(" ORDER BY ");
+            
+            #line 9 "E:\Projects\T4SQL\T4SQLTemplateLibrary\T4Templates\Date\VTimePointsToRanges.Oracle.sql"
+            this.Write(this.ToStringHelper.ToStringWithCulture(DateColumn));
+            
+            #line default
+            #line hidden
+            this.Write(")\r\n\t\t\t\t\t\t\t\tAS ");
+            
+            #line 10 "E:\Projects\T4SQL\T4SQLTemplateLibrary\T4Templates\Date\VTimePointsToRanges.Oracle.sql"
+            this.Write(this.ToStringHelper.ToStringWithCulture(RangeEndDateColumn));
+            
+            #line default
+            #line hidden
+            this.Write("\r\nFROM\r\n\t");
 
-            #line 6 "E:\Projects\T4SQL\T4SQLTemplateLibrary\T4Templates\Date\VTimePointsToRanges.Oracle.sql"
+            #line 12 "E:\Projects\T4SQL\T4SQLTemplateLibrary\T4Templates\Date\VTimePointsToRanges.Oracle.sql"
             this.Write(this.ToStringHelper.ToStringWithCulture(SourceView));
 
             #line default