236013_it-IT

liliconcom

Esegui la casella della data prima di eliminare i dati

Nello script di seguito tutti i dati dalla mia tabella vengono eliminati prima di poter eseguire le caselle di dati. 

Sto cercando di eliminare tutti i dati al di fuori del mio intervallo di date.

Posso usare il modale in qualche modo?

 

Grazie - Matt

 

_____________________________________________________________

// Apri e ripristina tutti i nomi, chiedi la data
Nomi predefiniti qui (1);
dt_run = Open ("data.jmp");

// aspetta aperto
attendere (0);

dt_run << cancella gli stati delle righe;
dt_run << Cancella selezione colonna ();

startNW = Nuova finestra ("Start",
/// << Modale, /// non consente lo script o l'utente fino alla risposta della casella di testo
Data inizio << Data massima (Colma massima (: nome ("Data"))) << Data minima (Colma minima (: Nome ("Data")));


StartDate = Calendar Box (),
Button Box ("OK",
startNW << chiudi finestra;
StartDate << Imposta funzione (Function ({this, date}, theStartDate = StartDate << Get Date));
)

);

runEndDate = Expr (
endNW = Nuova finestra ("Fine",
EndDate = Calendar Box (),
Button Box ("OK",
endNW << chiudi finestra;
runSelect;
)
);
endDate << Data massima (Col max (: name ("Date"))) << Data min (Col Min (: Name ("Date")));
EndDate << Imposta funzione (Function ({this, date}, theEndDate = endDate << Get Date));
);

runSelect = Expr (
dt_run << seleziona where (: Name ("Date")> theStartDate &: Name ("Date") );

dt_run << Inverti selezione riga ();
dt_run << Elimina righe ();

Ri: Esegui la casella della data prima di eliminare i dati

Credo che spostando la riga StartDate dopo aver definito i componenti della finestra, otterrai ciò che desideri

//Open and reset all names, ask for date
Names Default To Here( 1 );
dt_run = Open( "data.jmp" );
//wait for open

Wait( 0 );
dt_run << clear row states;
dt_run << Clear Column Selection();
startNW = New Window( "Start", 
 <<MODAL> theStartDate & :Name( "Date" ) < theEndDate )
);
dt_run << Invert Row Selection();
dt_run << Delete Rows();</MODAL>

Ri: Esegui la casella della data prima di eliminare i dati

Ho rielaborato la tua sceneggiatura per consentire il flusso condizionale.

//Open and reset all names, ask for date
Names Default To Here( 1 );
dt_run = Open( "Data_date.jmp" );

//wait for open
Wait( 0 );
dt_run << clear row states;
dt_run << Clear Column Selection();
startNW = New Window( "Start Day (note: day after date)",
 <<MODAL> theStartDate & :Name( "Date" ) < theEndDate );
 dt_run << Invert Row Selection();
 dt_run << Delete Rows();
   
 dt_run << Save( "date_selection.jmp" );
 Close All( Data Tables, No Save );
 
 dt_run = Open( "date_selection.jmp" );

///Graphs
 New Window( "ProtoCP_Monitor - Variability Chart",
  V List Box(
   Variability Chart(
    Y( :PV waves ),
    X( :Date, :Time ),
    Std Dev Chart( 0 ),
    SendToReport(
     Dispatch( {"Variability Chart for PV"}, "2", ScaleBox, {Min( 0 ), Max( 2 ), Inc( 0.02 ), Minor Ticks( 0 )} )
    )
   ), 
 //more charts but deleted script to shorten post
  )
 ) << Journal();

// Save and Close The Journal
 Current Journal() << save Journal( "stuff.jrn" );
);

</MODAL>

Ri: Esegui la casella della data prima di eliminare i dati

L'eliminazione ha funzionato come mostrato di seguito.

Stesso problema anche se lo script decolla e fa i grafici prima che io abbia finito con la casella Calendario ()

//Open and reset all names, ask for date
Names Default To Here( 1 );
dt_run = Open( "Data_date.jmp");
//wait for open
wait(0);
dt_run << clear row states;
dt_run << Clear Column Selection();
startNW = New Window( "Start Day (note: day after date)",
<<MODAL> theStartDate & :Name( "Date" ) < theEndDate );
&nbsp;dt_run << Invert Row Selection();
&nbsp;dt_run << Delete Rows();
&nbsp;&nbsp;&nbsp;
&nbsp;dt_run << Save( "date_selection.jmp");
&nbsp;Close All( Data Tables, No Save );
);


Names Default To Here( 1 );
dt_run = Open( "date_selection.jmp");

///Graphs
New Window( "ProtoCP_Monitor - Variability Chart",
&nbsp;V List Box(
&nbsp;&nbsp;Variability Chart(
&nbsp;&nbsp;&nbsp;Y( :PV waves),
&nbsp;&nbsp;&nbsp;X( :Date, :Time ),
&nbsp;&nbsp;&nbsp;Std Dev Chart( 0 ),
&nbsp;&nbsp;&nbsp;SendToReport(
&nbsp;&nbsp;&nbsp;&nbsp;Dispatch(
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;{"Variability Chart for PV"},
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;"2",
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;ScaleBox,
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;{Min( 0 ), Max( 2 ), Inc( 0.02 ), Minor Ticks( 0 )}
&nbsp;&nbsp;&nbsp;&nbsp;)
&nbsp;&nbsp;&nbsp;)
&nbsp;&nbsp;),
&nbsp;//more charts but deleted script to shorten post
)<< Journal();

// Save and Close The Journal
Current Journal() << save Journal("stuff.jrn");</MODAL>

 

come posso tenere lo script in attesa fino al completamento della casella del calendario?

Grazie