107706_es-ES

liliconcom

Necesidad de convertir el datetime decimal a ddMONYY

Estoy utilizando un indicador de fecha y hora para obtener la fecha de inicio y la fecha de finalización de mi consulta de SQL.  El indicador de fecha está usando decimal.  ¿Cómo convierto el decimal al formato ddMonyy?  Mi código está abajo.  Verá en mi selección que tengo t1.Login_Date con la variable startDT y t1.Login_Date con la variable endDT.  Aquí es donde necesito convertir el decimal a la fecha.  He probado Cast and convert y ambos juntos y no puedo hacer que funcione.  Cualquier ayuda sería muy apreciada.

 

NombresDefaultToHere (1);

// Escrito por Vince Faller

Re: Necesidad de convertir el datetime decimal a ddMONYYPude incorporar tu sugerencia en mi código. Gracias por la ayuda.Re: Necesidad de convertir el datetime decimal a ddMONYY

Aquí hay un ejemplo simple para hacer la conversión que desea

Names Default To Here( 1 );

theDate = Today();

charDate = Uppercase( Format( theDate, "ddmonyyyy" ) );
Show( charDate );

finalDate = Substr( charDate, 1, 5 ) || Substr( charDate, -2 );
Show( finalDate );

Re: Necesidad de convertir el datetime decimal a ddMONYY

NombresDefaultToHere (1);

// Escrito por Vince Faller
// Hace que un calendario aparezca en una caja de numedit (por defecto ahora)
// Nota, esto solo funciona en JMP 11 o superior
dateBox = Función (
{timething = Today ()},
{newbox},
newbox = Eval (
Sustituir(
Nombre Expr (
Cuadro de edición de números (
timething, // Eval (Sub ()) debido a la peculiaridad de JMP
10, // Solo necesito esto porque JMP no tiene un ancho predeterminado
<< Configurar función (
Función ({self},
{}
Si (falta) (auto << obtener),
self << Set (Eval (DUMMY)) // Establece la fecha en el argumento de temporización
)
)
)
<< Establecer formato (Formato ("m / d / yh: m: s", 23, 0)); // Hace formato de fecha y hora para el cuadro (da calendario)
)
)
Expr (DUMMY), timething
)
);
caja nueva
);

nw =
Nueva ventana ("Ingresar rango de fechas",
LineUpBox (NCol (2),
TextBox ("Start DateTime"), start = dateBox (Today () - InDays (12)),
TextBox ("End DateTime"), end = dateBox (),
ButtonBox ("Cancelar", nw << cerrar ventana), ButtonBox ("Obtener datos", runScript)
));



runScript = Expr (nw << Cerrar ventana;