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