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/ |