// LabelViewer_dt.jsl // Opens Data Viewer for current data table. Names Default to Here(1); here:root = "$ADDIN_HOME(com.jmp.nascif.labelViewer)"; pathName = Convert File Path( here:root ); If( !Class Exists( "loader" ), Include(Eval Insert("^pathName^/utils/loader.jsl"))); loader = New Object( "loader", {pathName} ); lv = loader:lazyLoad( "LabelViewer", loader ); if (IsEmpty(lv), Throw("Error loading LabelViewer, aborting."); ); here:dataTable = Current Datatable(); If(IsEmpty(here:dataTable), Throw("No data table open, aborting."); ); labelCols = here:dataTable << Get Label Columns; If(!NItems(labelCols), Throw("No labeled columns in data table, aborting."); ); firstCol = labelCols[1]; firstValue = firstCol[1]; here:filterz = EvalList({labelCols[1]}); here:whereExprz = Substitute(Expr(COL == VAL), Expr(COL), here:filterz[1], Expr(VAL), firstValue ); lv:setup(here:dataTable, NameExpr(here:whereExprz), here:filterz); lv:launch("Label Viewer - " || (here:dataTable << GetName), 1, //local:viewerModeVV, 1, //local:transposeV );