339483_ja-JP

liliconcom

JSL>テキスト編集ボックスのデフォルトエントリの保持：コードの改善

こんにちはJMPコミュニティ、

開始文字列と終了文字列に基づいて列を自動的にグループ化する短いスクリプトをいじっています。これはローカルマシンでは正常に機能しますが、テキストエディットボックスのデフォルトエントリを保持するためのより良い方法があるかどうかを知りたいです。これらのデフォルトエントリを別のファイルに保持するよりも実行して実行しますか？

これまでの私のコードは次のとおりです。コードの一部を改善するための提案はありますか？

Names Default to Here (1);

dt = Current Data Table ();

CList = dt << get column names (string);

GList = {};


NCol = N Items (CList);

Try (dat = open("C:\AUTODAT.JMP", Invisible), 
  
  dat = new table ("AUTODAT", Invisible,
       Add Rows (2),
       New Column ("Entries", Character, Nominal, set values ({"NEW START", "NEW END"}))
        
      );
 );     
  
DefStart = column (dat, "Entries") [1];
DefEnd = column (dat, "Entries") [2]; 

Dlg = New Window (" AUTO-GROUPING: ENTER SEARCH STRINGS", 
 
 << Modal,
 Border Box (top (15), Bottom (15), Left (40), Right (40),
  V List Box (
   Text Box ("ENTER START STRING:"),
   ST = Text Edit Box (DefStart, Set Width (200)),
   
   Spacer Box (0,25),
   
   Text Box ("ENTER END STRING:"),
   ET = Text Edit Box (DefEnd, Set Width (200)),
   
   Spacer Box (0,25),
   
   Button Box ("OK", 
    StartString = ST << Get Text ();
    EndString = ET << Get Text ()
   ),
   
   Button Box ("CANCEL", 
    Close( dat, NoSave );
    Throw (1))
  )
  
 )
);

Column (dat, "Entries")  << set values (Eval List ({StartString, EndString}));

dat << Save As ("C:\AUTODAT.JMP", 1);

Close (dat, NoSave);

Switch = ((Length (StartString) > 0) * 10) + (Length (EndString) > 0); 

For (i = 1, i <= NCol, i++,

 Match (Switch, 
   11,
   if(Starts With (CList [i], StartString) & Ends With (CList [i], EndString), 
    Insert into (GList, CList [i])),
   10,
   if(Starts With (CList [i], StartString), 
    Insert into (GList, CList [i])),
   1, 
   if(Ends With (CList [i], EndString), 
    Insert into (GList, CList [i])),
   0, Throw (1)
   ) 
 
 
);


Group = dt << Group Columns (GList);

その他スクリプティングRe：JSL>テキスト編集ボックスのデフォルトエントリの保持：コードの改善

保存されたデータテーブルで行っていることを処理する私の標準的な方法は、保存する必要のある値をJSLとして保存することです。必要なJSLを使用してテキスト文字列を作成し、値を初期化して、Save Text File（）を使用して保存します。その後の実行では、Include（）を使用して値を初期化します。

Re：JSL>テキスト編集ボックスのデフォルトエントリの保持：コードの改善こんにちはジム、
常に物事の上に、そしてお金の上に。
ありがとう、
TS