Write A, left justified, howto?

How can I make the following print ID, Code and Name left justified not
right? I found that if I pad ID, Code and Name to be longer than the
desired output then it becomes left justified.

write(*, '(A4,1X,A10,1X,A10)') 'ID', 'Code', 'Name'

prints:

ID Code Name
---- ---------- ----------

(-'s added for clarity)

write(*, '(A4,1X,A10,1X,A10)') 'ID ', 'Code ', &
'Name '

will print:

ID Code Name
---- ---------- ----------

which is what I want but I'm sure there has to be a better way of doing
it.

Thanks for any input,

Jeremy
.