Use procedure(s) in a function ?

[comicfanzine@gmail.com]

Hi ;

Is it possible to use procedure(s) in a function ??

I Checked the A.R.M =  http://www.adaic.org/resources/add_content/standards/95lrm/ARM_HTML/RM-6-4.html

http://www.adaic.org/resources/add_content/standards/95lrm/ARM_HTML/RM-6-3.html

No examples about this....

If yes =

I'm trying to return a global variable's String value , and want to use the function later in a procedure .

The code =

function get_name return String 
is begin
Put_line("Your name?");
 Get(name); -- name is in "globals"
 put(name);
return name;
end get_name;

package globals 
is 
name : String(1..20) ;
end globals;