795593_en-US

liliconcom

printing variable to textbox in variability chart

when i run the following script, the charts are producted for each sample, however the textbox print sampleName instead of actually printing the value of the sample name.  how do i get around this?

 

thanks!

 

// Create a new window with variability charts for each sample name
New Window("whiteshirts - Variability Chart",
	V List Box(
		Current Data Table(summaryTable);
		For Each Row(
			summaryTable,
			sampleName = Column(summaryTable, "SAMPLE_NAME")[Row()];
			grandMin = Column(summaryTable, "Min(LAB_L)")[Row()];
			grandMax = Column(summaryTable, "Max(LAB_L)")[Row()];
			Print(sampleName, grandMin, grandMax);
 
            /*Text Box( "Where(:SAMPLE_NAME == " || char(sampleName) || ")", <<SET wrap=""></SET>

Edit 2024-09-05 jthi: added jsl formatting

Automation and ScriptingData Exploration and VisualizationQuality and Process EngineeringRe: printing variable to textbox in variability chart

The text used in filter isn't being evaluated so it will be left as sampleName. Here is one way how you could evaluate it

Names Default To Here(1);

dt = Open("$SAMPLE_DATA/Big Class.jmp");

Column(dt, 2) << Set Name("shirt");
Column(dt, 3) << Set Name("SAMPLE_NAME");
Column(dt, 4) << Set Name("LAB_L");

dt_summary = dt << Summary(
	Group(:SAMPLE_NAME),
	Min(:LAB_L),
	Max(:LAB_L),
	Freq("None"),
	Weight("None"),
	Link to original data table(0),
	output table name("Summary of Big Class grouped by SAMPLE_NAME")
);


nw = New Window("whiteshirts - Variability Chart",
	V List Box(
		For Each Row(
			dt_summary,
			sampleName = Column(dt_summary, "SAMPLE_NAME")[Row()];
			grandMin = Column(dt_summary, "Min(LAB_L)")[Row()];
			grandMax = Column(dt_summary, "Max(LAB_L)")[Row()];
			Print(sampleName, grandMin, grandMax);
 
            /*Text Box( "Where(:SAMPLE_NAME == " || char(sampleName) || ")", <<SET wrap=""></SET>