with Ada.Streams.Stream_IO; use Ada.Streams.Stream_IO; private with TastenbelegungDatenbank; package EinlesenTastatureinstellungenLogik is pragma Elaborate_Body; procedure Tastatureinstellungen; private Nullwert : Boolean; DateiTastatureinstellungen : File_Type; AllgemeineBelegung : TastenbelegungDatenbank.AllgemeineBelegungArray; Einheitenbelegung : TastenbelegungDatenbank.EinheitenbelegungArray; Stadtbelegung : TastenbelegungDatenbank.StadtbelegungArray; function TastatureinstellungenDurchgehen (LadenPrüfenExtern : in Boolean; DateiLadenExtern : in File_Type) return Boolean; end EinlesenTastatureinstellungenLogik;