|
|
Strona 1 z 1
|
[ Posty: 15 ] |
|
Otwieranie okien przez AmBasic
Autor |
Wiadomość |
Benji_Pete
Rejestracja: 2008-06-03, 12:18 Posty: 106
|
Otwieranie okien przez AmBasic
Czy można przez AmBasic otworzyć okno z dokumentem?
|
2009-08-11, 14:08 |
|
|
Autor |
Wiadomość |
Mix-soft.pl
|
|
|
wrob
Ekspert
Rejestracja: 2008-04-18, 18:52 Posty: 5169 Pomógł: 59
|
Raczej nie da sie
- ale moze pisz w o jaki program pytasz
|
2009-08-11, 14:19 |
|
|
Benji_Pete
Rejestracja: 2008-06-03, 12:18 Posty: 106
|
Handel Forte
|
2009-08-11, 14:24 |
|
|
rafal
Ekspert
Rejestracja: 2007-11-16, 15:08 Posty: 4000 Pomógł: 448
|
np:. okno towaru o id = 65730
Kod: dispatch app = GetApplication() app.CommandAp("OpenWindow", "TWX.TPL", 65730)
|
2009-08-11, 22:28 |
|
|
Benji_Pete
Rejestracja: 2008-06-03, 12:18 Posty: 106
|
A reszta okien?
|
2009-08-12, 08:16 |
|
|
Benji_Pete
Rejestracja: 2008-06-03, 12:18 Posty: 106
|
Znalazłem metodą prób i błędów (zmieniamy drugi parametr):
Dok sprzedaży - "SP.TPL"
Dok zakupu - "ZK.TPL"
Dok magazynowy - "MG.TPL"
Magazyny - "MGX.TPL"
jak wcześniej napisał kolega - Towary - "TPX.TPL"
Zamówienie obce - "ZO.TPL"
Zamówienie własne - "ZW.TPL"
Kontrahenci - "KHX.TPL"
Urzędy - "URX.TPL"
Nie wiem jak są płatności. Próbowałem PO, PN i nic. Może zna ktoś jeszcze jakieś?
PS. Jeśli w id podamy 0 to utworzy się nowy dokument (czy kartoteka). Jeśli kartoteka to możemy wypełniać, jeśli dokument to zapisze się w bufor (trzeba kliknąć "Edytuj")
|
2009-08-12, 08:36 |
|
|
jerko
Rejestracja: 2008-06-03, 08:52 Posty: 7
|
Spróbuj PNX.TPL
|
2009-08-12, 15:27 |
|
|
barnie
Ekspert
Rejestracja: 2008-04-07, 13:26 Posty: 208 Pomógł: 2
|
ZNACZTWX.TPL
ZNACZKHX.TPL
ZNACZSPX.TPL
ZNACZZKX.TPL
itd...
|
2009-08-13, 22:47 |
|
|
barnie
Ekspert
Rejestracja: 2008-04-07, 13:26 Posty: 208 Pomógł: 2
|
OPISWYDX.TPL
OPISPRZYJKORX.TPL
OPISPRZYJX.TPL
OPISZKKORX.TPL
OPISZLX.TPL
OPISWYDKORX.TPL
itd..
|
2009-08-13, 22:50 |
|
|
Benji_Pete
Rejestracja: 2008-06-03, 12:18 Posty: 106
|
A może ktoś wie, czy istnieją jeszcze inne komendy oprócz "OpenWindow". Pewnie CloseWindow, ale raczej chodziłoby mi o np. przestawienie widoku dokumentu na "Pełny".
|
2009-08-17, 08:13 |
|
|
wrob
Ekspert
Rejestracja: 2008-04-18, 18:52 Posty: 5169 Pomógł: 59
|
А moze mozna uzyc czegos w stylu sendkeys do tego? :)
|
2009-08-17, 17:47 |
|
|
Benji_Pete
Rejestracja: 2008-06-03, 12:18 Posty: 106
|
Czy jest w takim razie metoda CloseWindow, która zamknęłaby okno wywołane przez OpenWindow??
Dzięki z góry
|
2009-08-20, 13:24 |
|
|
sqza
Rejestracja: 2009-01-13, 10:45 Posty: 86
|
Czy jest możliwość uzyskania powyżej opisanej funkcjonalności (otwieranie okien dokumentów, towarów, kontrahentów itp itd) w Handlu Premium ??
Przetestowałem tą samą funkcję i niestety nie działa.
|
2009-08-26, 08:27 |
|
|
sqza
Rejestracja: 2009-01-13, 10:45 Posty: 86
|
Jeszcze jedno pytanie w tym wątku.
Czy jest możliwe wyświetlenie okna np. kartoteki wybranego kontrahenta lub listy kontrahentów z przyciskiem Użyj - i ewentualnie gdzie mogą być przechowywane dane wybranego kontrahenta.
|
2009-09-04, 12:43 |
|
|
rafal
Ekspert
Rejestracja: 2007-11-16, 15:08 Posty: 4000 Pomógł: 448
|
Do tego przydały by polecenie Link. A z tego co mi wiadomo w AMBasicu nie działają - tylko w VBA.Kiedyś wymyśliłem coś takiego do wersji FORTE (łatwe do zaimplementowania w PREMIUM przy użyciu ShowListWindow) :
W raporcie: Kod: //-------------------------------- int sub OnCommand(int id, int msg) //--------------------------------
endsub
//-------------------------------- int sub Uzyj() //--------------------------------
PutIni("SP","uzyj","99999999")
dispatch xSp = xFactory.NewObject("BDokSp")
dispatch xSpParams = xSp.Params() xSpParams.opis = "To się pojawi w nagłówku okna"
dispatch xIdRows = xFactory.NewObject("IdRows")
xIdRows.Add(65554) xIdRows.Add(65568)
xSpParams.wybrane = xIdRows xSp.Load(xSpParams) OpenWindow(xSp)
while GetIni("SP","Uzyj") == "99999999"
wend
message using "Wybrano dokument %s", GetIni("SP","Uzyj")
endsub
FORM "Pseudo Link", 100,50 BUTTON "Dokumenty", 5,5, 80,20, Uzyj() execForm OnCommand(-1) w Raporcie \Procedury\Raporty z menu kartotek\Sprzedaż Kod: int err = SetTaggedPos( FS ) PutIni("SP","uzyj", (using "%l",GetLineId(err)) ) NoOutPut()
Nie jest to zbyt eleganckie, ale jak na moje wystarczyło. Dlatego nazywa się "Pseudo Link" :)
|
2009-09-11, 19:22 |
|
|
|
Strona 1 z 1
|
[ Posty: 15 ] |
|
Kto jest online |
Użytkownicy przeglądający to forum: Nie ma żadnego zarejestrowanego użytkownika i 21 gości |
|
Nie możesz tworzyć nowych tematów Nie możesz odpowiadać w tematach Nie możesz zmieniać swoich postów Nie możesz usuwać swoich postów Nie możesz dodawać załączników
|
|
|
|