This commit is contained in:
2023-09-03 22:17:40 -06:00
parent 69640d3cbe
commit 4fccf5f0db

View File

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