home *** CD-ROM | disk | FTP | other *** search
/ Chip 2000 May / Chip_2000-05_cd1.bin / tema / SW602 / Winbase / EShop_demo / ZRUS_POL.WWW < prev    next >
Text File  |  2000-03-16  |  2KB  |  55 lines
  1. {$$3220255961 .                              }Template: kosikhtw.htw
  2. ErrorTemplate: err.htw
  3.  
  4. RequiredValues: heslo jmeno objednavka 
  5.  
  6. BeginProgram: www_obj
  7.  W_smaz_pol(%objednavka%,%polozka% );
  8. EndProgram;
  9.  
  10. GetVariable: objednavka:=w_objednavka
  11. GetVariable: w_objnarok:=w_narok
  12. GetVariable: w_datum_d:=w_datum_d
  13. GetVariable:cena:=w_cena
  14. GetVariable:cenaDPH:=w_cenaDPH
  15.  
  16. SQLStatement: detail_obj_h
  17. + SELECT  Obj_header.id_dobj,Obj_header.id_org,Obj_header.cis_eob,Obj_header.datum,Obj_header.datum_d,Obj_header.doprav,Obj_header.potvrzena,Obj_header.zpracovana,Obj_header.sum_obj, Obj_header.pozn
  18. + FROM OBJ_HEADER
  19. + WHERE  OBJ_HEADER.id_dobj=%OBJEDNAVKA%
  20.  
  21.  
  22. SQLStatement: detail_obj_p
  23. + SELECT  Obj_polozky.id_dobj,Obj_polozky.id_pol,Obj_polozky.id_cnk,Obj_polozky.mnozstvi,Obj_polozky.cena_summn,Obj_polozky.nazev_vl,Obj_polozky.hodnota_dph,Obj_polozky.cena_sum,Obj_polozky.cena_summn, cenik.jednotka
  24. + FROM obj_polozky, cenik
  25. + WHERE OBJ_POLOZKY.id_dobj=%objednavka% AND OBJ_POLOZKY.id_cnk=cenik.id_cenik
  26. + ORDER BY OBJ_POLOZKY.id_pol
  27.  
  28. SQLStatement: celkem
  29. #ifexists
  30. + SELECT sum_cena
  31. + FROM obj_header
  32. + WHERE id_dobj=str2int("%objednavka%") AND sum_cena>0
  33. #then
  34. + SELECT sum_cena, ob_sleva, sum_obj, SUMVAHA, K_UHRADE, POSTOVNE, 0.00 AS nula, (ob_sleva/sum_cena) AS w_sleva
  35. + FROM obj_header
  36. + WHERE id_dobj=str2int("%objednavka%")
  37. #else
  38. + SELECT sum_cena, ob_sleva, sum_obj, SUMVAHA, K_UHRADE, POSTOVNE, 0.00 AS nula, (0.00) AS w_sleva
  39. + FROM obj_header
  40. + WHERE id_dobj=str2int("%objednavka%")
  41. #endif
  42.  
  43.  
  44. SQLStatement: slevy
  45. + SELECT nad_mnoz, proc FROM cen_slevy
  46.  
  47. SQLStatement: skupiny
  48. +SELECT S_zbozi_sk.kod_skupiny AS kod
  49. +FROM S_zbozi_sk
  50. #if W_check_kod<>""
  51. +WHERE ( s_zbozi_sk.kod_skupiny="%check_kod%" )
  52. #endif
  53.  
  54.  
  55.