cheveguerra/DBCheck
1
0
Fork 0
mirror of https://github.com/KeymonSoft/DBCheck.git synced 2026-04-18 03:39:17 +00:00
Code Issues Packages Projects Releases Wiki Activity

.

Browse Source
This commit is contained in:
cheveguerra
2023-09-03 22:17:40 -06:00
parent 69640d3cbe
commit 4fccf5f0db
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
B4A/Subs.bas
View File

@@ -12,8 +12,6 @@ Sub Process_Globals
Private su As StringUtils 'Usa la libreria StringUtils 'ignore Private su As StringUtils 'Usa la libreria StringUtils 'ignore
End Sub End Sub
'Linea de prueba 5
'Convierte una fecha al formato yyMMddHHmmss 'Convierte una fecha al formato yyMMddHHmmss
Sub fechaKMT(fecha As String) As String 'ignore Sub fechaKMT(fecha As String) As String 'ignore
' if starter.logger then Log(fecha) ' if starter.logger then Log(fecha)
@@ -25,6 +23,8 @@ Sub fechaKMT(fecha As String) As String 'ignore
Return nuevaFecha Return nuevaFecha
End Sub End Sub
'Linea XX
'Regresa la fecha y hora de hoy a las 00:00 en el formato "yyMMddHHMMSS" 'Regresa la fecha y hora de hoy a las 00:00 en el formato "yyMMddHHMMSS"
Sub fechaInicioHoy As String 'ignore Sub fechaInicioHoy As String 'ignore
Dim OrigFormat As String = DateTime.DateFormat 'save orig date format Dim OrigFormat As String = DateTime.DateFormat 'save orig date format