<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />Bonjour,
J'essaie d'enregistrer la fenêtre de rapport sous forme de fichier PDF et HTML, mais elle n'en enregistre que la moitié et lors de la création du fichier HTML, elle affiche cette erreur :
"Une erreur s'est produite lors de l'écriture du fichier de sortie Web V:\Utilisateur\Rapports utilisateur\Beverly Jones\Yield Tracking\23Jul2015\Fill Yield (g\AdjAs L).htm.
Raison : Impossible d'ouvrir en mode ReadWrite.
Le système ne peut pas trouver le fichier spécifié."
Instantané du journal :

Code:
afficher = Fonction ({ Processus , Étiquette , Par , Type_Src , lmt1 , lmt2 , lmt3 } , Tableau de données actuel ( dt ) ;
somme_dt = dt << Résumé ( Invisible ,
Groupe ( Comme nom ( Processus ) , Comme nom ( Étiquette ) , Comme nom ( Par ))
) ;
srt_summ = somme_dt << Trier ( Invisible , Par ( Comme nom ( Étiquette )) , Commande ( Ascendant )) ; Tableau de données actuel ( srt_summ ) ;
r1 = Nouvelle fenetre ( "" ,
Zone de liste H (
cc = Carte de contrôle (
Exemple d'étiquette ( Colonne ( srt_summ , Étiquette )) ,
Taille de groupe ( 1 ) , KSigma ( 3 ) ,
Comme colonne ( srt_summ , Processus ) , Mesure individuelle ( LCL ( lmt1 [ 6 ]) , MOYENNE ( lmt1 [ 5 ]) , UCL ( lmt1 [ 7 ]))) ,
Où ( Comme colonne ( Par ) == Type_Src ) ;
) ; ( Rapport ( cc ) << Parent )[ Zone de texte ( 1 )] << supprimer ; représentant = cc << Rapport ; ob = représentant [ Boîte de contour ( 1 )] ; ob << Définir le titre ( "Type de pâte" || " = " || Type_Src ) ;
cc1 = Carte de contrôle (
Exemple d'étiquette ( Colonne ( srt_summ , Étiquette )) ,
Taille de l'échantillon ( 1 ) ,
Alpha ( 0,00269979606326021 ) ,
Afficher la légende des limites ( 0 ) ,
Comme colonne ( srt_summ , Processus ) , CUSUM ( Recto-verso ( 1 ) , MOYENNE ( lmt2 [ 5 ]))) ,
Où ( Comme colonne ( Par ) == Type_Src ) ;
) ; ( Rapport ( cc1 ) << Parent )[ Zone de texte ( 1 )] << supprimer ; représentant = cc1 << Rapport ; ob = représentant [ Boîte de contour ( 1 )] ; ob << Définir le titre ( "Type de pâte" || " = " || Type_Src ) ;
cc2 = Carte de contrôle (
Exemple d'étiquette ( Colonne ( srt_summ , Étiquette )) ,
Taille de l'échantillon ( 1 ) ,
KSigma ( 3 ) , Poids ( 0,2 ) ,
Comme colonne ( srt_summ , Processus ) , EWMA ( MOYENNE ( lmt3 [ 5 ]))) ,
Où ( Comme colonne ( Par ) == Type_Src ) ;
) ; ( Rapport ( cc2 ) << Parent )[ Zone de texte ( 1 )] << supprimer ; représentant = cc2 << Rapport ; ob = représentant [ Boîte de contour ( 1 )] ; ob << Définir le titre ( "Type de pâte" || " = " || Type_Src ) ;
) ;
) ; vlb << Ajouter ( r1 ) ; r1 << Fermer la fenêtre ;
) ;
parcelle = Fonction ({ lmts , pmt_path , flg } ,
param_dt = Ouvrir ( pmt_path , "invisible" ) ;
param_summ = param_dt << Résumé ( Invisible ,
Groupe ( : Processus , : Exemple d'étiquette , : Par )) << Afficher la fenêtre ( 0 ) ;
Pour ( q = 1 , q <= NRangée ( param_summ ) , q ++, Tableau de données actuel ( param_summ ) ;
obj = Nouvelle fenetre ( "Rapport d'analyse des tendances" || Date longue ( Aujourd'hui ()) ,
vlb = Boîte de liste V ()
) ;
//obj<
col2 = : Processus [ q ] ; col3 = : Exemple d'étiquette [ q ] ; col4 = : Par [ q ] ;
Tableau de données actuel ( lmts ) ;
clams = lmts << Obtenir les noms de colonnes ( Chaîne ) ;
Retirer ( clams , 1 , 3 ) ;
Pour ( t = 1 , t <= N articles ( clams ) , t ++, Tableau de données actuel ( lmts ) ;
indv_lmts = Comme colonne ( clams [ t ])[ lmts << Obtenir les lignes où ( : Paramètre == col2 & : Type de graphique == "Individuel" )] ;
cusum_lmts = Comme colonne ( clams [ t ])[ lmts << Obtenir les lignes où ( : Paramètre == col2 & : Type de graphique == "CUSUM" )] ;
ewma_lmts = Comme colonne ( clams [ t ])[ lmts << Obtenir les lignes où ( : Paramètre == col2 & : Type de graphique == "EWMA" )] ;
Si (
OU ( Est manquant ( indv_lmts [ 5 ]) , Est manquant ( indv_lmts [ 6 ]) , Est manquant ( indv_lmts [ 7 ]) , Est manquant ( cusum_lmts [ 5 ]) , Est manquant ( ewma_lmts [ 5 ])) , Continuer () ,
afficher ( col2 , col3 , col4 , clams [ t ] , indv_lmts , cusum_lmts , ewma_lmts ) ;
) ;
) ;
obj << Définir la mise en page ( marges ( 1 , 1 , 1 , 1 ) , échelle ( .75 ) , portrait ( 0 ) , taille de papier ( "Lettre" )) ;
Si (
flg == "vieux" , obj << Enregistrer le PDF ( chemin_rép || col2 || ".pdf" ) ; obj << Enregistrer le HTML interactif ( chemin_rép || col2 || ".htm" ) ,
flg == "nouveau" , obj << Enregistrer le PDF ( rép_sav || col2 || ".pdf" ) ; obj << Enregistrer le HTML interactif ( chemin_rép || col2 || ".htm" ) ;
) ;
obj << Fermer la fenêtre ;
) ;
);
Il y a 12 itérations au total mais cela enregistre le résultat de 6 seulement et ce qui est intéressant est que la fenêtre "obj" apparaît pour les 12 itérations.
Je ne sais pas exactement pourquoi cela se produit, car l'erreur ci-dessus semble ambiguë puisque 6 itérations sont correctement enregistrées.
Toute suggestion serait appréciée. Merci!!