107706_it-IT

liliconcom

È necessario convertire il datetime decimale in ddMONYY

Sto usando una richiesta datetime per inserire la data di inizio e la data di fine per la mia query sql.  Il prompt della data utilizza il decimale.  Come faccio a convertire il decimale in formato ddMonyy.  Il mio codice è sotto  Nella mia selezione vedrai che ho t1.Login_Date con la variabile startDT e t1.Login_Date con la variabile endDT.  Questo è dove ho bisogno di convertire il decimale alla data.  Ho provato Cast e convertire e entrambi insieme e non riesco a farlo funzionare.  Qualsiasi aiuto sarebbe molto apprezzato.

 

NamesDefaultToHere (1);

// Scritto da Vince Faller

Ri: È necessario convertire il datetime decimale in ddMONYYSono stato in grado di incorporare il tuo suggerimento nel mio codice. Grazie per l'aiuto.Ri: È necessario convertire il datetime decimale in ddMONYY

Ecco un semplice esempio per eseguire la conversione desiderata

Names Default To Here( 1 );

theDate = Today();

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

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

Ri: È necessario convertire il datetime decimale in ddMONYY

NamesDefaultToHere (1);

// Scritto da Vince Faller
// Fa apparire un calendario su un numeditbox (il valore predefinito è ora)
// Nota, funziona solo su JMP 11 o versioni successive
dateBox = Funzione (
{timething = Today ()},
{} NewBox,
newbox = Eval (
Sostituto(
Nome Expr (
Numero casella di modifica (
timething, // Eval (Sub ()) a causa di un quirk JMP
10, // Serve solo perché JMP non ha una larghezza predefinita
<< Imposta funzione (
Funzione ({self},
{},
Se (è mancante (auto << ricevi),
self << Set (Eval (DUMMY)) // Imposta la data sull'argomento del calendario
)
)
),
<< Imposta formato (Formato ("m / g / m: m: s", 23, 0)); // Crea il formato datetime per la casella (dà calendario)
)
),
Expr (DUMMY), orario
)
);
newBox;
);

nw =
Nuova finestra ("Inserisci intervallo di date",
LineUpBox ((2) NCol,
TextBox ("Start DateTime"), start = dateBox (Today () - InDays (12)),
TextBox ("End DateTime"), end = dateBox (),
ButtonBox ("Annulla", nw << chiudi finestra), ButtonBox ("Ottieni dati", runScript)
));



runScript = Expr (nw << Chiudi finestra;