Fórum Root.cz

Hlavní témata => Server => Téma založeno: ZAJDAN 27. 09. 2017, 09:58:27

Název: CrystalReports - práce s array
Přispěvatel: ZAJDAN 27. 09. 2017, 09:58:27

Ahoj...
potřeboval jsem vytvořit pole z dlouheho stringu, ktery ma parsovaci znak ' | ' :
F1E|I21|R|4|30|50|180|35|BG340SR|S10|D11|T10|1P|PVC|PZS-Z25|HS|/|F11|R20|K7035|T7035|/|SNAL|/,|/,/|TOB,S|H,2|/|VZKT|VZKT|SD|

Kód: [Vybrat]

//Create Array from the configuration(parametric row)
Global StringVar Array myString;
myString:= Split({Command.Parameter},"|");poradil by si nekdo jak si ted do promené dostanu 4tý index z pole?
díky

Název: Re:CrystalReports - práce s array
Přispěvatel: ZAJDAN 27. 09. 2017, 14:29:05

SOLVED:

Kód: [Vybrat]

WhilePrintingRecords ;
Shared NumberVar Qty := Sum({Command.Quantity},{Command.Parameter});
Global StringVar Array myString;
Redim myString [32];
myString:= Split({Command.Parameter},'|');
Global Numbervar Amt:=0;
If UBound(myString)>=4
Then Amt:= Tonumber(myString[4]);

Název: Re:CrystalReports - práce s array
Přispěvatel: ZAJDAN 27. 09. 2017, 14:30:21

ted by me ale zajimalo, jak dostat do promene element co neni typ Number ale text(varchar), protoze UBound vraci pouze Number

Název: Re:CrystalReports - práce s array
Přispěvatel: ZAJDAN 27. 09. 2017, 14:45:21

SOLVED:

Kód: [Vybrat]

Global StringVar Design ;
If UBound(myString)>=2
Then Design:= ToText(myString[2]);