SELECT photo, photo_texte, photo_mini, bienvenue, information, services,niveau3, width, height,information,b_photo, b_photo_texte, b_emplacement,b_l,b_h FROM Fiches WHERE Repertoire_No = #attributes.Repertoire_No# SELECT Id,Date,Volume,Numero,Titre2,Sequence_No,Classement,Titre,Photo,photo_mini,Photo_texte, Auteur,Editeur,Ville,Attachement,Attachement_texte,Attachement_poid,Divers1_t,Divers2_t,Divers3_t,Divers4_t, Divers5_t,Divers6_t,Divers7_t,Divers8_t,Divers9_t,Divers10_t,Suggestion,Auteur2, Edition,Source,Format,Nomb_page,Cout,Code,ISBN,ISSN,Url1,Url2,Url3,Url4,Url5, Url6,Url7,Url8,Url9,Url10,Description,Extrait,Web,niveau2 FROM Publications WHERE #PreserveSingleQuotes(ActifQuery)##bulletinQuery#niveau='#attributes.niveau#' AND Repertoire_No=#attributes.Repertoire_No# AND Categorie_No=999996 ORDER BY #bulletinTri# SELECT Classement,Id,Sequence_No,Photo_mini,Photo,Photo_texte,Titre,Extrait,Description,Attachement,niveau2,niveau,repertoire_no FROM Publications WHERE #PreserveSingleQuotes(ActifQuery)#Sequence_No=#attributes.Sequence_No##Var.bulletin.Id# AND Repertoire_No=#attributes.Repertoire_No# AND Niveau='3' ORDER BY #ArticleTri# TempList="#ValueList(Article.Classement," ,")# "; //attributes.UnortedList = ValueList(Article.Classement); ClassList="#ListChangeDelims(GetBaseInfo.Classement," #chr(13)##chr(10)#","#chr(13)##chr(10)#")# #chr(13)##chr(10)# "; attributes.LaUne = 0; attributes.SortedList = ""; attributes.ClassChange = ""; for (h=1; h lte listlen(ClassList,"#chr(13)##chr(10)#"); h=h+1) { ClassItem = ListGetAt(ClassList,h,"#chr(13)##chr(10)#"); FoundPos = listfindnocase(TempList,ClassItem); if (FoundPos AND Article.Niveau[FoundPos] is 2) { if (Len(Article.Description[FoundPos])) { attributes.LaUne = FoundPos; TempList = ListSetAt(TempList,FoundPos,"~kvfk~"); FoundPos = listfindnocase(TempList,ClassItem); } else { TempList = ListSetAt(TempList,FoundPos,"~kvfk~"); FoundPos = listfindnocase(TempList,ClassItem); }; }; if (FoundPos) {attributes.ClassChange = ListAppend(attributes.ClassChange,FoundPos);}; while (FoundPos) { if (FoundPos AND Article.Niveau[FoundPos] is 2 AND Len(Article.Description[FoundPos])) { attributes.LaUne = FoundPos; TempList = ListSetAt(TempList,FoundPos,"~kvfk~"); FoundPos = listfindnocase(TempList,ClassItem); } else { attributes.SortedList = ListAppend(attributes.SortedList,FoundPos); TempList = ListSetAt(TempList,FoundPos,"~kvfk~"); FoundPos = listfindnocase(TempList,ClassItem); }; }; }; if (ListLen(attributes.SortedList) MOD 2 IS 1){ attributes.Row1Length = Ceiling(ListLen(attributes.SortedList)/2); attributes.Row2Length = Int(ListLen(attributes.SortedList)/2) * 1 + 1; }else{ attributes.Row1Length = Ceiling(ListLen(attributes.SortedList)/2); attributes.Row2Length = Ceiling(ListLen(attributes.SortedList)/2) * 2; }

#replace (bulletin.Titre2,chr(10),"
","all")#

<< Retour | Archives | La une | #bulletin.Classement#

#replace("#REReplace("#REReplace("#GetCorporatifInfo.Bienvenue#","([[:space:]])http://([^[:space:]]+?)(\.*[[:space:]])","\1\2\3","ALL")#","([[:space:]])([A-Za-z0-9_\.\-]+@[A-Za-z0-9\.\-]+\.[A-Za-z]{2,})(\.*[[:space:]])","\1\2\3","ALL")#",chr(10),"
","all")#

#Date#
 Volume #replace (Volume,chr(10),"
","all")# Numéro #replace (Numero,chr(10),"
","all")#

#Titre2#

#Titre#


#Titre2#

#Titre#

#Titre2#

#Titre#

#Auteur#

#Ville#-


Autre(s) auteur(s) : #Auteur2#
Editeur : #replace (Editeur,chr(10),"
","all")#
Edition : #Edition#
Source : #Source##Source#
Format : #Format#
Nombre de pages : #Nomb_page#
Coût : #Cout#
Code : #Code#
ISBN : #ISBN#
ISSN : #ISSN#

Webographie
#Article.Classement[Position]#Divers
#Article.Classement[Position]#Divers

Page non disponible