Szövegfájl-feldolgozással kapcsolatos kérdés? (bővebben lent)

Adott egy szöveges fájl, amelyet rekordokba szeretnék beolvasni, de szövegfájlból időnként hiányoznak a megfelelő adatok, ezért szekvenciális olvasással nem sokra megyek.

Sima tömbbe (nem rekordosba mint programom esetén) be lehetne olvasni, de a továbblépést illetően ott se lenne ötletem. :-(

Fájlformátum a következő:

Cégnév:

<cégnév>

Cím:

<cég címe>

Telefonszám:

<cég telefonszáma>

Cég tevékenysége:

<tevékenység leírása, van hogy két sorban>

Terület:

<a cég működési területe, általában egy soros leírás>

Miként lehet ezt rekordokba olvasni úgy, hogy bármilyen hiányt felismerjen a fájlból beolvasást végző program és ugorjon a következő cégre, ne legyen semmiféle csúszás?

A kulcsszavak rendben vannak a fájlban (Cégnév: Cím: stb), azok mindig jelzik: "milyen adat következik", ahol nincs adat, vagy hiányos, esetleg kimaradt valami adott cégnél, azt nem jelzi semmi, ismét jön a Cég: kulcsszó és egy következőnek az adatai.

Van ahol csak név és cím van, másik két adat hiányzik.

Pascal nyelven tudok csak, de bármilyen nyelven érdekelne megoldás, ha le tudom fordítani gépemen úgy, hogy működjön, vagy ha valaki linkel binárist.

Ha megoldást nem szeretnétek írni, leírnátok szövegesen: mit kellene tennem, illetve, ti hogy oldanátok meg?

A beolvasási-próbálkozással kapcsolatos program (rekordokba):

https://hastebin.com/enokulitoj.pas