PDA

Ver la Versión Completa : [Sintaxis] Tratamiento de fechas de COBOL


Dasije
14 de julio de 2016, 01:21
Así podemos tratar las fechas en Windew con las variables de fechas provenientes del COBOL:

sFecha is string

Trace("Diferencias entre 14/07/2016 hasta el 30/07/2016")
Trace("Te lo devuelve en AAAMMDDHHMMSS")
Trace ("")
Trace (DateTimeDifference("20160714","20160730"))
Trace ("")
Trace (("La fecha de hoy es : ")+DateSys())
Trace ("")
Trace (("El mes de hoy es : ")+CurrentMonth())
Trace ("")
Trace (("El Año de hoy es : ")+CurrentYear())
Trace ("")
Trace (("El último día de la semana : ")+LastDayOfWeek(DateSys()))
Trace ("")
Trace (("El último día del mes : ")+LastDayOfMonth(DateSys()))
Trace ("")
Trace (("El número de semana del año : ")+WeekNumber(DateSys()))
Trace ("")
sFecha=DateToString(DateSys())
Trace ("Convierte formato AAAAMMDD a DD/MM/YYYY : "+sFecha)
Trace ("")
Trace ("Convierte formato DD/MM/YYYY a AAAAMMDD : "+StringToDate(sFecha))


Saludos.