Documents-annexes en cours d'application
version n°1 PB le 09/07/2001
Cette page a pour but de lister et d'offrir des liens vers les annexes de documents en cours de validité pour un département et une rubrique donnée.
| Nom de colonne | Champ de la base | Commentaire | |
|---|---|---|---|
| = trad('DOC_ID') | documents_doc_id | numeric(10) |
Identifiant informatique de document. N'est visible qu'en mode déboguage. |
| = trad('ANN_ID') | annexes.ann_id | numeric(10) |
Identifiant informatique de l'annexe du document. N'est visible qu'en mode déboguage. |
| = trad('VAN_ID') | annexes_versions.van_id | numeric(10) |
Identifiant informatique de la version d'annexe. N'est visible qu'en mode déboguage. |
| = trad('ANN_REF_ORIG') | annexes.ann_ref_orig | varchar(30) | Référence d'origine de l'annexe. |
| = trad('VAN_TITRE') | annexes_versions.van_titre avec lien sur van_ref_info. | varchar(100) | Titre de l'annexe |
| Version | documents_versions.ver_no_valide + documents_versions.ver_no_projet | numeric(10) + numeric (10) | Numéro de version. |
| = trad('VAN_APPLICATION_DATE') | annexes_versions.van_application_date | datetime | Date d'application de l'annexe. |
| = trad('VAN_PEREMPTION_DATE') | annexes_versions.van_peremption_date | datetime | Date de peremption de l'annexe. |
|
var date_visu = "" + Session("date_visu") : On récupère la date
de référence voulue par l'utilisateur. Pour comparer les dates, on doit d'abord les convertir en entiers de la forme yyyymmdd : var int_date_visu = parseInt (date_visu.substring (6,10) + formatage (date_visu.substring (3,5),2) + formatage (date_visu.substring (0,2), 2)); var int_today = parseInt (format_time_comp (today)); |
|
var today = new Date;
var date_visu = "" + Session("date_visu");
var int_date_visu = parseInt (date_visu.substring (6,10) + formatage (date_visu.substring (3,5),2) + formatage (date_visu.substring (0,2), 2));
var int_today = parseInt (format_time_comp (today));
TITLE/TITLE
WriteHeader ()
/HEAD BODY
with (Response) {
Write ("<TABLE class=data NAME=\"tableau\" ID=\"tableau\">");
Write ("<TR><TD class=tableTitle COLSPAN=\"");
if ("" + Session("client") == "debug") {Write("8")} else {Write("7")};
Write ("\">");
WriteHelpCell_SuneTeam();
Write (trad('T_ANNEXES_COURS') + " - " + Session ("dept_libelle") + " - " + Session ("type_libelle"));
Write ("</TD>");
Write ("</TR>");
}
Response.Write ("<TR>\n")
if ("" + Session("client") == "debug") {
WriteTeteCol ('','DOC_ID')
WriteTeteCol ('','ANN_ID')
WriteTeteCol ('','VAN_ID')
}
WriteTeteCol ('','ANN_REF_ORIG')
WriteTeteCol ('','VAN_TITRE')
WriteTeteCol ('','Version');
WriteTeteCol ('','VAN_APPLICATION_DATE')
WriteTeteCol ('','VAN_PEREMPTION_DATE')
OBJECT1 = new DWGenerator ("OBJECT1", "SuneTeam");
sqlquery = "select";
sqlquery += " documents.doc_type_doc, "
sqlquery += " annexes.doc_id, annexes.ann_id, annexes_versions.van_id,";
sqlquery += " annexes.ann_ref_orig,";
sqlquery += " annexes_versions.van_ref_info, annexes_versions.van_titre, "
sqlquery += " annexes_versions.van_application_date, annexes_versions.van_peremption_date,";
sqlquery += " annexes_versions.van_creation_date," ;
sqlquery += " annexes_versions.van_nouveaute_duree,";
sqlquery += " annexes_versions.van_no_valide, annexes_versions.van_no_projet";
sqlquery += " from documents, annexes, annexes_versions";
sqlquery += " where";
sqlquery += " annexes_versions.doc_id = annexes.doc_id and annexes_versions.ann_id = annexes.ann_id";
sqlquery += " and documents.doc_id = annexes.doc_id ";
sqlquery += " and annexes.ann_dept_code = '" + Session ("dept_code") + "'";
sqlquery += " and documents.doc_type_doc = '" + Session ("type_doc") + "'";
if (Session ("projets") == "non" ){sqlquery += " and van_no_projet = 0";}
sqlquery += " and (van_application_date <= cast ('" + date_visu + "' as datetime) or van_application_date is null)";
sqlquery += " and (van_peremption_date > cast ('" + date_visu + "' as datetime) or van_peremption_date is null)"
sqlquery += " order by annexes.doc_id ASC, annexes.ann_id DESC "
OBJECT1.cursor = OBJECT1.conn.CreateCursor (sqlquery);
if (null == OBJECT1.cursor) {OBJECT1.WriteError ();}
if (!OBJECT1.cursor.EOF()) OBJECT1.cursor.MoveFirst();
for (var i =0; i < OBJECT1.startrow; i++) {OBJECT1.cursor.MoveNext();}
//li_doc_id = -1;
lb_paire = true
for (var i=0; (!OBJECT1.cursor.EOF() && i < GetNbLignes()); i++) {
//if ((li_doc_id != parseInt(OBJECT1.cursor.GetValue ("doc_id"))) || ("" + Session ("client") == "admin")) {
//li_doc_id = OBJECT1.cursor.GetValue ("doc_id");
lb_paire = !lb_paire;
with (psDocument) {
if (lb_paire){Write ("\n <TR class=tableTD1>");} else {Write ("\n <TR class=tableTD2>");};
//REMPLISSAGE DE LA DATAWINDOW
if ("" + Session("client") == "debug") {
Write ("\n<TD class=text>" + OBJECT1.cursor.GetValue ('doc_id') + "</TD>");
Write ("\n<TD class=text>" + OBJECT1.cursor.GetValue ('ann_id') + "</TD>");
Write ("\n<TD class=text>" + OBJECT1.cursor.GetValue ('van_id') + "</TD>");
}
Write ("\n<TD class=text>" + OBJECT1.cursor.GetValue ('ann_ref_orig') + "</TD>");
Write ("\n<TD class=text>");
//=======================
//Insertion signe nouveauté
var string = "" + OBJECT1.cursor.GetValue ('van_creation_date');
var date_publi = new Date ();
date_publi.setDate(parseInt(string.substring (0,2)));
date_publi.setMonth(parseInt(string.substring (3,5)-1));
date_publi.setYear(parseInt(string.substring (6,10)));
date_publi = format_time_comp(date_publi);
var nouveau = parseInt("" + OBJECT1.cursor.GetValue ('van_nouveaute_duree'))
var today = new Date(); today = format_time_comp(today);
if (((today - date_publi) <= nouveau) && (OBJECT1.cursor.GetValue ("van_no_projet") == 0))
{Write ("<B><FONT COLOR=\"blue\">" + trad('NOUVEAU!') + " - </FONT></B>")}
//=======================
Write ("<A HREF=\"" + OBJECT1.cursor.GetValue ('van_ref_info') + "\">" + OBJECT1.cursor.GetValue ('van_titre') + "</A></TD>");
Write ("\n<TD class=text align=center>" + OBJECT1.cursor.GetValue ("van_no_valide") + "." + OBJECT1.cursor.GetValue ("van_no_projet") + "</TD>");
Write ("\n<TD class=text>" + OBJECT1.cursor.GetValue ('van_application_date') + "</TD>");
Write ("\n<TD class=text>" + OBJECT1.cursor.GetValue ('van_peremption_date') + "</TD>");
Write ("\n</TR>");
} // fin du with
//} //fin du if nouvelle ligne (nouveau doc_id)
OBJECT1.cursor.MoveNext();
} //fin de la boucle
Response.Write ("</TABLE>");
|
|