23. März 2015 16:13
...
IF DPDDruckCSV.Auftragsnummer = 'VA' THEN
...
23. März 2015 16:19
Auftragsnummer = 'VA1000'
NewString:=COPYSTR(Auftragsnummer, Position[, Length])
IF NewString = VA THEN MachWas
23. März 2015 16:27
SETFILTER(Auftragsnummer, 'VA*');
23. März 2015 17:03
IF DPDDruckCSV.Auftragsnummer = 'VA15.00001' THEN
Filename :='\\Clientname\dpd\Vertrieb\' + CONVERTSTR(FORMAT(WORKDATE),'.','_') +'_'+ CONVERTSTR(FORMAT(TIME),':','_') + '.csv'
ELSE IF DPDDruckCSV.Auftragsnummer = 'SVA15.00001' THEN
Filename :='\\Clientname\dpd\Schweiz\' + CONVERTSTR(FORMAT(WORKDATE),'.','_') +'_'+ CONVERTSTR(FORMAT(TIME),':','_') + '.csv'
23. März 2015 18:12
IF STRPOS(DPDDruckCSV.Auftragsnummer, 'VA') = 1 THEN
Filename :='\\Clientname\dpd\Vertrieb\' + CONVERTSTR(FORMAT(WORKDATE),'.','_') +'_'+ CONVERTSTR(FORMAT(TIME),':','_') + '.csv'
ELSE IF STRPOS(DPDDruckCSV.Auftragsnummer, 'SVA') = 1 THEN
Filename :='\\Clientname\dpd\Schweiz\' + CONVERTSTR(FORMAT(WORKDATE),'.','_') +'_'+ CONVERTSTR(FORMAT(TIME),':','_') + '.csv'
23. März 2015 19:07
23. März 2015 22:48
CASE TRUE OF
STRPOS(DPDDruckCSV.Auftragsnummer, 'VA'): Filename := ...;
STRPOS(DPDDruckCSV.Auftragsnummer, 'SVA'): Filename := ..;
usw...
END
23. März 2015 23:21
24. März 2015 09:06
McClane hat geschrieben:Auch so werden die "SVA" schon bei der Suche nach "VA" verarbeitet .
24. März 2015 09:38
24. März 2015 11:15
JoergR hat geschrieben:Ein Klassiker ;)
- Code:
CASE TRUE OF
STRPOS(DPDDruckCSV.Auftragsnummer, 'VA'): Filename := ...;
STRPOS(DPDDruckCSV.Auftragsnummer, 'SVA'): Filename := ..;
usw...
END
Lässt sich grad bei mehr als 2 Optionen viel besser lesen ..
CASE TRUE OF
(STRPOS(DPDDruckCSV.Auftragsnummer, 'VA')=1): Filename := ...;
(STRPOS(DPDDruckCSV.Auftragsnummer, 'SVA')=1): Filename := ..;
usw...
END
24. März 2015 22:30
JoergR hat geschrieben:imho generell trotzdem besser lesbar als verschachtelte IF Anweisungen..