AppType=StandardJava
Build1=Default,b4j.JRDCMulti
File1=config.properties
FileGroup1=Default Group
Group=Default Group
Library1=byteconverter
Library2=javaobject
Library3=jcore
Library4=jrandomaccessfile
Library5=jserver
Library6=jshell
Library7=json
Library8=jsql
Module1=DB1Handler
Module10=RDCConnector
Module11=TestHandler
Module2=DB1JsonHandler
Module3=DB2Handler
Module4=DB2JsonHandler
Module5=DB3Handler
Module6=DB4Handler
Module7=GlobalParameters
Module8=Manager
Module9=ping
NumberOfFiles=1
NumberOfLibraries=8
NumberOfModules=11
Version=10.3
@EndOfDesignText@
'Non-UI application (console / server application)
#Region  Project Attributes 
	#CommandLineArgs:
	#MergeLibraries: True
	' VERSION 5.08.02
	'###########################################################################################################
	'######################           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 const VERSION As String = "5.08.12"
	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
	Dim onPing As Boolean = False
End Sub

Sub AppStart (Args() As String)
	listaDeCP.Initialize
	srvr.Initialize("")
	Dim con As RDCConnector
	Connectors = 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 ' Si existe el archivo DB2, lo usamos.
				Dim con As RDCConnector
				con.Initialize("DB2")
				Connectors.Put("DB2", con)
				listaDeCP.Add("DB2")
			End If
			If cpFiles.Get(i) = "config.DB3.properties" Then ' Si existe el archivo DB3, lo usamos.
				Dim con As RDCConnector
				con.Initialize("DB3")
				Connectors.Put("DB3", con)
				listaDeCP.Add("DB3")
			End If
			If cpFiles.Get(i) = "config.DB4.properties" Then ' Si existe el archivo DB4, lo usamos.
				con.Initialize("DB4")
				Connectors.Put("DB4", con)
				listaDeCP.Add("DB4")
			End If
		Next
	End If
	srvr.AddHandler("/ping", "ping", False) ' Agrega un manejador a la ruta "/test", asignando las solicitudes a la clase TestHandler, el último parámetro indica si el manejador debe ejecutar en un nuevo hilo (False en este caso)
	srvr.AddHandler("/test", "TestHandler", False) ' Agrega un manejador a la ruta "/test", asignando las solicitudes a la clase TestHandler, el último parámetro indica si el manejador debe ejecutar en un nuevo hilo (False en este caso)
	srvr.AddHandler("/manager", "Manager", 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.AddHandler("/DBJ", "DB1JsonHandler", False)
	srvr.AddHandler("/dbrquery", "DB1JsonHandler", False)
	srvr.AddHandler("/*", "DB1Handler", False) ' Si no se especifica una base de datos, entonces asignamos la solicitud a la DB1.
	srvr.Start
	Log("===========================================================")
	Log($"-========     jRDC is running on port: ${srvr.port} (Version: ${VERSION})      ========-"$)
	Log("===========================================================")
	StartMessageLoop
End Sub