|
|
Strona 1 z 1
|
[ Posty: 8 ] |
|
FiK 2011.1c - Odczytanie danych firm
Autor |
Wiadomość |
matrix-1990
Rejestracja: 2013-02-15, 12:06 Posty: 28 Pomógł: 1
|
FiK 2011.1c - Odczytanie danych firm
Hej, mam pytanie odnośnie sposobu odczytania kodu firm wszystkich firm jakie są w systemie na lokalu. Udało mi się odczytać dane konkretnej firmy w taki sposób Kod: String strDelimiter = "\\" String strSysId = "23" //kod firmy String intSysId = "2013" String strKatalogId = "REPOSCD"
Int conf = Open Katalog() + strDelimiter + strSysId + strDelimiter + "05config.dat" For base "config5"
SetKey (conf, "nazwa") SetKeySeg (conf, "nazwa", "23")
if 0==GetRec(conf, EQ) then Message GetField(conf, "nip") Else Message "Nie udalo sie"
endif
Close conf
Wiem też, że jest struktura InfoFirma, w której można odczytać dane firmy na której jestem zalogowany, ale ja potrzebuję odczytać np. nipy wszystkich firm w systemie, macie jakiś pomysł? Teoretycznie mógłbym sprawdzić nazwy katalogów ale to jest trochę nieelegancko :)
|
2013-03-18, 09:48 |
|
|
Autor |
Wiadomość |
Mix-soft.pl
|
|
|
rafal
Ekspert
Rejestracja: 2007-11-16, 15:08 Posty: 4000 Pomógł: 448
|
Re: FiK 2011.1c - Odczytanie danych firm
Jak udało Ci się dla jednej firmy to jaki problem z pozostałymi jak znasz katalogi danych?
|
2013-03-18, 13:15 |
|
|
matrix-1990
Rejestracja: 2013-02-15, 12:06 Posty: 28 Pomógł: 1
|
Re: FiK 2011.1c - Odczytanie danych firm
Myślę, że tak, bo: 1. Nie zawsze nazwa katalogu jest taka sama jak kod firmy (kod firmy może być dłuższy, lub zawierać polskie znaki, a wtedy nazwa katalogu jest skracana i nie ma polskich znaków), co powoduje to, że nie znamy z poziomu symfonii kodu firmy 2. Z tego co się zorientowałem to w symfonii można pobrać nazwy plików z danego katalogu, a nie folderów
|
2013-03-18, 14:01 |
|
|
rafal
Ekspert
Rejestracja: 2007-11-16, 15:08 Posty: 4000 Pomógł: 448
|
Re: FiK 2011.1c - Odczytanie danych firm
Przepraszam ale nie rozumiem co chcesz zrobić.
Masz kilka baz danych? Jesteś biurem rachunkowym? Na czym polega projekt, który chcesz wykonać?
|
2013-03-18, 15:58 |
|
|
matrix-1990
Rejestracja: 2013-02-15, 12:06 Posty: 28 Pomógł: 1
|
Re: FiK 2011.1c - Odczytanie danych firm
W moim systemie symfonii mam utworzonych kilka firm, każda ma swój nip i inne dane, a chciałbym będąc zalogowany na jednej z tych firm wydobyć informację na temat (np. numery nip) wszystkich firm jakie mam utworzone w tym systemie. Projekt polega na tym, że mając kilka firm chciałbym zrobić z poziomu jednej firmy (nie przelogowywując się na inną) obsługiwać faktury, a do tego potrzebuję identyfikatory wszystkich firm w systemie (chciałbym to zrobić elastycznie dlatego nie chcę na sztywno wpisywać tylko wydobyć jakoś) oraz po identyfikatorze dojść do nipu każdej z firm, czyli krótko mówiąc interesuje mnie w wyniku raportu jakiś plik tekstowy w którym będzie id_firmy1: nip_firmy1, id_firmy2: nip_firmy2, ....
jak coś jeszcze nie jest jasnego to pisz śmiało, wyjaśnię :)
|
2013-03-18, 16:38 |
|
|
wrob
Ekspert
Rejestracja: 2008-04-18, 18:52 Posty: 5169 Pomógł: 59
|
Re: FiK 2011.1c - Odczytanie danych firm
to moze prosciej przeleciec bat-em caly dysk szukajac plikow firma.fk i czytajac z nich :)
|
2013-03-18, 16:40 |
|
|
rafal
Ekspert
Rejestracja: 2007-11-16, 15:08 Posty: 4000 Pomógł: 448
|
Re: FiK 2011.1c - Odczytanie danych firm
A nie możesz oprzeć się na liście dołączonych firm? Kod: // Dla wersji poniżej 2013
string sKat
int iLiczbaFirmINI = 1 while (sKat = GetIni("Katalogi firm",(using "Firma%d", iLiczbaFirmINI), KatalogWin() + "Amfk.ini")) != "" conf = Open sKat + "05config.dat" For base "config5" [...]
iLiczbaFirmINI += 1 wend Kod: // Dla wersji 2013 i wyżej
dispatch dF = "WScript.Shell" string sKat
int iLiczbaFirmINI = 1 while (sKat = GetIni("Katalogi firm",(using "Firma%d", iLiczbaFirmINI), dF.ExpandEnvironmentStrings("%AppData%") + "\\Sage\\Config\\Amfk.ini")) != "" conf = Open sKat + "05config.dat" For base "config5" [...]
iLiczbaFirmINI += 1 wend
|
2013-03-18, 17:15 |
|
|
matrix-1990
Rejestracja: 2013-02-15, 12:06 Posty: 28 Pomógł: 1
|
Re: FiK 2011.1c - Odczytanie danych firm
to mi wystarczy, dzięki :)
|
2013-04-07, 16:49 |
|
|
|
Strona 1 z 1
|
[ Posty: 8 ] |
|
Kto jest online |
Użytkownicy przeglądający to forum: Nie ma żadnego zarejestrowanego użytkownika i 7 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
|
|
|
|