Hubert
Szcześniak
Wykładowca, Studium
Filar
Marek
Pacan
http://symfoniadodat
ki.pl
Temat: AmBasic od czego zacząć?
Hej,polecam zainstalować sobie demo któregoś z symfoniowych programów.
Warto pogmerać w dołączonej dokumentacji a potem w standardowych raportach.
Zabawy na dobry miesiąc:-)
Help, mimo, że momentami nieaktualny, naprawdę jest dobrym źrodłem informacji na start.
Potem potrzebny będzie dostęp do części dokumentacji 'dla dystrybutorów' lub dobry znajomy zajmujący się symfonią:-).
Poadrawiam
Marek
Hubert
Szcześniak
Wykładowca, Studium
Filar
Temat: AmBasic od czego zacząć?
Mam taki problem:Załóżmy, że mam następujące kody towarów: CA325/G, CA325/P, CA325/RAD
Jak zrobić, żeby polecenie w raporcie: tw.GetField("kod") brało pod uwagę tylko kod do "/"?
Czyli, żeby do dalszej obróbki w raporcie (w w/w przypadku) zawsze przechodziło tylko CA325.
Mam coś takiego:
int iPos = SetTaggedPos(FS)
string KodTowaru
baseTW tw
tw.GetRecById( GetLineId(iPos))
Buf = tw.GetField("kod")
Find Regular "^{*}//"
ShellExecute( KatalogFirmy() + "zdjecia\\" + "regular 1" + ".jpg", "OPEN" )
NoOutput()
Dlaczego nie działa?
Z góry dzięki za info.
HubertHubert Szcześniak edytował(a) ten post dnia 29.06.10 o godzinie 13:47
Marek
Pacan
http://symfoniadodat
ki.pl
Temat: AmBasic od czego zacząć?
Hej,stawiam na błąd w:
" + "regular 1" +
po zmianie na
" + (regular 1) +
działa.
Ale bym trochę po-if-ował ten kod.
np.
if (find regular "") then
costam cośta
else
coś nie wyszło bo np. kod nie ma znaczka /
endif
i tym podobne.
W tej formie kod będzie malo bezpieczny.
Pozdrawiam
Marek
Hubert Szcześniak:>
Mam taki problem:
Załóżmy, że mam następujące kody towarów: CA325/G, CA325/P, CA325/RAD
Hubert
Szcześniak
Wykładowca, Studium
Filar
Temat: AmBasic od czego zacząć?
Już do tego doszedłem, że trzeba jeszcze po ifować :-]Ale i tak wielkie dzięki za podpowiedź.
Nie lubię być noobem :-/
He, he zrobiłem:
int iPos = SetTaggedPos(FS)Hubert Szcześniak edytował(a) ten post dnia 30.06.10 o godzinie 08:11
baseTW tw
tw.GetRecById( GetLineId(iPos))
Buf = tw.GetField("kod")
If (Find Regular "^{*}//") Then
ShellExecute( KatalogFirmy() + "zdjecia\\" + (Regular 1) + ".jpg", "OPEN" )
Else
ShellExecute( KatalogFirmy() + "zdjecia\\" + Buf + ".jpg", "OPEN" )
EndIf
NoOutput()
Podobne tematy
Następna dyskusja: