DEF PROC Telefon
DEF PROC Telefon_Zonen_Lesen(?,?,?,?)
 
  GLOBAL ARRAYS: Zonen_Nummer$(?), Zonen_Laenge%(?), Zonen_Minimal!(?)
    , Zonen_Maximal!(?)
  FN's USED: FN Blank_Ende$(?), FN Links$(?,?), FN Rechts$(?,?), FN Blank_Ende$(?,?)
    , FN Blank_Total$(?)
DEF FN Telefon_Tarif%(?,?,?,?,?,?)