// ----------	Formule 1
function option (prx, txt, rez, def) { this.prx=prx; this.txt=txt; this.rez=rez; this.def=def; }
// Variables du devis
// Catégorie 1
Cat1 = new Array ();
Cat1[1] =new option( A5, "Départ de Paris sans passage dans un lieu de culte ", "Départ de Paris ", 1);
Cat1[2] =new option( A1, "Départ de Paris avec passage dans un lieu de culte ", "Obsèques sur Paris", 0);
// Catégorie 2
Cat2 = new Array ();
Cat2[1] =new option( 0, "Toilette et habillage assurés par l&#8216;équipe de la chambre mortuaire", "Toilette du défunt", 1);
Cat2[2] =new option( C1, "Soins de présentation et de conservation par un thanatopracteur", "Soins du défunt", 0);
// Catégorie 3
Cat3 = new Array ();
Cat3[1] =new option( 0, "Aucun", "R", 1);
Cat3[2] =new option( A725, "25 exemplaires avec enveloppes", "Faire-part: 25 ex.", 0);
Cat3[3] =new option( A750, "50 exemplaires avec enveloppes", "Faire-part: 50 ex.", 0);
Cat3[4] =new option( A7100, "100 exemplaires avec enveloppes", "Faire-part: 100 ex.", 0);
// Catégorie 4
Cat4 = new Array ();
Cat4[1] =new option( 0, "Aucun", "R", 1);
Cat4[2] =new option( A11LMA1, "Avis dans \"Le Monde\", tarif abonné ", "Avis dans \"Le Monde\"", 0);
Cat4[3] =new option( A11LFA, "Avis dans \"Le Figaro\"", "Avis dans \"Le Figaro\"", 0);
Cat4[4] =new option( A11NA, "Avis dans \"Libération\"", "Avis dans \"Libération\"", 0);
// Catégorie 5
Cat5 = new Array ();
Cat5[1] =new option( QG2, "Cercueil &#8220;Garrigue&#8221;, finition brute ou cirée", "Cercueil &#8220;Garrigue&#8221;", 0);
Cat5[2] =new option( RG2, "Cercueil &#8220;Automne&#8221;, replaqué de chêne clair, finition claire brillante", "Cercueil &#8220;Automne&#8221;", 0);
Cat5[3] =new option( RG3, "Cercueil &#8220;Parisien&#8221;, finition ombrée satinée", "Cercueil &#8220;Parisien&#8221;", 1);
// Catégorie 6
Cat6 = new Array ();
Cat6[1] =new option( ZZ1, "Prise en charge + nombre de km + péages", "Prise en charge et transport en province", 1);
Cat6[2] =new option( ZZ2, "Prise en charge en complément d\'un convoi sur Paris", "Prise en charge et convoi sur Paris", 0);
// Catégorie 7
Cat7 = new Array ();
Cat7[1] =new option( H3S, "Départ de Paris avec passage dans un lieu de culte", "Corbillard en convoi long", 0);
Cat7[2] =new option( 0, "Départ de Paris sans passage par un lieu de culte ", "Corbillard en convoi court", 1);
// Catégorie 8
Cat8 = new Array ();
Cat8[1] =new option( H12S, "Départ de Paris avec passage dans un lieu de culte ", "Porteurs en convoi long", 0);
Cat8[2] =new option( H12A, "Départ de Paris sans passage dans un lieu de culte ", "Porteurs au départ", 1);
Cat8[3] =new option( H17, "Portage assuré par la famille et les amis ", "R", 0);
// Catégorie 9
Cat9 = new Array ();
Cat9[1] =new option( H16CE, "Maître de cérémonie au départ d\'un hôpital parisien ou d\'un domicile", "Maître de cérémonie au départ", 1);
Cat9[2] =new option( HB16, "Maître de cérémonie au départ du lieu de mise en bière et à l\'office", "Maître de cérémonie en convoi long", 0);
// Catégorie 10
Cat10 = new Array ();
Cat10[1] =new option( 0, "Aucun", "R", 1);
Cat10[2] =new option( F1, "Table à signatures et registre", "Registre de condoléances", 0);
// Catégorie 11
Cat11 = new Array ();
Cat11[1] =new option( 0, "Aucune", "R", 1);
Cat11[2] =new option( J5, "Gerbe piquée", "Gerbe de fleurs piquées", 0);
Cat11[3] =new option( J11, "Coussin, 100cm", "Coussin de fleurs", 0);
// Catégorie 12
Cat12 = new Array ();
Cat12[1] =new option( PFEXT, "Prestations des pompes funèbres locales (estimation) réglées par L'Autre Rive", "Pompes funèbres locales", 1);
Cat12[2] =new option( 0, "Prestations des pompes funèbres locales réglées par la famille", "R", 0);
// Catégorie 13
Cat13 = new Array ();
Cat13[1] =new option( Z1, "Une vacation de police au départ de Paris", "1 vac. de police", 1);
Cat13[2] =new option( eval(2*Z1), "Deux vacations de police (départ de Paris + soins)", "2 vac. de police", 0);
// Nombre de catégories
var nbCat = 13;
var nbEx =4;
//	----------