How to solve the JMP Alarm with error "deleted object reference: day

Question

This script is running well in JMP14 version, but when I using in JMP18 version the alarm happened.

Hopefully getting a help from everyone.

Thank you so much

jthi · Answer

You are using Modal window and trying to access the values AFTER the modal window has been closed -> those values/references are gone at that point. I can see you are using << Return Result, so you could utilize that instead of << Get, so instead of

days = days << Get;

use

days = QueryOptionsChooser["days"];

Note that you might have to do similar changes to also display boxes.

Other option would be to collect the results already inside the modal when Button Box "OK" is pressed, so

Button Box("OK")

would change to

Button Box("OK",
	days = days << get;
)

And again, similar changes might be required elsewhere

ThoPhan · Answer

Hi jthi, Thanks for an approaching this, below is the script and I also attached the file. Clear Log(); DefaultStartTime = (today()-12*3600); DefaultEndTime = Today(); User = Get Environment Variable( "UserName" ); HourAlertRateDefault = 5; SixHourAlertRateDefault = 5; start_week = Week Of Year( Today() ); list_weeks = {}; For( i = 1, /*i<=10 &*/ i <= start_week, i++, //the i<=10 limits the combobox to last 10 weeks //iwwtodate(start_week - (i - 1), year(today()), 2 /*Monday*/ ) Insert Into( list_weeks, Eval( "WW" || Char( start_week - (i - 1) ) ) ) ); User = Get Environment Variable( "UserName" ); // Define time function. iwwtodate = Function( {_ww_, _year_, _dayofweek_}, //Local Variables {_ww01thisyear_ = 0, _sundayww01_ = 0}, _ww01thisyear_ = Informat( "01Jan" || Char( _year_ ) ); _sundayww01_ = _ww01thisyear_ - (Day Of Week( _ww01thisyear_ ) - 1) * 24 * 3600; (_ww_ - 1) * 7 * 24 * 3600 + _sundayww01_ + (_dayofweek_ - 1) * 24 * 3600 ; ); date_box = Function( //makes Graham's datebox that is hard to mess up {timething = Today()}, {newbox}, current_ver = Left( JMP Version(), 2 ); If( Num( current_ver ) >= 11, newbox = Eval( Substitute( Name Expr( Number Edit Box( timething, //Eval(Sub()) because of JMP quirk 10, //just need this because JMP doesn't default a width < Informat( EndTimeSelection, "m/d/y h:m:s" ), Eval( expr_TimeCheck ), Eval( expr_Scrap_SQL ) ); ); //end expr_TimeCheck If( Informat( StartTimeSelection, "m/d/y h:m:s" ) > Informat( EndTimeSelection, "m/d/y h:m:s" ), Eval( expr_TimeCheck ), VisionStartTime = Format( Max( Informat( StartTimeSelection, "m/d/y h:m:s" ), 86400 * Floor( (Informat( EndTimeSelection, "m/d/y h:m:s" ) - 86400) / 86400 ) ), "m/d/y h:m:s" ); If( Today() - Informat( EndTimeSelection, "m/d/y h:m:s" ) > 86400, VisionEndTime = Format( Min( Informat( EndTimeSelection, "m/d/y h:m:s" ), 86400 * Ceiling( (Informat( EndTimeSelection, "m/d/y h:m:s" ) - 86400) / 86400 ) ), "m/d/y h:m:s" ), VisionEndTime = Format( Min( Informat( VisionStartTime, "m/d/y h:m:s" ) + 86400, Informat( EndTimeSelection, "m/d/y h:m:s" ) ), "m/d/y h:m:s" ) ); ); ); SPL_expr = Expr( QueryInfo = "DRIVER=SQL Server;SERVER=" || PlantName || "MESSQLODS;APP=Microsoft Office XP;WSID=FS-1261;DATABASE=ODS;Trusted_Connection=Yes"; //QueryInfo = "DRIVER=SQL Server;SERVER=" || PlantName || //"messqlods.fs.local;APP=Microsoft Office XP; WSID=FS-10967;DATABASE=ODS;Trusted_Connection=Yes"; CHT PWL SPL CV quick monitor V2.3.1.0.jsl

jthi · Answer

Whatever days is referring to (number edit box or something like that is my guess) has been deleted. Impossible to say why because we cannot see the script

Names Default To Here(1);

nw = New Window("", days = Number Edit Box());
Show(days << get);
nw << close window;
Show(days << get);