Zitat Zitat von MeisterM
Sorry, hatte vergessen zu erwähnen, dass die Funktion bei POCSAG POCParser heißt.

Code:
Function POCParser (POCSAGTelegramm)
Dim Result (10) 'Ergebnisarray - Nummerierung = Felder in der LST Üersichtstabelle

FelderKomma = Split(POCSAGTelegramm, ",") 'Hier wird das Trennzeichen angegeben - Trennt an den Kommas
Felder = Split(FelderKomma(0), " ") 'Hier das zweite Trennzeichen - Trennung an Leerzeichen

Result(3) = Felder(0) 'Stichwort
Result(2) = Felder(1) 'Straße
Result(10) = Felder(2) 'Hausnummer

Result(10) = Felder(2) 'Hausnummer

Result(1) = FelderKomma(1) 'Stadt

POCParser = Result
End Function
Das ganze muss dann natürlich in das PocsagParser Script im Editor eingefügt werden.
Was jetzt der Ort bei dir sein soll weis ich nicht. (Stadt zum Stadtteil oder Zusatzinformationen zum Einsatzort?!?)
Bei dem obigen Script wird der Einsatzort ignoriert. Derzeit gibts in der Auftragsübersicht das Feld Stadt noch nicht. Werde ich wohl noch integrieren. Macht ja auch Sinn.

Gruß
Holger

Habe das Script für die POCSAG- Alarmierungen wie folgt geschrieben:

Function POCParser (POCParser)
Dim Result (10) 'Ergebnissarray - Nummerierung = Felder in der LSTÜbersicht

FelderKomma = Split(POCParser, ",")
Felder = Split(FelderKomma(0), " ")

Result(3) = Felder(0)
Result(2) = Felder(1)
Result(10) =Felder(2)
Result(1) = FelderKomma(1)

POCParser = Result
End Function

Leider ohne Ergebnis, es wird kein Einsatz angelegt!
Was hierbei falsch ?

Grüße

Uwe