summaryrefslogtreecommitdiffstats
path: root/views
diff options
context:
space:
mode:
authorCranix <joachim726@gmail.com>2013-03-21 16:40:56 -0400
committerCranix <joachim726@gmail.com>2013-03-21 16:40:56 -0400
commit9c6d1c5ba1c50c8dd197de24c22a2dbc9a43b707 (patch)
tree32e18278793e2542082cae27c95871af778130c7 /views
parent73fe8279e6beb35c7f16c45eb776dcb1ceb11d63 (diff)
downloadBiblioteka-9c6d1c5ba1c50c8dd197de24c22a2dbc9a43b707.tar.gz
Biblioteka-9c6d1c5ba1c50c8dd197de24c22a2dbc9a43b707.tar.bz2
Biblioteka-9c6d1c5ba1c50c8dd197de24c22a2dbc9a43b707.tar.xz
Biblioteka-9c6d1c5ba1c50c8dd197de24c22a2dbc9a43b707.zip
Pierwsze podejście do dodania informacji o wypożyczającym.
Niewiedzieć czemu, $sth->prepare("select * from ksiazki") w lini 17 przestało działać, Tak samo to samo zapytanie w części obsługującej wypożyczanie książek.
Diffstat (limited to 'views')
-rw-r--r--views/main_page.tt35
1 files changed, 35 insertions, 0 deletions
diff --git a/views/main_page.tt b/views/main_page.tt
new file mode 100644
index 0000000..6b45fac
--- /dev/null
+++ b/views/main_page.tt
@@ -0,0 +1,35 @@
+<html>
+ <body>
+ % (my @tab) = @{$_[0]->{'table'}};
+
+ <table border=7>
+ <tr><td>id</td><td>isbn</td><td>tytul</td><td>autor</td><td>wlasiciciel</td><td>jest?</td><td>mozna brac?</td></tr>
+ <tr>
+
+ % for (my $i=0;$i<$#tab+1;$i++)
+ % {
+ % for (my $ii=0;$ii<7;$ii++) #Jest 7 pol w kazdym rekordzie
+ % {
+
+ % if ($ii==5 || $ii==6)
+ % {
+ % if ($tab[$i][$ii]==1)
+ % {
+ % $tab[$i][$ii] = 'Tak';
+ % }
+ % else
+ % {
+ % $tab[$i][$ii] = 'Nie';
+ % }
+ % }
+ <td> <%= $tab[$i][$ii] %> </td>
+ % }
+ %= "\n"
+ </tr>
+ <tr>
+ % }
+
+ </table>
+
+ </body>
+</html>