home *** CD-ROM | disk | FTP | other *** search
/ Chip 2000 May / Chip_2000-05_cd1.bin / tema / SW602 / Winbase / EShop_demo / SETDETAIL.WWW < prev    next >
Text File  |  2000-03-16  |  14KB  |  307 lines
  1. {$$3220255846 .                              }<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2 Final//EN">
  2.  
  3. <HTML>
  4. <HEAD>
  5.  <META HTTP-EQUIV="CONTENT-TYPE" CONTENT="TEXT/HTML; CHARSET=WINDOWS-1250">
  6.  <META NAME="AUTHOR" CONTENT="Software602 - Pdur">
  7.  <META NAME="Keywords" CONTENT=" ">
  8.  <TITLE>Vybranß objednßvka</TITLE>
  9.  <STYLE TYPE="text/css">
  10. <!--
  11.  .white { font-size: 9pt; font-family: Arial CE, Helvetica CE, HelveticaE, Arial, Helvetica; color: #FFFFFF }
  12.  .nad { font-size: 12pt; font-family:  Arial CE, Helvetica CE, HelveticaE, Arial, Helvetica; color: #FFFFFF; background: #104080 }
  13.  .blue { font-size: 8pt; font-family:  Arial CE, Helvetica CE, HelveticaE, Arial, Helvetica; color: #104080 }
  14.  .black { font-size: 9pt; font-family: Arial CE, Helvetica CE, HelveticaE, Arial, Helvetica; color: #FFFFFF; background: #104080 }
  15.  .blacktl { font-size: 9pt; font-family: Arial CE, Helvetica CE, HelveticaE, Arial, Helvetica; color: #FFFFFF; background: #FFFFFF }
  16.  .black8 { font-size: 8pt; font-family: Arial CE, Helvetica CE, HelveticaE, Arial, Helvetica; color: #000000; background: #FFFFFF }
  17.  .black9 { font-size: 8pt; font-family: Arial CE, Helvetica CE, HelveticaE, Arial, Helvetica; color: #000000; background: #FFFFFF }
  18.  .black8s { font-size: 8pt; font-family: Arial CE, Helvetica CE, HelveticaE, Arial, Helvetica; color: #A0A0A0; background: #FFFFFF }
  19.  .black9s { font-size: 8pt; font-family: Arial CE, Helvetica CE, HelveticaE, Arial, Helvetica; color: #000000; background: #dedede }
  20.  .black9b { font-size: 8pt; font-family: Arial CE, Helvetica CE, HelveticaE, Arial, Helvetica; color: #104080; background: #BDE7FF }
  21.  .black9c { font-size: 8pt; font-family: Arial CE, Helvetica CE, HelveticaE, Arial, Helvetica; color: #104080; }
  22.  .male { font-family: Arial CE, Helvetica CE, HelveticaE, Arial, Helvetica; font-size: 9pt; color: #808080; text-align: left; margin-left: 10pt; }
  23.  A { font-family:  Arial CE, Helvetica CE, HelveticaE, Arial, Helvetica;ca; font-size: 8pt; cursor: auto ; color: #0000FF; text-decoration: underline; text-indent: 10pt;}
  24.  A.velky { font-family: Arial; font-size: 10pt; cursor: auto ; color: #0000FF; text-decoration: underline; text-indent: 0pt; }
  25. -->
  26.  </STYLE>
  27. </HEAD>
  28.  
  29. <%WBC%>
  30. ErrorTemplate: err.htw
  31.  
  32. BeginProgram: www_find_id
  33.   zjisti_kdo(%obj_so%);
  34. EndProgram;
  35.  
  36. GetVariable: jmeno:=jmenoglob  
  37. GetVariable: heslo:=heslolob  
  38.  
  39. SQLStatement: zprac_obj
  40. + SELECT ID_DOBJ
  41. + FROM obj_header
  42. + WHERE obj_header.id_dobj=str2int("%obj_so%") AND (obj_header.zpracovana<>NONEDATE)
  43.  
  44. SQLStatement: detail_obj
  45. #ifexists 
  46. + SELECT a.ID_DOBJ
  47. + FROM obj_header a, obj_polozky b,  S_doprava
  48. + WHERE a.id_dobj=b.id_dobj AND 
  49. +      a.id_dobj=str2int("%obj_so%")  AND a.doprav=S_doprava.KOD
  50. #then 
  51. + SELECT a.ID_DOBJ, a.ID_ORG,  a.CIS_EOB, a.DATUM, a.DATUM_D, a.POTVRZENA, a.STORNO_DAT, a.STORNO, a.ZPRACOVANA, a.SUM_CENA, a.DOPRAV, a.pozn,
  52. + b.ID_POL, b.ID_CNK, b.MNOZSTVI, b.CENA_SUM, b.NAZEV_VL, b.CENA_SUMMN, S_doprava.ZPUSOB AS zpdopr, S_platba.nazev AS Formular
  53. + FROM obj_header a, obj_polozky b, S_doprava, S_platba
  54. + WHERE a.id_dobj=b.id_dobj AND  a.id_dobj=str2int("%obj_so%") 
  55. +  AND a.doprav=S_doprava.KOD AND S_doprava.platba=S_platba.id
  56. + ORDER BY a.cis_eob DESC
  57. #else
  58. + SELECT a.ID_DOBJ, a.ID_ORG,  a.CIS_EOB, a.DATUM, a.DATUM_D, a.POTVRZENA, a.STORNO_DAT, a.STORNO, a.ZPRACOVANA, a.SUM_CENA, a.DOPRAV AS zpdopr, a.pozn,
  59. + b.ID_POL, b.ID_CNK, b.MNOZSTVI, b.CENA_SUM, b.NAZEV_VL, b.CENA_SUMMN
  60. + FROM obj_header a, obj_polozky b
  61. + WHERE a.id_dobj=b.id_dobj AND 
  62. +      a.id_dobj=str2int("%obj_so%")   
  63. + ORDER BY a.cis_eob DESC
  64. #endif
  65.  
  66. SQLStatement: odberatel
  67. #ifexists 
  68. + SELECT  Obj_header.id_dobj
  69. + FROM OBJ_HEADER
  70. + WHERE  OBJ_HEADER.id_dobj=%obj_so%
  71. #then 
  72. + SELECT id, NAZEV1, KONT_OSOBA, ULICE, PSC, MESTO, TELEF, FAX, ICO, DIC, DEAL_SK, MAIL_ADRES, CISLO_UCTU, PENEZNI_USTAV
  73. + FROM OBCHODNI_PARTNERI,obj_header
  74. + WHERE  ((OBCHODNI_PARTNERI.id=obj_header.id_org) AND (obj_header.id_dobj=str2int("%obj_so%")))
  75. #endif
  76.  
  77. SQLStatement: prodejce
  78. + SELECT nazev1, KONT_OSOBA, ULICE, PSC, MESTO, TELEF, FAX, ICO, DIC, MAIL_ADRES, CISLO_UCTU, PENEZNI_USTAV, KONST_SYMB 
  79. + FROM info_provozovatel
  80.  
  81. SQLStatement: celkem
  82. #ifexists
  83. + SELECT sum_cena
  84. + FROM obj_header
  85. + WHERE id_dobj=%obj_so% AND sum_cena>0
  86. #then
  87. + SELECT sum_cena, ob_sleva, sum_obj, SUMVAHA, K_UHRADE, POSTOVNE, 0.00 AS nula, (ob_sleva/sum_cena) AS w_sleva
  88. + FROM obj_header
  89. + WHERE id_dobj=%obj_so%#else
  90. + SELECT sum_cena, ob_sleva, sum_obj, SUMVAHA, K_UHRADE, POSTOVNE, 0.00 AS nula, (0.00) AS w_sleva
  91. + FROM obj_header
  92. + WHERE id_dobj=%obj_so%#endif
  93.  
  94. SQLStatement: sys_par
  95. + SELECT round_sum,enable_storno FROM Sys_par
  96.  
  97. SQLStatement: formul
  98. + SELECT S_platba.id,  S_platba.nazev AS CO
  99. + FROM obj_header, S_doprava, S_platba
  100. + WHERE  (OBJ_HEADER.id_dobj=%obj_so%)  AND (obj_header.doprav=S_doprava.kod) AND (S_doprava.platba=S_platba.id)
  101.  
  102. <%/WBC%>
  103.  
  104.  
  105. <body background="/catalog/back_bd2.gif" bgcolor="#FFFFFF" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" <%if login.TotalCount>0 %> onLoad="top.frames[1].location='<%wb_url%>/lista.wbc?jmeno=<%jmeno%>&heslo=<%heslo%>&cena=0.00&cenaDPH=0.00&objednavka=-1';top.frames[2].frames[0].location='<%wb_url%>/sidebar.htw?jmeno=<%jmeno%>&heslo=<%heslo%>&cena=0.00&cenaDPH=0.00&objednavka=-1'" <%endif%> >
  106. <br>
  107. <div align="center" style="width: 580px">
  108. <%if detail_obj.CurrentRecord > 0%>
  109. <br>
  110. <TABLE WIDTH="570" BORDER=0 CELLSPACING=1 CELLPADDING=2>
  111. <TR>
  112.  <th class="black" colspan="2" align="CENTER"><strong>Odb∞ratel</strong></TH>
  113.  <th class="black" colspan="2" align="CENTER"><strong>Prodejce</strong></TH>
  114. </TR>
  115. <TR>
  116.  <td width="100" align="RIGHT" class="black9b">Firma:</TD>
  117.   <TD class="black9"ALIGN="LEFT"> <STRONG><%odberatel.nazev1%></STRONG></TD>
  118.  <TD width="100" class="black9b" ALIGN="RIGHT">Firma:</TD>
  119.   <TD class="black9" ALIGN="LEFT"> <STRONG><%prodejce.nazev1%></STRONG></TD>
  120. </TR>
  121. <TR>
  122.  <TD class="black9b" ALIGN="RIGHT">I╚O:</TD>
  123.  <%if odberatel.ico <>""%>
  124.   <TD class="black9" ALIGN="LEFT"> <STRONG><%odberatel.ico%></STRONG></TD> 
  125.  <%else%>
  126.   <TD class="black9" ALIGN="CENTER"> neuvedeno</TD> 
  127.  <%endif%>
  128.  <TD class="black9b" ALIGN="RIGHT">I╚O:</TD>
  129.  <%if prodejce.ico <>""%>
  130.   <TD class="black9" ALIGN="LEFT"> <STRONG><%prodejce.ico%></STRONG></TD> 
  131.  <%else%>
  132.   <TD class="black9" ALIGN="CENTER"> neuvedeno</TD> 
  133.  <%endif%>
  134. </TR>
  135. <TR>
  136.  <TD class="black9b" ALIGN="RIGHT">DI╚:</TD>
  137.  <%if odberatel.dic <>""%>
  138.   <TD class="black9" ALIGN="LEFT"> <STRONG><%odberatel.dic%></STRONG></TD> 
  139.  <%else%>
  140.   <TD class="black9" ALIGN="CENTER"> neuvedeno</TD> 
  141.  <%endif%>
  142.  <TD class="black9b" ALIGN="RIGHT">DI╚:</TD>
  143.  <%if prodejce.dic <>""%>
  144.   <TD class="black9" ALIGN="LEFT"> <STRONG><%prodejce.dic%></STRONG></TD> 
  145.  <%else%>
  146.   <TD class="black9" ALIGN="CENTER"> neuvedeno</TD> 
  147.  <%endif%>
  148. </TR>
  149. <TR>
  150.  <TD class="black9b" ALIGN="RIGHT">╚φslo ·Φtu:</TD>
  151.   <TD class="black9" ALIGN="LEFT"> <STRONG><%odberatel.PENEZNI_USTAV %>: <%odberatel.CISLO_UCTU %> </STRONG></TD> 
  152.  <TD class="black9b" ALIGN="RIGHT">╚φslo ·Φtu:</TD>
  153.   <TD class="black9" ALIGN="LEFT"> <STRONG><%prodejce.PENEZNI_USTAV %>: <%prodejce.CISLO_UCTU %> / <%prodejce.KONST_SYMB %></STRONG></TD> 
  154. </TR>
  155. <TR>
  156.  <TD class="black9b" ALIGN="RIGHT">Kont. osoba:</TD>
  157.   <TD class="black9" ALIGN="LEFT"> <STRONG><%odberatel.kont_osoba%></STRONG></TD> 
  158.  <TD class="black9b" ALIGN="RIGHT">Kont. osoba:</TD>
  159.   <TD class="black9" ALIGN="LEFT"> <STRONG><%prodejce.kont_osoba%></STRONG></TD>  
  160. </TR>
  161. <TR>
  162.  <TD class="black9b" ALIGN="RIGHT">Ulice:</TD>
  163.   <TD class="black9" ALIGN="LEFT"> <STRONG><%odberatel.ulice%></STRONG></TD>
  164.  <TD class="black9b" ALIGN="RIGHT">Ulice:</TD>
  165.   <TD class="black9" ALIGN="LEFT"> <STRONG><%prodejce.ulice%></STRONG></TD> 
  166. </TR>
  167. <TR>
  168.  <TD class="black9b" ALIGN="RIGHT">PS╚ a M∞sto:</TD>
  169.   <TD class="black9" ALIGN="LEFT"> <STRONG><%odberatel.psc%> <%odberatel.mesto%></STRONG></TD>
  170.  <TD class="black9b" ALIGN="RIGHT">PS╚ a M∞sto:</TD>
  171.   <TD class="black9" ALIGN="LEFT"> <STRONG><%prodejce.psc%> <%prodejce.mesto%></STRONG></TD> 
  172. </TR>
  173. </TABLE>
  174. <BR>
  175.  
  176. <table width="570" border="0" cellspacing="0" cellpadding="2">
  177.  <td class="black" align="CENTER"><strong>HlaviΦka</strong></td></table>
  178.  
  179. <TABLE BORDER=0 WIDTH="570" CELLSPACING=1 CELLPADDING=2>
  180. <TR>
  181.  <TH class="black9b" ALIGN="CENTER">Zalo₧ena</TH>
  182.  <TH class="black9b" ALIGN="CENTER">Potvrzena<BR>odb∞ratelem</TH> 
  183.  <TH class="black9b" ALIGN="CENTER">Potvrzena<BR>prodejcem</TH>
  184. <%if zprac_obj.totalcount>0 %>
  185.  <TH class="black9b" ALIGN="CENTER">PotvrzenΘ<BR>datum dodßnφ</TH>
  186.  <%else%> 
  187.  <TH class="black9b" ALIGN="CENTER">Po₧adovanΘ<BR>datum dodßnφ</TH>
  188.  <%endif%>  
  189.  <TH class="black9b" ALIGN="CENTER">Po₧adovan²<BR>zp∙sob platby</TH>
  190.  <TH class="black9b" ALIGN="CENTER">Cena celkem<BR>bez DPH</TH>
  191.  <TH class="black9b" ALIGN="CENTER">Cena celkem<BR>s DPH</TH>
  192. </TR> 
  193. <TR>
  194.   <TD class="black9" ALIGN="CENTER"><STRONG><%detail_obj.datum%> </STRONG></TD> 
  195.  <%if detail_obj.potvrzena%>
  196.    <TD class="black9" ALIGN="CENTER"><STRONG>Ano</STRONG></TD> 
  197.  <%else%>
  198.    <TD class="black9" ALIGN="CENTER"><STRONG>Ne</STRONG></TD> 
  199.  <%endif%>  
  200.   <TD class="black9" ALIGN="CENTER"><STRONG><%detail_obj.zpracovana%> </STRONG></TD> 
  201.  <TD class="black9" ALIGN="CENTER"><STRONG><%detail_obj.datum_d%> </STRONG></TD> 
  202.   <TD class="black9" ALIGN="CENTER"><STRONG><%detail_obj.zpdopr%> </STRONG></TD> 
  203.  <TD class="black9" ALIGN="CENTER"><STRONG><%celkem.sum_obj;-102%></STRONG></TD>
  204.  <TD class="black9" ALIGN="CENTER"><STRONG><%celkem.k_uhrade;-102%></STRONG></TD>
  205. </TR> 
  206. </TABLE> 
  207.  
  208.  
  209. <BR>
  210.  
  211. <table width="570" border="0" cellspacing="1" cellpadding="2">
  212.  <td class="black" align="CENTER"><strong>Polo₧ky (bez DPH)</strong></td></table>
  213.  
  214. <TABLE BORDER=0 WIDTH="570" CELLSPACING=1 CELLPADDING=2>
  215. <TR>
  216.  <TH class="black9b" ALIGN="CENTER">╚φslo<BR>pol.</TH>
  217.  <TH class="black9b" ALIGN="CENTER">Nßzev vΦetn∞ dopl≥ujφcφch informacφ</TH>
  218. <!-- <TH class="black9b" ALIGN="CENTER">MJ</TH> -->
  219.  <TH class="black9b" ALIGN="CENTER">Mno₧stvφ</TH> 
  220. <TH class="black9b" ALIGN="CENTER">Cena<BR>za MJ</TH>
  221.  <TH class="black9b" ALIGN="CENTER">Dosa₧en² <BR>rabat za MJ</TH>
  222.  <TH class="black9b" ALIGN="CENTER">Celkem <BR>bez DPH</TH> 
  223. </TR> 
  224. <%begindetail detail_obj%>
  225.  <%if ((CurrentRecord=1) OR (CurrentRecord=3)  OR (CurrentRecord=5)  OR (CurrentRecord=7)  OR (CurrentRecord=9)  OR (CurrentRecord=11)  OR (CurrentRecord=13)  OR (CurrentRecord=15)  OR (CurrentRecord=17)  OR (CurrentRecord=19)  OR (CurrentRecord=21)  OR (CurrentRecord=23)  OR (CurrentRecord=25)) %>
  226. <TR>
  227.   <TD class="black9" ALIGN="CENTER"><%id_pol%></TD>
  228.  <TD class="black9" ALIGN="LEFT"><%nazev_vl%></TD>
  229. <!-- <TD class="black9" ALIGN="CENTER"><%jednotka%></TD>-->
  230.  <TD class="black9" ALIGN="RIGHT"><%mnozstvi;-102%></TD>
  231.  <TD class="black9" ALIGN="RIGHT"><%cena_sum;-102%></TD>
  232. <%if mnozstvi>0.0%>
  233.  <TD class="black9" ALIGN="RIGHT"><%((cena_sum*mnozstvi)-cena_summn)/mnozstvi;-102%></TD>
  234. <%else%>
  235.  <TD class="black9" ALIGN="RIGHT">nenφ</TD>
  236. <%endif%>
  237.  <TD class="black9" ALIGN="RIGHT"><%cena_summn;-102%></TD>
  238. </TR>
  239.  
  240. <%else%>
  241. <TR>
  242.   <TD class="black9s" ALIGN="CENTER"><%id_pol%></TD>
  243.  <TD class="black9s" ALIGN="LEFT"><%nazev_vl%></TD>
  244. <!-- <TD class="black9s" ALIGN="CENTER"><%jednotka%></TD>-->
  245.  <TD class="black9s" ALIGN="RIGHT"><%mnozstvi;-102%></TD>
  246.  <TD class="black9s" ALIGN="RIGHT"><%cena_sum;-102%></TD>
  247. <%if mnozstvi>0.0%>
  248.  <TD class="black9s" ALIGN="RIGHT"><%((cena_sum*mnozstvi)-cena_summn)/mnozstvi;-102%></TD>
  249. <%else%>
  250.  <TD class="black9s" ALIGN="RIGHT">nenφ</TD>
  251. <%endif%>
  252.  <TD class="black9s" ALIGN="RIGHT"><%cena_summn;-102%></TD>
  253. </TR>
  254.  
  255. <%endif%>
  256.  
  257. <%enddetail%>
  258. </TABLE>
  259. <BR>
  260. <CENTER>
  261. <TABLE BORDER=2 WIDTH="290" CELLSPACING=0 CELLPADDING=2 bgcolor="#DEDEDE">
  262. <TR ALIGN="CENTER"><td CLASS="black8" align="CENTER"><B>Poznßmka: </B></TD></TR>
  263. <TR ALIGN="CENTER"><td CLASS="black8" align="CENTER"><STRONG><%detail_obj.pozn%></STRONG></TD></TR>
  264. </TABLE>
  265. <BR>
  266. <TABLE BORDER=1 WIDTH="290" CELLSPACING=0 CELLPADDING=3>
  267. <tr><td CLASS="black" colspan="2" align="CENTER"><strong>Rekapitulace (v KΦ)</strong></td>
  268. <TR>
  269.   <TD CLASS="black9" ALIGN="CENTER"><STRONG>Celkem za polo₧ky (bez DPH):</STRONG></TD>
  270.   <TD CLASS="black9" ALIGN="RIGHT"><strong><%celkem.sum_cena;-102%></strong></TD>
  271. </TR>
  272. <%if ((celkem.w_sleva<1.0) AND (celkem.w_sleva>0.0))%>
  273. <TR>
  274.   <TD CLASS="black9" ALIGN="CENTER"><STRONG>Dosa₧enß objemovß sleva:
  275. ( <%(celkem.w_sleva)*100;-1%> %)
  276.  </STRONG></TD>
  277.   <TD CLASS="black9" ALIGN="RIGHT"><strong><%celkem.ob_sleva;-102%></strong></TD>
  278. </TR>
  279. <%endif%>
  280. <TR>
  281.   <TD CLASS="black9" ALIGN="CENTER"><STRONG>PoÜtovnΘ / dopravnΘ (bez DPH):</STRONG></TD>
  282.   <TD CLASS="black9" ALIGN="RIGHT"><strong><%celkem.postovne;-102%></strong></TD>
  283. </TR>
  284.  <TR>
  285.   <TD CLASS="black9" ALIGN="CENTER"><STRONG>Celkem bez DPH:</STRONG></TD>
  286.   <TD CLASS="black9" ALIGN="RIGHT"><strong><%celkem.sum_obj;-102%></strong></TD>
  287.  </TR>
  288.  <TR>
  289.   <TD CLASS="black9" ALIGN="CENTER"><STRONG>Celkem  DPH: </STRONG></TD>
  290.   <TD CLASS="black9" ALIGN="RIGHT"><strong><%celkem.k_uhrade-celkem.sum_obj;-102%></strong></TD>
  291.  </TR>
  292.  <TR>
  293.   <TD CLASS="black" ALIGN="CENTER"><STRONG>╚ßstka k ·hrad∞ <%if (sys_par.round_sum>0) %>(po zaokrouhlenφ)<%endif%>:</STRONG></TD>
  294.   <TD CLASS="black" ALIGN="RIGHT"><strong><%celkem.k_uhrade;-102%></strong></TD>
  295.  </TR>
  296. </TABLE>
  297. </CENTER>
  298.  
  299. <%else%>
  300. <CENTER><STRONG>
  301.  <FONT SIZE="+2" COLOR="#FFC800">Objednßvka nebyla nalezena. Bu∩ ji₧ byla zruÜena nebo existuje pouze jejφ hlaviΦka, bez objednßvan²ch polo₧ek.</font>
  302.  <HR SIZE="3" WIDTH="100%">
  303.  <A HREF="javascript:history.back()"><IMG SRC="/catalog/zpet.gif" WIDTH=27 HEIGHT=26 BORDER=0 ALT="Zp∞t na p°edchozφ strßnku"></A>
  304. </STRONG></CENTER>
  305. <%endif%>
  306. </BODY>
  307. </HTML>  <font color="#FFFFFF">