392578_ja-JP

liliconcom

SQLクエリ出力データテーブルに名前を付け、ファイル名に日付と時刻を追加するようにユーザーに促す方法は?

親愛なる皆さん

私は JMP スクリプトを初めて使用するため、次のトピックについて専門家のアドバイスを求めています。

 

Query Builder を使用して SQL クエリ (非表示) を作成しましたが、次のことについて支援が必要です。

 

- データ テーブル ファイルを挿入するようにユーザーに促します名前 (ポップアップ ウィンドウ);

- 日付と時刻を追加 ( ddmonyyyy:h:m:s ) 出力データ テーブルへ

 

私がスクリプト化できたのは、以下のとおりです。

Names Default To Here( 1 );
dt=New SQL Query(
 Version( 130 ),
 Connection(
  "ODBC:DSN=DB001.00.G_FE_JMP15;DBQ=Y:\OFFICIAL_DATABASES\QA_Admin\Stability\DB001.00.G.StabilityStudies_FE_StudiesCompiler_JMP15.accdb;DriverId=25;FIL=MS Access;MaxBufferSize=2048;PageTimeout=5;UID=admin;"
 ),
 QueryName( "Query_DB001.00.G.StabilityStudies_FE_StudiesCompiler_10Jun2021" ),
 Select(
Column( "StudyID", "t1" ),
  Column( "TimePointID", "t1" ),
  Column( "StabilityClimaticConditions", "t1" ),
  Column( "TestMonth", "t1" ),
  Column( "ProgramComments", "t1" ),
  Column( "Test1", "t1" ),
  Column( "Test1Specification", "t1" ),
  Column( "Test1Units", "t1" ),
  Column( "Test 01", "t1" ),
  Column( "intTest1", "t1" ),
  Column( "Test2", "t1" ),
  Column( "Test2Specification", "t1" ),
  Column( "Test2Units", "t1" ),
  Column( "Test 02", "t1" ),
  Column( "intTest2", "t1" ),
  Column( "Test3", "t1" ),
  Column( "Test3Specification", "t1" ),
  Column( "Test3Units", "t1" ),
  Column( "Test 03", "t1" ),
  Column( "intTest3", "t1" ),
  Column( "Test4", "t1" ),
  Column( "Test4Specification", "t1" ),
  Column( "Test4Units", "t1" ),
  Column( "Test 04", "t1" ),
  Column( "intTest4", "t1" ),
  Column( "Test5", "t1" ),
  Column( "Test5Specification", "t1" ),
  Column( "Test5Units", "t1" ),
  Column( "Test 05", "t1" ),
  Column( "intTest5", "t1" ),
From( Table( "qry_ResultsUnion01_35", Alias( "t1" ) ) ),
 Where(
  EQ(
   Column( "StudyID", "t1" ),
   _AllRows_,
   UI(
    Comparison(
     Base(
      "Continuous",
      Prompt(
       "StudyID:",
       Character,
       PromptName( "t1.StudyID_1" )
      )
     )
    )
   )
  ) & In List(
   Column( "StabilityClimaticConditions", "t1" ),
   _AllRows_,
   UI(
    SelectListFilter(
     ListBox,
     Base(
      "Categorical",
      Prompt(
       "StabilityClimaticConditions:",
       Character,
       PromptName( "t1.StabilityClimaticConditions_1" )
      )
     )
    )
   )
  )
 )
 ) << Run Background(invisible);


nw = New Window( "Name data table",
 <<MODAL></MODAL>

どうもありがとう、

F

データ表スクリプトRe：SQLクエリ出力データテーブルに名前を付け、ファイル名に日付と時刻を追加するようにユーザーに求める方法は？

最後のifステートメントをこれに変更してみてください。これにより、tableName参照が修正され、問題の原因となった可能性のあるスラッシュとコロンが削除されます。

 

//ask where to save the file (could skip this or define it in code)
fldr = pick directory( "Select where to save the file", "$Temp" );

//Save the file
If( nw["button"] == 1 & nw["tableName"] != "",
 dt << set name( nw["tableName"] );
 dt << save as( fldr || nw["tableName"] || Format Date( Today(), "yyyymmdd" ) || "-" || Char( Hour( Today() ) ) || Char( Minute( Today() ) ) || Char( Second( Today() ) ) || ".jmp");
);

//Open directory where file was saved (not needed)
Open(fldr);

Re：SQLクエリ出力データテーブルに名前を付け、ファイル名に日付と時刻を追加するようにユーザーに求める方法は？

お返事をありがとうございます！

私はまだこのレベルで問題を抱えています：

dt << set name( nw["tableName"] );

私が得るエラーメッセージはここにあります

 

私がそれを解決するのを手伝ってくれませんか？

 

再度、感謝します、

F

Re：SQLクエリ出力データテーブルに名前を付け、ファイル名に日付と時刻を追加するようにユーザーに求める方法は？

ほとんどの場合、スクリプトの実行はNew Query（の前に終了します。

 

バックグラウンドではなくフォアグラウンドでクエリを実行するか、クエリの前にモーダルを使用してユーザーから値を取得し、クエリの終了後に名前を変更するためにクエリ後のスクリプトを使用してみてください。