1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73
| create procedure formCategorie is
id_cat number;
begin
htp.headOpen;
htp.headClose;
htp.htmlOpen;
htp.bodyOpen;
htp.formopen(curl => 'http://ntelline.cict.fr:7780/ETUPRE/b3bd3.formRevue', cmethod => 'get');
htp.tableOpen(cborder => 'BORDER="1"',cattributes => 'WIDTH="100%"');
htp.tableCaption('Categories','CENTER');
for ligne in (select * from categorie) LOOP
htp.tableRowOpen;
htp.tabledata('<INPUT TYPE="checkbox" NAME="cat" value="' || ligne.id_cat || '">');
htp.tableData(ligne.id_cat);
htp.tableData(ligne.nom);
htp.tableRowClose;
end loop;
htp.tableClose;
htp.bodyClose;
htp.htmlClose;
htp.formSubmit(cvalue=>'Valider');
end;
create procedure formRevue (cat in number) is
begin
htp.headOpen;
htp.headClose;
htp.htmlOpen;
htp.bodyOpen;
htp.tableOpen('BORDER');
htp.tableCaption('Liste des revues','CENTER');
htp.tableRowOpen;
htp.tableHeader ('');
htp.tableHeader ('Nom_court');
htp.tableHeader ('Nom_long');
htp.tableHeader ('Nom');
htp.tableHeader ('Intitule');
htp.tableHeader ('Date_extraction');
htp.tableHeader ('Score');
htp.tableHeader ('Nb_article');
htp.tableRowClose;
htp.print( cat );
for ligne in (select nom_court,nom_long,nom,intitule,date_extraction,score,nb_article
from revue,categorie,domaine,extraction,possession
where possession.id_cat= categorie.id_cat
and categorie.id_domaine= domaine.id_domaine
and revue.issn=extraction.issn
and possession.issn = revue.issn
and cat=categorie.id_cat
order by nom_long)loop
htp.tableRowOpen;
htp.tableData('<INPUT TYPE="checkbox" NAME ="blabla" >');
htp.tableData(ligne.nom_court);
htp.tableData(ligne.nom_long);
htp.tableData(ligne.nom);
htp.tableData(ligne.intitule);
htp.tableData(ligne.date_extraction);
htp.tableData(ligne.score);
htp.tableData(ligne.nb_article);
htp.tableRowClose;
end loop;
htp.formopen(curl => 'http://ntelline.cict.fr:7780/ETUPRE/b3bd3.formTrie', cmethod => 'get');
htp.print('<label for="trie"> Classe par : </label>');
htp.print ('<select name="trie" id="trie">
<option value="nom_long"> nom_long </option>
<option value="nom_court"> nom_court </option>
<option value="score"> score </option>
<option value="nb_article"> nb_article </option></select>');
htp.formSubmit(cvalue=>'Valider');
htp.tableClose;
htp.bodyClose;
htp.htmlClose;
end; |
Partager