Declare Storage_Type enum Declare Set procedure Change Storage_File to support various storage types
Declare Storage_Type enum
Declare Set procedure
Change Storage_File to support various storage types

stcarrez/ada-awa,stcarrez/ada-awa,stcarrez/ada-awa,stcarrez/ada-awa