- VERSION 4.11.09

- Commit inicial

jRDC_Multi.b4j

@@ -0,0 +1,116 @@
+AppType=StandardJava
+Build1=Default,b4j.JRDCMulti
+File1=config.properties
+FileGroup1=Default Group
+Group=Default Group
+Library1=javaobject
+Library2=jcore
+Library3=jrandomaccessfile
+Library4=jserver
+Library5=jshell
+Library6=json
+Library7=jsql
+Library8=byteconverter
+Module1=DB1Handler
+Module2=DB2Handler
+Module3=DB3Handler
+Module4=DB4Handler
+Module5=GlobalParameters
+Module6=Manager
+Module7=RDCConnector
+Module8=TestHandler
+NumberOfFiles=1
+NumberOfLibraries=8
+NumberOfModules=8
+Version=10
+@EndOfDesignText@
+'Non-UI application (console / server application)
+#Region  Project Attributes 
+	#CommandLineArgs:
+	#MergeLibraries: True
+	' VERSION 4.11.09
+	'###########################################################################################################
+	'######################           PULL         #############################################################
+	'Ctrl + click ide://run?file=%WINDIR%\System32\cmd.exe&Args=/c&Args=git&Args=pull
+	'###########################################################################################################
+	'######################           PUSH         #############################################################
+	'Ctrl + click ide://run?file=%WINDIR%\System32\WindowsPowerShell\v1.0\powershell.exe&Args=github&Args=..\..\
+	'###########################################################################################################
+	'######################      PUSH TORTOISE GIT     #########################################################
+	'Ctrl + click ide://run?file=%WINDIR%\System32\WindowsPowerShell\v1.0\powershell.exe&Args=TortoiseGitProc&Args=/command:commit&Args=/path:"../"&Args=/closeonend:2
+	'###########################################################################################################
+#End Region
+
+'change based on the jdbc jar file
+'#AdditionalJar: mysql-connector-java-5.1.27-bin
+'#AdditionalJar: postgresql-42.7.0
+#AdditionalJar: ojdbc11
+
+Sub Process_Globals
+	Public srvr As Server
+'	Public rdcConnectorDB1 As RDCConnector
+'	Public rdcConnectorDB2 As RDCConnector
+'	Public rdcConnectorDB3 As RDCConnector
+'	Public rdcConnectorDB4 As RDCConnector
+	Public const VERSION As Float = 2.23
+	Type DBCommand (Name As String, Parameters() As Object)
+	Type DBResult (Tag As Object, Columns As Map, Rows As List)
+	Dim listaDeCP As List
+	Dim cpFiles As List
+	Public Connectors, commandsMap As Map
+End Sub
+
+Sub AppStart (Args() As String)
+	listaDeCP.Initialize
+	srvr.Initialize("")
+	Dim con As RDCConnector
+	Connectors = srvr.CreateThreadSafeMap
+'	commandsMap = srvr.CreateThreadSafeMap
+	commandsMap.Initialize
+	con.Initialize("DB1") 'Inicializamos el default de config.properties
+	Connectors.Put("DB1", con)
+	srvr.Port = con.serverPort
+	listaDeCP.Add("DB1")
+	cpFiles = File.ListFiles("./")
+	If cpFiles.Size > 0 Then
+		Log(cpFiles)
+		For i = 0 To cpFiles.Size - 1
+			If cpFiles.Get(i) = "config.DB2.properties" Then
+				Dim con As RDCConnector
+				con.Initialize("DB2")
+				Connectors.Put("DB2", con)
+				listaDeCP.Add("DB2")
+			End If
+			If cpFiles.Get(i) = "config.DB3.properties" Then
+				Dim con As RDCConnector
+				con.Initialize("DB3")
+				Connectors.Put("DB3", con)
+				listaDeCP.Add("DB3")
+			End If
+			If cpFiles.Get(i) = "config.DB4.properties" Then
+				con.Initialize("DB4")
+				Connectors.Put("DB4", con)
+				listaDeCP.Add("DB4")
+			End If  
+		Next
+	End If
+'	con.Initialize("DB1") 'Inicializamos el default de config.properties
+'	Connectors.Put("DB1", con)
+'	srvr.Port = con.serverPort
+	srvr.AddHandler("/test", "TestHandler", False)
+	srvr.AddHandler("/manager", "Manager", False)
+	srvr.AddHandler("/*", "DB1Handler", False)
+	srvr.AddHandler("/db1", "DB1Handler", False)
+	srvr.AddHandler("/DB1", "DB1Handler", False)
+	srvr.AddHandler("/db2", "DB2Handler", False)
+	srvr.AddHandler("/DB2", "DB2Handler", False)
+	srvr.AddHandler("/db3", "DB3Handler", False)
+	srvr.AddHandler("/DB3", "DB3Handler", False)
+	srvr.AddHandler("/db4", "DB4Handler", False)
+	srvr.AddHandler("/DB4", "DB4Handler", False)
+	srvr.Start
+	Log("===========================================================")
+	Log($"-===  jRDC is running on port: ${srvr.port} (version = $1.2{VERSION})   ===-"$)
+	Log("===========================================================")
+	StartMessageLoop
+End Sub