Call by value

data: NAME(20) value 'source',
      SOURCE(10) value 'Bruce',
      TARGET(10).

write (NAME) to TARGET.   " write ('source') to TARGET.
write / TARGET.           " 'Bruce' will be printed