602ESHOP - Pokladna
<%WBC%>
ErrorTemplate: err.htw
RequiredValues: heslo jmeno objednavka
SQLStatement: defaultdoprava
#ifexists
+ SELECT zpusob
+ FROM Obchodni_partneri, S_deal_sk, Spoj_doprava,s_doprava, default_hodnoty
+ WHERE default_hodnoty.ZP_DOPRAV=s_doprava.ID_DOPRAVA AND S_doprava.id_doprava=Spoj_doprava.id_doprava
+ AND Spoj_doprava.id_dealsk=S_deal_sk.deal_id
+ AND S_deal_sk.deal_id=Obchodni_partneri.deal_sk
+ AND (obchodni_partneri.intr_user="%jmeno%" AND obchodni_partneri.intr_pswd="%heslo%")
#then
+ SELECT zpusob
+ FROM Obchodni_partneri, S_deal_sk, Spoj_doprava,s_doprava, default_hodnoty
+ WHERE default_hodnoty.ZP_DOPRAV=s_doprava.ID_DOPRAVA AND S_doprava.id_doprava=Spoj_doprava.id_doprava
+ AND Spoj_doprava.id_dealsk=S_deal_sk.deal_id
+ AND S_deal_sk.deal_id=Obchodni_partneri.deal_sk
+ AND (obchodni_partneri.intr_user="%jmeno%" AND obchodni_partneri.intr_pswd="%heslo%")
#else
+ SELECT zpusob
+ FROM Obchodni_partneri, S_deal_sk, Spoj_doprava,s_doprava, default_hodnoty
+ WHERE default_hodnoty.ZP_DOPRAV=s_doprava.ID_DOPRAVA AND S_doprava.id_doprava=Spoj_doprava.id_doprava
+ AND Spoj_doprava.id_dealsk=S_deal_sk.deal_id
+ AND S_deal_sk.deal_id=0
#endif
SQLStatement: typuziv
+ SELECT nazev_typ, id_typ FROM s_typ_uziv
SQLStatement: doprava
#ifexists
+ SELECT S_doprava.id_doprava,S_doprava.zpusob,S_doprava.popis,S_doprava.kod
+ FROM Obchodni_partneri, S_deal_sk, Spoj_doprava, S_doprava
+ WHERE S_doprava.id_doprava=Spoj_doprava.id_doprava AND Spoj_doprava.id_dealsk=S_deal_sk.deal_id
+ AND S_deal_sk.deal_id=Obchodni_partneri.deal_sk
+ AND (obchodni_partneri.intr_user="%jmeno%" AND obchodni_partneri.intr_pswd="%heslo%")
#then
+ SELECT S_doprava.id_doprava,S_doprava.zpusob,S_doprava.popis,S_doprava.kod
+ FROM Obchodni_partneri, S_deal_sk, Spoj_doprava, S_doprava
+ WHERE S_doprava.id_doprava=Spoj_doprava.id_doprava AND Spoj_doprava.id_dealsk=S_deal_sk.deal_id
+ AND S_deal_sk.deal_id=Obchodni_partneri.deal_sk
+ AND (obchodni_partneri.intr_user="%jmeno%" AND obchodni_partneri.intr_pswd="%heslo%")
#else
+ SELECT S_doprava.id_doprava,S_doprava.zpusob,S_doprava.popis,S_doprava.kod
+ FROM S_deal_sk, Spoj_doprava, S_doprava
+ WHERE S_doprava.id_doprava=Spoj_doprava.id_doprava AND Spoj_doprava.id_dealsk=S_deal_sk.deal_id
+ AND S_deal_sk.deal_id=0
#endif
BeginProgram:w_copy_vars
w_dat();
EndProgram;
GetVariable: KDY:=datum_dodani
SQLStatement: obj
#ifexists
+ SELECT OBJ_HEADER.id_dobj
+ FROM OBJ_HEADER, S_doprava
+ WHERE id_dobj=%objednavka% AND S_doprava.kod=Obj_header.doprav
#then
+ SELECT OBJ_HEADER.id_dobj,OBJ_HEADER.cis_eob,OBJ_HEADER.datum,OBJ_HEADER.pozn,OBJ_HEADER.datum_d,S_doprava.zpusob
+ FROM OBJ_HEADER, S_doprava
+ WHERE id_dobj=%objednavka% AND S_doprava.kod=Obj_header.doprav
#else
+ SELECT OBJ_HEADER.id_dobj,OBJ_HEADER.cis_eob,OBJ_HEADER.datum,OBJ_HEADER.pozn,OBJ_HEADER.datum_d, "" AS zpusob
+ FROM OBJ_HEADER
+ WHERE id_dobj=%objednavka%
#endif
SQLStatement: novy
#ifexists
+ SELECT S_typ_uziv.id_typ,S_typ_uziv.nazev_typ, Obchodni_partneri.intr_user
+ FROM Obj_header, Obchodni_partneri, S_typ_uziv
+ WHERE (Obchodni_partneri.id=Obj_header.id_org) AND (id_dobj=%objednavka%)
+ AND (Obchodni_partneri.intr_user<>"") AND (S_typ_uziv.id_typ=Obchodni_partneri.typ)
#then
+ SELECT S_typ_uziv.id_typ,S_typ_uziv.nazev_typ, Obchodni_partneri.intr_user
+ FROM Obj_header, Obchodni_partneri, S_typ_uziv
+ WHERE (Obchodni_partneri.id=Obj_header.id_org) AND (id_dobj=%objednavka%)
+ AND (Obchodni_partneri.intr_user<>"") AND (S_typ_uziv.id_typ=Obchodni_partneri.typ)
#else
+ SELECT DEFAULT_HODNOTY.TYP_UZIV, "" AS intr_user
+ FROM DEFAULT_HODNOTY
#endif
<%/WBC%>