Add Print procedure to report an error message depending on an exception
Add Print procedure to report an error message depending on an exception

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