/***** Module de gestion des informations philatéliques relatives au timbre *****/
// C'est dans Timbre.js ! document.writeln('');
/*************** Préchargement des images appelées par onMouseOver **************/
if (navigator.appVersion.substring(0,1)>=3)
{
Img01=new Image(20,20); Img01.src='../Images/F_carteR.gif';
Img02=new Image(20,20); Img02.src='../Images/InfoR.gif';
Img03=new Image(29,30); Img03.src='../Images/LienR.gif';
Img04=new Image(29,20); Img04.src='../Images/Lien_PhilaR.gif';
Img05=new Image(13,20); Img05.src='../Images/Timbre0.gif';
Img06=new Image(44,20); Img06.src='../Images/AnneeR.gif';
Img07=new Image(20,20); Img07.src='../Images/MaisonR.gif';
Img08=new Image(30,36); Img08.src='../Images/VoteR.gif';
}
/******************************** VARIABLES GLOBALES ****************************/
var Origine_Info_Phila='Departement'; // ="Racine" si la fonction est appelée par un fichier de la racine
var MSIE='"Microsoft Internet Explorer"';
var TypeFichier='Timbre';// Pour savoir si on met le fichier à gauche (timbre)
var TypeTimbre='Ouest'; // Pour le test de fenêtre permet de distinguer les timbres de l'Ouest, du Sud-Ouest et d'ailleurs ...
var HauteurNotice=400; // Hauteur de la fenêtre de la notice technique
var Local=false; // Test de connexion locale ou non, par défaut : connexion distante
var URL_Ref=window.location.href; // URL complète du fichier de départ
var LgURL_Ref=URL_Ref.length; // Longueur de cette URL
var Pos0=URL_Ref.lastIndexOf("/")+1; // Position du début du nom court de fichier (Position du dernier slash)
var URL_0=URL_Ref.substring(0,Pos0-1); // La racine complète du fichier d'origine
var Fichier_Origine=URL_Ref.substring (Pos0,LgURL_Ref); // Le nom court du fichier d'origine
var PosDep=URL_0.lastIndexOf("/")+1; // Position du début du sous répertoire, (Position du dernier slash)
var URL_Dep=URL_0.substring(0,PosDep-1); // La racine complète du sous-répertoire d'origine de type http://www.le-lann.com/Phil-Ouest/Depxx
var LgDep=URL_0.length; // Longueur de l'URL avec Depxx
var Rep_Dep=URL_0.substring(PosDep,LgDep); // Le nom court du sous-répertoire Depxx
/* Trace pour tets*/
//document.writeln (Fichier_Origine+'
PosDep='+PosDep+'
LgDep='+LgDep+'
URL_0='+URL_0+'
URL_Dep='+URL_Dep+'
Rep_Dep='+Rep_Dep);
var Pos1=URL_0.lastIndexOf("/")+1; // Position du début du sous-répertoire (Position de l'avant-dernier slash)
var URL_1=URL_0.substring(0,Pos1); // La racine du répertoire d'origine
var AS=unescape("%5C"); // Antislash \
var Orig1="file:"; // fichier local sur Netscape
var Orig2="C:"+AS; // C:\ fichier local sur MSIE
// Test de connexion locale sur Netscape ou MSIE
if (URL_Ref.toLowerCase().lastIndexOf(Orig1)==0) // Test Netscape
Local=true; // local est une variable globale
if (URL_Ref.lastIndexOf(Orig2)==0) // Test MSIE
Local=true; // TEST : document.writeln ('Local='+Local);
/******************** Les variables du timbre **********************/
// Paramétrages affranchissement
var AF='Affranchissement ';
var I='de l\'imprimé ';
var L='de la lettre ';
var LS=L+' simple ';
var L20=L+' de moins de 20g ';
var L50=L+' de 20 à 50g ';
var L100=L+' de 50 à 100g ';
var LR='de la lettre recommandée ';
var PP='du paquet-Poste ';
var Fr='pour la France ';
var Eur=' et l´Europe';
var Inter='pour le régime intérieur ';
var Etr='pour l\'étranger ';
var MC='pour le Marché Commun';
var NU=' non urgent';
var NUe=NU+' non urgente ';
var Ech=' échelon de poids ';
var Ech1=' 1er'+Ech;
var Ech2=' 2ème'+Ech;
var Ech3=' 3ème'+Ech;
var Eco=AF+' de l\'écopli ';
var L20F=AF+L20+Fr+Eur;
var L50F=AF+L50+Fr+Eur;
var L100F=AF+L100+Fr+Eur;
var LSI=AF+LS+Inter;
var LINU=AF+L+Inter+NUe;
var LDI=AF+L+Ech2+Inter;
var LI=AF+L+Inter;
var LSE=AF+LS+Etr;
var LRI=AF+LR+Inter;
var CP='de la carte postale ';
var M5='de 5 mots ';
var CP5=AF+CP+M5;
var CPI=AF+CP+Inter;
var CPI5=AF+CP+M5+Inter;
var CPE=AF+CP+Etr;
var CPE5=AF+CP+M5+Etr;
var Imp=AF+I;
var ImpI=AF+I+Inter;
var ImpE=AF+I+Etr;
var Rcd='Affranchissement des plis recommandés';
var TR='Taxe de recommandation ';
var AC=AF+' complémentaire ';
// Autres paramétrages
var J1='1er jour ';
var Obl='Oblitération ';
var Spec='spéciale ';
var Ill=' illustrée ';
var OS=Obl+Spec;
var OSPJ=Obl+Spec+J1;
var VESMPJ='Vente anticipéé sans mention “Premier Jour”';
var OPJ=Obl+J1;
var OSI=Obl+Spec+Ill+' sans indication de '+J1;
var OIPJ=Obl+Ill+J1;
var CRF=' au profit de la Croix Rouge Française ';
var D13=' - Dentelure 13';
var D14=' - Dentelure 14x13½';
var D1523='15 mm x 23 mm'+D13;
var D1622='16 mm x 22 mm'+D14;
var D1721='17 mm x 21 mm'+D14;
var D1723='17 mm x 23 mm'+D13;
var D1822='18 mm x 22 mm'+D14;
var D1820='18 mm x 20 mm'+D13;
var D1820nd='18 mm x 20 mm - non dentelé';
var D2216='22 mm x 16 mm'+D13;
var D2236='22 mm x 36 mm'+D13;
var D2636='26 mm x 36 mm'+D13;
var D2637='26 x 36,85 - Dentelure 12 ¾ x 13';
var D3621='35,8 mm x 20,6 mm - Dentelure 13½x13½';
var D3622='36 mm x 22 mm'+D13;
var D3626='36 mm x 26 mm'+D13;
var D3748='36,85 mm x 48 mm - Dentelure 13x12'; // série artistique
var D4837='48 mm x 36,85 mm - Dentelure 13x12';
var D2748='27 mm x 48 mm'+D13;
var D4827='48 mm x 27 mm'+D13;
var TD='taille douce ';
var TDR=TD+'rotative ';
var TD3=TDR+' 3 couleurs ';
var TD6=TDR+' 6 couleurs ';
var Pr=' sur presse N°';
var P1=Pr+'1 ';
var P2=Pr+'2 ';
var P3=Pr+'3 ';
var P4=Pr+'4 ';
var P5=Pr+'5 ';
var P6=Pr+'6 ';
var P10=Pr+'10 ';
var SG=' sans guillochis';
var Helio='héliogravure ';
var Typo='typographie ';
var TypoP=Typo+' à plat ';
var TypoR=Typo+' rotative ';
var Ex='exemplaires ';
var Mex=' millions d´exemplaires ';
var TF=' timbres par feuille ';
var F10='- 10'+TF;
var F25='- 25'+TF;
var F30='- 30'+TF;
var F40='- 40'+TF;
var F50='- 50'+TF;
var F100='- 100'+TF;
var F150='- 150'+TF;
var CD='Coins datés ';
// Initialisations par défaut
var Init=null;
var Titre='Notice technique non initialisée';
var PJ='';
var Emission='';
var Retrait='';
var VF='';
var Affr='';
var Dim='';
var Impr='';
var Coul='';
var Artiste='';
var Tirage='';
var Coins='';
var NoCeres='';
var NoYT='';
var Serie='';
var S1='';
var S2='';
var S3='';
var S4='';
var S5='';
var S6='';
var S7='';
var S8='';
var Notice='-';
var TaD1J='';
var TaD1Jour='';
var Bio="'La biographie de l’artiste et la liste de ses timbres ayant un lien avec l’Ouest'";
/*******************orps de la fonction ********************/
function Info_Phila( )
{ // début Info_Phila ( ) =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
var Essais=false;// pour essais de mise au point
// Titre
var Titre_Timbre=
' \n'
+ ' | ' +Titre+ ' | \n'
+ '
\n';
// Emission premier jour
var Premier_Jour=' | '+PJ+' |
\n';
if (PJ=='')
Premier_Jour='';
// Date d'émission et de retrait
var Emission_Retrait=
' \n'
+ ' | Date d\'émission : '+Emission+' | \n'
+ ' Date de retrait : ' +Retrait +' | \n'
+ '
\n';
if (Emission+Retrait=='')
Emission_Retrait='';
if ((Emission!='')&(Retrait==''))
Emission_Retrait=
' '
+ ' | Date d\'émission : '+Emission+' | '
+ '
';
if ((Emission=='')&(Retrait!=''))
Emission_Retrait=
' \n'
+ ' | Date de retrait : '+Retrait +' | \n'
+ '
\n';
// Série philatélique
var Lg=' WIDTH=50%';
if ((S2=='')&(S4=='')&(S6=='')&(S8==''))
Lg='';
var L1=' \n'
+' | '+S1+' | \n'
+' '+S2+' | \n'
+'
\n';
var L2=' \n'
+' | '+S3+' | \n'
+' '+S4+' | \n'
+'
\n';
var L3=' \n'
+' | '+S5+' | \n'
+' '+S6+' | \n'
+'
\n';
var L4=' \n'
+' | '+S7+' | \n'
+' '+S8+' | \n'
+'
\n';
if ((S1=='')&(S2==''))
L1='';
if ((S3=='')&(S4==''))
L2='';
if ((S5=='')&(S6==''))
L3='';
if ((S7=='')&(S8==''))
L4='';
var Serie_Phila=
' \n'
+ ' \n'
+ ' \n'
+ ' | '+Serie+'\n'
+ ' \n'
+ L1+L2+L3+L4
+ ' | \n'
+ ' | \n'
+ '
\n';
if (Serie=='')
Serie_Phila='';
// Dimensions du timbre (dimension intérieure en mm de l'image sans les dentelures)
var Dimensions=' Dimensions : '+Dim+'
\n ';
if (Dim=='')
Dimensions='';
// Couleur référencée
var Couleur=' Couleurs : '+Coul+'
\n ';
if (Coul=='')
Couleur='';
// Type d'impression du timbre (taille douce, offset, héliogravure)
var Impression=' Imprimé en '+Impr;
if (Impr=='')
Impression='';
// Coins datés
var CoinsDates='
'+Coins;
if (Coins=='')
CoinsDates='';
// Tirage
var TirageTotal='
Emis à '+Tirage;
if ((Tirage=='')|(Tirage=='x'+Mex))
TirageTotal='';
// Dimensions, impression, couleur, tirage et coins datés
var Tirage_Total=' \n | \n '+Dimensions+Couleur+Impression+CoinsDates+TirageTotal+'\n | \n
\n';
if (Dim+Coul+Impr+Coins+Tirage=='')
Tirage_Total='';
// Dessin et gravure
var Gravure=' | '+Artiste+' |
\n';
if ( Artiste=='')
Gravure='';
// Valeur faciale et type d'affranchissement
var DebVAL=' ';
var Valeur=DebVAL+'Valeur faciale : '+VF;
if (VF=='')
Valeur=DebVAL;
var Affranchissement=Valeur+'
'+Affr+' |
\n';
if (Affr=='')
Affranchissement=Valeur+'\n';
if ((VF=='') & (Affr=='')) // Cas des blocs feuillets
Affranchissement='\n';
// N° Cérès et Yvert et Tellier
var Numero='';
if ((NoCeres!='')&&(NoYT!='')) // Les 2 N° existent
{
Numero=
' \n'
+' | N° Cérés : '+NoCeres+' | \n'
+' N° Yvert et Tellier : '+NoYT+' | \n'
+'
\n';
}
else
{
if ((NoCeres=='')&&(NoYT!=''))// N° Yvert seul
Numero=
' \n'
+' | N° Yvert et Tellier : '+NoYT+' | \n'
+'
\n';
else
{
if ((NoCeres!='')&&(NoYT==''))// N° Cérès seul
Numero=
' \n'
+' | N° Cérés : '+NoCeres+' | \n'
+'
\n';
}
}
if ((NoCeres+NoYT=='')||(NoCeres+NoYT=='-')) // Aucun N° YT et Cérès (somme nulle ou égale à - )
Numero='';
// Notice de commentaires
var Commentaires=' | '+Notice+' |
\n';
if ((Notice=='-')||(Notice==''))
Commentaires='';
// Flamme d'oblitération
var Obliteration='';
var Fichier_Flamme; // Nom du fichier flamme
if (TaD1J !='')
{
if (Origine_Info_Phila!='Racine')
TaD1Jour='TaD/'+TaD1J; // Le fichier image flamme est en sous répertoire Depxx/TaD sinon il est la où on lui a dit de se mettre ...
else
TaD1Jour=TaD1J;
Obliteration='
\n';
if (TaD1J=='Flamme.jpg')
Obliteration='';
}
// Retour à la liste des timbres
Retour='
Retour vers la liste des timbres';
//-------------------------------------- Corps principal de la notice technique ----------------------------------------------
var Fond_Notice='../Images/Fond_Bleu.gif';
if (Origine_Info_Phila=='Racine')
{
Fond_Notice='Images/Fond_Bleu.gif'; // ah ! les rustines !
}
var Debut_Corps=
'\n'
+'\n'
+'\n\n'
+'Notice technique du timbre\n'
+' \n'
+' \n'
+'\n\n'
+'\n';
var Notice_pas_prete=
Debut_Corps
+'\n'
+' \n'
+' \n'
+' 
\n'
+' \n'
+' \n'
+' | \n'
+' Notice non initialisée \n'
+' | \n'
+' \n'
+' \n'
+' | \n'
+'
\n'
+'
\n'
+'\n'
+'';
if (Init==false) // Notice pas prête (non initialisée)
{
Fenetre=window.open ("","","toolbar=no,location=no,directories=no,menuBar=no,scrollbars=no,resizable=yes,height=300,width=300,left=360,top=150");
Fenetre.document.open ();
Fenetre.document.writeln (Notice_pas_prete);
}
else
{
HauteurNotice=400;
HauteurNotice=HauteurNotice+Math.round(Notice.length/6);
if (Essais==true) parent.DroiteBas.document.write('Notice.length='+Math.round(Notice.length/6));
if ((TaD1Jour!='')&(TaD1J!='Flamme.jpg'))
HauteurNotice=HauteurNotice+150;
if (Serie!='')
HauteurNotice=HauteurNotice+100;
if (HauteurNotice>600) HauteurNotice=600;
Fenetre=window.open ("","","toolbar=no,location=no,directories=no,menuBar=no,scrollbars=yes,resizable=yes,height="+HauteurNotice+",width=600,left=315,top=25");
Fenetre.document.open ();
Fenetre.document.writeln(Debut_Corps);
Fenetre.document.writeln('');
Fenetre.document.writeln('');
Fenetre.document.writeln(Titre_Timbre);
Fenetre.document.writeln(Gravure);
Fenetre.document.writeln(Premier_Jour);
Fenetre.document.writeln(Emission_Retrait);
Fenetre.document.writeln(Affranchissement);
Fenetre.document.writeln(Tirage_Total);
Fenetre.document.writeln(Numero);
Fenetre.document.writeln(Serie_Phila);
Fenetre.document.writeln(Commentaires);
Fenetre.document.writeln(' ');
Fenetre.document.writeln(Obliteration);
Fenetre.document.writeln('\n');
Fenetre.document.writeln(' |
\n');
Fenetre.document.write ('\n