487774_fr-FR

liliconcom

Comment obtenir des valeurs d'entrée spécifiques à partir d'une table de données de sous-ensemble à placer correctement dans un script JMP pour les enregistrer dans la table de données d'origine ?

Salut,

 

Je ne sais pas ce qui ne va pas avec mon script. Il est censé prendre les valeurs d'entrée utilisateur de PQA (une variable catégorique) et produire des scripts de sortie qui contiennent des résultats personnalisés à sens unique pour chaque PQA, en utilisant un sous-ensemble de données pour obtenir les informations nécessaires pour lire dans les scripts qui sont enregistrés dans la table de données d'origine. Par exemple, lorsque j'exécute le code JMP suivant sur la table de données jouet avec la fenêtre de saisie utilisateur du script, j'obtiens un message d'erreur (voir les figures ci-dessous).

 

Code JMP :

/*

Objective: 

Get a JMP report with customized comparability model output,
 given a data table with column names: 
 
 - batch name/lot number
 - Mfg Group
 - PQA
 - result
 - measurment units
 - LSL
 - USL
 
The comparability output will give the process charts and the 
TOST results. 

*/

/////////////////////////////////////////////////////////////
//User Selection Menu(s)
/////////////////////////////////////////////////////////////

//select the data in the original data table 
Names Default To Here( 1 );
dt = Current Data Table();
//get the unique PQAs
col9 = Column(dt, "PQA");
unique_pqa = Associative Array( col9 ) << get keys;

//Part 2: Select PQA(s) and invisibility option. 
invisible_window_options = {"invisible", "visible"};
nw2 = New Window("Select PQAs",
 <<MODAL></MODAL>        variablebox1_pqa << Set All(this << Get, run script(1))))),
  Text Box("Select All PQAs", <<SET width=""></SET>                                             Is String(units), " (" || units || ") ");   
       
      //get the spec limits
      lslval = :LSL[1];
      uslval = :USL[1];
      lpcrval = :Name("Lower_PCR")[1];
      upcrval = :Name("Upper_PCR")[1]; 
      //TO DO: write in the max_val and min_val from stability script to
      
      //set the significance level based on the number of spec limits present
      alpha_level_a = If(!Is Missing(lslval) & !Is Missing(uslval), 0.1, 0.2);
      
      
      dt << New Script (
        "JMP report results for " || pqa_val,
        
        //TO DO: Wrap process chart and TOST results into an initalized window
        
        //Process Chart
        Oneway(
         //SendToByGroup( {:PQA == Expr(pqa_val)}, 
         //Y( :Result ) ),
           Y( :Result N ),
           X( :Name("Batch Name") ),
           Connect Means( 1 ),
           Grand Mean( 0 ),
          //), 
          // SendToByGroup(
          // {:PQA == pqa_val},
           Where( :PQA == Expr(pqa_val) ),
           SendToReport(
           Dispatch(
             {},
             "Oneway Analysis of Result N By Batch Name",
             OutlineBox,
             {Set Title( "Oneway Analysis of " || Expr(pqa_val) || Expr(units_formatted) || " Result N By Batch Name")}
            ),
            Dispatch(
             {},
             "Result N",
             TextEditBox,
             {Set Text( Expr(pqa_val) || Expr(units_formatted) )}
            ),
            Dispatch(
             {},
             "2",
             ScaleBox,
             {Label Row( Set Font Size( 5 ) )}
            ),
            Dispatch(
             {},
             "1",
             ScaleBox,
             {Min( Expr(lslval)*0.9 ), Max( Expr(uslval)*1.1 ), Inc( 1 ), Minor Ticks( 1 ),   
             Add Ref Line(
              Expr(lslval),
              "Solid",
              "Dark Red",
              "LSL (" || char(Expr(lslval)) || ")",
              2
             ), 
             Add Ref Line(
              Expr(uslval),
              "Solid",
              "Dark Red",
              "USL (" || char(Expr(uslval)) || ")",
              2
             ), 
             Add Ref Line(
              Expr(lpcrval),
              "Dashed",
              "Dark Blue",
              "Lower PCR Limit (" || char(Expr(lpcrval)) || ")",
              2
             ), 
             Add Ref Line(
              Expr(upcrval),
              "Dashed",
              "Dark Blue",
              "Upper PCR Limit (" || char(Expr(upcrval)) || ")",
              2
             )
             }
            ),
            Dispatch(
             {},
             "Oneway Plot",
             FrameBox,
             {Frame Size( 1000, 300 ), DispatchSeg(
              CustomStreamSeg( 6 ),
              {Line Color( "Gray" )}
             ), Row Legend(
              Group,
              Color( 0 ),
              Color Theme( "" ),
              Marker( 0 ),
              Marker Theme( "" ),
              Continuous Scale( 0 ),
              Reverse Scale( 0 ),
              Excluded Rows( 0 )
             )}
            )
           )
          //) //send to by group
         ); //Process chart Oneway

        //TOST results
        Oneway(
          Y( :Result N ),
          X( :Group ),
          t Test( 1 ),
          Set α Level( Expr(alpha_level_a) ),
          Where( :PQA == Expr(pqa_val) ), 
          SendToReport(
            Dispatch(
             {},
             "Oneway Analysis of Result N By Group",
             OutlineBox,
             {Set Title( "Oneway Analysis of " || Expr(pqa_val) || Expr(units_formatted) || " Result N By Group"  )}
            ),
            Dispatch(
             {},
             "Result N",
             TextEditBox,
             {Set Text( Expr(pqa_val) || Expr(units_formatted) )}
            ))
          ); //TOST oneway 
        ); //dt new script
   ) //eval expression
  ); //eval
 //); //content V List box 
 
 //append each output into the initialized nw window above. 
 //container << Append(content);
 
); //for loop

Jeu de données Toy JMP :

 

Fenêtre modale de saisie utilisateur JMP

Message d'erreur JMP : "Nom non résolu : units_formatted dans l'accès ou l'évaluation de 'units_fortmatted',..."

 

Pourquoi JMP ne lit-il pas, par exemple, la colonne Unités de mesure de chaque sous-ensemble de données PQA listDT produit par chaque itération de la boucle for afin que les unités de mesure pour PQA = A soient "%" et placées sur l'étiquette de l'axe des ordonnées de la graphique comme dans le script ?

 

Tableau de donnéesAutreScriptRe : Comment obtenir des valeurs d'entrée spécifiques à partir d'une table de données de sous-ensemble à placer correctement dans un script JMP pour les enregistrer dans la table de données d'origine ?

Si vous pouviez joindre un exemple de tableau de données, ce serait très utile/

Re : Comment obtenir des valeurs d'entrée spécifiques à partir d'une table de données de sous-ensemble à placer correctement dans un script JMP pour les enregistrer dans la table de données d'origine ?

Désolé et merci de me l'avoir signalé ! J'ai oublié de le mentionner dans mon message d'origine en pièce jointe.