<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />Bonjour,
J'essaie d'enregistrer la fenêtre de rapport en tant que fichier PDF et HTML, mais elle n'en enregistre que la moitié et lors de la création du fichier HTML, cette erreur s'affiche :
"Une erreur s'est produite lors de l'écriture du fichier de sortie Web V:\User\User Reports\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:
affichage = Fonction ({ Traiter , Étiquette , Par , Src_Type , lmt1 , lmt2 , lmt3 } , Tableau de données actuel ( dt ) ;
summ_dt = dt << Sommaire ( Invisible ,
Groupe ( Comme nom ( Traiter ) , Comme nom ( Étiquette ) , Comme nom ( Par ))
) ;
srt_summ = summ_dt << Trier ( Invisible , Par ( Comme nom ( Étiquette )) , Ordre ( Ascendant )) ; Tableau de données actuel ( srt_summ ) ;
r1 = Nouvelle fenetre ( "" ,
H Zone de liste (
cc = Carte de contrôle (
Échantillon d'étiquette ( Colonne ( srt_summ , Étiquette )) ,
Taille de groupe ( 1 ) , KSigmaGenericName ( 3 ) ,
Comme colonne ( srt_summ , Traiter ) , Mesure individuelle ( LCL ( lmt1 [ 6 ]) , MOY ( lmt1 [ 5 ]) , UCL ( lmt1 [ sept ]))) ,
Où ( Comme colonne ( Par ) == Src_Type ) ;
) ; ( Signaler ( cc ) << Parent )[ Zone de texte ( 1 )] << effacer ; représentant = cc << Signaler ; ob = représentant [ ContourBox ( 1 )] ; ob << Définir le titre ( "Type de pâte" || " = " || Src_Type ) ;
cc1 = Carte de contrôle (
Échantillon 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 , Traiter ) , CUSUM ( Recto verso ( 1 ) , MOY ( lmt2 [ 5 ]))) ,
Où ( Comme colonne ( Par ) == Src_Type ) ;
) ; ( Signaler ( cc1 ) << Parent )[ Zone de texte ( 1 )] << effacer ; représentant = cc1 << Signaler ; ob = représentant [ ContourBox ( 1 )] ; ob << Définir le titre ( "Type de pâte" || " = " || Src_Type ) ;
cc2 = Carte de contrôle (
Échantillon d'étiquette ( Colonne ( srt_summ , Étiquette )) ,
Taille de l'échantillon ( 1 ) ,
KSigmaGenericName ( 3 ) , Lester ( 0,2 ) ,
Comme colonne ( srt_summ , Traiter ) , EWMA ( MOY ( lmt3 [ 5 ]))) ,
Où ( Comme colonne ( Par ) == Src_Type ) ;
) ; ( Signaler ( cc2 ) << Parent )[ Zone de texte ( 1 )] << effacer ; représentant = cc2 << Signaler ; ob = représentant [ ContourBox ( 1 )] ; ob << Définir le titre ( "Type de pâte" || " = " || Src_Type ) ;
) ;
) ; vlb << Ajouter ( r1 ) ; r1 << Fermer la fenêtre ;
) ;
terrain = Fonction ({ lmts , pmt_path , flg } ,
param_dt = Ouvert ( pmt_path , "invisible" ) ;
param_sum = param_dt << Sommaire ( Invisible ,
Groupe ( : Traiter , : Échantillon d'étiquette , : Par )) << Afficher la fenêtre ( 0 ) ;
Pour ( q = 1 , q <= NRow ( param_sum ) , q ++, Tableau de données actuel ( param_sum ) ;
obj = Nouvelle fenetre ( "Rapport d'analyse des tendances" || Date longue ( Aujourd'hui ()) ,
vlb = Zone de liste V ()
) ;
//obj<
col2 = : Traiter [ q ] ; col3 = : Échantillon d'étiquette [ q ] ; col4 = : Par [ q ] ;
Tableau de données actuel ( lmts ) ;
clms = lmts << Obtenir les noms de colonne ( Chaîne de caractères ) ;
Retirer ( clms , 1 , 3 ) ;
Pour ( t = 1 , t <= N articles ( clms ) , t ++, Tableau de données actuel ( lmts ) ;
indv_lmts = Comme colonne ( clms [ t ])[ lmts << Obtenir des lignes où ( : Paramètre == col2 & : Type de graphique == "Individuel" )] ;
cusum_lmts = Comme colonne ( clms [ t ])[ lmts << Obtenir des lignes où ( : Paramètre == col2 & : Type de graphique == "CUSUM" )] ;
ewma_lmts = Comme colonne ( clms [ t ])[ lmts << Obtenir des 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 [ sept ]) , Est manquant ( cusum_lmts [ 5 ]) , Est manquant ( ewma_lmts [ 5 ])) , Continuer () ,
affichage ( col2 , col3 , col4 , clms [ t ] , indv_lmts , cusum_lmts , ewma_lmts ) ;
) ;
) ;
obj << Définir la configuration de la page ( marges ( 1 , 1 , 1 , 1 ) , échelle ( .75 ) , portrait ( 0 ) , taille de papier ( "Lettre" )) ;
Si (
flg == "Agé de" , obj << Enregistrer le PDF ( dir_path || col2 || ".pdf" ) ; obj << Enregistrer le HTML interactif ( dir_path || col2 || ".htm" ) ,
flg == "Nouveau" , obj << Enregistrer le PDF ( sav_dir || col2 || ".pdf" ) ; obj << Enregistrer le HTML interactif ( dir_path || 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, c'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ë car 6 itérations sont enregistrées correctement.
Toute suggestion serait appréciée. Merci!!
