Is there some way to automate creation of a header text
in functions and subroutines, such as:

'***************************************************
'* Date Created : November 04, 1999
'* Original Author:
'* Modified by :
'* Modified Date :
'* Description :
'*


regards
Lennart Johansson