mojaSymfonia FORUM
https://forum.mix-soft.pl/

HMF2009 - Zlecenie dokumentu PZP
https://forum.mix-soft.pl/viewtopic.php?f=15&t=1735
Strona 1 z 1

Autor:  nick [ 2010-02-15, 17:47 ]
Tytuł:  HMF2009 - Zlecenie dokumentu PZP

Czy ktoś z PT Forumowiczów wie jak w prosty sposób określić na postawie id dokumentu PZP, do jakiego zlecenia zlecenia został sporządzony ten dokument?

Czy trzeba przeprowadzić iterację po obiekcie BZl2 i dla każdego odczytanego w ten sposób zlecenia przeprowadzać iterację po obiekcie BZwiazekZlPZP sprawdzając idDk ?

Może jest jakiś prostszy sposób?

Autor:  wrob [ 2010-02-15, 18:39 ]
Tytuł: 

Selectem na bazie :)

Autor:  rafal [ 2010-02-15, 22:56 ]
Tytuł: 

Kod:
dispatch xDokumentMg = xFactory.NewObject("BDokumentMg")

xDokumentMg.Load((using "kod='%s'","1/10/pzp"))

int i=1

dispatch xPow
xPow =xDokumentMg.PowiazaneDk
for i = 1 to i > xPow.Count()
   
   print xPow.item(i).nazwa + lf

next i

Autor:  nick [ 2010-02-16, 12:09 ]
Tytuł: 

rafal pisze:
Kod:
dispatch xDokumentMg = xFactory.NewObject("BDokumentMg")

xDokumentMg.Load((using "kod='%s'","1/10/pzp"))

int i=1

dispatch xPow
xPow =xDokumentMg.PowiazaneDk
for i = 1 to i > xPow.Count()
   
   print xPow.item(i).nazwa + lf

next i


Dzięki!
Poszedłem jednak dalej tak jak radził wrob:
Kod:
long sub IdZleceniaDokumentuPZP(long lId)
   dispatch Cn = "ADODB.Connection"
   dispatch Rs = "ADODB.Recordset"

   Cn = GetAdoConnection()
   Rs = Cn.Execute("SELECT * FROM ZZ WHERE typ=154 AND id2=" + (using "%l", lId))

   if !Rs.EOF then
      IdZleceniaDokumentuPZP = Rs.Fields("id1").Value
   endif
   Rs.Close()
endsub

Autor:  rafal [ 2010-02-16, 17:15 ]
Tytuł: 

Świetnie. I co Ci dał ten krok dalej?

Strona 1 z 1 Strefa czasowa UTC+1godz. [letni]
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
http://www.phpbb.com/