How-to-eshop
------------
Mala templata, referencni eshop. Funguje:

- vvzejk
- pridavani, odebirani produktu
- strom produktu
- navigace v produktech

Je potreba "pivni" DTD a Data.



elementy na strance
-------------------

Alias       Type        Value                   Class     Prepare   Flags   UFlags

koupit      int                                 private             None    None
node        int         0                       private             None    None
odebrat     int                                 private             None    No passing
pridat      int                                 private             None    No passing
prods       data_source piva_CZ (Ceska piva)    private   manual    None    None
prodsset    data_set                            private             None    No passing
prodstree   data_source piva_CZ (Ceska piva)    private   (default) None    None
ukaz        text                                private             None    None
vyprazdnit  int                                 private             None    No passing


relations na strance
--------------------
prods    ---> [data] limit by [prodsset] 



TPL
---



{:table.create vozejk}
{:www.staticrequire eshop}

{:if {pridat}!=''}
  {:if {:table.check vozejk id {pridat}}=1}
    {:table.cellexp vozejk id "{pridat}" pocet '{*}+1'}
  {:else}
    {:table.insert vozejk "id={pridat}&pocet=1"}
  {:endif}

  {:www.set ukaz vozejk}
  {:www.set pridat}
{:endif}

{:if {odebrat}!=''}
  {:table.rowdel vozejk id "{odebrat}"}
  {:www.set ukaz vozejk}
  {:www.set odebrat}
{:endif}

{:if {vyprazdnit}!=''}
  {:table.clean vozejk}
{:endif}

{:if {koupit}!=''}
  Cupr ! Diky ze nam nechas videlat si na pivo chlipniku...<br><br>
  {:table.copy prods vozejk}

  {:table.rowexp prods cena 10}
  {:table.rowexp prods cenatot '{:table.val cena}*{:table.val pocet}'}
  Celkem sis vybral zbozi za : ${:table.colexp prods '{*}+{:table.val cenatot}'}<br><br>
  Takze dik, tvoji kreditku a jmeno zname, neb vime uplne vsecho !!!<br><br><br>
  Astalavista baby. A priste se nesmejte Rayovy kdyz rekne 1-2 dny, tak mysli 1-2 dny :)
  <br><br><hr>
  <br><br><br><br><br><br><br><br>
  {:return}
{:endif}


<br><hr><br>
<table width="100%">
<tr height="50">
<td width="60%"><font size="20"><b>E-SHOP</b></font></td>
<td>
<a href="{:www.link ukaz=vozejk}" style="text-decoration: none">
<pre>
{:if {:table.len vozejk}=0}

    ,___
    '   \_________________
        |                 \
        |  V O Z E J K    /
        \________________/
          |            |
         +-+          +-+
         +-+          +-+
{:else}
               _______
    ,___    ___|_2030|
    '   \___|1020_|__|____
        |                 \
        |  V|O Z E J K    /
        \________________/
          |            |
         +-+          +-+
         +-+          +-+
{:endif}
</pre>
</a></td>
</tr>
</table>
<br><hr><br>

{:if {ukaz}=vozejk}
  <center><br>
  <font size="5"><b>Obsah kosiku</b></font>&nbsp;&nbsp;&nbsp;<A href="{:www.link ukaz=&pridat=&odebrat=}">(zpet na produkty)</a><br>
  <hr>
  </center><br><br>
  {:if {:table.len vozejk}!=0}
    Obsah vaseho nacpaneho vozejku je:<br><br>

    {:www.set prodsset {:table.list vozejk id}}
    {:www.prepare prods}

    {:table.glue prods vozejk id}

    {:table.rowexp prods cena 10}
    {:table.rowexp prods cenatot '{:table.val cena}*{:table.val pocet}'}

    <table cellpadding="5">
    <tr>
      <td>Polozka ID</td>
      <td>Nazef</td>
      <td>Pocet</td>
      <td>Cena za jedno</td>
      <td>Celkova cena</td>
      <td>&nbsp;</td>
    </tr>
    {:table.loop prods}
      <tr>
       <td>{:table.val id}</td>
       <td>{:table.val NameOb}</td>
       <td>{:table.val pocet}</td>
       <td>$ {:table.val cena}</td>
       <td>$ {:table.val cenatot}</td>
       <td>{!wwwlinkn "Odebrat" odebrat={:table.val id}}</td>
      </tr>
    {:table.loop}
    </table>
    <br><br>
    Celkova cena: {:table.colexp prods '{*}+{:table.val cenatot}'}<br><br>
    <form method="post" action="{:www.link koupit=1}">
    <input type="submit" value="Koupit !!! Chci to !">
    </form>
  {:else}
    Mas to uplne vypatlany !!!
  {:endif}
{:endif}

{:if {ukaz}=''}
  <center><br>
  <font size="5"><b>Vyber produktu</b></font><br>
  <hr><br><br>
  </center>

  Aktualni kategorie:
  <br>
  <br>
  {:tree.path prodstreep prodstree "{node}"}

  {:table.loop prodstreep}
    <A HREF="{:www.link node={:table.val parent}}">{:table.val cname}</a>
    {:if {:table.pos prodstreep upper}}
      &nbsp;&nbsp;---->&nbsp;&nbsp;
    {:else}
       {:www.set prodsset {:table.val prods}}
    {:endif}
  {:table.loop}
  <br><br>

  Aktualni subkategorie<BR><br>
  {:tree.nodes prodstree2 prodstree "{node}"}
  {:table.loop prodstree2}
     {:if {:table.val _childs}=1}
       <A HREF="{:www.link node={:table.val id}}">{:table.val cname}</a><br>
     {:else}
       <A HREF="{:www.link node={:table.val id}}">{:table.val cname}</a>&nbsp;&nbsp;<font size="-2"><b>(no childs)</b></font><br>
     {:endif}
  {:table.loop}
  <br><br>

  Aktualni produkty z vybrane kategorie:<br><br>
  {:www.prepare prods}
  {:if {:table.len prods}!=0}
    <table>
    {:table.loop prods}
      <tr>
      <td>{:table.val NameOb}</td>
      <td>&nbsp;&nbsp;&nbsp;</td>
      <td><A href="{:www.link pridat={:table.val id}}">pridat</a></td>
    {:table.loop}
    </table>
    <br><br>
    Pokud chce vyprazdnit kosik, tak neklikam {!wwwlinkn "sem" vyprazdnit=1}.
  {:else}
    Zadana kategrie neobsahuje zadne produkty.. Jako bys to nevedel, trupko...<br>
  {:endif}

{:endif}

{:www.statictable eshop vozejk}

<br><br><br><br><hr><br><br><br><br>